From bb2e8384e8b8cde1bab3edef6bbc44c8949b0ba2 Mon Sep 17 00:00:00 2001
From: Gianfranco Abrusci <abrusci.gianfranco@gmail.com>
Date: Wed, 16 Feb 2022 18:13:57 +0100
Subject: [PATCH] fix reorder of nex function

---
 org/qmckl_jastrow.org | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/org/qmckl_jastrow.org b/org/qmckl_jastrow.org
index eabde1e..7b1f0b8 100644
--- a/org/qmckl_jastrow.org
+++ b/org/qmckl_jastrow.org
@@ -2490,7 +2490,7 @@ qmckl_exit_code qmckl_compute_factor_en (
     for (int a = 0; a < nucl_num; ++a ) {
       for (int i = 0; i < elec_num; ++i ) {
         // x = ee_distance_rescaled[j * (walk_num * elec_num) + i * (walk_num) + nw];
-        x = en_distance_rescaled[i * (walk_num * nucl_num) + a * (walk_num) + nw];
+        x = en_distance_rescaled[i + a * elec_num + nw * (elec_num * nucl_num)];
         x1 = x;
         power_ser = 0.0;