rintro ⟨(hF | hF), heF⟩
case refine_1
α : Type u_1
M : Matroid α
I J B F₀ F F' X Y : Set α
e f : α
U : M.ModularCut
he : e ∉ F
⊢ (M.Flat F ∨ M.Flat (insert e F)) ∧ e ∈ M.cl F → M.cl F = insert e F
case refine_1.intro.inl
α : Type u_1
M : Matroid α
I J B F₀ F F' X Y : Set α
e f : α
U : M.ModularCut
he : e ∉ F
heF : e ∈ M.cl F
hF : M.Flat F
⊢ M.cl F = insert e F

case refine_1.intro.inr
α : Type u_1
M : Matroid α
I J B F₀ F F' X Y : Set α
e f : α
U : M.ModularCut
he : e ∉ F
heF : e ∈ M.cl F
hF : M.Flat (insert e F)
⊢ M.cl F = insert e F