From 660b0b4715944da5925dd7f3804a084f7e593387 Mon Sep 17 00:00:00 2001
From: Nuwan Yapa <yapanuwan@gmail.com>
Date: Mon, 6 Jan 2025 15:59:53 -0500
Subject: [PATCH] Minor refactoring

---
 helper.jl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/helper.jl b/helper.jl
index 0264200..6eeee4a 100644
--- a/helper.jl
+++ b/helper.jl
@@ -59,7 +59,7 @@ function gram_schmidt(vecs, ws, precision=1e-10, verbose=false)
         for j in findall(mask[1 : (i - 1)])
             vecs[i] -= proj(j, i)
         end
-        norm = sum(vecs[i] .* ws .* vecs[i])
+        norm = c_product(i, i)
         verbose && println("Mag. of basis vector $i = $(abs(norm))")
         if abs(norm) > precision
             vecs[i] = vecs[i] ./ sqrt(norm)