aesop
case a
α : Type u_1
f : α → List α
i : ℕ
IH : ∀ (X Y : List α), X ⊆ Y → (fun X => (List.map f X).join)^[i] X ⊆ (fun X => (List.map f X).join)^[i] Y
X Y : List α
X_sub_Y : X ⊆ Y
this : List.map f X ⊆ List.map f Y
a : α
a_in : a ∈ (List.map f X).join
⊢ a ∈ (List.map f Y).join
no goals