comp-chem/NWChem
1
0
Fork 0
mirror of https://github.com/nwchemgit/nwchem.git synced 2026-07-28 14:15:30 -04:00
Code Issues Projects Releases Packages Wiki Activity Actions 1

xlf fix

Browse source
This commit is contained in:
Edoardo Apra 2015-10-23 01:11:33 +00:00
parent f8464c6e36
commit 155e1e3cf6
1 changed files with 0 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

1
src/nwdft/scf_dft/dft_diagn.F
View file

@ -261,7 +261,6 @@ c
elseif(yev.eq.'d') then
call ga_pdsyevd(g_s, g_svecs, evals,nb)
#ifdef USE_PDSYEVR
#warning YVRVRVR
elseif(yev.eq.'r'.or.yev.eq.'m') then
nmoout=0
if(yev.eq.'m') nmoout=nocc