From 8b7c6b7247735483f369ca850b0f5c3cd3b753ae Mon Sep 17 00:00:00 2001
From: "Martin D. Weinberg" <weinberg@astro.umass.edu>
Date: Thu, 1 May 2025 15:40:05 -0400
Subject: [PATCH] Fix omitted norm in OrthoFunction::dumpOrtho()

---
 exputil/OrthoFunction.cc | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/exputil/OrthoFunction.cc b/exputil/OrthoFunction.cc
index e0bf4f1f9..83dc83766 100644
--- a/exputil/OrthoFunction.cc
+++ b/exputil/OrthoFunction.cc
@@ -114,7 +114,7 @@ void OrthoFunction::dumpOrtho(const std::string& filename)
       //
       Eigen::VectorXd p = poly_eval(y, nmax) * W(r);
       fout << std::setw(16) << r;
-      for (int n=0; n<nmax; n++) fout << std::setw(16) << p(n);
+      for (int n=0; n<nmax; n++) fout << std::setw(16) << p(n)/sqrt(norm[n]);
       fout << std::endl;
     }
   }