--- a/src/HOL/Mirabelle/Tools/mirabelle_sledgehammer.ML Wed Feb 20 17:12:21 2013 +0100
+++ b/src/HOL/Mirabelle/Tools/mirabelle_sledgehammer.ML Wed Feb 20 17:15:06 2013 +0100
@@ -389,7 +389,8 @@
SOME name => name
| NONE =>
if (String.isSubstring " ms)" msg orelse String.isSubstring " s)" msg)
- andalso not (String.isSubstring "(> " msg) then
+ andalso not (String.isSubstring "(> " msg)
+ andalso not (String.isSubstring ", > " msg) then
"none" (* trust the preplayed proof *)
else if String.isSubstring "metis (" msg then
msg |> Substring.full