Maksimov and Kolovsky, Equation (4)

Specification

?
\[\begin{array}{l} \\ \left(J \cdot \left(e^{\ell} - e^{-\ell}\right)\right) \cdot \cos \left(\frac{K}{2}\right) + U \end{array} \]
(FPCore (J l K U)
 :precision binary64
 (+ (* (* J (- (exp l) (exp (- l)))) (cos (/ K 2.0))) U))
double code(double J, double l, double K, double U) {
	return ((J * (exp(l) - exp(-l))) * cos((K / 2.0))) + U;
}
real(8) function code(j, l, k, u)
    real(8), intent (in) :: j
    real(8), intent (in) :: l
    real(8), intent (in) :: k
    real(8), intent (in) :: u
    code = ((j * (exp(l) - exp(-l))) * cos((k / 2.0d0))) + u
end function
public static double code(double J, double l, double K, double U) {
	return ((J * (Math.exp(l) - Math.exp(-l))) * Math.cos((K / 2.0))) + U;
}
def code(J, l, K, U):
	return ((J * (math.exp(l) - math.exp(-l))) * math.cos((K / 2.0))) + U
function code(J, l, K, U)
	return Float64(Float64(Float64(J * Float64(exp(l) - exp(Float64(-l)))) * cos(Float64(K / 2.0))) + U)
end
function tmp = code(J, l, K, U)
	tmp = ((J * (exp(l) - exp(-l))) * cos((K / 2.0))) + U;
end
code[J_, l_, K_, U_] := N[(N[(N[(J * N[(N[Exp[l], $MachinePrecision] - N[Exp[(-l)], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * N[Cos[N[(K / 2.0), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] + U), $MachinePrecision]
\begin{array}{l}

\\
\left(J \cdot \left(e^{\ell} - e^{-\ell}\right)\right) \cdot \cos \left(\frac{K}{2}\right) + U
\end{array}

Reproduce

?
herbie shell --seed 2024146 
(FPCore (J l K U)
  :name "Maksimov and Kolovsky, Equation (4)"
  :precision binary64
  (+ (* (* J (- (exp l) (exp (- l)))) (cos (/ K 2.0))) U))

Please file a bug report with this information.

Backtrace

application: not a procedure; expected a procedure that can be applied to arguments given: #fLC
backward-pass/home/nightlies/herbie/jackson-mergable-platform-changes/src/correct-round.rkt1460
compiled-spec/home/nightlies/herbie/jackson-mergable-platform-changes/src/correct-round.rkt272
compiled-spec/home/nightlies/herbie/jackson-mergable-platform-changes/src/correct-round.rkt1432
compiled-spec/home/nightlies/herbie/jackson-mergable-platform-changes/src/correct-round.rkt272
compiled-spec/home/nightlies/herbie/jackson-mergable-platform-changes/src/ground-truth.rkt312
ival-eval/home/nightlies/herbie/jackson-mergable-platform-changes/src/ground-truth.rkt550
<eval-prog-real>/home/nightlies/herbie/jackson-mergable-platform-changes/src/ground-truth.rkt862
compute-local-errors/home/nightlies/herbie/jackson-mergable-platform-changes/src/core/localize.rkt750
batch-localize-errors/home/nightlies/herbie/jackson-mergable-platform-changes/src/core/localize.rkt610
localize!/home/nightlies/herbie/jackson-mergable-platform-changes/src/mainloop.rkt2010
run-iter!/home/nightlies/herbie/jackson-mergable-platform-changes/src/mainloop.rkt730
mutate!/home/nightlies/herbie/jackson-mergable-platform-changes/src/mainloop.rkt650
run-improve!/home/nightlies/herbie/jackson-mergable-platform-changes/src/mainloop.rkt510
get-alternatives/report/home/nightlies/herbie/jackson-mergable-platform-changes/src/sandbox.rkt1690
(unnamed)/home/nightlies/herbie/jackson-mergable-platform-changes/src/sandbox.rkt2636
(unnamed)/usr/local/racket/share/pkgs/profile-lib/main.rkt4010
profile-thunk/usr/local/racket/share/pkgs/profile-lib/main.rkt90
(unnamed)/usr/local/racket/collects/racket/engine.rkt4224