diff -r 104bdc0757e9 -r 31f000d586bb Nominal/Fv.thy --- a/Nominal/Fv.thy Mon Mar 15 23:42:56 2010 +0100 +++ b/Nominal/Fv.thy Tue Mar 16 12:06:22 2010 +0100 @@ -341,7 +341,8 @@ val permute = Const(@{const_name permute}, @{typ perm} --> ty --> ty) in if bns_same rel_in_comp_binds then - HOLogic.mk_conj (alpha_bn, HOLogic.mk_eq (permute $ pi $ (bn $ arg), (bn $ arg2))) + alpha_bn +(* HOLogic.mk_conj (alpha_bn, HOLogic.mk_eq (permute $ pi $ (bn $ arg), (bn $ arg2)))*) else error "incompatible bindings for one argument" end | ([], [], relevant) =>