(FPCore (x y z t a) :precision binary64 (+ x (/ (* (- y z) (- t x)) (- a z))))
↓
(FPCore (x y z t a)
:precision binary64
(let* ((t_1 (+ t (/ (- x t) (/ z (- y a))))))
(if (<= z -2.946311588664566e-7)
t_1
(if (<= z -5.2e-62)
(* (/ t (- a z)) (- y z))
(if (<= z -7.5e-84)
t_1
(if (<= z 5.849437786437544e-5) (+ x (/ (* t (- y z)) a)) t_1))))))
double code(double x, double y, double z, double t, double a) {
return x + (((y - z) * (t - x)) / (a - z));
}
↓
double code(double x, double y, double z, double t, double a) {
double t_1 = t + ((x - t) / (z / (y - a)));
double tmp;
if (z <= -2.946311588664566e-7) {
tmp = t_1;
} else if (z <= -5.2e-62) {
tmp = (t / (a - z)) * (y - z);
} else if (z <= -7.5e-84) {
tmp = t_1;
} else if (z <= 5.849437786437544e-5) {
tmp = x + ((t * (y - z)) / a);
} else {
tmp = t_1;
}
return tmp;
}
real(8) function code(x, y, z, t, a)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
real(8), intent (in) :: a
code = x + (((y - z) * (t - x)) / (a - z))
end function
↓
real(8) function code(x, y, z, t, a)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
real(8), intent (in) :: a
real(8) :: t_1
real(8) :: tmp
t_1 = t + ((x - t) / (z / (y - a)))
if (z <= (-2.946311588664566d-7)) then
tmp = t_1
else if (z <= (-5.2d-62)) then
tmp = (t / (a - z)) * (y - z)
else if (z <= (-7.5d-84)) then
tmp = t_1
else if (z <= 5.849437786437544d-5) then
tmp = x + ((t * (y - z)) / a)
else
tmp = t_1
end if
code = tmp
end function
public static double code(double x, double y, double z, double t, double a) {
return x + (((y - z) * (t - x)) / (a - z));
}
↓
public static double code(double x, double y, double z, double t, double a) {
double t_1 = t + ((x - t) / (z / (y - a)));
double tmp;
if (z <= -2.946311588664566e-7) {
tmp = t_1;
} else if (z <= -5.2e-62) {
tmp = (t / (a - z)) * (y - z);
} else if (z <= -7.5e-84) {
tmp = t_1;
} else if (z <= 5.849437786437544e-5) {
tmp = x + ((t * (y - z)) / a);
} else {
tmp = t_1;
}
return tmp;
}
def code(x, y, z, t, a):
return x + (((y - z) * (t - x)) / (a - z))
↓
def code(x, y, z, t, a):
t_1 = t + ((x - t) / (z / (y - a)))
tmp = 0
if z <= -2.946311588664566e-7:
tmp = t_1
elif z <= -5.2e-62:
tmp = (t / (a - z)) * (y - z)
elif z <= -7.5e-84:
tmp = t_1
elif z <= 5.849437786437544e-5:
tmp = x + ((t * (y - z)) / a)
else:
tmp = t_1
return tmp
function code(x, y, z, t, a)
return Float64(x + Float64(Float64(Float64(y - z) * Float64(t - x)) / Float64(a - z)))
end
↓
function code(x, y, z, t, a)
t_1 = Float64(t + Float64(Float64(x - t) / Float64(z / Float64(y - a))))
tmp = 0.0
if (z <= -2.946311588664566e-7)
tmp = t_1;
elseif (z <= -5.2e-62)
tmp = Float64(Float64(t / Float64(a - z)) * Float64(y - z));
elseif (z <= -7.5e-84)
tmp = t_1;
elseif (z <= 5.849437786437544e-5)
tmp = Float64(x + Float64(Float64(t * Float64(y - z)) / a));
else
tmp = t_1;
end
return tmp
end
function tmp = code(x, y, z, t, a)
tmp = x + (((y - z) * (t - x)) / (a - z));
end
↓
function tmp_2 = code(x, y, z, t, a)
t_1 = t + ((x - t) / (z / (y - a)));
tmp = 0.0;
if (z <= -2.946311588664566e-7)
tmp = t_1;
elseif (z <= -5.2e-62)
tmp = (t / (a - z)) * (y - z);
elseif (z <= -7.5e-84)
tmp = t_1;
elseif (z <= 5.849437786437544e-5)
tmp = x + ((t * (y - z)) / a);
else
tmp = t_1;
end
tmp_2 = tmp;
end
herbie shell --seed 2022228
(FPCore (x y z t a)
:name "Graphics.Rendering.Chart.Axis.Types:invLinMap from Chart-1.5.3"
:precision binary64
:herbie-target
(if (< z -1.2536131056095036e+188) (- t (* (/ y z) (- t x))) (if (< z 4.446702369113811e+64) (+ x (/ (- y z) (/ (- a z) (- t x)))) (- t (* (/ y z) (- t x)))))
(+ x (/ (* (- y z) (- t x)) (- a z))))