feat(trunc): simplify proof

unreachable code was reached with the old proof in some builds
This commit is contained in:
Floris van Doorn 2017-06-16 14:34:52 -04:00
parent d38979f783
commit 9066ee4801

View file

@ -303,9 +303,7 @@ namespace is_trunc
fapply is_trunc_equiv_closed_rev, { apply eq_equiv_equiv}, fapply is_trunc_equiv_closed_rev, { apply eq_equiv_equiv},
induction n, induction n,
{ apply @is_contr_of_inhabited_prop, { apply @is_contr_of_inhabited_prop,
{ apply is_trunc_is_embedding_closed, { apply is_trunc_equiv },
{ apply is_embedding_to_fun} ,
{ reflexivity}},
{ apply equiv_of_is_contr_of_is_contr}}, { apply equiv_of_is_contr_of_is_contr}},
{ apply is_trunc_is_embedding_closed, { apply is_trunc_is_embedding_closed,
{ apply is_embedding_to_fun}, { apply is_embedding_to_fun},