hyperfine coupling: stop when wavefunction is closed-shell https://github.com/nwchemgit/nwchem/issues/788

This commit is contained in:
edoapra 2023-05-30 11:30:01 -07:00
parent 61a049ae7f
commit 8e650d45f4
No known key found for this signature in database
GPG key ID: 48E12DA1EDE9E1B0

View file

@ -186,6 +186,13 @@ c
endif
call hnd_hyperfine_ZORA(rtdb,basis,geom)
end if
else
if (ga_nodeid().eq.0) then
write(luout,7000)
7000 format(/,6x,'Indirect spin-spin coupling not calculated for RHF',
1 /,6x,'wave functions: needs UHF wave function')
endif
call errquit(' use ODFT input keyword ',0,0)
end if
c
c ----- electrostatic potential -----