--- a/Nominal/Ex/Ex1rec.thy	Mon May 10 18:29:45 2010 +0200
+++ b/Nominal/Ex/Ex1rec.thy	Mon May 10 18:30:27 2010 +0200
@@ -5,6 +5,7 @@
 atom_decl name
 
 ML {* val _ = cheat_supp_eq := true *}
+ML {* val _ = cheat_equivp := true *}
 
 nominal_datatype lam =
   Var "name"