From 858e438d3099a75e22dd90259b0944675bfc2ac3 Mon Sep 17 00:00:00 2001 From: edoapra Date: Wed, 17 Aug 2022 11:09:20 -0700 Subject: [PATCH] still need to update the arguments list --- src/hessian/analytic/dft/xc_nucder_gen.F | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/src/hessian/analytic/dft/xc_nucder_gen.F b/src/hessian/analytic/dft/xc_nucder_gen.F index 25d7cdbe77..4a4b88316b 100644 --- a/src/hessian/analytic/dft/xc_nucder_gen.F +++ b/src/hessian/analytic/dft/xc_nucder_gen.F @@ -162,7 +162,8 @@ c call dftgh_gridv0(rtdb,geom,basis, ipol,nbf, . g_dens, 0d0, hess, g_rhs, calc_type, & natoms, oactive, nactive, dbl_mb(k_rdens_atom), - & int_mb(k_cetobfr), 0d0, .false.) + & int_mb(k_cetobfr), 0, .false., + & 0d0, .false.) c c Clean up indexing arrays c