2atan (example 3.5)

Specification

?
\[N > 1 \land N < 10^{+100}\]
\[\begin{array}{l} \\ \tan^{-1} \left(N + 1\right) - \tan^{-1} N \end{array} \]
(FPCore (N) :precision binary64 (- (atan (+ N 1.0)) (atan N)))
double code(double N) {
	return atan((N + 1.0)) - atan(N);
}
real(8) function code(n)
    real(8), intent (in) :: n
    code = atan((n + 1.0d0)) - atan(n)
end function
public static double code(double N) {
	return Math.atan((N + 1.0)) - Math.atan(N);
}
def code(N):
	return math.atan((N + 1.0)) - math.atan(N)
function code(N)
	return Float64(atan(Float64(N + 1.0)) - atan(N))
end
function tmp = code(N)
	tmp = atan((N + 1.0)) - atan(N);
end
code[N_] := N[(N[ArcTan[N[(N + 1.0), $MachinePrecision]], $MachinePrecision] - N[ArcTan[N], $MachinePrecision]), $MachinePrecision]
\begin{array}{l}

\\
\tan^{-1} \left(N + 1\right) - \tan^{-1} N
\end{array}

Reproduce

?
herbie shell --seed 2024298 
(FPCore (N)
  :name "2atan (example 3.5)"
  :precision binary64
  :pre (and (> N 1.0) (< N 1e+100))

  :alt
  (! :herbie-platform default (atan2 1 (fma N (+ 1 N) 1)))

  (- (atan (+ N 1.0)) (atan N)))

Please file a bug report with this information.

Backtrace

hash-set!: contract violation expected: (and/c hash? (not/c immutable?)) given: #<procedure:id->egglog> argument position: 1st other arguments...: '!= 'NeqLC
platform-spec-nodes/home/nightlies/herbie/varun10p-egglog/src/core/egglog-herbie.rkt1110
prelude/home/nightlies/herbie/varun10p-egglog/src/core/egglog-herbie.rkt750
run-improve!/home/nightlies/herbie/varun10p-egglog/src/core/mainloop.rkt460
get-alternatives/report/home/nightlies/herbie/varun10p-egglog/src/api/sandbox.rkt1860
(unnamed)/home/nightlies/herbie/varun10p-egglog/src/api/sandbox.rkt2826
(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