chore(data/set): cleanup proofs to make them less dependent on unifier heuristics
This commit is contained in:
parent
5e14b4ebe8
commit
0c4a6d3c5e
2 changed files with 5 additions and 2 deletions
|
@ -401,6 +401,7 @@ le.antisymm !bot_le
|
|||
begin
|
||||
apply le_of_forall_eventually,
|
||||
intro P H,
|
||||
unfold eventually,
|
||||
apply mem_univ
|
||||
end
|
||||
|
||||
|
|
|
@ -121,8 +121,10 @@ inj_on_of_left_inv_on H
|
|||
theorem left_inverse_comp {f' : map b a} {g' : map c b} {g : map b c} {f : map a b}
|
||||
(Hf : map.left_inverse f' f) (Hg : map.left_inverse g' g) :
|
||||
map.left_inverse (f' ∘ g') (g ∘ f) :=
|
||||
left_inv_on_comp (mapsto f) Hf Hg
|
||||
|
||||
begin
|
||||
unfold map.left_inverse,
|
||||
exact left_inv_on_comp (mapsto f) Hf Hg
|
||||
end
|
||||
/- right inverse -/
|
||||
|
||||
-- g is a right inverse to f
|
||||
|
|
Loading…
Reference in a new issue