# HG changeset patch # User Cezary Kaliszyk # Date 1265203680 -3600 # Node ID c1b469325033f1042f6508148e36414b83d7a4a3 # Parent 277301dc5c4c7336ebff7332b4da9d9ef6d24d91 Finished remains on the let proof. diff -r 277301dc5c4c -r c1b469325033 Quot/Nominal/Terms.thy --- a/Quot/Nominal/Terms.thy Wed Feb 03 14:22:25 2010 +0100 +++ b/Quot/Nominal/Terms.thy Wed Feb 03 14:28:00 2010 +0100 @@ -891,9 +891,9 @@ apply (subst alpha5_INJ) apply (rule_tac x="(x \ y)" in exI) apply (simp only: alpha_gen) -apply (simp add: permute_trm5_lts) -sorry - +apply (simp add: permute_trm5_lts fresh_star_def) +apply (simp add: insert_eqvt eqvts atom_eqvt) +done text {* type schemes *} datatype ty =