ext i
α : Type u_1
R✝¹ : Type u_2
η : Type u_3
ι : Type u_4
R✝ : Type u_5
inst✝¹ : Semiring R✝
s✝ : Set α
R : Type u_6
inst✝ : Semiring R
s : Set η
x : η → R
hx : support x ⊆ s
⊢ (extendSubtype R s) ((funSubtype R s) x) = x
case h
α : Type u_1
R✝¹ : Type u_2
η : Type u_3
ι : Type u_4
R✝ : Type u_5
inst✝¹ : Semiring R✝
s✝ : Set α
R : Type u_6
inst✝ : Semiring R
s : Set η
x : η → R
hx : support x ⊆ s
i : η
⊢ (extendSubtype R s) ((funSubtype R s) x) i = x i