intro ⟨g',hg',⟨y,⟨f',hf',⟨x,hx,hy⟩⟩,hz⟩⟩
case a.mp
α : Sort u_1
β : Sort u_2
γ : Sort u_3
s : Set α
f : Set (α → β)
g : Set (β → γ)
z : γ
⊢ z ∈ g.seq (f.seq s) → z ∈ ((Set.map (fun x x_1 => x ∘ x_1) g).seq f).seq s
case a.mp
α : Sort u_1
β : Sort u_2
γ : Sort u_3
s : Set α
f : Set (α → β)
g : Set (β → γ)
z : γ
g' : β → γ
hg' : g' ∈ g
y : β
f' : α → β
hf' : f' ∈ f
x : α
hx : x ∈ s
hy : f' x = y
hz : g' y = z
⊢ z ∈ ((Set.map (fun x x_1 => x ∘ x_1) g).seq f).seq s