| changeset 9906 | 5c027cca6262 | 
| parent 9827 | ce6e22ff89c3 | 
| child 9941 | fe05af7ec816 | 
--- a/src/HOL/Lambda/ListBeta.thy Thu Sep 07 21:06:55 2000 +0200 +++ b/src/HOL/Lambda/ListBeta.thy Thu Sep 07 21:10:11 2000 +0200 @@ -96,7 +96,7 @@ apply (blast intro: apps_preserves_beta rtrancl_into_rtrancl) done -lemma apps_preserves_betas [rulify, simp]: +lemma apps_preserves_betas [rulified, simp]: "\<forall>ss. rs => ss --> r $$ rs -> r $$ ss" apply (induct_tac rs rule: rev_induct) apply simp