exact fun i hi _ ↦ hi
case refine_1.intro.intro.left
α : Type u_1
R✝ : Type u_2
η✝ : Type u_3
ι : Type u_4
R : Type u_5
η : Type u_6
inst✝ : Semiring R
s : Set η
U : Submodule R (↑s → R)
a : ↑s → R
ha : a ∈ U
⊢ ∀ (x : η) (x_1 : x ∈ s), ¬a ⟨x, x_1⟩ = 0 → x ∈ s
no goals