src/HOL/Lambda/StrongNorm.thy
changeset 21404 eb85850d3eb7
parent 20503 503ac4c5ef91
child 22271 51a80e238b29
--- a/src/HOL/Lambda/StrongNorm.thy	Fri Nov 17 02:19:55 2006 +0100
+++ b/src/HOL/Lambda/StrongNorm.thy	Fri Nov 17 02:20:03 2006 +0100
@@ -190,7 +190,7 @@
               by (rule typing.App)
           qed
           with Cons True show ?thesis
-            by (simp add: map_compose [symmetric] o_def)
+            by (simp add: map_compose [symmetric] comp_def)
         qed
       next
         case False