
(FPCore (i n) :precision binary64 (* 100.0 (/ (- (pow (+ 1.0 (/ i n)) n) 1.0) (/ i n))))
double code(double i, double n) {
return 100.0 * ((pow((1.0 + (i / n)), n) - 1.0) / (i / n));
}
real(8) function code(i, n)
real(8), intent (in) :: i
real(8), intent (in) :: n
code = 100.0d0 * ((((1.0d0 + (i / n)) ** n) - 1.0d0) / (i / n))
end function
public static double code(double i, double n) {
return 100.0 * ((Math.pow((1.0 + (i / n)), n) - 1.0) / (i / n));
}
def code(i, n): return 100.0 * ((math.pow((1.0 + (i / n)), n) - 1.0) / (i / n))
function code(i, n) return Float64(100.0 * Float64(Float64((Float64(1.0 + Float64(i / n)) ^ n) - 1.0) / Float64(i / n))) end
function tmp = code(i, n) tmp = 100.0 * ((((1.0 + (i / n)) ^ n) - 1.0) / (i / n)); end
code[i_, n_] := N[(100.0 * N[(N[(N[Power[N[(1.0 + N[(i / n), $MachinePrecision]), $MachinePrecision], n], $MachinePrecision] - 1.0), $MachinePrecision] / N[(i / n), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
100 \cdot \frac{{\left(1 + \frac{i}{n}\right)}^{n} - 1}{\frac{i}{n}}
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 18 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (i n) :precision binary64 (* 100.0 (/ (- (pow (+ 1.0 (/ i n)) n) 1.0) (/ i n))))
double code(double i, double n) {
return 100.0 * ((pow((1.0 + (i / n)), n) - 1.0) / (i / n));
}
real(8) function code(i, n)
real(8), intent (in) :: i
real(8), intent (in) :: n
code = 100.0d0 * ((((1.0d0 + (i / n)) ** n) - 1.0d0) / (i / n))
end function
public static double code(double i, double n) {
return 100.0 * ((Math.pow((1.0 + (i / n)), n) - 1.0) / (i / n));
}
def code(i, n): return 100.0 * ((math.pow((1.0 + (i / n)), n) - 1.0) / (i / n))
function code(i, n) return Float64(100.0 * Float64(Float64((Float64(1.0 + Float64(i / n)) ^ n) - 1.0) / Float64(i / n))) end
function tmp = code(i, n) tmp = 100.0 * ((((1.0 + (i / n)) ^ n) - 1.0) / (i / n)); end
code[i_, n_] := N[(100.0 * N[(N[(N[Power[N[(1.0 + N[(i / n), $MachinePrecision]), $MachinePrecision], n], $MachinePrecision] - 1.0), $MachinePrecision] / N[(i / n), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
100 \cdot \frac{{\left(1 + \frac{i}{n}\right)}^{n} - 1}{\frac{i}{n}}
\end{array}
(FPCore (i n)
:precision binary64
(let* ((t_0 (- (* 100.0 (exp i)) 100.0)) (t_1 (- (log i) (log n))))
(if (<= i -0.000102)
(/ t_0 (/ i n))
(if (<= i -3.05e-204)
(/ 1.0 (+ (* (* i (- (/ 0.5 (pow n 2.0)) (/ 0.5 n))) 0.01) (/ 0.01 n)))
(if (<= i 2.5e-25)
(* 100.0 n)
(if (<= i 3.4e+61)
(/ (* t_0 n) i)
(if (<= i 1.3e+118)
(*
100.0
(*
n
(+
(* n (/ t_1 i))
(*
(pow n 2.0)
(+ (/ 1.0 (pow i 2.0)) (* (pow t_1 2.0) (/ 0.5 i)))))))
(* 100.0 (* n (/ (+ (pow (+ (/ i n) 1.0) n) -1.0) i))))))))))
double code(double i, double n) {
double t_0 = (100.0 * exp(i)) - 100.0;
double t_1 = log(i) - log(n);
double tmp;
if (i <= -0.000102) {
tmp = t_0 / (i / n);
} else if (i <= -3.05e-204) {
tmp = 1.0 / (((i * ((0.5 / pow(n, 2.0)) - (0.5 / n))) * 0.01) + (0.01 / n));
} else if (i <= 2.5e-25) {
tmp = 100.0 * n;
} else if (i <= 3.4e+61) {
tmp = (t_0 * n) / i;
} else if (i <= 1.3e+118) {
tmp = 100.0 * (n * ((n * (t_1 / i)) + (pow(n, 2.0) * ((1.0 / pow(i, 2.0)) + (pow(t_1, 2.0) * (0.5 / i))))));
} else {
tmp = 100.0 * (n * ((pow(((i / n) + 1.0), n) + -1.0) / i));
}
return tmp;
}
real(8) function code(i, n)
real(8), intent (in) :: i
real(8), intent (in) :: n
real(8) :: t_0
real(8) :: t_1
real(8) :: tmp
t_0 = (100.0d0 * exp(i)) - 100.0d0
t_1 = log(i) - log(n)
if (i <= (-0.000102d0)) then
tmp = t_0 / (i / n)
else if (i <= (-3.05d-204)) then
tmp = 1.0d0 / (((i * ((0.5d0 / (n ** 2.0d0)) - (0.5d0 / n))) * 0.01d0) + (0.01d0 / n))
else if (i <= 2.5d-25) then
tmp = 100.0d0 * n
else if (i <= 3.4d+61) then
tmp = (t_0 * n) / i
else if (i <= 1.3d+118) then
tmp = 100.0d0 * (n * ((n * (t_1 / i)) + ((n ** 2.0d0) * ((1.0d0 / (i ** 2.0d0)) + ((t_1 ** 2.0d0) * (0.5d0 / i))))))
else
tmp = 100.0d0 * (n * (((((i / n) + 1.0d0) ** n) + (-1.0d0)) / i))
end if
code = tmp
end function
public static double code(double i, double n) {
double t_0 = (100.0 * Math.exp(i)) - 100.0;
double t_1 = Math.log(i) - Math.log(n);
double tmp;
if (i <= -0.000102) {
tmp = t_0 / (i / n);
} else if (i <= -3.05e-204) {
tmp = 1.0 / (((i * ((0.5 / Math.pow(n, 2.0)) - (0.5 / n))) * 0.01) + (0.01 / n));
} else if (i <= 2.5e-25) {
tmp = 100.0 * n;
} else if (i <= 3.4e+61) {
tmp = (t_0 * n) / i;
} else if (i <= 1.3e+118) {
tmp = 100.0 * (n * ((n * (t_1 / i)) + (Math.pow(n, 2.0) * ((1.0 / Math.pow(i, 2.0)) + (Math.pow(t_1, 2.0) * (0.5 / i))))));
} else {
tmp = 100.0 * (n * ((Math.pow(((i / n) + 1.0), n) + -1.0) / i));
}
return tmp;
}
def code(i, n): t_0 = (100.0 * math.exp(i)) - 100.0 t_1 = math.log(i) - math.log(n) tmp = 0 if i <= -0.000102: tmp = t_0 / (i / n) elif i <= -3.05e-204: tmp = 1.0 / (((i * ((0.5 / math.pow(n, 2.0)) - (0.5 / n))) * 0.01) + (0.01 / n)) elif i <= 2.5e-25: tmp = 100.0 * n elif i <= 3.4e+61: tmp = (t_0 * n) / i elif i <= 1.3e+118: tmp = 100.0 * (n * ((n * (t_1 / i)) + (math.pow(n, 2.0) * ((1.0 / math.pow(i, 2.0)) + (math.pow(t_1, 2.0) * (0.5 / i)))))) else: tmp = 100.0 * (n * ((math.pow(((i / n) + 1.0), n) + -1.0) / i)) return tmp
function code(i, n) t_0 = Float64(Float64(100.0 * exp(i)) - 100.0) t_1 = Float64(log(i) - log(n)) tmp = 0.0 if (i <= -0.000102) tmp = Float64(t_0 / Float64(i / n)); elseif (i <= -3.05e-204) tmp = Float64(1.0 / Float64(Float64(Float64(i * Float64(Float64(0.5 / (n ^ 2.0)) - Float64(0.5 / n))) * 0.01) + Float64(0.01 / n))); elseif (i <= 2.5e-25) tmp = Float64(100.0 * n); elseif (i <= 3.4e+61) tmp = Float64(Float64(t_0 * n) / i); elseif (i <= 1.3e+118) tmp = Float64(100.0 * Float64(n * Float64(Float64(n * Float64(t_1 / i)) + Float64((n ^ 2.0) * Float64(Float64(1.0 / (i ^ 2.0)) + Float64((t_1 ^ 2.0) * Float64(0.5 / i))))))); else tmp = Float64(100.0 * Float64(n * Float64(Float64((Float64(Float64(i / n) + 1.0) ^ n) + -1.0) / i))); end return tmp end
function tmp_2 = code(i, n) t_0 = (100.0 * exp(i)) - 100.0; t_1 = log(i) - log(n); tmp = 0.0; if (i <= -0.000102) tmp = t_0 / (i / n); elseif (i <= -3.05e-204) tmp = 1.0 / (((i * ((0.5 / (n ^ 2.0)) - (0.5 / n))) * 0.01) + (0.01 / n)); elseif (i <= 2.5e-25) tmp = 100.0 * n; elseif (i <= 3.4e+61) tmp = (t_0 * n) / i; elseif (i <= 1.3e+118) tmp = 100.0 * (n * ((n * (t_1 / i)) + ((n ^ 2.0) * ((1.0 / (i ^ 2.0)) + ((t_1 ^ 2.0) * (0.5 / i)))))); else tmp = 100.0 * (n * (((((i / n) + 1.0) ^ n) + -1.0) / i)); end tmp_2 = tmp; end
code[i_, n_] := Block[{t$95$0 = N[(N[(100.0 * N[Exp[i], $MachinePrecision]), $MachinePrecision] - 100.0), $MachinePrecision]}, Block[{t$95$1 = N[(N[Log[i], $MachinePrecision] - N[Log[n], $MachinePrecision]), $MachinePrecision]}, If[LessEqual[i, -0.000102], N[(t$95$0 / N[(i / n), $MachinePrecision]), $MachinePrecision], If[LessEqual[i, -3.05e-204], N[(1.0 / N[(N[(N[(i * N[(N[(0.5 / N[Power[n, 2.0], $MachinePrecision]), $MachinePrecision] - N[(0.5 / n), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * 0.01), $MachinePrecision] + N[(0.01 / n), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[i, 2.5e-25], N[(100.0 * n), $MachinePrecision], If[LessEqual[i, 3.4e+61], N[(N[(t$95$0 * n), $MachinePrecision] / i), $MachinePrecision], If[LessEqual[i, 1.3e+118], N[(100.0 * N[(n * N[(N[(n * N[(t$95$1 / i), $MachinePrecision]), $MachinePrecision] + N[(N[Power[n, 2.0], $MachinePrecision] * N[(N[(1.0 / N[Power[i, 2.0], $MachinePrecision]), $MachinePrecision] + N[(N[Power[t$95$1, 2.0], $MachinePrecision] * N[(0.5 / i), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(100.0 * N[(n * N[(N[(N[Power[N[(N[(i / n), $MachinePrecision] + 1.0), $MachinePrecision], n], $MachinePrecision] + -1.0), $MachinePrecision] / i), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := 100 \cdot e^{i} - 100\\
t_1 := \log i - \log n\\
\mathbf{if}\;i \leq -0.000102:\\
\;\;\;\;\frac{t\_0}{\frac{i}{n}}\\
\mathbf{elif}\;i \leq -3.05 \cdot 10^{-204}:\\
\;\;\;\;\frac{1}{\left(i \cdot \left(\frac{0.5}{{n}^{2}} - \frac{0.5}{n}\right)\right) \cdot 0.01 + \frac{0.01}{n}}\\
\mathbf{elif}\;i \leq 2.5 \cdot 10^{-25}:\\
\;\;\;\;100 \cdot n\\
\mathbf{elif}\;i \leq 3.4 \cdot 10^{+61}:\\
\;\;\;\;\frac{t\_0 \cdot n}{i}\\
\mathbf{elif}\;i \leq 1.3 \cdot 10^{+118}:\\
\;\;\;\;100 \cdot \left(n \cdot \left(n \cdot \frac{t\_1}{i} + {n}^{2} \cdot \left(\frac{1}{{i}^{2}} + {t\_1}^{2} \cdot \frac{0.5}{i}\right)\right)\right)\\
\mathbf{else}:\\
\;\;\;\;100 \cdot \left(n \cdot \frac{{\left(\frac{i}{n} + 1\right)}^{n} + -1}{i}\right)\\
\end{array}
\end{array}
if i < -1.01999999999999999e-4Initial program 49.7%
associate-*r/49.7%
sub-neg49.7%
distribute-rgt-in49.7%
metadata-eval49.7%
metadata-eval49.7%
Simplified49.7%
Taylor expanded in n around inf 84.7%
if -1.01999999999999999e-4 < i < -3.04999999999999987e-204Initial program 12.3%
associate-*r/12.3%
sub-neg12.3%
distribute-rgt-in12.3%
metadata-eval12.3%
metadata-eval12.3%
Simplified12.3%
Taylor expanded in i around 0 64.4%
clear-num64.5%
inv-pow64.5%
*-un-lft-identity64.5%
distribute-lft-out64.5%
times-frac64.4%
metadata-eval64.4%
*-commutative64.4%
div-inv64.4%
Applied egg-rr64.4%
unpow-164.4%
*-commutative64.4%
Simplified64.4%
Taylor expanded in i around 0 91.2%
*-commutative91.2%
associate-*r/91.2%
metadata-eval91.2%
associate-*r/91.2%
metadata-eval91.2%
associate-*r/91.2%
metadata-eval91.2%
Simplified91.2%
if -3.04999999999999987e-204 < i < 2.49999999999999981e-25Initial program 5.4%
associate-/r/6.1%
*-commutative6.1%
sub-neg6.1%
metadata-eval6.1%
Simplified6.1%
Taylor expanded in i around 0 89.5%
*-commutative89.5%
Simplified89.5%
if 2.49999999999999981e-25 < i < 3.40000000000000026e61Initial program 28.2%
associate-*r/28.2%
sub-neg28.2%
distribute-rgt-in28.2%
metadata-eval28.2%
metadata-eval28.2%
Simplified28.2%
Taylor expanded in n around inf 76.3%
if 3.40000000000000026e61 < i < 1.30000000000000008e118Initial program 22.5%
associate-/r/23.4%
*-commutative23.4%
sub-neg23.4%
metadata-eval23.4%
Simplified23.4%
Taylor expanded in n around 0 100.0%
+-commutative100.0%
associate-/l*100.0%
mul-1-neg100.0%
unsub-neg100.0%
+-commutative100.0%
associate-*r/100.0%
*-commutative100.0%
associate-/l*100.0%
mul-1-neg100.0%
unsub-neg100.0%
Simplified100.0%
if 1.30000000000000008e118 < i Initial program 69.1%
associate-/r/69.3%
*-commutative69.3%
sub-neg69.3%
metadata-eval69.3%
Simplified69.3%
Final simplification86.1%
(FPCore (i n)
:precision binary64
(let* ((t_0 (- (* 100.0 (exp i)) 100.0)) (t_1 (- (log i) (log n))))
(if (<= i -0.0018)
(/ t_0 (/ i n))
(if (<= i -1.85e-204)
(/ 1.0 (+ (* (* i (- (/ 0.5 (pow n 2.0)) (/ 0.5 n))) 0.01) (/ 0.01 n)))
(if (<= i 2.5e-25)
(* 100.0 n)
(if (<= i 9.6e+63)
(/ (* t_0 n) i)
(if (<= i 1.36e+118)
(*
100.0
(*
n
(/
(+
(* n t_1)
(* (pow n 2.0) (+ (/ 1.0 i) (* 0.5 (pow t_1 2.0)))))
i)))
(* 100.0 (* n (/ (+ (pow (+ (/ i n) 1.0) n) -1.0) i))))))))))
double code(double i, double n) {
double t_0 = (100.0 * exp(i)) - 100.0;
double t_1 = log(i) - log(n);
double tmp;
if (i <= -0.0018) {
tmp = t_0 / (i / n);
} else if (i <= -1.85e-204) {
tmp = 1.0 / (((i * ((0.5 / pow(n, 2.0)) - (0.5 / n))) * 0.01) + (0.01 / n));
} else if (i <= 2.5e-25) {
tmp = 100.0 * n;
} else if (i <= 9.6e+63) {
tmp = (t_0 * n) / i;
} else if (i <= 1.36e+118) {
tmp = 100.0 * (n * (((n * t_1) + (pow(n, 2.0) * ((1.0 / i) + (0.5 * pow(t_1, 2.0))))) / i));
} else {
tmp = 100.0 * (n * ((pow(((i / n) + 1.0), n) + -1.0) / i));
}
return tmp;
}
real(8) function code(i, n)
real(8), intent (in) :: i
real(8), intent (in) :: n
real(8) :: t_0
real(8) :: t_1
real(8) :: tmp
t_0 = (100.0d0 * exp(i)) - 100.0d0
t_1 = log(i) - log(n)
if (i <= (-0.0018d0)) then
tmp = t_0 / (i / n)
else if (i <= (-1.85d-204)) then
tmp = 1.0d0 / (((i * ((0.5d0 / (n ** 2.0d0)) - (0.5d0 / n))) * 0.01d0) + (0.01d0 / n))
else if (i <= 2.5d-25) then
tmp = 100.0d0 * n
else if (i <= 9.6d+63) then
tmp = (t_0 * n) / i
else if (i <= 1.36d+118) then
tmp = 100.0d0 * (n * (((n * t_1) + ((n ** 2.0d0) * ((1.0d0 / i) + (0.5d0 * (t_1 ** 2.0d0))))) / i))
else
tmp = 100.0d0 * (n * (((((i / n) + 1.0d0) ** n) + (-1.0d0)) / i))
end if
code = tmp
end function
public static double code(double i, double n) {
double t_0 = (100.0 * Math.exp(i)) - 100.0;
double t_1 = Math.log(i) - Math.log(n);
double tmp;
if (i <= -0.0018) {
tmp = t_0 / (i / n);
} else if (i <= -1.85e-204) {
tmp = 1.0 / (((i * ((0.5 / Math.pow(n, 2.0)) - (0.5 / n))) * 0.01) + (0.01 / n));
} else if (i <= 2.5e-25) {
tmp = 100.0 * n;
} else if (i <= 9.6e+63) {
tmp = (t_0 * n) / i;
} else if (i <= 1.36e+118) {
tmp = 100.0 * (n * (((n * t_1) + (Math.pow(n, 2.0) * ((1.0 / i) + (0.5 * Math.pow(t_1, 2.0))))) / i));
} else {
tmp = 100.0 * (n * ((Math.pow(((i / n) + 1.0), n) + -1.0) / i));
}
return tmp;
}
def code(i, n): t_0 = (100.0 * math.exp(i)) - 100.0 t_1 = math.log(i) - math.log(n) tmp = 0 if i <= -0.0018: tmp = t_0 / (i / n) elif i <= -1.85e-204: tmp = 1.0 / (((i * ((0.5 / math.pow(n, 2.0)) - (0.5 / n))) * 0.01) + (0.01 / n)) elif i <= 2.5e-25: tmp = 100.0 * n elif i <= 9.6e+63: tmp = (t_0 * n) / i elif i <= 1.36e+118: tmp = 100.0 * (n * (((n * t_1) + (math.pow(n, 2.0) * ((1.0 / i) + (0.5 * math.pow(t_1, 2.0))))) / i)) else: tmp = 100.0 * (n * ((math.pow(((i / n) + 1.0), n) + -1.0) / i)) return tmp
function code(i, n) t_0 = Float64(Float64(100.0 * exp(i)) - 100.0) t_1 = Float64(log(i) - log(n)) tmp = 0.0 if (i <= -0.0018) tmp = Float64(t_0 / Float64(i / n)); elseif (i <= -1.85e-204) tmp = Float64(1.0 / Float64(Float64(Float64(i * Float64(Float64(0.5 / (n ^ 2.0)) - Float64(0.5 / n))) * 0.01) + Float64(0.01 / n))); elseif (i <= 2.5e-25) tmp = Float64(100.0 * n); elseif (i <= 9.6e+63) tmp = Float64(Float64(t_0 * n) / i); elseif (i <= 1.36e+118) tmp = Float64(100.0 * Float64(n * Float64(Float64(Float64(n * t_1) + Float64((n ^ 2.0) * Float64(Float64(1.0 / i) + Float64(0.5 * (t_1 ^ 2.0))))) / i))); else tmp = Float64(100.0 * Float64(n * Float64(Float64((Float64(Float64(i / n) + 1.0) ^ n) + -1.0) / i))); end return tmp end
function tmp_2 = code(i, n) t_0 = (100.0 * exp(i)) - 100.0; t_1 = log(i) - log(n); tmp = 0.0; if (i <= -0.0018) tmp = t_0 / (i / n); elseif (i <= -1.85e-204) tmp = 1.0 / (((i * ((0.5 / (n ^ 2.0)) - (0.5 / n))) * 0.01) + (0.01 / n)); elseif (i <= 2.5e-25) tmp = 100.0 * n; elseif (i <= 9.6e+63) tmp = (t_0 * n) / i; elseif (i <= 1.36e+118) tmp = 100.0 * (n * (((n * t_1) + ((n ^ 2.0) * ((1.0 / i) + (0.5 * (t_1 ^ 2.0))))) / i)); else tmp = 100.0 * (n * (((((i / n) + 1.0) ^ n) + -1.0) / i)); end tmp_2 = tmp; end
code[i_, n_] := Block[{t$95$0 = N[(N[(100.0 * N[Exp[i], $MachinePrecision]), $MachinePrecision] - 100.0), $MachinePrecision]}, Block[{t$95$1 = N[(N[Log[i], $MachinePrecision] - N[Log[n], $MachinePrecision]), $MachinePrecision]}, If[LessEqual[i, -0.0018], N[(t$95$0 / N[(i / n), $MachinePrecision]), $MachinePrecision], If[LessEqual[i, -1.85e-204], N[(1.0 / N[(N[(N[(i * N[(N[(0.5 / N[Power[n, 2.0], $MachinePrecision]), $MachinePrecision] - N[(0.5 / n), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * 0.01), $MachinePrecision] + N[(0.01 / n), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[i, 2.5e-25], N[(100.0 * n), $MachinePrecision], If[LessEqual[i, 9.6e+63], N[(N[(t$95$0 * n), $MachinePrecision] / i), $MachinePrecision], If[LessEqual[i, 1.36e+118], N[(100.0 * N[(n * N[(N[(N[(n * t$95$1), $MachinePrecision] + N[(N[Power[n, 2.0], $MachinePrecision] * N[(N[(1.0 / i), $MachinePrecision] + N[(0.5 * N[Power[t$95$1, 2.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / i), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(100.0 * N[(n * N[(N[(N[Power[N[(N[(i / n), $MachinePrecision] + 1.0), $MachinePrecision], n], $MachinePrecision] + -1.0), $MachinePrecision] / i), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := 100 \cdot e^{i} - 100\\
t_1 := \log i - \log n\\
\mathbf{if}\;i \leq -0.0018:\\
\;\;\;\;\frac{t\_0}{\frac{i}{n}}\\
\mathbf{elif}\;i \leq -1.85 \cdot 10^{-204}:\\
\;\;\;\;\frac{1}{\left(i \cdot \left(\frac{0.5}{{n}^{2}} - \frac{0.5}{n}\right)\right) \cdot 0.01 + \frac{0.01}{n}}\\
\mathbf{elif}\;i \leq 2.5 \cdot 10^{-25}:\\
\;\;\;\;100 \cdot n\\
\mathbf{elif}\;i \leq 9.6 \cdot 10^{+63}:\\
\;\;\;\;\frac{t\_0 \cdot n}{i}\\
\mathbf{elif}\;i \leq 1.36 \cdot 10^{+118}:\\
\;\;\;\;100 \cdot \left(n \cdot \frac{n \cdot t\_1 + {n}^{2} \cdot \left(\frac{1}{i} + 0.5 \cdot {t\_1}^{2}\right)}{i}\right)\\
\mathbf{else}:\\
\;\;\;\;100 \cdot \left(n \cdot \frac{{\left(\frac{i}{n} + 1\right)}^{n} + -1}{i}\right)\\
\end{array}
\end{array}
if i < -0.0018Initial program 49.7%
associate-*r/49.7%
sub-neg49.7%
distribute-rgt-in49.7%
metadata-eval49.7%
metadata-eval49.7%
Simplified49.7%
Taylor expanded in n around inf 84.7%
if -0.0018 < i < -1.8499999999999999e-204Initial program 12.3%
associate-*r/12.3%
sub-neg12.3%
distribute-rgt-in12.3%
metadata-eval12.3%
metadata-eval12.3%
Simplified12.3%
Taylor expanded in i around 0 64.4%
clear-num64.5%
inv-pow64.5%
*-un-lft-identity64.5%
distribute-lft-out64.5%
times-frac64.4%
metadata-eval64.4%
*-commutative64.4%
div-inv64.4%
Applied egg-rr64.4%
unpow-164.4%
*-commutative64.4%
Simplified64.4%
Taylor expanded in i around 0 91.2%
*-commutative91.2%
associate-*r/91.2%
metadata-eval91.2%
associate-*r/91.2%
metadata-eval91.2%
associate-*r/91.2%
metadata-eval91.2%
Simplified91.2%
if -1.8499999999999999e-204 < i < 2.49999999999999981e-25Initial program 5.4%
associate-/r/6.1%
*-commutative6.1%
sub-neg6.1%
metadata-eval6.1%
Simplified6.1%
Taylor expanded in i around 0 89.5%
*-commutative89.5%
Simplified89.5%
if 2.49999999999999981e-25 < i < 9.6e63Initial program 28.2%
associate-*r/28.2%
sub-neg28.2%
distribute-rgt-in28.2%
metadata-eval28.2%
metadata-eval28.2%
Simplified28.2%
Taylor expanded in n around inf 76.3%
if 9.6e63 < i < 1.36e118Initial program 22.5%
associate-/r/23.4%
*-commutative23.4%
sub-neg23.4%
metadata-eval23.4%
Simplified23.4%
Taylor expanded in n around 0 99.6%
mul-1-neg99.6%
unsub-neg99.6%
+-commutative99.6%
mul-1-neg99.6%
unsub-neg99.6%
Simplified99.6%
if 1.36e118 < i Initial program 69.1%
associate-/r/69.3%
*-commutative69.3%
sub-neg69.3%
metadata-eval69.3%
Simplified69.3%
Final simplification86.1%
(FPCore (i n)
:precision binary64
(let* ((t_0 (- (* 100.0 (exp i)) 100.0)))
(if (<= i -3.1e-5)
(/ t_0 (/ i n))
(if (<= i -9.6e-205)
(/ 1.0 (+ (* (* i (- (/ 0.5 (pow n 2.0)) (/ 0.5 n))) 0.01) (/ 0.01 n)))
(if (<= i 2.5e-25)
(* 100.0 n)
(if (<= i 2.05e+64)
(/ (* t_0 n) i)
(if (<= i 1.82e+118)
(* 100.0 (* n (* n (/ (- (log i) (log n)) i))))
(* 100.0 (* n (/ (+ (pow (+ (/ i n) 1.0) n) -1.0) i))))))))))
double code(double i, double n) {
double t_0 = (100.0 * exp(i)) - 100.0;
double tmp;
if (i <= -3.1e-5) {
tmp = t_0 / (i / n);
} else if (i <= -9.6e-205) {
tmp = 1.0 / (((i * ((0.5 / pow(n, 2.0)) - (0.5 / n))) * 0.01) + (0.01 / n));
} else if (i <= 2.5e-25) {
tmp = 100.0 * n;
} else if (i <= 2.05e+64) {
tmp = (t_0 * n) / i;
} else if (i <= 1.82e+118) {
tmp = 100.0 * (n * (n * ((log(i) - log(n)) / i)));
} else {
tmp = 100.0 * (n * ((pow(((i / n) + 1.0), n) + -1.0) / i));
}
return tmp;
}
real(8) function code(i, n)
real(8), intent (in) :: i
real(8), intent (in) :: n
real(8) :: t_0
real(8) :: tmp
t_0 = (100.0d0 * exp(i)) - 100.0d0
if (i <= (-3.1d-5)) then
tmp = t_0 / (i / n)
else if (i <= (-9.6d-205)) then
tmp = 1.0d0 / (((i * ((0.5d0 / (n ** 2.0d0)) - (0.5d0 / n))) * 0.01d0) + (0.01d0 / n))
else if (i <= 2.5d-25) then
tmp = 100.0d0 * n
else if (i <= 2.05d+64) then
tmp = (t_0 * n) / i
else if (i <= 1.82d+118) then
tmp = 100.0d0 * (n * (n * ((log(i) - log(n)) / i)))
else
tmp = 100.0d0 * (n * (((((i / n) + 1.0d0) ** n) + (-1.0d0)) / i))
end if
code = tmp
end function
public static double code(double i, double n) {
double t_0 = (100.0 * Math.exp(i)) - 100.0;
double tmp;
if (i <= -3.1e-5) {
tmp = t_0 / (i / n);
} else if (i <= -9.6e-205) {
tmp = 1.0 / (((i * ((0.5 / Math.pow(n, 2.0)) - (0.5 / n))) * 0.01) + (0.01 / n));
} else if (i <= 2.5e-25) {
tmp = 100.0 * n;
} else if (i <= 2.05e+64) {
tmp = (t_0 * n) / i;
} else if (i <= 1.82e+118) {
tmp = 100.0 * (n * (n * ((Math.log(i) - Math.log(n)) / i)));
} else {
tmp = 100.0 * (n * ((Math.pow(((i / n) + 1.0), n) + -1.0) / i));
}
return tmp;
}
def code(i, n): t_0 = (100.0 * math.exp(i)) - 100.0 tmp = 0 if i <= -3.1e-5: tmp = t_0 / (i / n) elif i <= -9.6e-205: tmp = 1.0 / (((i * ((0.5 / math.pow(n, 2.0)) - (0.5 / n))) * 0.01) + (0.01 / n)) elif i <= 2.5e-25: tmp = 100.0 * n elif i <= 2.05e+64: tmp = (t_0 * n) / i elif i <= 1.82e+118: tmp = 100.0 * (n * (n * ((math.log(i) - math.log(n)) / i))) else: tmp = 100.0 * (n * ((math.pow(((i / n) + 1.0), n) + -1.0) / i)) return tmp
function code(i, n) t_0 = Float64(Float64(100.0 * exp(i)) - 100.0) tmp = 0.0 if (i <= -3.1e-5) tmp = Float64(t_0 / Float64(i / n)); elseif (i <= -9.6e-205) tmp = Float64(1.0 / Float64(Float64(Float64(i * Float64(Float64(0.5 / (n ^ 2.0)) - Float64(0.5 / n))) * 0.01) + Float64(0.01 / n))); elseif (i <= 2.5e-25) tmp = Float64(100.0 * n); elseif (i <= 2.05e+64) tmp = Float64(Float64(t_0 * n) / i); elseif (i <= 1.82e+118) tmp = Float64(100.0 * Float64(n * Float64(n * Float64(Float64(log(i) - log(n)) / i)))); else tmp = Float64(100.0 * Float64(n * Float64(Float64((Float64(Float64(i / n) + 1.0) ^ n) + -1.0) / i))); end return tmp end
function tmp_2 = code(i, n) t_0 = (100.0 * exp(i)) - 100.0; tmp = 0.0; if (i <= -3.1e-5) tmp = t_0 / (i / n); elseif (i <= -9.6e-205) tmp = 1.0 / (((i * ((0.5 / (n ^ 2.0)) - (0.5 / n))) * 0.01) + (0.01 / n)); elseif (i <= 2.5e-25) tmp = 100.0 * n; elseif (i <= 2.05e+64) tmp = (t_0 * n) / i; elseif (i <= 1.82e+118) tmp = 100.0 * (n * (n * ((log(i) - log(n)) / i))); else tmp = 100.0 * (n * (((((i / n) + 1.0) ^ n) + -1.0) / i)); end tmp_2 = tmp; end
code[i_, n_] := Block[{t$95$0 = N[(N[(100.0 * N[Exp[i], $MachinePrecision]), $MachinePrecision] - 100.0), $MachinePrecision]}, If[LessEqual[i, -3.1e-5], N[(t$95$0 / N[(i / n), $MachinePrecision]), $MachinePrecision], If[LessEqual[i, -9.6e-205], N[(1.0 / N[(N[(N[(i * N[(N[(0.5 / N[Power[n, 2.0], $MachinePrecision]), $MachinePrecision] - N[(0.5 / n), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * 0.01), $MachinePrecision] + N[(0.01 / n), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[i, 2.5e-25], N[(100.0 * n), $MachinePrecision], If[LessEqual[i, 2.05e+64], N[(N[(t$95$0 * n), $MachinePrecision] / i), $MachinePrecision], If[LessEqual[i, 1.82e+118], N[(100.0 * N[(n * N[(n * N[(N[(N[Log[i], $MachinePrecision] - N[Log[n], $MachinePrecision]), $MachinePrecision] / i), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(100.0 * N[(n * N[(N[(N[Power[N[(N[(i / n), $MachinePrecision] + 1.0), $MachinePrecision], n], $MachinePrecision] + -1.0), $MachinePrecision] / i), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := 100 \cdot e^{i} - 100\\
\mathbf{if}\;i \leq -3.1 \cdot 10^{-5}:\\
\;\;\;\;\frac{t\_0}{\frac{i}{n}}\\
\mathbf{elif}\;i \leq -9.6 \cdot 10^{-205}:\\
\;\;\;\;\frac{1}{\left(i \cdot \left(\frac{0.5}{{n}^{2}} - \frac{0.5}{n}\right)\right) \cdot 0.01 + \frac{0.01}{n}}\\
\mathbf{elif}\;i \leq 2.5 \cdot 10^{-25}:\\
\;\;\;\;100 \cdot n\\
\mathbf{elif}\;i \leq 2.05 \cdot 10^{+64}:\\
\;\;\;\;\frac{t\_0 \cdot n}{i}\\
\mathbf{elif}\;i \leq 1.82 \cdot 10^{+118}:\\
\;\;\;\;100 \cdot \left(n \cdot \left(n \cdot \frac{\log i - \log n}{i}\right)\right)\\
\mathbf{else}:\\
\;\;\;\;100 \cdot \left(n \cdot \frac{{\left(\frac{i}{n} + 1\right)}^{n} + -1}{i}\right)\\
\end{array}
\end{array}
if i < -3.10000000000000014e-5Initial program 49.7%
associate-*r/49.7%
sub-neg49.7%
distribute-rgt-in49.7%
metadata-eval49.7%
metadata-eval49.7%
Simplified49.7%
Taylor expanded in n around inf 84.7%
if -3.10000000000000014e-5 < i < -9.6000000000000007e-205Initial program 12.3%
associate-*r/12.3%
sub-neg12.3%
distribute-rgt-in12.3%
metadata-eval12.3%
metadata-eval12.3%
Simplified12.3%
Taylor expanded in i around 0 64.4%
clear-num64.5%
inv-pow64.5%
*-un-lft-identity64.5%
distribute-lft-out64.5%
times-frac64.4%
metadata-eval64.4%
*-commutative64.4%
div-inv64.4%
Applied egg-rr64.4%
unpow-164.4%
*-commutative64.4%
Simplified64.4%
Taylor expanded in i around 0 91.2%
*-commutative91.2%
associate-*r/91.2%
metadata-eval91.2%
associate-*r/91.2%
metadata-eval91.2%
associate-*r/91.2%
metadata-eval91.2%
Simplified91.2%
if -9.6000000000000007e-205 < i < 2.49999999999999981e-25Initial program 5.4%
associate-/r/6.1%
*-commutative6.1%
sub-neg6.1%
metadata-eval6.1%
Simplified6.1%
Taylor expanded in i around 0 89.5%
*-commutative89.5%
Simplified89.5%
if 2.49999999999999981e-25 < i < 2.04999999999999989e64Initial program 28.2%
associate-*r/28.2%
sub-neg28.2%
distribute-rgt-in28.2%
metadata-eval28.2%
metadata-eval28.2%
Simplified28.2%
Taylor expanded in n around inf 76.3%
if 2.04999999999999989e64 < i < 1.8200000000000001e118Initial program 22.5%
associate-/r/23.4%
*-commutative23.4%
sub-neg23.4%
metadata-eval23.4%
Simplified23.4%
Taylor expanded in n around 0 80.5%
associate-/l*80.5%
mul-1-neg80.5%
unsub-neg80.5%
Simplified80.5%
if 1.8200000000000001e118 < i Initial program 69.1%
associate-/r/69.3%
*-commutative69.3%
sub-neg69.3%
metadata-eval69.3%
Simplified69.3%
Final simplification85.6%
(FPCore (i n)
:precision binary64
(let* ((t_0 (- (* 100.0 (exp i)) 100.0)))
(if (<= i -0.000115)
(/ t_0 (/ i n))
(if (<= i -2.7e-204)
(/ 1.0 (+ (* (* i (- (/ 0.5 (pow n 2.0)) (/ 0.5 n))) 0.01) (/ 0.01 n)))
(if (<= i 2.5e-25)
(* 100.0 n)
(if (<= i 4.4e+43)
(/ (* t_0 n) i)
(* 100.0 (* n (/ (+ (pow (+ (/ i n) 1.0) n) -1.0) i)))))))))
double code(double i, double n) {
double t_0 = (100.0 * exp(i)) - 100.0;
double tmp;
if (i <= -0.000115) {
tmp = t_0 / (i / n);
} else if (i <= -2.7e-204) {
tmp = 1.0 / (((i * ((0.5 / pow(n, 2.0)) - (0.5 / n))) * 0.01) + (0.01 / n));
} else if (i <= 2.5e-25) {
tmp = 100.0 * n;
} else if (i <= 4.4e+43) {
tmp = (t_0 * n) / i;
} else {
tmp = 100.0 * (n * ((pow(((i / n) + 1.0), n) + -1.0) / i));
}
return tmp;
}
real(8) function code(i, n)
real(8), intent (in) :: i
real(8), intent (in) :: n
real(8) :: t_0
real(8) :: tmp
t_0 = (100.0d0 * exp(i)) - 100.0d0
if (i <= (-0.000115d0)) then
tmp = t_0 / (i / n)
else if (i <= (-2.7d-204)) then
tmp = 1.0d0 / (((i * ((0.5d0 / (n ** 2.0d0)) - (0.5d0 / n))) * 0.01d0) + (0.01d0 / n))
else if (i <= 2.5d-25) then
tmp = 100.0d0 * n
else if (i <= 4.4d+43) then
tmp = (t_0 * n) / i
else
tmp = 100.0d0 * (n * (((((i / n) + 1.0d0) ** n) + (-1.0d0)) / i))
end if
code = tmp
end function
public static double code(double i, double n) {
double t_0 = (100.0 * Math.exp(i)) - 100.0;
double tmp;
if (i <= -0.000115) {
tmp = t_0 / (i / n);
} else if (i <= -2.7e-204) {
tmp = 1.0 / (((i * ((0.5 / Math.pow(n, 2.0)) - (0.5 / n))) * 0.01) + (0.01 / n));
} else if (i <= 2.5e-25) {
tmp = 100.0 * n;
} else if (i <= 4.4e+43) {
tmp = (t_0 * n) / i;
} else {
tmp = 100.0 * (n * ((Math.pow(((i / n) + 1.0), n) + -1.0) / i));
}
return tmp;
}
def code(i, n): t_0 = (100.0 * math.exp(i)) - 100.0 tmp = 0 if i <= -0.000115: tmp = t_0 / (i / n) elif i <= -2.7e-204: tmp = 1.0 / (((i * ((0.5 / math.pow(n, 2.0)) - (0.5 / n))) * 0.01) + (0.01 / n)) elif i <= 2.5e-25: tmp = 100.0 * n elif i <= 4.4e+43: tmp = (t_0 * n) / i else: tmp = 100.0 * (n * ((math.pow(((i / n) + 1.0), n) + -1.0) / i)) return tmp
function code(i, n) t_0 = Float64(Float64(100.0 * exp(i)) - 100.0) tmp = 0.0 if (i <= -0.000115) tmp = Float64(t_0 / Float64(i / n)); elseif (i <= -2.7e-204) tmp = Float64(1.0 / Float64(Float64(Float64(i * Float64(Float64(0.5 / (n ^ 2.0)) - Float64(0.5 / n))) * 0.01) + Float64(0.01 / n))); elseif (i <= 2.5e-25) tmp = Float64(100.0 * n); elseif (i <= 4.4e+43) tmp = Float64(Float64(t_0 * n) / i); else tmp = Float64(100.0 * Float64(n * Float64(Float64((Float64(Float64(i / n) + 1.0) ^ n) + -1.0) / i))); end return tmp end
function tmp_2 = code(i, n) t_0 = (100.0 * exp(i)) - 100.0; tmp = 0.0; if (i <= -0.000115) tmp = t_0 / (i / n); elseif (i <= -2.7e-204) tmp = 1.0 / (((i * ((0.5 / (n ^ 2.0)) - (0.5 / n))) * 0.01) + (0.01 / n)); elseif (i <= 2.5e-25) tmp = 100.0 * n; elseif (i <= 4.4e+43) tmp = (t_0 * n) / i; else tmp = 100.0 * (n * (((((i / n) + 1.0) ^ n) + -1.0) / i)); end tmp_2 = tmp; end
code[i_, n_] := Block[{t$95$0 = N[(N[(100.0 * N[Exp[i], $MachinePrecision]), $MachinePrecision] - 100.0), $MachinePrecision]}, If[LessEqual[i, -0.000115], N[(t$95$0 / N[(i / n), $MachinePrecision]), $MachinePrecision], If[LessEqual[i, -2.7e-204], N[(1.0 / N[(N[(N[(i * N[(N[(0.5 / N[Power[n, 2.0], $MachinePrecision]), $MachinePrecision] - N[(0.5 / n), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * 0.01), $MachinePrecision] + N[(0.01 / n), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[i, 2.5e-25], N[(100.0 * n), $MachinePrecision], If[LessEqual[i, 4.4e+43], N[(N[(t$95$0 * n), $MachinePrecision] / i), $MachinePrecision], N[(100.0 * N[(n * N[(N[(N[Power[N[(N[(i / n), $MachinePrecision] + 1.0), $MachinePrecision], n], $MachinePrecision] + -1.0), $MachinePrecision] / i), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := 100 \cdot e^{i} - 100\\
\mathbf{if}\;i \leq -0.000115:\\
\;\;\;\;\frac{t\_0}{\frac{i}{n}}\\
\mathbf{elif}\;i \leq -2.7 \cdot 10^{-204}:\\
\;\;\;\;\frac{1}{\left(i \cdot \left(\frac{0.5}{{n}^{2}} - \frac{0.5}{n}\right)\right) \cdot 0.01 + \frac{0.01}{n}}\\
\mathbf{elif}\;i \leq 2.5 \cdot 10^{-25}:\\
\;\;\;\;100 \cdot n\\
\mathbf{elif}\;i \leq 4.4 \cdot 10^{+43}:\\
\;\;\;\;\frac{t\_0 \cdot n}{i}\\
\mathbf{else}:\\
\;\;\;\;100 \cdot \left(n \cdot \frac{{\left(\frac{i}{n} + 1\right)}^{n} + -1}{i}\right)\\
\end{array}
\end{array}
if i < -1.15e-4Initial program 49.7%
associate-*r/49.7%
sub-neg49.7%
distribute-rgt-in49.7%
metadata-eval49.7%
metadata-eval49.7%
Simplified49.7%
Taylor expanded in n around inf 84.7%
if -1.15e-4 < i < -2.69999999999999991e-204Initial program 12.3%
associate-*r/12.3%
sub-neg12.3%
distribute-rgt-in12.3%
metadata-eval12.3%
metadata-eval12.3%
Simplified12.3%
Taylor expanded in i around 0 64.4%
clear-num64.5%
inv-pow64.5%
*-un-lft-identity64.5%
distribute-lft-out64.5%
times-frac64.4%
metadata-eval64.4%
*-commutative64.4%
div-inv64.4%
Applied egg-rr64.4%
unpow-164.4%
*-commutative64.4%
Simplified64.4%
Taylor expanded in i around 0 91.2%
*-commutative91.2%
associate-*r/91.2%
metadata-eval91.2%
associate-*r/91.2%
metadata-eval91.2%
associate-*r/91.2%
metadata-eval91.2%
Simplified91.2%
if -2.69999999999999991e-204 < i < 2.49999999999999981e-25Initial program 5.4%
associate-/r/6.1%
*-commutative6.1%
sub-neg6.1%
metadata-eval6.1%
Simplified6.1%
Taylor expanded in i around 0 89.5%
*-commutative89.5%
Simplified89.5%
if 2.49999999999999981e-25 < i < 4.40000000000000001e43Initial program 18.4%
associate-*r/18.4%
sub-neg18.4%
distribute-rgt-in18.4%
metadata-eval18.4%
metadata-eval18.4%
Simplified18.4%
Taylor expanded in n around inf 78.6%
if 4.40000000000000001e43 < i Initial program 60.6%
associate-/r/60.9%
*-commutative60.9%
sub-neg60.9%
metadata-eval60.9%
Simplified60.9%
Final simplification84.0%
(FPCore (i n)
:precision binary64
(let* ((t_0 (* n (/ (+ (* 100.0 (exp i)) -100.0) i))))
(if (<= i -7.4e-6)
t_0
(if (<= i 2.5e-25)
(+ (* 100.0 n) (* 50.0 (* i n)))
(if (or (<= i 2.05e+64) (not (<= i 2.5e+118)))
t_0
(* 200.0 (/ (pow n 2.0) i)))))))
double code(double i, double n) {
double t_0 = n * (((100.0 * exp(i)) + -100.0) / i);
double tmp;
if (i <= -7.4e-6) {
tmp = t_0;
} else if (i <= 2.5e-25) {
tmp = (100.0 * n) + (50.0 * (i * n));
} else if ((i <= 2.05e+64) || !(i <= 2.5e+118)) {
tmp = t_0;
} else {
tmp = 200.0 * (pow(n, 2.0) / i);
}
return tmp;
}
real(8) function code(i, n)
real(8), intent (in) :: i
real(8), intent (in) :: n
real(8) :: t_0
real(8) :: tmp
t_0 = n * (((100.0d0 * exp(i)) + (-100.0d0)) / i)
if (i <= (-7.4d-6)) then
tmp = t_0
else if (i <= 2.5d-25) then
tmp = (100.0d0 * n) + (50.0d0 * (i * n))
else if ((i <= 2.05d+64) .or. (.not. (i <= 2.5d+118))) then
tmp = t_0
else
tmp = 200.0d0 * ((n ** 2.0d0) / i)
end if
code = tmp
end function
public static double code(double i, double n) {
double t_0 = n * (((100.0 * Math.exp(i)) + -100.0) / i);
double tmp;
if (i <= -7.4e-6) {
tmp = t_0;
} else if (i <= 2.5e-25) {
tmp = (100.0 * n) + (50.0 * (i * n));
} else if ((i <= 2.05e+64) || !(i <= 2.5e+118)) {
tmp = t_0;
} else {
tmp = 200.0 * (Math.pow(n, 2.0) / i);
}
return tmp;
}
def code(i, n): t_0 = n * (((100.0 * math.exp(i)) + -100.0) / i) tmp = 0 if i <= -7.4e-6: tmp = t_0 elif i <= 2.5e-25: tmp = (100.0 * n) + (50.0 * (i * n)) elif (i <= 2.05e+64) or not (i <= 2.5e+118): tmp = t_0 else: tmp = 200.0 * (math.pow(n, 2.0) / i) return tmp
function code(i, n) t_0 = Float64(n * Float64(Float64(Float64(100.0 * exp(i)) + -100.0) / i)) tmp = 0.0 if (i <= -7.4e-6) tmp = t_0; elseif (i <= 2.5e-25) tmp = Float64(Float64(100.0 * n) + Float64(50.0 * Float64(i * n))); elseif ((i <= 2.05e+64) || !(i <= 2.5e+118)) tmp = t_0; else tmp = Float64(200.0 * Float64((n ^ 2.0) / i)); end return tmp end
function tmp_2 = code(i, n) t_0 = n * (((100.0 * exp(i)) + -100.0) / i); tmp = 0.0; if (i <= -7.4e-6) tmp = t_0; elseif (i <= 2.5e-25) tmp = (100.0 * n) + (50.0 * (i * n)); elseif ((i <= 2.05e+64) || ~((i <= 2.5e+118))) tmp = t_0; else tmp = 200.0 * ((n ^ 2.0) / i); end tmp_2 = tmp; end
code[i_, n_] := Block[{t$95$0 = N[(n * N[(N[(N[(100.0 * N[Exp[i], $MachinePrecision]), $MachinePrecision] + -100.0), $MachinePrecision] / i), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[i, -7.4e-6], t$95$0, If[LessEqual[i, 2.5e-25], N[(N[(100.0 * n), $MachinePrecision] + N[(50.0 * N[(i * n), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[Or[LessEqual[i, 2.05e+64], N[Not[LessEqual[i, 2.5e+118]], $MachinePrecision]], t$95$0, N[(200.0 * N[(N[Power[n, 2.0], $MachinePrecision] / i), $MachinePrecision]), $MachinePrecision]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := n \cdot \frac{100 \cdot e^{i} + -100}{i}\\
\mathbf{if}\;i \leq -7.4 \cdot 10^{-6}:\\
\;\;\;\;t\_0\\
\mathbf{elif}\;i \leq 2.5 \cdot 10^{-25}:\\
\;\;\;\;100 \cdot n + 50 \cdot \left(i \cdot n\right)\\
\mathbf{elif}\;i \leq 2.05 \cdot 10^{+64} \lor \neg \left(i \leq 2.5 \cdot 10^{+118}\right):\\
\;\;\;\;t\_0\\
\mathbf{else}:\\
\;\;\;\;200 \cdot \frac{{n}^{2}}{i}\\
\end{array}
\end{array}
if i < -7.4000000000000003e-6 or 2.49999999999999981e-25 < i < 2.04999999999999989e64 or 2.49999999999999986e118 < i Initial program 51.7%
associate-*r/51.8%
sub-neg51.8%
distribute-rgt-in51.8%
metadata-eval51.8%
metadata-eval51.8%
Simplified51.8%
Taylor expanded in n around inf 71.6%
associate-/l*71.6%
sub-neg71.6%
*-commutative71.6%
metadata-eval71.6%
Simplified71.6%
if -7.4000000000000003e-6 < i < 2.49999999999999981e-25Initial program 7.5%
associate-/r/8.1%
*-commutative8.1%
sub-neg8.1%
metadata-eval8.1%
Simplified8.1%
Taylor expanded in i around 0 86.9%
Taylor expanded in n around inf 87.1%
if 2.04999999999999989e64 < i < 2.49999999999999986e118Initial program 32.2%
associate-*r/32.0%
sub-neg32.0%
distribute-rgt-in32.3%
metadata-eval32.3%
metadata-eval32.3%
Simplified32.3%
Taylor expanded in i around 0 1.6%
clear-num1.6%
inv-pow1.6%
*-un-lft-identity1.6%
distribute-lft-out1.6%
times-frac1.6%
metadata-eval1.6%
*-commutative1.6%
div-inv1.6%
Applied egg-rr1.6%
unpow-11.6%
*-commutative1.6%
Simplified1.6%
Taylor expanded in i around 0 66.7%
*-commutative66.7%
associate-*r/66.7%
metadata-eval66.7%
associate-*r/66.7%
metadata-eval66.7%
associate-*r/66.7%
metadata-eval66.7%
Simplified66.7%
Taylor expanded in n around 0 65.8%
Final simplification80.9%
(FPCore (i n)
:precision binary64
(let* ((t_0 (* 100.0 (exp i))) (t_1 (/ (* (- t_0 100.0) n) i)))
(if (<= i -7.4e-6)
t_1
(if (<= i 2.5e-25)
(+ (* 100.0 n) (* 50.0 (* i n)))
(if (<= i 2.05e+64)
t_1
(if (<= i 1.9e+119)
(* 200.0 (/ (pow n 2.0) i))
(* n (/ (+ t_0 -100.0) i))))))))
double code(double i, double n) {
double t_0 = 100.0 * exp(i);
double t_1 = ((t_0 - 100.0) * n) / i;
double tmp;
if (i <= -7.4e-6) {
tmp = t_1;
} else if (i <= 2.5e-25) {
tmp = (100.0 * n) + (50.0 * (i * n));
} else if (i <= 2.05e+64) {
tmp = t_1;
} else if (i <= 1.9e+119) {
tmp = 200.0 * (pow(n, 2.0) / i);
} else {
tmp = n * ((t_0 + -100.0) / i);
}
return tmp;
}
real(8) function code(i, n)
real(8), intent (in) :: i
real(8), intent (in) :: n
real(8) :: t_0
real(8) :: t_1
real(8) :: tmp
t_0 = 100.0d0 * exp(i)
t_1 = ((t_0 - 100.0d0) * n) / i
if (i <= (-7.4d-6)) then
tmp = t_1
else if (i <= 2.5d-25) then
tmp = (100.0d0 * n) + (50.0d0 * (i * n))
else if (i <= 2.05d+64) then
tmp = t_1
else if (i <= 1.9d+119) then
tmp = 200.0d0 * ((n ** 2.0d0) / i)
else
tmp = n * ((t_0 + (-100.0d0)) / i)
end if
code = tmp
end function
public static double code(double i, double n) {
double t_0 = 100.0 * Math.exp(i);
double t_1 = ((t_0 - 100.0) * n) / i;
double tmp;
if (i <= -7.4e-6) {
tmp = t_1;
} else if (i <= 2.5e-25) {
tmp = (100.0 * n) + (50.0 * (i * n));
} else if (i <= 2.05e+64) {
tmp = t_1;
} else if (i <= 1.9e+119) {
tmp = 200.0 * (Math.pow(n, 2.0) / i);
} else {
tmp = n * ((t_0 + -100.0) / i);
}
return tmp;
}
def code(i, n): t_0 = 100.0 * math.exp(i) t_1 = ((t_0 - 100.0) * n) / i tmp = 0 if i <= -7.4e-6: tmp = t_1 elif i <= 2.5e-25: tmp = (100.0 * n) + (50.0 * (i * n)) elif i <= 2.05e+64: tmp = t_1 elif i <= 1.9e+119: tmp = 200.0 * (math.pow(n, 2.0) / i) else: tmp = n * ((t_0 + -100.0) / i) return tmp
function code(i, n) t_0 = Float64(100.0 * exp(i)) t_1 = Float64(Float64(Float64(t_0 - 100.0) * n) / i) tmp = 0.0 if (i <= -7.4e-6) tmp = t_1; elseif (i <= 2.5e-25) tmp = Float64(Float64(100.0 * n) + Float64(50.0 * Float64(i * n))); elseif (i <= 2.05e+64) tmp = t_1; elseif (i <= 1.9e+119) tmp = Float64(200.0 * Float64((n ^ 2.0) / i)); else tmp = Float64(n * Float64(Float64(t_0 + -100.0) / i)); end return tmp end
function tmp_2 = code(i, n) t_0 = 100.0 * exp(i); t_1 = ((t_0 - 100.0) * n) / i; tmp = 0.0; if (i <= -7.4e-6) tmp = t_1; elseif (i <= 2.5e-25) tmp = (100.0 * n) + (50.0 * (i * n)); elseif (i <= 2.05e+64) tmp = t_1; elseif (i <= 1.9e+119) tmp = 200.0 * ((n ^ 2.0) / i); else tmp = n * ((t_0 + -100.0) / i); end tmp_2 = tmp; end
code[i_, n_] := Block[{t$95$0 = N[(100.0 * N[Exp[i], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$1 = N[(N[(N[(t$95$0 - 100.0), $MachinePrecision] * n), $MachinePrecision] / i), $MachinePrecision]}, If[LessEqual[i, -7.4e-6], t$95$1, If[LessEqual[i, 2.5e-25], N[(N[(100.0 * n), $MachinePrecision] + N[(50.0 * N[(i * n), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[i, 2.05e+64], t$95$1, If[LessEqual[i, 1.9e+119], N[(200.0 * N[(N[Power[n, 2.0], $MachinePrecision] / i), $MachinePrecision]), $MachinePrecision], N[(n * N[(N[(t$95$0 + -100.0), $MachinePrecision] / i), $MachinePrecision]), $MachinePrecision]]]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := 100 \cdot e^{i}\\
t_1 := \frac{\left(t\_0 - 100\right) \cdot n}{i}\\
\mathbf{if}\;i \leq -7.4 \cdot 10^{-6}:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;i \leq 2.5 \cdot 10^{-25}:\\
\;\;\;\;100 \cdot n + 50 \cdot \left(i \cdot n\right)\\
\mathbf{elif}\;i \leq 2.05 \cdot 10^{+64}:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;i \leq 1.9 \cdot 10^{+119}:\\
\;\;\;\;200 \cdot \frac{{n}^{2}}{i}\\
\mathbf{else}:\\
\;\;\;\;n \cdot \frac{t\_0 + -100}{i}\\
\end{array}
\end{array}
if i < -7.4000000000000003e-6 or 2.49999999999999981e-25 < i < 2.04999999999999989e64Initial program 44.6%
associate-*r/44.7%
sub-neg44.7%
distribute-rgt-in44.7%
metadata-eval44.7%
metadata-eval44.7%
Simplified44.7%
Taylor expanded in n around inf 82.3%
if -7.4000000000000003e-6 < i < 2.49999999999999981e-25Initial program 7.5%
associate-/r/8.1%
*-commutative8.1%
sub-neg8.1%
metadata-eval8.1%
Simplified8.1%
Taylor expanded in i around 0 86.9%
Taylor expanded in n around inf 87.1%
if 2.04999999999999989e64 < i < 1.89999999999999995e119Initial program 32.2%
associate-*r/32.0%
sub-neg32.0%
distribute-rgt-in32.3%
metadata-eval32.3%
metadata-eval32.3%
Simplified32.3%
Taylor expanded in i around 0 1.6%
clear-num1.6%
inv-pow1.6%
*-un-lft-identity1.6%
distribute-lft-out1.6%
times-frac1.6%
metadata-eval1.6%
*-commutative1.6%
div-inv1.6%
Applied egg-rr1.6%
unpow-11.6%
*-commutative1.6%
Simplified1.6%
Taylor expanded in i around 0 66.7%
*-commutative66.7%
associate-*r/66.7%
metadata-eval66.7%
associate-*r/66.7%
metadata-eval66.7%
associate-*r/66.7%
metadata-eval66.7%
Simplified66.7%
Taylor expanded in n around 0 65.8%
if 1.89999999999999995e119 < i Initial program 68.0%
associate-*r/68.0%
sub-neg68.0%
distribute-rgt-in68.0%
metadata-eval68.0%
metadata-eval68.0%
Simplified68.0%
Taylor expanded in n around inf 47.1%
associate-/l*47.1%
sub-neg47.1%
*-commutative47.1%
metadata-eval47.1%
Simplified47.1%
Final simplification80.9%
(FPCore (i n)
:precision binary64
(let* ((t_0 (* 100.0 (exp i))) (t_1 (- t_0 100.0)))
(if (<= i -7.4e-6)
(/ t_1 (/ i n))
(if (<= i 2.5e-25)
(+ (* 100.0 n) (* 50.0 (* i n)))
(if (<= i 2.05e+64)
(/ (* t_1 n) i)
(if (<= i 2.4e+118)
(* 200.0 (/ (pow n 2.0) i))
(* n (/ (+ t_0 -100.0) i))))))))
double code(double i, double n) {
double t_0 = 100.0 * exp(i);
double t_1 = t_0 - 100.0;
double tmp;
if (i <= -7.4e-6) {
tmp = t_1 / (i / n);
} else if (i <= 2.5e-25) {
tmp = (100.0 * n) + (50.0 * (i * n));
} else if (i <= 2.05e+64) {
tmp = (t_1 * n) / i;
} else if (i <= 2.4e+118) {
tmp = 200.0 * (pow(n, 2.0) / i);
} else {
tmp = n * ((t_0 + -100.0) / i);
}
return tmp;
}
real(8) function code(i, n)
real(8), intent (in) :: i
real(8), intent (in) :: n
real(8) :: t_0
real(8) :: t_1
real(8) :: tmp
t_0 = 100.0d0 * exp(i)
t_1 = t_0 - 100.0d0
if (i <= (-7.4d-6)) then
tmp = t_1 / (i / n)
else if (i <= 2.5d-25) then
tmp = (100.0d0 * n) + (50.0d0 * (i * n))
else if (i <= 2.05d+64) then
tmp = (t_1 * n) / i
else if (i <= 2.4d+118) then
tmp = 200.0d0 * ((n ** 2.0d0) / i)
else
tmp = n * ((t_0 + (-100.0d0)) / i)
end if
code = tmp
end function
public static double code(double i, double n) {
double t_0 = 100.0 * Math.exp(i);
double t_1 = t_0 - 100.0;
double tmp;
if (i <= -7.4e-6) {
tmp = t_1 / (i / n);
} else if (i <= 2.5e-25) {
tmp = (100.0 * n) + (50.0 * (i * n));
} else if (i <= 2.05e+64) {
tmp = (t_1 * n) / i;
} else if (i <= 2.4e+118) {
tmp = 200.0 * (Math.pow(n, 2.0) / i);
} else {
tmp = n * ((t_0 + -100.0) / i);
}
return tmp;
}
def code(i, n): t_0 = 100.0 * math.exp(i) t_1 = t_0 - 100.0 tmp = 0 if i <= -7.4e-6: tmp = t_1 / (i / n) elif i <= 2.5e-25: tmp = (100.0 * n) + (50.0 * (i * n)) elif i <= 2.05e+64: tmp = (t_1 * n) / i elif i <= 2.4e+118: tmp = 200.0 * (math.pow(n, 2.0) / i) else: tmp = n * ((t_0 + -100.0) / i) return tmp
function code(i, n) t_0 = Float64(100.0 * exp(i)) t_1 = Float64(t_0 - 100.0) tmp = 0.0 if (i <= -7.4e-6) tmp = Float64(t_1 / Float64(i / n)); elseif (i <= 2.5e-25) tmp = Float64(Float64(100.0 * n) + Float64(50.0 * Float64(i * n))); elseif (i <= 2.05e+64) tmp = Float64(Float64(t_1 * n) / i); elseif (i <= 2.4e+118) tmp = Float64(200.0 * Float64((n ^ 2.0) / i)); else tmp = Float64(n * Float64(Float64(t_0 + -100.0) / i)); end return tmp end
function tmp_2 = code(i, n) t_0 = 100.0 * exp(i); t_1 = t_0 - 100.0; tmp = 0.0; if (i <= -7.4e-6) tmp = t_1 / (i / n); elseif (i <= 2.5e-25) tmp = (100.0 * n) + (50.0 * (i * n)); elseif (i <= 2.05e+64) tmp = (t_1 * n) / i; elseif (i <= 2.4e+118) tmp = 200.0 * ((n ^ 2.0) / i); else tmp = n * ((t_0 + -100.0) / i); end tmp_2 = tmp; end
code[i_, n_] := Block[{t$95$0 = N[(100.0 * N[Exp[i], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$1 = N[(t$95$0 - 100.0), $MachinePrecision]}, If[LessEqual[i, -7.4e-6], N[(t$95$1 / N[(i / n), $MachinePrecision]), $MachinePrecision], If[LessEqual[i, 2.5e-25], N[(N[(100.0 * n), $MachinePrecision] + N[(50.0 * N[(i * n), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[i, 2.05e+64], N[(N[(t$95$1 * n), $MachinePrecision] / i), $MachinePrecision], If[LessEqual[i, 2.4e+118], N[(200.0 * N[(N[Power[n, 2.0], $MachinePrecision] / i), $MachinePrecision]), $MachinePrecision], N[(n * N[(N[(t$95$0 + -100.0), $MachinePrecision] / i), $MachinePrecision]), $MachinePrecision]]]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := 100 \cdot e^{i}\\
t_1 := t\_0 - 100\\
\mathbf{if}\;i \leq -7.4 \cdot 10^{-6}:\\
\;\;\;\;\frac{t\_1}{\frac{i}{n}}\\
\mathbf{elif}\;i \leq 2.5 \cdot 10^{-25}:\\
\;\;\;\;100 \cdot n + 50 \cdot \left(i \cdot n\right)\\
\mathbf{elif}\;i \leq 2.05 \cdot 10^{+64}:\\
\;\;\;\;\frac{t\_1 \cdot n}{i}\\
\mathbf{elif}\;i \leq 2.4 \cdot 10^{+118}:\\
\;\;\;\;200 \cdot \frac{{n}^{2}}{i}\\
\mathbf{else}:\\
\;\;\;\;n \cdot \frac{t\_0 + -100}{i}\\
\end{array}
\end{array}
if i < -7.4000000000000003e-6Initial program 49.7%
associate-*r/49.7%
sub-neg49.7%
distribute-rgt-in49.7%
metadata-eval49.7%
metadata-eval49.7%
Simplified49.7%
Taylor expanded in n around inf 84.7%
if -7.4000000000000003e-6 < i < 2.49999999999999981e-25Initial program 7.5%
associate-/r/8.1%
*-commutative8.1%
sub-neg8.1%
metadata-eval8.1%
Simplified8.1%
Taylor expanded in i around 0 86.9%
Taylor expanded in n around inf 87.1%
if 2.49999999999999981e-25 < i < 2.04999999999999989e64Initial program 28.2%
associate-*r/28.2%
sub-neg28.2%
distribute-rgt-in28.2%
metadata-eval28.2%
metadata-eval28.2%
Simplified28.2%
Taylor expanded in n around inf 76.3%
if 2.04999999999999989e64 < i < 2.4e118Initial program 32.2%
associate-*r/32.0%
sub-neg32.0%
distribute-rgt-in32.3%
metadata-eval32.3%
metadata-eval32.3%
Simplified32.3%
Taylor expanded in i around 0 1.6%
clear-num1.6%
inv-pow1.6%
*-un-lft-identity1.6%
distribute-lft-out1.6%
times-frac1.6%
metadata-eval1.6%
*-commutative1.6%
div-inv1.6%
Applied egg-rr1.6%
unpow-11.6%
*-commutative1.6%
Simplified1.6%
Taylor expanded in i around 0 66.7%
*-commutative66.7%
associate-*r/66.7%
metadata-eval66.7%
associate-*r/66.7%
metadata-eval66.7%
associate-*r/66.7%
metadata-eval66.7%
Simplified66.7%
Taylor expanded in n around 0 65.8%
if 2.4e118 < i Initial program 68.0%
associate-*r/68.0%
sub-neg68.0%
distribute-rgt-in68.0%
metadata-eval68.0%
metadata-eval68.0%
Simplified68.0%
Taylor expanded in n around inf 47.1%
associate-/l*47.1%
sub-neg47.1%
*-commutative47.1%
metadata-eval47.1%
Simplified47.1%
Final simplification81.0%
(FPCore (i n)
:precision binary64
(let* ((t_0 (- (* 100.0 (exp i)) 100.0)))
(if (<= i -0.000165)
(/ t_0 (/ i n))
(if (<= i 2.5e-25)
(* n (+ (* (pow i 2.0) 16.666666666666668) (+ 100.0 (* i 50.0))))
(if (<= i 4.4e+43)
(/ (* t_0 n) i)
(* 100.0 (* n (/ (+ (pow (+ (/ i n) 1.0) n) -1.0) i))))))))
double code(double i, double n) {
double t_0 = (100.0 * exp(i)) - 100.0;
double tmp;
if (i <= -0.000165) {
tmp = t_0 / (i / n);
} else if (i <= 2.5e-25) {
tmp = n * ((pow(i, 2.0) * 16.666666666666668) + (100.0 + (i * 50.0)));
} else if (i <= 4.4e+43) {
tmp = (t_0 * n) / i;
} else {
tmp = 100.0 * (n * ((pow(((i / n) + 1.0), n) + -1.0) / i));
}
return tmp;
}
real(8) function code(i, n)
real(8), intent (in) :: i
real(8), intent (in) :: n
real(8) :: t_0
real(8) :: tmp
t_0 = (100.0d0 * exp(i)) - 100.0d0
if (i <= (-0.000165d0)) then
tmp = t_0 / (i / n)
else if (i <= 2.5d-25) then
tmp = n * (((i ** 2.0d0) * 16.666666666666668d0) + (100.0d0 + (i * 50.0d0)))
else if (i <= 4.4d+43) then
tmp = (t_0 * n) / i
else
tmp = 100.0d0 * (n * (((((i / n) + 1.0d0) ** n) + (-1.0d0)) / i))
end if
code = tmp
end function
public static double code(double i, double n) {
double t_0 = (100.0 * Math.exp(i)) - 100.0;
double tmp;
if (i <= -0.000165) {
tmp = t_0 / (i / n);
} else if (i <= 2.5e-25) {
tmp = n * ((Math.pow(i, 2.0) * 16.666666666666668) + (100.0 + (i * 50.0)));
} else if (i <= 4.4e+43) {
tmp = (t_0 * n) / i;
} else {
tmp = 100.0 * (n * ((Math.pow(((i / n) + 1.0), n) + -1.0) / i));
}
return tmp;
}
def code(i, n): t_0 = (100.0 * math.exp(i)) - 100.0 tmp = 0 if i <= -0.000165: tmp = t_0 / (i / n) elif i <= 2.5e-25: tmp = n * ((math.pow(i, 2.0) * 16.666666666666668) + (100.0 + (i * 50.0))) elif i <= 4.4e+43: tmp = (t_0 * n) / i else: tmp = 100.0 * (n * ((math.pow(((i / n) + 1.0), n) + -1.0) / i)) return tmp
function code(i, n) t_0 = Float64(Float64(100.0 * exp(i)) - 100.0) tmp = 0.0 if (i <= -0.000165) tmp = Float64(t_0 / Float64(i / n)); elseif (i <= 2.5e-25) tmp = Float64(n * Float64(Float64((i ^ 2.0) * 16.666666666666668) + Float64(100.0 + Float64(i * 50.0)))); elseif (i <= 4.4e+43) tmp = Float64(Float64(t_0 * n) / i); else tmp = Float64(100.0 * Float64(n * Float64(Float64((Float64(Float64(i / n) + 1.0) ^ n) + -1.0) / i))); end return tmp end
function tmp_2 = code(i, n) t_0 = (100.0 * exp(i)) - 100.0; tmp = 0.0; if (i <= -0.000165) tmp = t_0 / (i / n); elseif (i <= 2.5e-25) tmp = n * (((i ^ 2.0) * 16.666666666666668) + (100.0 + (i * 50.0))); elseif (i <= 4.4e+43) tmp = (t_0 * n) / i; else tmp = 100.0 * (n * (((((i / n) + 1.0) ^ n) + -1.0) / i)); end tmp_2 = tmp; end
code[i_, n_] := Block[{t$95$0 = N[(N[(100.0 * N[Exp[i], $MachinePrecision]), $MachinePrecision] - 100.0), $MachinePrecision]}, If[LessEqual[i, -0.000165], N[(t$95$0 / N[(i / n), $MachinePrecision]), $MachinePrecision], If[LessEqual[i, 2.5e-25], N[(n * N[(N[(N[Power[i, 2.0], $MachinePrecision] * 16.666666666666668), $MachinePrecision] + N[(100.0 + N[(i * 50.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[i, 4.4e+43], N[(N[(t$95$0 * n), $MachinePrecision] / i), $MachinePrecision], N[(100.0 * N[(n * N[(N[(N[Power[N[(N[(i / n), $MachinePrecision] + 1.0), $MachinePrecision], n], $MachinePrecision] + -1.0), $MachinePrecision] / i), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := 100 \cdot e^{i} - 100\\
\mathbf{if}\;i \leq -0.000165:\\
\;\;\;\;\frac{t\_0}{\frac{i}{n}}\\
\mathbf{elif}\;i \leq 2.5 \cdot 10^{-25}:\\
\;\;\;\;n \cdot \left({i}^{2} \cdot 16.666666666666668 + \left(100 + i \cdot 50\right)\right)\\
\mathbf{elif}\;i \leq 4.4 \cdot 10^{+43}:\\
\;\;\;\;\frac{t\_0 \cdot n}{i}\\
\mathbf{else}:\\
\;\;\;\;100 \cdot \left(n \cdot \frac{{\left(\frac{i}{n} + 1\right)}^{n} + -1}{i}\right)\\
\end{array}
\end{array}
if i < -1.65e-4Initial program 49.7%
associate-*r/49.7%
sub-neg49.7%
distribute-rgt-in49.7%
metadata-eval49.7%
metadata-eval49.7%
Simplified49.7%
Taylor expanded in n around inf 84.7%
if -1.65e-4 < i < 2.49999999999999981e-25Initial program 7.5%
associate-*r/7.5%
sub-neg7.5%
distribute-rgt-in7.5%
metadata-eval7.5%
metadata-eval7.5%
Simplified7.5%
Taylor expanded in n around inf 9.0%
Taylor expanded in i around 0 87.2%
+-commutative87.2%
associate-*r*87.2%
+-commutative87.2%
distribute-rgt-in87.2%
*-commutative87.2%
associate-*r*87.2%
distribute-rgt-out87.2%
*-commutative87.2%
Simplified87.2%
if 2.49999999999999981e-25 < i < 4.40000000000000001e43Initial program 18.4%
associate-*r/18.4%
sub-neg18.4%
distribute-rgt-in18.4%
metadata-eval18.4%
metadata-eval18.4%
Simplified18.4%
Taylor expanded in n around inf 78.6%
if 4.40000000000000001e43 < i Initial program 60.6%
associate-/r/60.9%
*-commutative60.9%
sub-neg60.9%
metadata-eval60.9%
Simplified60.9%
Final simplification82.3%
(FPCore (i n)
:precision binary64
(let* ((t_0 (- (* 100.0 (exp i)) 100.0)))
(if (<= i -0.000165)
(/ t_0 (/ i n))
(if (<= i 2.5e-25)
(* n (+ (* (pow i 2.0) 16.666666666666668) (+ 100.0 (* i 50.0))))
(/ (* t_0 n) i)))))
double code(double i, double n) {
double t_0 = (100.0 * exp(i)) - 100.0;
double tmp;
if (i <= -0.000165) {
tmp = t_0 / (i / n);
} else if (i <= 2.5e-25) {
tmp = n * ((pow(i, 2.0) * 16.666666666666668) + (100.0 + (i * 50.0)));
} else {
tmp = (t_0 * n) / i;
}
return tmp;
}
real(8) function code(i, n)
real(8), intent (in) :: i
real(8), intent (in) :: n
real(8) :: t_0
real(8) :: tmp
t_0 = (100.0d0 * exp(i)) - 100.0d0
if (i <= (-0.000165d0)) then
tmp = t_0 / (i / n)
else if (i <= 2.5d-25) then
tmp = n * (((i ** 2.0d0) * 16.666666666666668d0) + (100.0d0 + (i * 50.0d0)))
else
tmp = (t_0 * n) / i
end if
code = tmp
end function
public static double code(double i, double n) {
double t_0 = (100.0 * Math.exp(i)) - 100.0;
double tmp;
if (i <= -0.000165) {
tmp = t_0 / (i / n);
} else if (i <= 2.5e-25) {
tmp = n * ((Math.pow(i, 2.0) * 16.666666666666668) + (100.0 + (i * 50.0)));
} else {
tmp = (t_0 * n) / i;
}
return tmp;
}
def code(i, n): t_0 = (100.0 * math.exp(i)) - 100.0 tmp = 0 if i <= -0.000165: tmp = t_0 / (i / n) elif i <= 2.5e-25: tmp = n * ((math.pow(i, 2.0) * 16.666666666666668) + (100.0 + (i * 50.0))) else: tmp = (t_0 * n) / i return tmp
function code(i, n) t_0 = Float64(Float64(100.0 * exp(i)) - 100.0) tmp = 0.0 if (i <= -0.000165) tmp = Float64(t_0 / Float64(i / n)); elseif (i <= 2.5e-25) tmp = Float64(n * Float64(Float64((i ^ 2.0) * 16.666666666666668) + Float64(100.0 + Float64(i * 50.0)))); else tmp = Float64(Float64(t_0 * n) / i); end return tmp end
function tmp_2 = code(i, n) t_0 = (100.0 * exp(i)) - 100.0; tmp = 0.0; if (i <= -0.000165) tmp = t_0 / (i / n); elseif (i <= 2.5e-25) tmp = n * (((i ^ 2.0) * 16.666666666666668) + (100.0 + (i * 50.0))); else tmp = (t_0 * n) / i; end tmp_2 = tmp; end
code[i_, n_] := Block[{t$95$0 = N[(N[(100.0 * N[Exp[i], $MachinePrecision]), $MachinePrecision] - 100.0), $MachinePrecision]}, If[LessEqual[i, -0.000165], N[(t$95$0 / N[(i / n), $MachinePrecision]), $MachinePrecision], If[LessEqual[i, 2.5e-25], N[(n * N[(N[(N[Power[i, 2.0], $MachinePrecision] * 16.666666666666668), $MachinePrecision] + N[(100.0 + N[(i * 50.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(t$95$0 * n), $MachinePrecision] / i), $MachinePrecision]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := 100 \cdot e^{i} - 100\\
\mathbf{if}\;i \leq -0.000165:\\
\;\;\;\;\frac{t\_0}{\frac{i}{n}}\\
\mathbf{elif}\;i \leq 2.5 \cdot 10^{-25}:\\
\;\;\;\;n \cdot \left({i}^{2} \cdot 16.666666666666668 + \left(100 + i \cdot 50\right)\right)\\
\mathbf{else}:\\
\;\;\;\;\frac{t\_0 \cdot n}{i}\\
\end{array}
\end{array}
if i < -1.65e-4Initial program 49.7%
associate-*r/49.7%
sub-neg49.7%
distribute-rgt-in49.7%
metadata-eval49.7%
metadata-eval49.7%
Simplified49.7%
Taylor expanded in n around inf 84.7%
if -1.65e-4 < i < 2.49999999999999981e-25Initial program 7.5%
associate-*r/7.5%
sub-neg7.5%
distribute-rgt-in7.5%
metadata-eval7.5%
metadata-eval7.5%
Simplified7.5%
Taylor expanded in n around inf 9.0%
Taylor expanded in i around 0 87.2%
+-commutative87.2%
associate-*r*87.2%
+-commutative87.2%
distribute-rgt-in87.2%
*-commutative87.2%
associate-*r*87.2%
distribute-rgt-out87.2%
*-commutative87.2%
Simplified87.2%
if 2.49999999999999981e-25 < i Initial program 50.7%
associate-*r/50.6%
sub-neg50.6%
distribute-rgt-in50.7%
metadata-eval50.7%
metadata-eval50.7%
Simplified50.7%
Taylor expanded in n around inf 50.5%
Final simplification79.4%
(FPCore (i n)
:precision binary64
(if (<= n -1.45e-242)
(/ 1.0 (+ (/ 0.01 n) (* (/ i n) -0.005)))
(if (<= n 5.5e-208)
0.0
(+ (* 100.0 n) (* 100.0 (* i (* n (- 0.5 (* 0.5 (/ 1.0 n))))))))))
double code(double i, double n) {
double tmp;
if (n <= -1.45e-242) {
tmp = 1.0 / ((0.01 / n) + ((i / n) * -0.005));
} else if (n <= 5.5e-208) {
tmp = 0.0;
} else {
tmp = (100.0 * n) + (100.0 * (i * (n * (0.5 - (0.5 * (1.0 / n))))));
}
return tmp;
}
real(8) function code(i, n)
real(8), intent (in) :: i
real(8), intent (in) :: n
real(8) :: tmp
if (n <= (-1.45d-242)) then
tmp = 1.0d0 / ((0.01d0 / n) + ((i / n) * (-0.005d0)))
else if (n <= 5.5d-208) then
tmp = 0.0d0
else
tmp = (100.0d0 * n) + (100.0d0 * (i * (n * (0.5d0 - (0.5d0 * (1.0d0 / n))))))
end if
code = tmp
end function
public static double code(double i, double n) {
double tmp;
if (n <= -1.45e-242) {
tmp = 1.0 / ((0.01 / n) + ((i / n) * -0.005));
} else if (n <= 5.5e-208) {
tmp = 0.0;
} else {
tmp = (100.0 * n) + (100.0 * (i * (n * (0.5 - (0.5 * (1.0 / n))))));
}
return tmp;
}
def code(i, n): tmp = 0 if n <= -1.45e-242: tmp = 1.0 / ((0.01 / n) + ((i / n) * -0.005)) elif n <= 5.5e-208: tmp = 0.0 else: tmp = (100.0 * n) + (100.0 * (i * (n * (0.5 - (0.5 * (1.0 / n)))))) return tmp
function code(i, n) tmp = 0.0 if (n <= -1.45e-242) tmp = Float64(1.0 / Float64(Float64(0.01 / n) + Float64(Float64(i / n) * -0.005))); elseif (n <= 5.5e-208) tmp = 0.0; else tmp = Float64(Float64(100.0 * n) + Float64(100.0 * Float64(i * Float64(n * Float64(0.5 - Float64(0.5 * Float64(1.0 / n))))))); end return tmp end
function tmp_2 = code(i, n) tmp = 0.0; if (n <= -1.45e-242) tmp = 1.0 / ((0.01 / n) + ((i / n) * -0.005)); elseif (n <= 5.5e-208) tmp = 0.0; else tmp = (100.0 * n) + (100.0 * (i * (n * (0.5 - (0.5 * (1.0 / n)))))); end tmp_2 = tmp; end
code[i_, n_] := If[LessEqual[n, -1.45e-242], N[(1.0 / N[(N[(0.01 / n), $MachinePrecision] + N[(N[(i / n), $MachinePrecision] * -0.005), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[n, 5.5e-208], 0.0, N[(N[(100.0 * n), $MachinePrecision] + N[(100.0 * N[(i * N[(n * N[(0.5 - N[(0.5 * N[(1.0 / n), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;n \leq -1.45 \cdot 10^{-242}:\\
\;\;\;\;\frac{1}{\frac{0.01}{n} + \frac{i}{n} \cdot -0.005}\\
\mathbf{elif}\;n \leq 5.5 \cdot 10^{-208}:\\
\;\;\;\;0\\
\mathbf{else}:\\
\;\;\;\;100 \cdot n + 100 \cdot \left(i \cdot \left(n \cdot \left(0.5 - 0.5 \cdot \frac{1}{n}\right)\right)\right)\\
\end{array}
\end{array}
if n < -1.45e-242Initial program 28.3%
associate-*r/28.3%
sub-neg28.3%
distribute-rgt-in28.3%
metadata-eval28.3%
metadata-eval28.3%
Simplified28.3%
Taylor expanded in i around 0 38.4%
clear-num38.4%
inv-pow38.4%
*-un-lft-identity38.4%
distribute-lft-out38.4%
times-frac38.3%
metadata-eval38.3%
*-commutative38.3%
div-inv38.3%
Applied egg-rr38.3%
unpow-138.3%
*-commutative38.3%
Simplified38.3%
Taylor expanded in i around 0 64.2%
*-commutative64.2%
associate-*r/64.2%
metadata-eval64.2%
associate-*r/64.2%
metadata-eval64.2%
associate-*r/64.2%
metadata-eval64.2%
Simplified64.2%
Taylor expanded in n around inf 66.4%
if -1.45e-242 < n < 5.4999999999999997e-208Initial program 49.8%
associate-*r/49.8%
sub-neg49.8%
distribute-rgt-in49.8%
metadata-eval49.8%
metadata-eval49.8%
Simplified49.8%
Taylor expanded in i around 0 81.6%
Taylor expanded in i around 0 81.6%
if 5.4999999999999997e-208 < n Initial program 14.4%
associate-/r/14.8%
*-commutative14.8%
sub-neg14.8%
metadata-eval14.8%
Simplified14.8%
Taylor expanded in i around 0 69.8%
Final simplification69.2%
(FPCore (i n)
:precision binary64
(if (<= i -4.7e+24)
0.0
(if (<= i 2.5e-25)
(* 100.0 n)
(if (<= i 1.9e+137) 0.0 (if (<= i 2.15e+260) (* 50.0 (* i n)) 0.0)))))
double code(double i, double n) {
double tmp;
if (i <= -4.7e+24) {
tmp = 0.0;
} else if (i <= 2.5e-25) {
tmp = 100.0 * n;
} else if (i <= 1.9e+137) {
tmp = 0.0;
} else if (i <= 2.15e+260) {
tmp = 50.0 * (i * n);
} else {
tmp = 0.0;
}
return tmp;
}
real(8) function code(i, n)
real(8), intent (in) :: i
real(8), intent (in) :: n
real(8) :: tmp
if (i <= (-4.7d+24)) then
tmp = 0.0d0
else if (i <= 2.5d-25) then
tmp = 100.0d0 * n
else if (i <= 1.9d+137) then
tmp = 0.0d0
else if (i <= 2.15d+260) then
tmp = 50.0d0 * (i * n)
else
tmp = 0.0d0
end if
code = tmp
end function
public static double code(double i, double n) {
double tmp;
if (i <= -4.7e+24) {
tmp = 0.0;
} else if (i <= 2.5e-25) {
tmp = 100.0 * n;
} else if (i <= 1.9e+137) {
tmp = 0.0;
} else if (i <= 2.15e+260) {
tmp = 50.0 * (i * n);
} else {
tmp = 0.0;
}
return tmp;
}
def code(i, n): tmp = 0 if i <= -4.7e+24: tmp = 0.0 elif i <= 2.5e-25: tmp = 100.0 * n elif i <= 1.9e+137: tmp = 0.0 elif i <= 2.15e+260: tmp = 50.0 * (i * n) else: tmp = 0.0 return tmp
function code(i, n) tmp = 0.0 if (i <= -4.7e+24) tmp = 0.0; elseif (i <= 2.5e-25) tmp = Float64(100.0 * n); elseif (i <= 1.9e+137) tmp = 0.0; elseif (i <= 2.15e+260) tmp = Float64(50.0 * Float64(i * n)); else tmp = 0.0; end return tmp end
function tmp_2 = code(i, n) tmp = 0.0; if (i <= -4.7e+24) tmp = 0.0; elseif (i <= 2.5e-25) tmp = 100.0 * n; elseif (i <= 1.9e+137) tmp = 0.0; elseif (i <= 2.15e+260) tmp = 50.0 * (i * n); else tmp = 0.0; end tmp_2 = tmp; end
code[i_, n_] := If[LessEqual[i, -4.7e+24], 0.0, If[LessEqual[i, 2.5e-25], N[(100.0 * n), $MachinePrecision], If[LessEqual[i, 1.9e+137], 0.0, If[LessEqual[i, 2.15e+260], N[(50.0 * N[(i * n), $MachinePrecision]), $MachinePrecision], 0.0]]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;i \leq -4.7 \cdot 10^{+24}:\\
\;\;\;\;0\\
\mathbf{elif}\;i \leq 2.5 \cdot 10^{-25}:\\
\;\;\;\;100 \cdot n\\
\mathbf{elif}\;i \leq 1.9 \cdot 10^{+137}:\\
\;\;\;\;0\\
\mathbf{elif}\;i \leq 2.15 \cdot 10^{+260}:\\
\;\;\;\;50 \cdot \left(i \cdot n\right)\\
\mathbf{else}:\\
\;\;\;\;0\\
\end{array}
\end{array}
if i < -4.7e24 or 2.49999999999999981e-25 < i < 1.89999999999999981e137 or 2.15000000000000012e260 < i Initial program 48.2%
associate-*r/48.2%
sub-neg48.2%
distribute-rgt-in48.2%
metadata-eval48.2%
metadata-eval48.2%
Simplified48.2%
Taylor expanded in i around 0 33.8%
Taylor expanded in i around 0 33.8%
if -4.7e24 < i < 2.49999999999999981e-25Initial program 7.3%
associate-/r/7.9%
*-commutative7.9%
sub-neg7.9%
metadata-eval7.9%
Simplified7.9%
Taylor expanded in i around 0 84.2%
*-commutative84.2%
Simplified84.2%
if 1.89999999999999981e137 < i < 2.15000000000000012e260Initial program 78.7%
associate-/r/78.8%
*-commutative78.8%
sub-neg78.8%
metadata-eval78.8%
Simplified78.8%
Taylor expanded in i around 0 44.5%
Taylor expanded in n around inf 44.6%
Taylor expanded in i around inf 44.6%
Final simplification66.1%
(FPCore (i n) :precision binary64 (if (<= n -1.35e-242) (/ 1.0 (+ (/ 0.01 n) (* (/ i n) -0.005))) (if (<= n 1.8e-208) 0.0 (* 100.0 (* n (+ 1.0 (* i (- 0.5 (/ 0.5 n)))))))))
double code(double i, double n) {
double tmp;
if (n <= -1.35e-242) {
tmp = 1.0 / ((0.01 / n) + ((i / n) * -0.005));
} else if (n <= 1.8e-208) {
tmp = 0.0;
} else {
tmp = 100.0 * (n * (1.0 + (i * (0.5 - (0.5 / n)))));
}
return tmp;
}
real(8) function code(i, n)
real(8), intent (in) :: i
real(8), intent (in) :: n
real(8) :: tmp
if (n <= (-1.35d-242)) then
tmp = 1.0d0 / ((0.01d0 / n) + ((i / n) * (-0.005d0)))
else if (n <= 1.8d-208) then
tmp = 0.0d0
else
tmp = 100.0d0 * (n * (1.0d0 + (i * (0.5d0 - (0.5d0 / n)))))
end if
code = tmp
end function
public static double code(double i, double n) {
double tmp;
if (n <= -1.35e-242) {
tmp = 1.0 / ((0.01 / n) + ((i / n) * -0.005));
} else if (n <= 1.8e-208) {
tmp = 0.0;
} else {
tmp = 100.0 * (n * (1.0 + (i * (0.5 - (0.5 / n)))));
}
return tmp;
}
def code(i, n): tmp = 0 if n <= -1.35e-242: tmp = 1.0 / ((0.01 / n) + ((i / n) * -0.005)) elif n <= 1.8e-208: tmp = 0.0 else: tmp = 100.0 * (n * (1.0 + (i * (0.5 - (0.5 / n))))) return tmp
function code(i, n) tmp = 0.0 if (n <= -1.35e-242) tmp = Float64(1.0 / Float64(Float64(0.01 / n) + Float64(Float64(i / n) * -0.005))); elseif (n <= 1.8e-208) tmp = 0.0; else tmp = Float64(100.0 * Float64(n * Float64(1.0 + Float64(i * Float64(0.5 - Float64(0.5 / n)))))); end return tmp end
function tmp_2 = code(i, n) tmp = 0.0; if (n <= -1.35e-242) tmp = 1.0 / ((0.01 / n) + ((i / n) * -0.005)); elseif (n <= 1.8e-208) tmp = 0.0; else tmp = 100.0 * (n * (1.0 + (i * (0.5 - (0.5 / n))))); end tmp_2 = tmp; end
code[i_, n_] := If[LessEqual[n, -1.35e-242], N[(1.0 / N[(N[(0.01 / n), $MachinePrecision] + N[(N[(i / n), $MachinePrecision] * -0.005), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[n, 1.8e-208], 0.0, N[(100.0 * N[(n * N[(1.0 + N[(i * N[(0.5 - N[(0.5 / n), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;n \leq -1.35 \cdot 10^{-242}:\\
\;\;\;\;\frac{1}{\frac{0.01}{n} + \frac{i}{n} \cdot -0.005}\\
\mathbf{elif}\;n \leq 1.8 \cdot 10^{-208}:\\
\;\;\;\;0\\
\mathbf{else}:\\
\;\;\;\;100 \cdot \left(n \cdot \left(1 + i \cdot \left(0.5 - \frac{0.5}{n}\right)\right)\right)\\
\end{array}
\end{array}
if n < -1.35e-242Initial program 28.3%
associate-*r/28.3%
sub-neg28.3%
distribute-rgt-in28.3%
metadata-eval28.3%
metadata-eval28.3%
Simplified28.3%
Taylor expanded in i around 0 38.4%
clear-num38.4%
inv-pow38.4%
*-un-lft-identity38.4%
distribute-lft-out38.4%
times-frac38.3%
metadata-eval38.3%
*-commutative38.3%
div-inv38.3%
Applied egg-rr38.3%
unpow-138.3%
*-commutative38.3%
Simplified38.3%
Taylor expanded in i around 0 64.2%
*-commutative64.2%
associate-*r/64.2%
metadata-eval64.2%
associate-*r/64.2%
metadata-eval64.2%
associate-*r/64.2%
metadata-eval64.2%
Simplified64.2%
Taylor expanded in n around inf 66.4%
if -1.35e-242 < n < 1.7999999999999999e-208Initial program 49.8%
associate-*r/49.8%
sub-neg49.8%
distribute-rgt-in49.8%
metadata-eval49.8%
metadata-eval49.8%
Simplified49.8%
Taylor expanded in i around 0 81.6%
Taylor expanded in i around 0 81.6%
if 1.7999999999999999e-208 < n Initial program 14.4%
associate-/r/14.8%
*-commutative14.8%
sub-neg14.8%
metadata-eval14.8%
Simplified14.8%
Taylor expanded in i around 0 69.8%
associate-*r/69.8%
metadata-eval69.8%
Simplified69.8%
Final simplification69.2%
(FPCore (i n) :precision binary64 (if (<= n -1.2e-242) (/ n (+ 0.01 (* i -0.005))) (if (<= n 1.7e-211) 0.0 (+ (* 100.0 n) (* 50.0 (* i n))))))
double code(double i, double n) {
double tmp;
if (n <= -1.2e-242) {
tmp = n / (0.01 + (i * -0.005));
} else if (n <= 1.7e-211) {
tmp = 0.0;
} else {
tmp = (100.0 * n) + (50.0 * (i * n));
}
return tmp;
}
real(8) function code(i, n)
real(8), intent (in) :: i
real(8), intent (in) :: n
real(8) :: tmp
if (n <= (-1.2d-242)) then
tmp = n / (0.01d0 + (i * (-0.005d0)))
else if (n <= 1.7d-211) then
tmp = 0.0d0
else
tmp = (100.0d0 * n) + (50.0d0 * (i * n))
end if
code = tmp
end function
public static double code(double i, double n) {
double tmp;
if (n <= -1.2e-242) {
tmp = n / (0.01 + (i * -0.005));
} else if (n <= 1.7e-211) {
tmp = 0.0;
} else {
tmp = (100.0 * n) + (50.0 * (i * n));
}
return tmp;
}
def code(i, n): tmp = 0 if n <= -1.2e-242: tmp = n / (0.01 + (i * -0.005)) elif n <= 1.7e-211: tmp = 0.0 else: tmp = (100.0 * n) + (50.0 * (i * n)) return tmp
function code(i, n) tmp = 0.0 if (n <= -1.2e-242) tmp = Float64(n / Float64(0.01 + Float64(i * -0.005))); elseif (n <= 1.7e-211) tmp = 0.0; else tmp = Float64(Float64(100.0 * n) + Float64(50.0 * Float64(i * n))); end return tmp end
function tmp_2 = code(i, n) tmp = 0.0; if (n <= -1.2e-242) tmp = n / (0.01 + (i * -0.005)); elseif (n <= 1.7e-211) tmp = 0.0; else tmp = (100.0 * n) + (50.0 * (i * n)); end tmp_2 = tmp; end
code[i_, n_] := If[LessEqual[n, -1.2e-242], N[(n / N[(0.01 + N[(i * -0.005), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[n, 1.7e-211], 0.0, N[(N[(100.0 * n), $MachinePrecision] + N[(50.0 * N[(i * n), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;n \leq -1.2 \cdot 10^{-242}:\\
\;\;\;\;\frac{n}{0.01 + i \cdot -0.005}\\
\mathbf{elif}\;n \leq 1.7 \cdot 10^{-211}:\\
\;\;\;\;0\\
\mathbf{else}:\\
\;\;\;\;100 \cdot n + 50 \cdot \left(i \cdot n\right)\\
\end{array}
\end{array}
if n < -1.2e-242Initial program 28.3%
associate-*r/28.3%
sub-neg28.3%
distribute-rgt-in28.3%
metadata-eval28.3%
metadata-eval28.3%
Simplified28.3%
Taylor expanded in i around 0 38.4%
clear-num38.4%
inv-pow38.4%
*-un-lft-identity38.4%
distribute-lft-out38.4%
times-frac38.3%
metadata-eval38.3%
*-commutative38.3%
div-inv38.3%
Applied egg-rr38.3%
unpow-138.3%
*-commutative38.3%
Simplified38.3%
Taylor expanded in i around 0 64.2%
*-commutative64.2%
associate-*r/64.2%
metadata-eval64.2%
associate-*r/64.2%
metadata-eval64.2%
associate-*r/64.2%
metadata-eval64.2%
Simplified64.2%
Taylor expanded in n around inf 66.3%
*-commutative66.3%
Simplified66.3%
if -1.2e-242 < n < 1.7e-211Initial program 49.8%
associate-*r/49.8%
sub-neg49.8%
distribute-rgt-in49.8%
metadata-eval49.8%
metadata-eval49.8%
Simplified49.8%
Taylor expanded in i around 0 81.6%
Taylor expanded in i around 0 81.6%
if 1.7e-211 < n Initial program 14.4%
associate-/r/14.8%
*-commutative14.8%
sub-neg14.8%
metadata-eval14.8%
Simplified14.8%
Taylor expanded in i around 0 69.8%
Taylor expanded in n around inf 69.7%
Final simplification69.1%
(FPCore (i n) :precision binary64 (if (<= n -1.4e-242) (/ 1.0 (+ (/ 0.01 n) (* (/ i n) -0.005))) (if (<= n 3.9e-209) 0.0 (+ (* 100.0 n) (* 50.0 (* i n))))))
double code(double i, double n) {
double tmp;
if (n <= -1.4e-242) {
tmp = 1.0 / ((0.01 / n) + ((i / n) * -0.005));
} else if (n <= 3.9e-209) {
tmp = 0.0;
} else {
tmp = (100.0 * n) + (50.0 * (i * n));
}
return tmp;
}
real(8) function code(i, n)
real(8), intent (in) :: i
real(8), intent (in) :: n
real(8) :: tmp
if (n <= (-1.4d-242)) then
tmp = 1.0d0 / ((0.01d0 / n) + ((i / n) * (-0.005d0)))
else if (n <= 3.9d-209) then
tmp = 0.0d0
else
tmp = (100.0d0 * n) + (50.0d0 * (i * n))
end if
code = tmp
end function
public static double code(double i, double n) {
double tmp;
if (n <= -1.4e-242) {
tmp = 1.0 / ((0.01 / n) + ((i / n) * -0.005));
} else if (n <= 3.9e-209) {
tmp = 0.0;
} else {
tmp = (100.0 * n) + (50.0 * (i * n));
}
return tmp;
}
def code(i, n): tmp = 0 if n <= -1.4e-242: tmp = 1.0 / ((0.01 / n) + ((i / n) * -0.005)) elif n <= 3.9e-209: tmp = 0.0 else: tmp = (100.0 * n) + (50.0 * (i * n)) return tmp
function code(i, n) tmp = 0.0 if (n <= -1.4e-242) tmp = Float64(1.0 / Float64(Float64(0.01 / n) + Float64(Float64(i / n) * -0.005))); elseif (n <= 3.9e-209) tmp = 0.0; else tmp = Float64(Float64(100.0 * n) + Float64(50.0 * Float64(i * n))); end return tmp end
function tmp_2 = code(i, n) tmp = 0.0; if (n <= -1.4e-242) tmp = 1.0 / ((0.01 / n) + ((i / n) * -0.005)); elseif (n <= 3.9e-209) tmp = 0.0; else tmp = (100.0 * n) + (50.0 * (i * n)); end tmp_2 = tmp; end
code[i_, n_] := If[LessEqual[n, -1.4e-242], N[(1.0 / N[(N[(0.01 / n), $MachinePrecision] + N[(N[(i / n), $MachinePrecision] * -0.005), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[n, 3.9e-209], 0.0, N[(N[(100.0 * n), $MachinePrecision] + N[(50.0 * N[(i * n), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;n \leq -1.4 \cdot 10^{-242}:\\
\;\;\;\;\frac{1}{\frac{0.01}{n} + \frac{i}{n} \cdot -0.005}\\
\mathbf{elif}\;n \leq 3.9 \cdot 10^{-209}:\\
\;\;\;\;0\\
\mathbf{else}:\\
\;\;\;\;100 \cdot n + 50 \cdot \left(i \cdot n\right)\\
\end{array}
\end{array}
if n < -1.39999999999999992e-242Initial program 28.3%
associate-*r/28.3%
sub-neg28.3%
distribute-rgt-in28.3%
metadata-eval28.3%
metadata-eval28.3%
Simplified28.3%
Taylor expanded in i around 0 38.4%
clear-num38.4%
inv-pow38.4%
*-un-lft-identity38.4%
distribute-lft-out38.4%
times-frac38.3%
metadata-eval38.3%
*-commutative38.3%
div-inv38.3%
Applied egg-rr38.3%
unpow-138.3%
*-commutative38.3%
Simplified38.3%
Taylor expanded in i around 0 64.2%
*-commutative64.2%
associate-*r/64.2%
metadata-eval64.2%
associate-*r/64.2%
metadata-eval64.2%
associate-*r/64.2%
metadata-eval64.2%
Simplified64.2%
Taylor expanded in n around inf 66.4%
if -1.39999999999999992e-242 < n < 3.9e-209Initial program 49.8%
associate-*r/49.8%
sub-neg49.8%
distribute-rgt-in49.8%
metadata-eval49.8%
metadata-eval49.8%
Simplified49.8%
Taylor expanded in i around 0 81.6%
Taylor expanded in i around 0 81.6%
if 3.9e-209 < n Initial program 14.4%
associate-/r/14.8%
*-commutative14.8%
sub-neg14.8%
metadata-eval14.8%
Simplified14.8%
Taylor expanded in i around 0 69.8%
Taylor expanded in n around inf 69.7%
Final simplification69.1%
(FPCore (i n) :precision binary64 (if (or (<= n -1.65e-125) (not (<= n 5e-208))) (* n (+ 100.0 (* i 50.0))) 0.0))
double code(double i, double n) {
double tmp;
if ((n <= -1.65e-125) || !(n <= 5e-208)) {
tmp = n * (100.0 + (i * 50.0));
} else {
tmp = 0.0;
}
return tmp;
}
real(8) function code(i, n)
real(8), intent (in) :: i
real(8), intent (in) :: n
real(8) :: tmp
if ((n <= (-1.65d-125)) .or. (.not. (n <= 5d-208))) then
tmp = n * (100.0d0 + (i * 50.0d0))
else
tmp = 0.0d0
end if
code = tmp
end function
public static double code(double i, double n) {
double tmp;
if ((n <= -1.65e-125) || !(n <= 5e-208)) {
tmp = n * (100.0 + (i * 50.0));
} else {
tmp = 0.0;
}
return tmp;
}
def code(i, n): tmp = 0 if (n <= -1.65e-125) or not (n <= 5e-208): tmp = n * (100.0 + (i * 50.0)) else: tmp = 0.0 return tmp
function code(i, n) tmp = 0.0 if ((n <= -1.65e-125) || !(n <= 5e-208)) tmp = Float64(n * Float64(100.0 + Float64(i * 50.0))); else tmp = 0.0; end return tmp end
function tmp_2 = code(i, n) tmp = 0.0; if ((n <= -1.65e-125) || ~((n <= 5e-208))) tmp = n * (100.0 + (i * 50.0)); else tmp = 0.0; end tmp_2 = tmp; end
code[i_, n_] := If[Or[LessEqual[n, -1.65e-125], N[Not[LessEqual[n, 5e-208]], $MachinePrecision]], N[(n * N[(100.0 + N[(i * 50.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], 0.0]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;n \leq -1.65 \cdot 10^{-125} \lor \neg \left(n \leq 5 \cdot 10^{-208}\right):\\
\;\;\;\;n \cdot \left(100 + i \cdot 50\right)\\
\mathbf{else}:\\
\;\;\;\;0\\
\end{array}
\end{array}
if n < -1.65e-125 or 4.99999999999999963e-208 < n Initial program 20.2%
associate-/r/20.6%
*-commutative20.6%
sub-neg20.6%
metadata-eval20.6%
Simplified20.6%
Taylor expanded in i around 0 63.5%
Taylor expanded in n around inf 63.5%
*-commutative63.5%
Simplified63.5%
if -1.65e-125 < n < 4.99999999999999963e-208Initial program 48.4%
associate-*r/48.4%
sub-neg48.4%
distribute-rgt-in48.4%
metadata-eval48.4%
metadata-eval48.4%
Simplified48.4%
Taylor expanded in i around 0 67.9%
Taylor expanded in i around 0 67.9%
Final simplification64.1%
(FPCore (i n) :precision binary64 (if (<= n -1.45e-242) (/ n (+ 0.01 (* i -0.005))) (if (<= n 1.15e-211) 0.0 (* n (+ 100.0 (* i 50.0))))))
double code(double i, double n) {
double tmp;
if (n <= -1.45e-242) {
tmp = n / (0.01 + (i * -0.005));
} else if (n <= 1.15e-211) {
tmp = 0.0;
} else {
tmp = n * (100.0 + (i * 50.0));
}
return tmp;
}
real(8) function code(i, n)
real(8), intent (in) :: i
real(8), intent (in) :: n
real(8) :: tmp
if (n <= (-1.45d-242)) then
tmp = n / (0.01d0 + (i * (-0.005d0)))
else if (n <= 1.15d-211) then
tmp = 0.0d0
else
tmp = n * (100.0d0 + (i * 50.0d0))
end if
code = tmp
end function
public static double code(double i, double n) {
double tmp;
if (n <= -1.45e-242) {
tmp = n / (0.01 + (i * -0.005));
} else if (n <= 1.15e-211) {
tmp = 0.0;
} else {
tmp = n * (100.0 + (i * 50.0));
}
return tmp;
}
def code(i, n): tmp = 0 if n <= -1.45e-242: tmp = n / (0.01 + (i * -0.005)) elif n <= 1.15e-211: tmp = 0.0 else: tmp = n * (100.0 + (i * 50.0)) return tmp
function code(i, n) tmp = 0.0 if (n <= -1.45e-242) tmp = Float64(n / Float64(0.01 + Float64(i * -0.005))); elseif (n <= 1.15e-211) tmp = 0.0; else tmp = Float64(n * Float64(100.0 + Float64(i * 50.0))); end return tmp end
function tmp_2 = code(i, n) tmp = 0.0; if (n <= -1.45e-242) tmp = n / (0.01 + (i * -0.005)); elseif (n <= 1.15e-211) tmp = 0.0; else tmp = n * (100.0 + (i * 50.0)); end tmp_2 = tmp; end
code[i_, n_] := If[LessEqual[n, -1.45e-242], N[(n / N[(0.01 + N[(i * -0.005), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[n, 1.15e-211], 0.0, N[(n * N[(100.0 + N[(i * 50.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;n \leq -1.45 \cdot 10^{-242}:\\
\;\;\;\;\frac{n}{0.01 + i \cdot -0.005}\\
\mathbf{elif}\;n \leq 1.15 \cdot 10^{-211}:\\
\;\;\;\;0\\
\mathbf{else}:\\
\;\;\;\;n \cdot \left(100 + i \cdot 50\right)\\
\end{array}
\end{array}
if n < -1.45e-242Initial program 28.3%
associate-*r/28.3%
sub-neg28.3%
distribute-rgt-in28.3%
metadata-eval28.3%
metadata-eval28.3%
Simplified28.3%
Taylor expanded in i around 0 38.4%
clear-num38.4%
inv-pow38.4%
*-un-lft-identity38.4%
distribute-lft-out38.4%
times-frac38.3%
metadata-eval38.3%
*-commutative38.3%
div-inv38.3%
Applied egg-rr38.3%
unpow-138.3%
*-commutative38.3%
Simplified38.3%
Taylor expanded in i around 0 64.2%
*-commutative64.2%
associate-*r/64.2%
metadata-eval64.2%
associate-*r/64.2%
metadata-eval64.2%
associate-*r/64.2%
metadata-eval64.2%
Simplified64.2%
Taylor expanded in n around inf 66.3%
*-commutative66.3%
Simplified66.3%
if -1.45e-242 < n < 1.14999999999999994e-211Initial program 49.8%
associate-*r/49.8%
sub-neg49.8%
distribute-rgt-in49.8%
metadata-eval49.8%
metadata-eval49.8%
Simplified49.8%
Taylor expanded in i around 0 81.6%
Taylor expanded in i around 0 81.6%
if 1.14999999999999994e-211 < n Initial program 14.4%
associate-/r/14.8%
*-commutative14.8%
sub-neg14.8%
metadata-eval14.8%
Simplified14.8%
Taylor expanded in i around 0 69.8%
Taylor expanded in n around inf 69.7%
*-commutative69.7%
Simplified69.7%
Final simplification69.1%
(FPCore (i n) :precision binary64 (if (<= i -2.9e+23) 0.0 (if (<= i 2.5e-25) (* 100.0 n) 0.0)))
double code(double i, double n) {
double tmp;
if (i <= -2.9e+23) {
tmp = 0.0;
} else if (i <= 2.5e-25) {
tmp = 100.0 * n;
} else {
tmp = 0.0;
}
return tmp;
}
real(8) function code(i, n)
real(8), intent (in) :: i
real(8), intent (in) :: n
real(8) :: tmp
if (i <= (-2.9d+23)) then
tmp = 0.0d0
else if (i <= 2.5d-25) then
tmp = 100.0d0 * n
else
tmp = 0.0d0
end if
code = tmp
end function
public static double code(double i, double n) {
double tmp;
if (i <= -2.9e+23) {
tmp = 0.0;
} else if (i <= 2.5e-25) {
tmp = 100.0 * n;
} else {
tmp = 0.0;
}
return tmp;
}
def code(i, n): tmp = 0 if i <= -2.9e+23: tmp = 0.0 elif i <= 2.5e-25: tmp = 100.0 * n else: tmp = 0.0 return tmp
function code(i, n) tmp = 0.0 if (i <= -2.9e+23) tmp = 0.0; elseif (i <= 2.5e-25) tmp = Float64(100.0 * n); else tmp = 0.0; end return tmp end
function tmp_2 = code(i, n) tmp = 0.0; if (i <= -2.9e+23) tmp = 0.0; elseif (i <= 2.5e-25) tmp = 100.0 * n; else tmp = 0.0; end tmp_2 = tmp; end
code[i_, n_] := If[LessEqual[i, -2.9e+23], 0.0, If[LessEqual[i, 2.5e-25], N[(100.0 * n), $MachinePrecision], 0.0]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;i \leq -2.9 \cdot 10^{+23}:\\
\;\;\;\;0\\
\mathbf{elif}\;i \leq 2.5 \cdot 10^{-25}:\\
\;\;\;\;100 \cdot n\\
\mathbf{else}:\\
\;\;\;\;0\\
\end{array}
\end{array}
if i < -2.90000000000000013e23 or 2.49999999999999981e-25 < i Initial program 52.7%
associate-*r/52.7%
sub-neg52.7%
distribute-rgt-in52.7%
metadata-eval52.7%
metadata-eval52.7%
Simplified52.7%
Taylor expanded in i around 0 30.2%
Taylor expanded in i around 0 30.2%
if -2.90000000000000013e23 < i < 2.49999999999999981e-25Initial program 7.3%
associate-/r/7.9%
*-commutative7.9%
sub-neg7.9%
metadata-eval7.9%
Simplified7.9%
Taylor expanded in i around 0 84.2%
*-commutative84.2%
Simplified84.2%
Final simplification64.1%
(FPCore (i n) :precision binary64 0.0)
double code(double i, double n) {
return 0.0;
}
real(8) function code(i, n)
real(8), intent (in) :: i
real(8), intent (in) :: n
code = 0.0d0
end function
public static double code(double i, double n) {
return 0.0;
}
def code(i, n): return 0.0
function code(i, n) return 0.0 end
function tmp = code(i, n) tmp = 0.0; end
code[i_, n_] := 0.0
\begin{array}{l}
\\
0
\end{array}
Initial program 24.2%
associate-*r/24.2%
sub-neg24.2%
distribute-rgt-in24.2%
metadata-eval24.2%
metadata-eval24.2%
Simplified24.2%
Taylor expanded in i around 0 15.7%
Taylor expanded in i around 0 16.1%
Final simplification16.1%
(FPCore (i n)
:precision binary64
(let* ((t_0 (+ 1.0 (/ i n))))
(*
100.0
(/
(-
(exp
(*
n
(if (== t_0 1.0)
(/ i n)
(/ (* (/ i n) (log t_0)) (- (+ (/ i n) 1.0) 1.0)))))
1.0)
(/ i n)))))
double code(double i, double n) {
double t_0 = 1.0 + (i / n);
double tmp;
if (t_0 == 1.0) {
tmp = i / n;
} else {
tmp = ((i / n) * log(t_0)) / (((i / n) + 1.0) - 1.0);
}
return 100.0 * ((exp((n * tmp)) - 1.0) / (i / n));
}
real(8) function code(i, n)
real(8), intent (in) :: i
real(8), intent (in) :: n
real(8) :: t_0
real(8) :: tmp
t_0 = 1.0d0 + (i / n)
if (t_0 == 1.0d0) then
tmp = i / n
else
tmp = ((i / n) * log(t_0)) / (((i / n) + 1.0d0) - 1.0d0)
end if
code = 100.0d0 * ((exp((n * tmp)) - 1.0d0) / (i / n))
end function
public static double code(double i, double n) {
double t_0 = 1.0 + (i / n);
double tmp;
if (t_0 == 1.0) {
tmp = i / n;
} else {
tmp = ((i / n) * Math.log(t_0)) / (((i / n) + 1.0) - 1.0);
}
return 100.0 * ((Math.exp((n * tmp)) - 1.0) / (i / n));
}
def code(i, n): t_0 = 1.0 + (i / n) tmp = 0 if t_0 == 1.0: tmp = i / n else: tmp = ((i / n) * math.log(t_0)) / (((i / n) + 1.0) - 1.0) return 100.0 * ((math.exp((n * tmp)) - 1.0) / (i / n))
function code(i, n) t_0 = Float64(1.0 + Float64(i / n)) tmp = 0.0 if (t_0 == 1.0) tmp = Float64(i / n); else tmp = Float64(Float64(Float64(i / n) * log(t_0)) / Float64(Float64(Float64(i / n) + 1.0) - 1.0)); end return Float64(100.0 * Float64(Float64(exp(Float64(n * tmp)) - 1.0) / Float64(i / n))) end
function tmp_2 = code(i, n) t_0 = 1.0 + (i / n); tmp = 0.0; if (t_0 == 1.0) tmp = i / n; else tmp = ((i / n) * log(t_0)) / (((i / n) + 1.0) - 1.0); end tmp_2 = 100.0 * ((exp((n * tmp)) - 1.0) / (i / n)); end
code[i_, n_] := Block[{t$95$0 = N[(1.0 + N[(i / n), $MachinePrecision]), $MachinePrecision]}, N[(100.0 * N[(N[(N[Exp[N[(n * If[Equal[t$95$0, 1.0], N[(i / n), $MachinePrecision], N[(N[(N[(i / n), $MachinePrecision] * N[Log[t$95$0], $MachinePrecision]), $MachinePrecision] / N[(N[(N[(i / n), $MachinePrecision] + 1.0), $MachinePrecision] - 1.0), $MachinePrecision]), $MachinePrecision]]), $MachinePrecision]], $MachinePrecision] - 1.0), $MachinePrecision] / N[(i / n), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := 1 + \frac{i}{n}\\
100 \cdot \frac{e^{n \cdot \begin{array}{l}
\mathbf{if}\;t\_0 = 1:\\
\;\;\;\;\frac{i}{n}\\
\mathbf{else}:\\
\;\;\;\;\frac{\frac{i}{n} \cdot \log t\_0}{\left(\frac{i}{n} + 1\right) - 1}\\
\end{array}} - 1}{\frac{i}{n}}
\end{array}
\end{array}
herbie shell --seed 2024048
(FPCore (i n)
:name "Compound Interest"
:precision binary64
:alt
(* 100.0 (/ (- (exp (* n (if (== (+ 1.0 (/ i n)) 1.0) (/ i n) (/ (* (/ i n) (log (+ 1.0 (/ i n)))) (- (+ (/ i n) 1.0) 1.0))))) 1.0) (/ i n)))
(* 100.0 (/ (- (pow (+ 1.0 (/ i n)) n) 1.0) (/ i n))))