4
1
mirror of https://github.com/pfloos/quack synced 2024-06-18 11:15:30 +02:00

fixing bug in memory allocation

This commit is contained in:
Pierre-Francois Loos 2021-11-24 13:06:46 +01:00
parent b0413b1d13
commit 1f0d426570

View File

@ -106,7 +106,7 @@ subroutine eDFT(maxSCF,thresh,max_diis,guess_type,mix,nNuc,ZNuc,rNuc,ENuc,nBas,n
! Allocate ensemble weights and MO coefficients
allocate(wEns(maxEns),aCC(maxCC,nEns-1),occnum(nBas,nspin,maxEns))
allocate(wEns(maxEns),aCC(maxCC,maxEns-1),occnum(nBas,nspin,maxEns))
call read_options_dft(nBas,method,x_rung,x_DFA,c_rung,c_DFA,SGn,nEns,wEns,nCC,aCC, &
doNcentered,occnum,Cx_choice)