renamed f_inv_onto_f to f_inv_into_f (cf. 764547b68538);
authorwenzelm
Thu, 22 Oct 2009 15:50:12 +0200
changeset 33071 362f59fe5092
parent 33070 c39f6bd5a46b
child 33072 ae416aebbb75
child 33194 13450310a776
renamed f_inv_onto_f to f_inv_into_f (cf. 764547b68538);
src/HOLCF/Universal.thy
--- a/src/HOLCF/Universal.thy	Thu Oct 22 15:26:15 2009 +0200
+++ b/src/HOLCF/Universal.thy	Thu Oct 22 15:50:12 2009 +0200
@@ -805,7 +805,7 @@
 
 lemma basis_emb_prj_less: "ubasis_le (basis_emb (basis_prj x)) x"
 unfolding basis_prj_def
- apply (subst f_inv_onto_f [where f=basis_emb])
+ apply (subst f_inv_into_f [where f=basis_emb])
   apply (rule ubasis_until)
   apply (rule range_eqI [where x=compact_bot])
   apply simp