renamed psubset_card -> psubset_card_mono
authorpaulson
Fri Jun 16 13:16:07 2000 +0200 (2000-06-16)
changeset 9076108ec332625d
parent 9075 e8521ed7f35b
child 9077 5bf9b0d6df8a
renamed psubset_card -> psubset_card_mono
src/HOL/WF_Rel.ML
     1.1 --- a/src/HOL/WF_Rel.ML	Fri Jun 16 13:15:40 2000 +0200
     1.2 +++ b/src/HOL/WF_Rel.ML	Fri Jun 16 13:16:07 2000 +0200
     1.3 @@ -101,7 +101,7 @@
     1.4  by (rtac (wf_measure RS wf_subset) 1);
     1.5  by (simp_tac (simpset() addsimps [measure_def, inv_image_def, less_than_def,
     1.6  				 symmetric less_def])1);
     1.7 -by (fast_tac (claset() addSEs [psubset_card]) 1);
     1.8 +by (fast_tac (claset() addSEs [psubset_card_mono]) 1);
     1.9  qed "wf_finite_psubset";
    1.10  
    1.11  Goalw [finite_psubset_def, trans_def] "trans finite_psubset";