Exception for Optimal throwing angle

Specification

\[\begin{array}{l} \\ \tan^{-1} \left(\frac{v}{\sqrt{v \cdot v - \left(2 \cdot 9.8\right) \cdot H}}\right) \end{array} \]

(FPCore (v H)
 :precision binary64
 (atan (/ v (sqrt (- (* v v) (* (* 2.0 9.8) H))))))

double code(double v, double H) {
	return atan((v / sqrt(((v * v) - ((2.0 * 9.8) * H)))));
}

real(8) function code(v, h)
    real(8), intent (in) :: v
    real(8), intent (in) :: h
    code = atan((v / sqrt(((v * v) - ((2.0d0 * 9.8d0) * h)))))
end function

public static double code(double v, double H) {
	return Math.atan((v / Math.sqrt(((v * v) - ((2.0 * 9.8) * H)))));
}

def code(v, H):
	return math.atan((v / math.sqrt(((v * v) - ((2.0 * 9.8) * H)))))

function code(v, H)
	return atan(Float64(v / sqrt(Float64(Float64(v * v) - Float64(Float64(2.0 * 9.8) * H)))))
end

function tmp = code(v, H)
	tmp = atan((v / sqrt(((v * v) - ((2.0 * 9.8) * H)))));
end

code[v_, H_] := N[ArcTan[N[(v / N[Sqrt[N[(N[(v * v), $MachinePrecision] - N[(N[(2.0 * 9.8), $MachinePrecision] * H), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]], $MachinePrecision]

\begin{array}{l}

\\
\tan^{-1} \left(\frac{v}{\sqrt{v \cdot v - \left(2 \cdot 9.8\right) \cdot H}}\right)
\end{array}

Reproduce

herbie shell --seed 2024288 
(FPCore (v H)
  :name "Optimal throwing angle"
  :precision binary64
  (atan (/ v (sqrt (- (* v v) (* (* 2.0 9.8) H))))))

Please file a bug report with this information.

Backtrace

error: contract violation expected: string? given: 'atan.f64		L	C
f407	.../match/compiler.rkt	559	40
loop	.../private/map.rkt	40	19
loop	.../private/map.rkt	40	19
loop	.../private/map.rkt	40	19
loop	.../private/map.rkt	40	19
loop	.../private/map.rkt	40	19
loop	.../private/map.rkt	40	19
loop	.../private/map.rkt	40	19
loop	.../private/map.rkt	40	19
loop	.../private/map.rkt	40	19
loop	.../private/map.rkt	40	19
loop	.../private/map.rkt	40	19
compile-expr	/home/nightlies/herbie/bhargav-log-space/src/core/explain.rkt	84	0
explain	/home/nightlies/herbie/bhargav-log-space/src/core/explain.rkt	713	0
explain!	/home/nightlies/herbie/bhargav-log-space/src/core/mainloop.rkt	323	0
run-improve!	/home/nightlies/herbie/bhargav-log-space/src/core/mainloop.rkt	45	0
get-alternatives/report	/home/nightlies/herbie/bhargav-log-space/src/api/sandbox.rkt	186	0
(unnamed)	/home/nightlies/herbie/bhargav-log-space/src/api/sandbox.rkt	282	6
(unnamed)	/usr/share/racket/pkgs/profile-lib/main.rkt	40	10
profile-thunk	/usr/share/racket/pkgs/profile-lib/main.rkt	9	0
(unnamed)	/usr/share/racket/collects/racket/engine.rkt	42	24