Example 2 from Robby

Time bar (total: 1.2min)

start0.0ms (0%)

Memory
0.1MiB live, 0.1MiB allocated; 0ms collecting garbage

analyze545.0ms (0.7%)

Memory
3.7MiB live, 384.9MiB allocated; 27ms collecting garbage
Algorithm
search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
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
Compiler

Compiled 32 to 20 computations (37.5% saved)

sample2.2s (3%)

Memory
34.4MiB live, 1 544.9MiB allocated; 111ms collecting garbage
Samples
1.7s8 256×0valid
Precisions
Click to see histograms. Total time spent on operations: 1.5s
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)
Bogosity

explain636.0ms (0.9%)

Memory
20.7MiB live, 460.9MiB allocated; 12ms collecting garbage
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
1000-0-(cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))
90-2(1.4543022577490839e-61 -1.901168222006342e-275 -2.4039842456587706e-263)(/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)
00-0-(*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew))))
00-0-(atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew))
00-0-t
00-0-(neg.f64 eh)
00-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))))))
00-0-(*.f64 (neg.f64 eh) (tan.f64 t))
00-0-(*.f64 ew (cos.f64 t))
00-0-(sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))
00-0-(sin.f64 t)
00-0-(*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew))))
00-0-(*.f64 eh (sin.f64 t))
00-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)))))
00-0-(cos.f64 t)
00-0-(tan.f64 t)
00-0-ew
00-0-eh
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
cos.f64(cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))sensitivity1000
Confusion
Predicted +Predicted -
+00
-100156
Precision
0.0
Recall
0/0
Confusion?
Predicted +Predicted MaybePredicted -
+000
-1000156
Precision?
0.0
Recall?
0/0
Freqs
test
numberfreq
0156
1100
Total Confusion?
Predicted +Predicted MaybePredicted -
+000
-100
Precision?
0.0
Recall?
0/0
Samples
281.0ms104×2valid
89.0ms94×1valid
81.0ms314×0valid
Compiler

Compiled 322 to 58 computations (82% saved)

Precisions
Click to see histograms. Total time spent on operations: 395.0ms
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)

preprocess177.0ms (0.2%)

Memory
-38.7MiB live, 101.8MiB allocated; 9ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
096297
1289291
2819291
32171291
45606291
01830
03330
16630
214230
338030
4124230
5461130
0815730
Stop Event
iter limit
node limit
iter limit
node limit
Calls
Call 1
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))))
Compiler

Compiled 30 to 18 computations (40% saved)

eval0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated; 0ms collecting garbage
Compiler

Compiled 0 to 3 computations (-∞% saved)

prune1.0ms (0%)

Memory
0.4MiB live, 0.4MiB allocated; 0ms collecting garbage
Alt Table
Click to see full alt table
StatusAccuracyProgram
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))))))
Compiler

Compiled 30 to 18 computations (40% saved)

series51.0ms (0.1%)

Memory
31.0MiB live, 31.0MiB allocated; 0ms collecting garbage
Counts
18 → 65
Calls
Call 1
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)))
Calls

9 calls:

TimeVariablePointExpression
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))))

rewrite182.0ms (0.2%)

Memory
1.3MiB live, 90.8MiB allocated; 8ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
03182293
03462059
118162053
082961997
Stop Event
iter limit
node limit
iter limit
Counts
83 → 145
Calls
Call 1
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))

eval33.0ms (0%)

Memory
-19.3MiB live, 27.2MiB allocated; 3ms collecting garbage
Compiler

Compiled 8 170 to 991 computations (87.9% saved)

prune528.0ms (0.7%)

Memory
8.0MiB live, 202.3MiB allocated; 10ms collecting garbage
Pruning

4 alts after pruning (4 fresh and 0 done)

PrunedKeptTotal
New1934197
Fresh000
Picked101
Done000
Total1944198
Accuracy
99.9%
Counts
198 → 4
Alt Table
Click to see full alt table
StatusAccuracyProgram
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))))
Compiler

Compiled 228 to 116 computations (49.1% saved)

series842.0ms (1.1%)

Memory
19.7MiB live, 352.7MiB allocated; 80ms collecting garbage
Counts
60 → 550
Calls
Call 1
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))))))))
Calls

9 calls:

TimeVariablePointExpression
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))))

rewrite849.0ms (1.2%)

Memory
-3.9MiB live, 497.3MiB allocated; 74ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
04042241022
04161225277
013995219236
Stop Event
iter limit
node limit
iter limit
Counts
610 → 677
Calls
Call 1
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))))))

eval428.0ms (0.6%)

Memory
19.0MiB live, 345.4MiB allocated; 48ms collecting garbage
Compiler

Compiled 399 433 to 8 038 computations (98% saved)

prune13.1s (17.9%)

Memory
-34.4MiB live, 16 031.4MiB allocated; 2.0s collecting garbage
Pruning

6 alts after pruning (3 fresh and 3 done)

PrunedKeptTotal
New1 25331 256
Fresh000
Picked134
Done000
Total1 25461 260
Accuracy
99.9%
Counts
1 260 → 6
Alt Table
Click to see full alt table
StatusAccuracyProgram
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)))))))))))))))
Compiler

Compiled 585 to 256 computations (56.2% saved)

series689.0ms (0.9%)

