∀ {ι : Type u_1} {𝕜 : Type u_3} [inst : RCLike 𝕜] {E : Type u_4} [inst_1 : NormedAddCommGroup E]
  [inst_2 : InnerProductSpace 𝕜 E] [inst_3 : Fintype ι] {v v_1 : ι → E} (e_v : v = v_1) (hon : Orthonormal 𝕜 v)
  (hsp : (Submodule.span 𝕜 (Set.range v))ᗮ = ⊥),
  OrthonormalBasis.mkOfOrthogonalEqBot hon hsp = OrthonormalBasis.mkOfOrthogonalEqBot ⋯ ⋯