--- a/Nominal/Ex/Ex1rec.thy	Mon May 10 15:44:49 2010 +0200
+++ b/Nominal/Ex/Ex1rec.thy	Mon May 10 15:45:04 2010 +0200
@@ -29,10 +29,11 @@
 ML {* Sign.of_sort @{theory} (@{typ lam}, @{sort fs}) *}
 thm lam_bp.fv[simplified lam_bp.supp(1-2)]
 
-(*declare permute_lam_raw_permute_bp_raw.simps[eqvt]
+declare permute_lam_raw_permute_bp_raw.simps[eqvt]
 declare alpha_gen_eqvt[eqvt]
+
 equivariance alpha_lam_raw
-*)
+
 
 end