Difference of squares

Specification

?
\[\mathsf{TRUE}\left(\right)\]
\[\begin{array}{l} \\ a \cdot a - b \cdot b \end{array} \]
(FPCore (a b) :precision binary64 (- (* a a) (* b b)))
double code(double a, double b) {
	return (a * a) - (b * b);
}
real(8) function code(a, b)
    real(8), intent (in) :: a
    real(8), intent (in) :: b
    code = (a * a) - (b * b)
end function
public static double code(double a, double b) {
	return (a * a) - (b * b);
}
def code(a, b):
	return (a * a) - (b * b)
function code(a, b)
	return Float64(Float64(a * a) - Float64(b * b))
end
function tmp = code(a, b)
	tmp = (a * a) - (b * b);
end
code[a_, b_] := N[(N[(a * a), $MachinePrecision] - N[(b * b), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}

\\
a \cdot a - b \cdot b
\end{array}

Reproduce

?
herbie shell --seed 2024321 
(FPCore (a b)
  :name "Difference of squares"
  :precision binary64
  :pre (TRUE)

  :alt
  (! :herbie-platform default (* (+ a b) (- a b)))

  (- (* a a) (* b b)))

Please file a bug report with this information.

Backtrace

numerator: contract violation expected: rational-number? given: +inf.0LC
egglog-add-exprs/home/nightlies/herbie/varun10p-egglog/src/core/egglog-herbie.rkt4080
final-simplify!/home/nightlies/herbie/varun10p-egglog/src/core/mainloop.rkt3500
extract!/home/nightlies/herbie/varun10p-egglog/src/core/mainloop.rkt810
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