∀ {𝕜 : Type u} [inst : NontriviallyNormedField 𝕜] {E : Type v} [inst_1 : NormedAddCommGroup E]
  [inst_2 : NormedSpace 𝕜 E] {F : Type w} [inst_3 : NormedAddCommGroup F] [inst_4 : NormedSpace 𝕜 F]
  [inst_5 : CompleteSpace 𝕜] {ι : Type u_1} [inst_6 : Fintype ι] (v : Module.Basis ι 𝕜 E) {u : E →L[𝕜] F} (M : NNReal),
  (∀ (i : ι), ‖u (v i)‖₊ ≤ M) → ‖u‖₊ ≤ Fintype.card ι • ‖↑v.equivFunL‖₊ * M