\[\left(0.5 \cdot \sin re\right) \cdot \left(e^{-im} - e^{im}\right)
\]
↓
\[-0.16666666666666666 \cdot \left(\sin re \cdot {im}^{3}\right) + \left(-0.008333333333333333 \cdot \left(\sin re \cdot {im}^{5}\right) - \sin re \cdot im\right)
\]
(FPCore (re im)
:precision binary64
(* (* 0.5 (sin re)) (- (exp (- im)) (exp im))))
↓
(FPCore (re im)
:precision binary64
(+
(* -0.16666666666666666 (* (sin re) (pow im 3.0)))
(- (* -0.008333333333333333 (* (sin re) (pow im 5.0))) (* (sin re) im))))
double code(double re, double im) {
return (0.5 * sin(re)) * (exp(-im) - exp(im));
}
↓
double code(double re, double im) {
return (-0.16666666666666666 * (sin(re) * pow(im, 3.0))) + ((-0.008333333333333333 * (sin(re) * pow(im, 5.0))) - (sin(re) * im));
}
real(8) function code(re, im)
real(8), intent (in) :: re
real(8), intent (in) :: im
code = (0.5d0 * sin(re)) * (exp(-im) - exp(im))
end function
↓
real(8) function code(re, im)
real(8), intent (in) :: re
real(8), intent (in) :: im
code = ((-0.16666666666666666d0) * (sin(re) * (im ** 3.0d0))) + (((-0.008333333333333333d0) * (sin(re) * (im ** 5.0d0))) - (sin(re) * im))
end function
public static double code(double re, double im) {
return (0.5 * Math.sin(re)) * (Math.exp(-im) - Math.exp(im));
}
↓
public static double code(double re, double im) {
return (-0.16666666666666666 * (Math.sin(re) * Math.pow(im, 3.0))) + ((-0.008333333333333333 * (Math.sin(re) * Math.pow(im, 5.0))) - (Math.sin(re) * im));
}
def code(re, im):
return (0.5 * math.sin(re)) * (math.exp(-im) - math.exp(im))
↓
def code(re, im):
return (-0.16666666666666666 * (math.sin(re) * math.pow(im, 3.0))) + ((-0.008333333333333333 * (math.sin(re) * math.pow(im, 5.0))) - (math.sin(re) * im))
function code(re, im)
return Float64(Float64(0.5 * sin(re)) * Float64(exp(Float64(-im)) - exp(im)))
end
↓
function code(re, im)
return Float64(Float64(-0.16666666666666666 * Float64(sin(re) * (im ^ 3.0))) + Float64(Float64(-0.008333333333333333 * Float64(sin(re) * (im ^ 5.0))) - Float64(sin(re) * im)))
end
function tmp = code(re, im)
tmp = (0.5 * sin(re)) * (exp(-im) - exp(im));
end
↓
function tmp = code(re, im)
tmp = (-0.16666666666666666 * (sin(re) * (im ^ 3.0))) + ((-0.008333333333333333 * (sin(re) * (im ^ 5.0))) - (sin(re) * im));
end
code[re_, im_] := N[(N[(0.5 * N[Sin[re], $MachinePrecision]), $MachinePrecision] * N[(N[Exp[(-im)], $MachinePrecision] - N[Exp[im], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
↓
code[re_, im_] := N[(N[(-0.16666666666666666 * N[(N[Sin[re], $MachinePrecision] * N[Power[im, 3.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(N[(-0.008333333333333333 * N[(N[Sin[re], $MachinePrecision] * N[Power[im, 5.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] - N[(N[Sin[re], $MachinePrecision] * im), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\left(0.5 \cdot \sin re\right) \cdot \left(e^{-im} - e^{im}\right)
↓
-0.16666666666666666 \cdot \left(\sin re \cdot {im}^{3}\right) + \left(-0.008333333333333333 \cdot \left(\sin re \cdot {im}^{5}\right) - \sin re \cdot im\right)