--- a/Nominal/Ex/Weakening.thy	Tue Jul 05 18:01:54 2011 +0200
+++ b/Nominal/Ex/Weakening.thy	Tue Jul 05 18:42:34 2011 +0200
@@ -9,7 +9,7 @@
 nominal_datatype lam =
   Var "name"
 | App "lam" "lam"
-| Lam x::"name" l::"lam" bind x in l ("Lam [_]. _" [100,100] 100)
+| Lam x::"name" l::"lam" binds x in l ("Lam [_]. _" [100,100] 100)
 
 text {* Typing *}