michael/lean2
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

fix(library/hott) adapt trunc.lean to missing equiv coercion

Browse source
This commit is contained in:
Jakob von Raumer 2014-11-17 15:15:19 -05:00 committed by Leonardo de Moura
parent 59fbe8b53e
commit fdafb1c11f
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
library/hott/trunc.lean
View file

@ -210,7 +210,7 @@ namespace truncation
is_contr.mk (f (center A)) (λp, moveR_M f !contr) is_contr.mk (f (center A)) (λp, moveR_M f !contr)
theorem contr_equiv (f : A ≃ B) [HA: is_contr A] : is_contr B := theorem contr_equiv (f : A ≃ B) [HA: is_contr A] : is_contr B :=
equiv_preserves_contr f equiv_preserves_contr (equiv_fun f)
definition contr_equiv_contr [HA : is_contr A] [HB : is_contr B] : A ≃ B := definition contr_equiv_contr [HA : is_contr A] [HB : is_contr B] : A ≃ B :=
Equiv.mk Equiv.mk
@ -226,7 +226,7 @@ namespace truncation
A HA B f H A HA B f H
definition trunc_equiv' (n : trunc_index) (f : A ≃ B) [HA : is_trunc n A] : is_trunc n B := definition trunc_equiv' (n : trunc_index) (f : A ≃ B) [HA : is_trunc n A] : is_trunc n B :=
trunc_equiv n f trunc_equiv n (equiv_fun f)
definition isequiv_iff_hprop [HA : is_hprop A] [HB : is_hprop B] (f : A → B) (g : B → A) definition isequiv_iff_hprop [HA : is_hprop A] [HB : is_hprop B] (f : A → B) (g : B → A)
: IsEquiv f := : IsEquiv f :=