From 67f80532f99f371967c8934d98fee2f3df676ea6 Mon Sep 17 00:00:00 2001
From: Gianfranco Abrusci <gabrusc1@login10.g100.cineca.it>
Date: Wed, 2 Feb 2022 18:21:40 +0100
Subject: [PATCH] still failing

---
 org/qmckl_jastrow.org | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/org/qmckl_jastrow.org b/org/qmckl_jastrow.org
index 15223ea..7c37818 100644
--- a/org/qmckl_jastrow.org
+++ b/org/qmckl_jastrow.org
@@ -1340,7 +1340,7 @@ qmckl_exit_code qmckl_compute_asymp_jasb (
 	  const double rescale_factor_kappa_ee,
 	  double* const asymp_jasb ) {
   // Put some code here
-    int64_t   i, p, info;
+    int64_t   info;
     double    kappa_inv, x, asym_one;
 
     kappa_inv = 1.0/ rescale_factor_kappa_ee;
@@ -1363,7 +1363,7 @@ qmckl_exit_code qmckl_compute_asymp_jasb (
     for (int i=0; i<=1; ++i) {
       x = kappa_inv;
 
-      for (int p = 1; p < bord_num-1; ++i){
+      for (int p = 1; p < bord_num; ++i){
         x = x * kappa_inv;
         asymp_jasb[i] = asymp_jasb[i] + bord_vector[p + 1] * x;
       }