diff -r 340df9f3491f -r 22f665a2e91c src/HOL/Proofs/Lambda/ListOrder.thy
--- a/src/HOL/Proofs/Lambda/ListOrder.thy	Sun Sep 11 22:56:05 2011 +0200
+++ b/src/HOL/Proofs/Lambda/ListOrder.thy	Mon Sep 12 07:55:43 2011 +0200
@@ -49,7 +49,7 @@
    apply (erule exE)
    apply (rename_tac ts)
    apply (case_tac ts)
-    apply fastsimp
+    apply fastforce
    apply force
   apply (erule disjE)
    apply blast