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

feat(tests/lean/run/tut_104): add extra test

Browse source
This commit is contained in:
Leonardo de Moura 2015-05-14 18:34:48 -07:00
parent 84faef5d5d
commit d4da381e1a
1 changed files with 8 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
tests/lean/run/tut_104.lean
View file

@ -37,6 +37,14 @@ lemma injective_eq_inj_on_univ₃ (f : A → B) : injective f = inj_on f univ :=
repeat (apply forall_congr; intros), repeat (apply forall_congr; intros),
rewrite *(propext !true_imp) rewrite *(propext !true_imp)
end end
lemma injective_eq_inj_on_univ₄ (f : A → B) : injective f = inj_on f univ :=
begin
esimp [injective, inj_on, univ, mem],
apply propext,
repeat (apply forall_congr; intros),
rewrite *true_imp
end
end end
end function end function