From 52e6ef08f8fb0ea5b78f18d65ac9055506ace41d Mon Sep 17 00:00:00 2001 From: Anthony Scemama Date: Thu, 26 Aug 2021 11:41:32 +0200 Subject: [PATCH] Fixed det_beta_num_8 -> elec_beta_num_8 dimension in pseudo --- src/det.irp.f | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/det.irp.f b/src/det.irp.f index ffd547b..cd03882 100644 --- a/src/det.irp.f +++ b/src/det.irp.f @@ -1588,7 +1588,7 @@ END_PROVIDER BEGIN_PROVIDER [ double precision, det_beta_value, (det_beta_num_8) ] &BEGIN_PROVIDER [ double precision, det_beta_grad_lapl, (4,elec_beta_num,det_beta_num) ] -&BEGIN_PROVIDER [ double precision, det_beta_pseudo, (det_beta_num_8,det_beta_num_pseudo) ] +&BEGIN_PROVIDER [ double precision, det_beta_pseudo, (elec_beta_num_8,det_beta_num_pseudo) ] implicit none