
(FPCore (x) :precision binary32 (asinh x))
float code(float x) {
return asinhf(x);
}
function code(x) return asinh(x) end
function tmp = code(x) tmp = asinh(x); end
\begin{array}{l}
\\
\sinh^{-1} x
\end{array}
Sampling outcomes in binary32 precision:
Herbie found 8 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (x) :precision binary32 (copysign (log (+ (fabs x) (sqrt (+ (* x x) 1.0)))) x))
float code(float x) {
return copysignf(logf((fabsf(x) + sqrtf(((x * x) + 1.0f)))), x);
}
function code(x) return copysign(log(Float32(abs(x) + sqrt(Float32(Float32(x * x) + Float32(1.0))))), x) end
function tmp = code(x) tmp = sign(x) * abs(log((abs(x) + sqrt(((x * x) + single(1.0)))))); end
\begin{array}{l}
\\
\mathsf{copysign}\left(\log \left(\left|x\right| + \sqrt{x \cdot x + 1}\right), x\right)
\end{array}
(FPCore (x)
:precision binary32
(let* ((t_0 (copysign (log (+ (fabs x) (sqrt (+ (* x x) 1.0)))) x)))
(if (<= t_0 -0.20000000298023224)
(copysign (- (log (- (hypot 1.0 x) x))) x)
(if (<= t_0 0.05000000074505806)
(copysign
(*
x
(+ 1.0 (* (pow x 2.0) (- (* (pow x 2.0) 0.075) 0.16666666666666666))))
x)
(copysign (log (+ x (hypot 1.0 x))) x)))))
float code(float x) {
float t_0 = copysignf(logf((fabsf(x) + sqrtf(((x * x) + 1.0f)))), x);
float tmp;
if (t_0 <= -0.20000000298023224f) {
tmp = copysignf(-logf((hypotf(1.0f, x) - x)), x);
} else if (t_0 <= 0.05000000074505806f) {
tmp = copysignf((x * (1.0f + (powf(x, 2.0f) * ((powf(x, 2.0f) * 0.075f) - 0.16666666666666666f)))), x);
} else {
tmp = copysignf(logf((x + hypotf(1.0f, x))), x);
}
return tmp;
}
function code(x) t_0 = copysign(log(Float32(abs(x) + sqrt(Float32(Float32(x * x) + Float32(1.0))))), x) tmp = Float32(0.0) if (t_0 <= Float32(-0.20000000298023224)) tmp = copysign(Float32(-log(Float32(hypot(Float32(1.0), x) - x))), x); elseif (t_0 <= Float32(0.05000000074505806)) tmp = copysign(Float32(x * Float32(Float32(1.0) + Float32((x ^ Float32(2.0)) * Float32(Float32((x ^ Float32(2.0)) * Float32(0.075)) - Float32(0.16666666666666666))))), x); else tmp = copysign(log(Float32(x + hypot(Float32(1.0), x))), x); end return tmp end
function tmp_2 = code(x) t_0 = sign(x) * abs(log((abs(x) + sqrt(((x * x) + single(1.0)))))); tmp = single(0.0); if (t_0 <= single(-0.20000000298023224)) tmp = sign(x) * abs(-log((hypot(single(1.0), x) - x))); elseif (t_0 <= single(0.05000000074505806)) tmp = sign(x) * abs((x * (single(1.0) + ((x ^ single(2.0)) * (((x ^ single(2.0)) * single(0.075)) - single(0.16666666666666666)))))); else tmp = sign(x) * abs(log((x + hypot(single(1.0), x)))); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \mathsf{copysign}\left(\log \left(\left|x\right| + \sqrt{x \cdot x + 1}\right), x\right)\\
\mathbf{if}\;t\_0 \leq -0.20000000298023224:\\
\;\;\;\;\mathsf{copysign}\left(-\log \left(\mathsf{hypot}\left(1, x\right) - x\right), x\right)\\
\mathbf{elif}\;t\_0 \leq 0.05000000074505806:\\
\;\;\;\;\mathsf{copysign}\left(x \cdot \left(1 + {x}^{2} \cdot \left({x}^{2} \cdot 0.075 - 0.16666666666666666\right)\right), x\right)\\
\mathbf{else}:\\
\;\;\;\;\mathsf{copysign}\left(\log \left(x + \mathsf{hypot}\left(1, x\right)\right), x\right)\\
\end{array}
\end{array}
if (copysign.f32 (log.f32 (+.f32 (fabs.f32 x) (sqrt.f32 (+.f32 (*.f32 x x) #s(literal 1 binary32))))) x) < -0.200000003Initial program 55.1%
+-commutative55.1%
hypot-1-def100.0%
Simplified100.0%
flip-+6.2%
frac-2neg6.2%
log-div6.2%
pow26.2%
add-sqr-sqrt-0.0%
fabs-sqr-0.0%
add-sqr-sqrt6.2%
hypot-1-def6.2%
hypot-1-def6.2%
add-sqr-sqrt6.2%
pow26.2%
Applied egg-rr11.0%
neg-sub011.0%
associate--r-11.0%
neg-sub011.0%
+-commutative11.0%
sub-neg11.0%
neg-sub011.0%
associate--r-11.0%
neg-sub011.0%
+-commutative11.0%
sub-neg11.0%
associate--l+52.0%
+-inverses100.0%
metadata-eval100.0%
metadata-eval100.0%
neg-sub0100.0%
Simplified100.0%
if -0.200000003 < (copysign.f32 (log.f32 (+.f32 (fabs.f32 x) (sqrt.f32 (+.f32 (*.f32 x x) #s(literal 1 binary32))))) x) < 0.0500000007Initial program 16.4%
+-commutative16.4%
hypot-1-def16.4%
Simplified16.4%
Taylor expanded in x around 0 17.6%
+-commutative17.6%
fma-define17.6%
Simplified100.0%
Taylor expanded in x around 0 100.0%
if 0.0500000007 < (copysign.f32 (log.f32 (+.f32 (fabs.f32 x) (sqrt.f32 (+.f32 (*.f32 x x) #s(literal 1 binary32))))) x) Initial program 51.6%
+-commutative51.6%
hypot-1-def99.8%
Simplified99.8%
+-commutative99.8%
add-sqr-sqrt99.9%
fabs-sqr99.9%
add-sqr-sqrt99.8%
Applied egg-rr99.8%
Final simplification99.9%
(FPCore (x)
:precision binary32
(if (<= x -0.20000000298023224)
(copysign (- (log (- (hypot 1.0 x) x))) x)
(if (<= x 0.05000000074505806)
(copysign (+ x (* (pow x 3.0) -0.16666666666666666)) x)
(copysign (log (+ x (hypot 1.0 x))) x))))
float code(float x) {
float tmp;
if (x <= -0.20000000298023224f) {
tmp = copysignf(-logf((hypotf(1.0f, x) - x)), x);
} else if (x <= 0.05000000074505806f) {
tmp = copysignf((x + (powf(x, 3.0f) * -0.16666666666666666f)), x);
} else {
tmp = copysignf(logf((x + hypotf(1.0f, x))), x);
}
return tmp;
}
function code(x) tmp = Float32(0.0) if (x <= Float32(-0.20000000298023224)) tmp = copysign(Float32(-log(Float32(hypot(Float32(1.0), x) - x))), x); elseif (x <= Float32(0.05000000074505806)) tmp = copysign(Float32(x + Float32((x ^ Float32(3.0)) * Float32(-0.16666666666666666))), x); else tmp = copysign(log(Float32(x + hypot(Float32(1.0), x))), x); end return tmp end
function tmp_2 = code(x) tmp = single(0.0); if (x <= single(-0.20000000298023224)) tmp = sign(x) * abs(-log((hypot(single(1.0), x) - x))); elseif (x <= single(0.05000000074505806)) tmp = sign(x) * abs((x + ((x ^ single(3.0)) * single(-0.16666666666666666)))); else tmp = sign(x) * abs(log((x + hypot(single(1.0), x)))); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq -0.20000000298023224:\\
\;\;\;\;\mathsf{copysign}\left(-\log \left(\mathsf{hypot}\left(1, x\right) - x\right), x\right)\\
\mathbf{elif}\;x \leq 0.05000000074505806:\\
\;\;\;\;\mathsf{copysign}\left(x + {x}^{3} \cdot -0.16666666666666666, x\right)\\
\mathbf{else}:\\
\;\;\;\;\mathsf{copysign}\left(\log \left(x + \mathsf{hypot}\left(1, x\right)\right), x\right)\\
\end{array}
\end{array}
if x < -0.200000003Initial program 55.1%
+-commutative55.1%
hypot-1-def100.0%
Simplified100.0%
flip-+6.2%
frac-2neg6.2%
log-div6.2%
pow26.2%
add-sqr-sqrt-0.0%
fabs-sqr-0.0%
add-sqr-sqrt6.2%
hypot-1-def6.2%
hypot-1-def6.2%
add-sqr-sqrt6.2%
pow26.2%
Applied egg-rr11.0%
neg-sub011.0%
associate--r-11.0%
neg-sub011.0%
+-commutative11.0%
sub-neg11.0%
neg-sub011.0%
associate--r-11.0%
neg-sub011.0%
+-commutative11.0%
sub-neg11.0%
associate--l+52.0%
+-inverses100.0%
metadata-eval100.0%
metadata-eval100.0%
neg-sub0100.0%
Simplified100.0%
if -0.200000003 < x < 0.0500000007Initial program 16.4%
+-commutative16.4%
hypot-1-def16.4%
Simplified16.4%
Taylor expanded in x around 0 17.6%
+-commutative17.6%
fma-define17.6%
Simplified100.0%
Taylor expanded in x around 0 99.9%
distribute-lft-in99.9%
*-rgt-identity99.9%
*-commutative99.9%
associate-*r*99.9%
unpow299.9%
cube-mult99.9%
Simplified99.9%
if 0.0500000007 < x Initial program 51.6%
+-commutative51.6%
hypot-1-def99.8%
Simplified99.8%
+-commutative99.8%
add-sqr-sqrt99.9%
fabs-sqr99.9%
add-sqr-sqrt99.8%
Applied egg-rr99.8%
Final simplification99.9%
(FPCore (x)
:precision binary32
(if (<= x -2.0)
(copysign (+ (+ 1.0 (log (/ -0.5 x))) -1.0) x)
(if (<= x 0.05000000074505806)
(copysign (+ x (* (pow x 3.0) -0.16666666666666666)) x)
(copysign (log (+ x (hypot 1.0 x))) x))))
float code(float x) {
float tmp;
if (x <= -2.0f) {
tmp = copysignf(((1.0f + logf((-0.5f / x))) + -1.0f), x);
} else if (x <= 0.05000000074505806f) {
tmp = copysignf((x + (powf(x, 3.0f) * -0.16666666666666666f)), x);
} else {
tmp = copysignf(logf((x + hypotf(1.0f, x))), x);
}
return tmp;
}
function code(x) tmp = Float32(0.0) if (x <= Float32(-2.0)) tmp = copysign(Float32(Float32(Float32(1.0) + log(Float32(Float32(-0.5) / x))) + Float32(-1.0)), x); elseif (x <= Float32(0.05000000074505806)) tmp = copysign(Float32(x + Float32((x ^ Float32(3.0)) * Float32(-0.16666666666666666))), x); else tmp = copysign(log(Float32(x + hypot(Float32(1.0), x))), x); end return tmp end
function tmp_2 = code(x) tmp = single(0.0); if (x <= single(-2.0)) tmp = sign(x) * abs(((single(1.0) + log((single(-0.5) / x))) + single(-1.0))); elseif (x <= single(0.05000000074505806)) tmp = sign(x) * abs((x + ((x ^ single(3.0)) * single(-0.16666666666666666)))); else tmp = sign(x) * abs(log((x + hypot(single(1.0), x)))); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq -2:\\
\;\;\;\;\mathsf{copysign}\left(\left(1 + \log \left(\frac{-0.5}{x}\right)\right) + -1, x\right)\\
\mathbf{elif}\;x \leq 0.05000000074505806:\\
\;\;\;\;\mathsf{copysign}\left(x + {x}^{3} \cdot -0.16666666666666666, x\right)\\
\mathbf{else}:\\
\;\;\;\;\mathsf{copysign}\left(\log \left(x + \mathsf{hypot}\left(1, x\right)\right), x\right)\\
\end{array}
\end{array}
if x < -2Initial program 54.5%
+-commutative54.5%
hypot-1-def100.0%
Simplified100.0%
expm1-log1p-u97.6%
expm1-undefine97.6%
log1p-undefine97.6%
rem-exp-log99.9%
*-un-lft-identity99.9%
*-un-lft-identity99.9%
add-sqr-sqrt-0.0%
fabs-sqr-0.0%
add-sqr-sqrt11.0%
Applied egg-rr11.0%
Taylor expanded in x around -inf 98.3%
if -2 < x < 0.0500000007Initial program 17.1%
+-commutative17.1%
hypot-1-def17.1%
Simplified17.1%
Taylor expanded in x around 0 18.0%
+-commutative18.0%
fma-define18.0%
Simplified99.7%
Taylor expanded in x around 0 99.6%
distribute-lft-in99.6%
*-rgt-identity99.6%
*-commutative99.6%
associate-*r*99.6%
unpow299.6%
cube-mult99.6%
Simplified99.6%
if 0.0500000007 < x Initial program 51.6%
+-commutative51.6%
hypot-1-def99.8%
Simplified99.8%
+-commutative99.8%
add-sqr-sqrt99.9%
fabs-sqr99.9%
add-sqr-sqrt99.8%
Applied egg-rr99.8%
Final simplification99.3%
(FPCore (x)
:precision binary32
(if (<= x -2.0)
(copysign (+ (+ 1.0 (log (/ -0.5 x))) -1.0) x)
(if (<= x 0.5)
(copysign (+ x (* (pow x 3.0) -0.16666666666666666)) x)
(copysign (log (* x (+ 1.0 (/ x x)))) x))))
float code(float x) {
float tmp;
if (x <= -2.0f) {
tmp = copysignf(((1.0f + logf((-0.5f / x))) + -1.0f), x);
} else if (x <= 0.5f) {
tmp = copysignf((x + (powf(x, 3.0f) * -0.16666666666666666f)), x);
} else {
tmp = copysignf(logf((x * (1.0f + (x / x)))), x);
}
return tmp;
}
function code(x) tmp = Float32(0.0) if (x <= Float32(-2.0)) tmp = copysign(Float32(Float32(Float32(1.0) + log(Float32(Float32(-0.5) / x))) + Float32(-1.0)), x); elseif (x <= Float32(0.5)) tmp = copysign(Float32(x + Float32((x ^ Float32(3.0)) * Float32(-0.16666666666666666))), x); else tmp = copysign(log(Float32(x * Float32(Float32(1.0) + Float32(x / x)))), x); end return tmp end
function tmp_2 = code(x) tmp = single(0.0); if (x <= single(-2.0)) tmp = sign(x) * abs(((single(1.0) + log((single(-0.5) / x))) + single(-1.0))); elseif (x <= single(0.5)) tmp = sign(x) * abs((x + ((x ^ single(3.0)) * single(-0.16666666666666666)))); else tmp = sign(x) * abs(log((x * (single(1.0) + (x / x))))); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq -2:\\
\;\;\;\;\mathsf{copysign}\left(\left(1 + \log \left(\frac{-0.5}{x}\right)\right) + -1, x\right)\\
\mathbf{elif}\;x \leq 0.5:\\
\;\;\;\;\mathsf{copysign}\left(x + {x}^{3} \cdot -0.16666666666666666, x\right)\\
\mathbf{else}:\\
\;\;\;\;\mathsf{copysign}\left(\log \left(x \cdot \left(1 + \frac{x}{x}\right)\right), x\right)\\
\end{array}
\end{array}
if x < -2Initial program 54.5%
+-commutative54.5%
hypot-1-def100.0%
Simplified100.0%
expm1-log1p-u97.6%
expm1-undefine97.6%
log1p-undefine97.6%
rem-exp-log99.9%
*-un-lft-identity99.9%
*-un-lft-identity99.9%
add-sqr-sqrt-0.0%
fabs-sqr-0.0%
add-sqr-sqrt11.0%
Applied egg-rr11.0%
Taylor expanded in x around -inf 98.3%
if -2 < x < 0.5Initial program 18.4%
+-commutative18.4%
hypot-1-def18.4%
Simplified18.4%
Taylor expanded in x around 0 18.8%
+-commutative18.8%
fma-define18.8%
Simplified99.1%
Taylor expanded in x around 0 99.0%
distribute-lft-in99.0%
*-rgt-identity99.0%
*-commutative99.0%
associate-*r*99.0%
unpow299.0%
cube-mult99.0%
Simplified99.0%
if 0.5 < x Initial program 50.3%
+-commutative50.3%
hypot-1-def100.0%
Simplified100.0%
Taylor expanded in x around inf 96.5%
rem-square-sqrt96.5%
fabs-sqr96.5%
rem-square-sqrt96.5%
Simplified96.5%
Final simplification98.2%
(FPCore (x)
:precision binary32
(if (<= x -2.0)
(copysign (log (- x)) x)
(if (<= x 0.5)
(copysign (+ x (* (pow x 3.0) -0.16666666666666666)) x)
(copysign (log (* x (+ 1.0 (/ x x)))) x))))
float code(float x) {
float tmp;
if (x <= -2.0f) {
tmp = copysignf(logf(-x), x);
} else if (x <= 0.5f) {
tmp = copysignf((x + (powf(x, 3.0f) * -0.16666666666666666f)), x);
} else {
tmp = copysignf(logf((x * (1.0f + (x / x)))), x);
}
return tmp;
}
function code(x) tmp = Float32(0.0) if (x <= Float32(-2.0)) tmp = copysign(log(Float32(-x)), x); elseif (x <= Float32(0.5)) tmp = copysign(Float32(x + Float32((x ^ Float32(3.0)) * Float32(-0.16666666666666666))), x); else tmp = copysign(log(Float32(x * Float32(Float32(1.0) + Float32(x / x)))), x); end return tmp end
function tmp_2 = code(x) tmp = single(0.0); if (x <= single(-2.0)) tmp = sign(x) * abs(log(-x)); elseif (x <= single(0.5)) tmp = sign(x) * abs((x + ((x ^ single(3.0)) * single(-0.16666666666666666)))); else tmp = sign(x) * abs(log((x * (single(1.0) + (x / x))))); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq -2:\\
\;\;\;\;\mathsf{copysign}\left(\log \left(-x\right), x\right)\\
\mathbf{elif}\;x \leq 0.5:\\
\;\;\;\;\mathsf{copysign}\left(x + {x}^{3} \cdot -0.16666666666666666, x\right)\\
\mathbf{else}:\\
\;\;\;\;\mathsf{copysign}\left(\log \left(x \cdot \left(1 + \frac{x}{x}\right)\right), x\right)\\
\end{array}
\end{array}
if x < -2Initial program 54.5%
+-commutative54.5%
hypot-1-def100.0%
Simplified100.0%
Taylor expanded in x around -inf 44.4%
mul-1-neg44.4%
Simplified44.4%
if -2 < x < 0.5Initial program 18.4%
+-commutative18.4%
hypot-1-def18.4%
Simplified18.4%
Taylor expanded in x around 0 18.8%
+-commutative18.8%
fma-define18.8%
Simplified99.1%
Taylor expanded in x around 0 99.0%
distribute-lft-in99.0%
*-rgt-identity99.0%
*-commutative99.0%
associate-*r*99.0%
unpow299.0%
cube-mult99.0%
Simplified99.0%
if 0.5 < x Initial program 50.3%
+-commutative50.3%
hypot-1-def100.0%
Simplified100.0%
Taylor expanded in x around inf 96.5%
rem-square-sqrt96.5%
fabs-sqr96.5%
rem-square-sqrt96.5%
Simplified96.5%
(FPCore (x) :precision binary32 (if (<= x -2.0) (copysign (log (- x)) x) (copysign (log1p x) x)))
float code(float x) {
float tmp;
if (x <= -2.0f) {
tmp = copysignf(logf(-x), x);
} else {
tmp = copysignf(log1pf(x), x);
}
return tmp;
}
function code(x) tmp = Float32(0.0) if (x <= Float32(-2.0)) tmp = copysign(log(Float32(-x)), x); else tmp = copysign(log1p(x), x); end return tmp end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq -2:\\
\;\;\;\;\mathsf{copysign}\left(\log \left(-x\right), x\right)\\
\mathbf{else}:\\
\;\;\;\;\mathsf{copysign}\left(\mathsf{log1p}\left(x\right), x\right)\\
\end{array}
\end{array}
if x < -2Initial program 54.5%
+-commutative54.5%
hypot-1-def100.0%
Simplified100.0%
Taylor expanded in x around -inf 44.4%
mul-1-neg44.4%
Simplified44.4%
if -2 < x Initial program 29.5%
+-commutative29.5%
hypot-1-def46.8%
Simplified46.8%
Taylor expanded in x around 0 25.9%
log1p-define78.0%
rem-square-sqrt48.3%
fabs-sqr48.3%
rem-square-sqrt78.0%
Simplified78.0%
(FPCore (x) :precision binary32 (if (<= x 2.0) (copysign x x) (copysign (log1p x) x)))
float code(float x) {
float tmp;
if (x <= 2.0f) {
tmp = copysignf(x, x);
} else {
tmp = copysignf(log1pf(x), x);
}
return tmp;
}
function code(x) tmp = Float32(0.0) if (x <= Float32(2.0)) tmp = copysign(x, x); else tmp = copysign(log1p(x), x); end return tmp end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq 2:\\
\;\;\;\;\mathsf{copysign}\left(x, x\right)\\
\mathbf{else}:\\
\;\;\;\;\mathsf{copysign}\left(\mathsf{log1p}\left(x\right), x\right)\\
\end{array}
\end{array}
if x < 2Initial program 32.3%
+-commutative32.3%
hypot-1-def49.3%
Simplified49.3%
Taylor expanded in x around 0 14.9%
+-commutative14.9%
fma-define14.9%
Simplified61.8%
Taylor expanded in x around 0 65.3%
if 2 < x Initial program 49.5%
+-commutative49.5%
hypot-1-def100.0%
Simplified100.0%
Taylor expanded in x around 0 44.8%
log1p-define44.8%
rem-square-sqrt44.8%
fabs-sqr44.8%
rem-square-sqrt44.8%
Simplified44.8%
(FPCore (x) :precision binary32 (copysign x x))
float code(float x) {
return copysignf(x, x);
}
function code(x) return copysign(x, x) end
function tmp = code(x) tmp = sign(x) * abs(x); end
\begin{array}{l}
\\
\mathsf{copysign}\left(x, x\right)
\end{array}
Initial program 36.5%
+-commutative36.5%
hypot-1-def61.7%
Simplified61.7%
Taylor expanded in x around 0 13.2%
+-commutative13.2%
fma-define13.2%
Simplified48.5%
Taylor expanded in x around 0 51.9%
(FPCore (x) :precision binary32 (let* ((t_0 (/ 1.0 (fabs x)))) (copysign (log1p (+ (fabs x) (/ (fabs x) (+ (hypot 1.0 t_0) t_0)))) x)))
float code(float x) {
float t_0 = 1.0f / fabsf(x);
return copysignf(log1pf((fabsf(x) + (fabsf(x) / (hypotf(1.0f, t_0) + t_0)))), x);
}
function code(x) t_0 = Float32(Float32(1.0) / abs(x)) return copysign(log1p(Float32(abs(x) + Float32(abs(x) / Float32(hypot(Float32(1.0), t_0) + t_0)))), x) end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \frac{1}{\left|x\right|}\\
\mathsf{copysign}\left(\mathsf{log1p}\left(\left|x\right| + \frac{\left|x\right|}{\mathsf{hypot}\left(1, t\_0\right) + t\_0}\right), x\right)
\end{array}
\end{array}
herbie shell --seed 2024096
(FPCore (x)
:name "Rust f32::asinh"
:precision binary32
:alt
(copysign (log1p (+ (fabs x) (/ (fabs x) (+ (hypot 1.0 (/ 1.0 (fabs x))) (/ 1.0 (fabs x)))))) x)
(copysign (log (+ (fabs x) (sqrt (+ (* x x) 1.0)))) x))