--- a/thys/Sulzmann.thy Tue Apr 05 09:27:36 2016 +0100
+++ b/thys/Sulzmann.thy Tue Apr 05 14:00:55 2016 +0100
@@ -198,9 +198,6 @@
apply(simp)
apply(simp)
apply(erule Prf_elims)
-apply(simp)
-apply(erule Prf_elims)
-apply(simp)
apply(auto split: prod.splits)[1]
oops