Memory
32.3MiB live, 825.5MiB allocated; 68ms collecting garbage
Counts
67 → 698
Calls
Call 1
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)))
Calls

9 calls:

TimeVariablePointExpression
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))

rewrite653.0ms (0.9%)

Memory
37.2MiB live, 794.1MiB allocated; 73ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
04617122162
04738111638
014793109535
Stop Event
iter limit
node limit
iter limit
Counts
765 → 839
Calls
Call 1
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)))

eval431.0ms (0.6%)

Memory
-5.0MiB live, 465.7MiB allocated; 63ms collecting garbage
Compiler

Compiled 353 908 to 16 414 computations (95.4% saved)

prune44.7s (60.9%)

Memory
81.2MiB live, 59 757.0MiB allocated; 3.0s collecting garbage
Pruning

7 alts after pruning (2 fresh and 5 done)

PrunedKeptTotal
New1 68421 686
Fresh000
Picked123
Done033
Total1 68571 692
Accuracy
99.9%
Counts
1 692 → 7
Alt Table
Click to see full alt table
StatusAccuracyProgram
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)))))))))))))))
Compiler

Compiled 713 to 321 computations (55% saved)

series176.0ms (0.2%)

Memory
-12.0MiB live, 224.5MiB allocated; 8ms collecting garbage
Counts
38 → 331
Calls
Call 1
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)))
Calls

9 calls:

TimeVariablePointExpression
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)))))

rewrite323.0ms (0.4%)

Memory
11.2MiB live, 488.5MiB allocated; 16ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0270383797
0275078917
0865177483
Stop Event
iter limit
node limit
iter limit
Counts
369 → 410
Calls
Call 1
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)))

eval113.0ms (0.2%)

Memory
30.2MiB live, 166.6MiB allocated; 10ms collecting garbage
Compiler

Compiled 121 390 to 4 831 computations (96% saved)

prune6.3s (8.6%)

Memory
-16.8MiB live, 11 558.1MiB allocated; 141ms collecting garbage
Pruning

7 alts after pruning (0 fresh and 7 done)

PrunedKeptTotal
New4730473
Fresh000
Picked022
Done055
Total4737480
Accuracy
99.9%
Counts
480 → 7
Alt Table
Click to see full alt table
StatusAccuracyProgram
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)))))))))))))))
Compiler

Compiled 1 702 to 523 computations (69.3% saved)

regimes18.0ms (0%)

Memory
-14.7MiB live, 32.8MiB allocated; 0ms collecting garbage
Counts
10 → 1
Calls
Call 1
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))))))
Calls

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
Results
AccuracySegmentsBranch
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%1eh
99.8%1ew
99.8%1t
Compiler

Compiled 62 to 44 computations (29% saved)

regimes14.0ms (0%)

Memory
26.5MiB live, 26.5MiB allocated; 0ms collecting garbage
Counts
7 → 3
Calls
Call 1
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))))
Calls

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
Results
AccuracySegmentsBranch
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%3eh
99.7%3ew
95.0%2t
Compiler

Compiled 62 to 44 computations (29% saved)

regimes13.0ms (0%)

Memory
-23.6MiB live, 24.2MiB allocated; 1ms collecting garbage
Counts
6 → 1
Calls
Call 1
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))))
Calls

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
Results
AccuracySegmentsBranch
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%1t
90.3%1eh
90.3%1ew
Compiler

Compiled 62 to 44 computations (29% saved)

regimes9.0ms (0%)

Memory
18.8MiB live, 18.8MiB allocated; 0ms collecting garbage
Counts
3 → 1
Calls
Call 1
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))))
Calls

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
Results
AccuracySegmentsBranch
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%1t
84.0%1eh
84.0%1ew
Compiler

Compiled 62 to 44 computations (29% saved)

regimes7.0ms (0%)

Memory
-33.2MiB live, 14.6MiB allocated; 0ms collecting garbage
Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts
1 → 1
Calls
Call 1
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)))))))))))))))
Calls

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
Results
AccuracySegmentsBranch
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%1ew
32.9%1t
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%1eh
Compiler

Compiled 62 to 44 computations (29% saved)

bsearch47.0ms (0.1%)

Memory
18.7MiB live, 67.0MiB allocated; 1ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
predicate-same
Steps
TimeLeftRight
36.0ms
3.423799704372101e-107
9.067485616187983e-99
7.0ms
-1.117383803343143e+82
-8.349008820441682e+61
Samples
34.0ms176×0valid
Compiler

Compiled 1 660 to 885 computations (46.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 29.0ms
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)

simplify68.0ms (0.1%)

Memory
9.7MiB live, 57.2MiB allocated; 2ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
0123742
1284739
2628739
31782739
46607739
Stop Event
node limit
Calls
Call 1
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)))))))))))))))

derivations127.0ms (0.2%)

Memory
-29.7MiB live, 114.9MiB allocated; 2ms collecting garbage
Stop Event
done
Compiler

Compiled 742 to 123 computations (83.4% saved)

preprocess41.0ms (0.1%)

Memory
17.2MiB live, 64.4MiB allocated; 1ms collecting garbage
Compiler

Compiled 1 544 to 282 computations (81.7% saved)

end0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated; 0ms collecting garbage

Profiling

Loading profile data...