wOvert(ℕ)
{ TACTIC:(D 0 THEN Auto) }
1. [Y] : Type
⊢ ∃f:Open(ℕ × Y) ⟶ Open(Y). ∀A:Open(ℕ × Y). ∀y:Y.  (y ∈ f A 
⇐⇒ ¬¬(∃x:ℕ. <x, y> ∈ A))