exact ⟨f, ⟨hf.1, hf.2, he.mem_ground, hNM'.subset hf.1⟩, by tauto⟩
case intro.intro.intro.intro
α : Type u_1
M N : Matroid α
e✝ f✝ g : α
I X P D : Set α
x y : α
h : N.Loopless ∧ N ≤r M ∧ ∀ ⦃e : α⦄, M.Nonloop e → ∃! f, f ∈ N.E ∧ M.Parallel e f
R : Set α
hR : R ⊆ M.E
hNM' : N ≤r M ↾ R
hM'M : M ↾ R ≤r M
e : α
he : (M ↾ R).Nonloop e
f : α
hf : f ∈ N.E ∧ M.Parallel e f
hf' : ∀ (y : α), (fun f => f ∈ N.E ∧ M.Parallel e f) y → y = f
⊢ ∃! f, f ∈ N.E ∧ M.Parallel e f ∧ e ∈ R ∧ f ∈ R
no goals