Hyperbolic secant

Specification

?
\[\begin{array}{l} \\ \frac{2}{e^{x} + e^{-x}} \end{array} \]
(FPCore (x) :precision binary64 (/ 2.0 (+ (exp x) (exp (- x)))))
double code(double x) {
	return 2.0 / (exp(x) + exp(-x));
}
real(8) function code(x)
    real(8), intent (in) :: x
    code = 2.0d0 / (exp(x) + exp(-x))
end function
public static double code(double x) {
	return 2.0 / (Math.exp(x) + Math.exp(-x));
}
def code(x):
	return 2.0 / (math.exp(x) + math.exp(-x))
function code(x)
	return Float64(2.0 / Float64(exp(x) + exp(Float64(-x))))
end
function tmp = code(x)
	tmp = 2.0 / (exp(x) + exp(-x));
end
code[x_] := N[(2.0 / N[(N[Exp[x], $MachinePrecision] + N[Exp[(-x)], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}

\\
\frac{2}{e^{x} + e^{-x}}
\end{array}

Reproduce

?
herbie shell --seed 2024005 
(FPCore (x)
  :name "Hyperbolic secant"
  :precision binary64
  (/ 2.0 (+ (exp x) (exp (- x)))))

Please file a bug report with this information.

Backtrace

repr->cost: arity mismatch; the expected number of arguments does not match the given number expected: 2 given: 1LC
loop.../private/map.rkt5419
f490.../match/compiler.rkt54840
make-alt-table/home/nightlies/herbie/platforms/src/core/alt-table.rkt400
(unnamed)/usr/share/racket/collects/racket/contract/private/arrow-val-first.rkt48618
initialize-alt-table!/home/nightlies/herbie/platforms/src/mainloop.rkt3160
mutate!/home/nightlies/herbie/platforms/src/mainloop.rkt3520
run-improve!/home/nightlies/herbie/platforms/src/mainloop.rkt3380
get-alternatives/report/home/nightlies/herbie/platforms/src/sandbox.rkt1690
(unnamed)/home/nightlies/herbie/platforms/src/sandbox.rkt2626
(unnamed)/usr/share/racket/pkgs/profile-lib/main.rkt4010
profile-thunk/usr/share/racket/pkgs/profile-lib/main.rkt90
(unnamed)/usr/share/racket/collects/racket/engine.rkt4224