FastMath repmul

Specification

?
\[\begin{array}{l} \\ \left(\left(d1 \cdot d1\right) \cdot d1\right) \cdot d1 \end{array} \]
(FPCore (d1) :precision binary64 (* (* (* d1 d1) d1) d1))
double code(double d1) {
	return ((d1 * d1) * d1) * d1;
}

real(8) function code(d1)
    real(8), intent (in) :: d1
    code = ((d1 * d1) * d1) * d1
end function

public static double code(double d1) {
	return ((d1 * d1) * d1) * d1;
}

def code(d1):
	return ((d1 * d1) * d1) * d1

function code(d1)
	return Float64(Float64(Float64(d1 * d1) * d1) * d1)
end

function tmp = code(d1)
	tmp = ((d1 * d1) * d1) * d1;
end

code[d1_] := N[(N[(N[(d1 * d1), $MachinePrecision] * d1), $MachinePrecision] * d1), $MachinePrecision]

\begin{array}{l}

\\
\left(\left(d1 \cdot d1\right) \cdot d1\right) \cdot d1
\end{array}

Reproduce

?
herbie shell --seed 2024277 
(FPCore (d1)
  :name "FastMath repmul"
  :precision binary64

  :alt
  (! :herbie-platform default (pow d1 4))

  (* (* (* d1 d1) d1) d1))

Please file a bug report with this information.

Backtrace

ival-hi: contract violation expected: ival? given: 0LC
ival-hiunknown
ival-sub/home/nightlies/.local/share/racket/8.10/pkgs/rival/ops/core.rkt2280
rival-machine-run/home/nightlies/.local/share/racket/8.10/pkgs/rival/eval/run.rkt320
rival-machine-full/home/nightlies/.local/share/racket/8.10/pkgs/rival/eval/main.rkt270
rival-apply/home/nightlies/.local/share/racket/8.10/pkgs/rival/eval/main.rkt650
(unnamed)/usr/share/racket/collects/racket/contract/private/arrow-val-first.rkt48618
f115.../match/compiler.rkt55940
compute-true-error/home/nightlies/herbie/zane-concrete-values/src/core/localize.rkt1310
compute-local-errors/home/nightlies/herbie/zane-concrete-values/src/core/localize.rkt2160
actual-errors/home/nightlies/herbie/zane-concrete-values/src/core/explain.rkt350
generate-timelines/home/nightlies/herbie/zane-concrete-values/src/core/explain.rkt4980
explain!/home/nightlies/herbie/zane-concrete-values/src/core/mainloop.rkt3230
run-improve!/home/nightlies/herbie/zane-concrete-values/src/core/mainloop.rkt450
get-alternatives/report/home/nightlies/herbie/zane-concrete-values/src/api/sandbox.rkt1860
(unnamed)/home/nightlies/herbie/zane-concrete-values/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