no goals
R : Type u
M : Type v
K : Type u₁
V : Type u₂
ι : Type w
inst✝⁴ : CommRing R
inst✝³ : AddCommGroup M
inst✝² : Module R M
inst✝¹ : DecidableEq ι
b : Basis ι R M
inst✝ : _root_.Finite ι
l : Dual R M
i : ι
⊢ ↑(↑(dualBasis b).repr l) i = ↑l (↑b i)
rw [← total_dualBasis b, Basis.total_repr b.dualBasis l]