1
0
mirror of https://github.com/TREX-CoE/irpjast.git synced 2024-06-02 11:25:38 +02:00

Fixed bug in allocation of cn.

This commit is contained in:
vijay gopal chilkuri 2021-03-08 22:54:33 +01:00
parent c2ba528452
commit 5b19669825

View File

@ -42,7 +42,7 @@ END_PROVIDER
integer :: i, j, a, p, k, l, lmax, m, n
double precision :: accu
double precision,dimension(:),allocatable :: cn
allocate(cn(ncord))
allocate(cn(nnuc))
factor_een_blas = 0.0d0
factor_een_deriv_e_blas(1:4,1:nelec) = 0.0d0