Home
last modified time | relevance | path

Searched defs:get_Htensor_slow (Results 1 – 2 of 2) sorted by relevance

/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/nwdft/zora/
H A Ddft_zora_Hyperfine.F501 subroutine get_Htensor_slow( subroutine
635 153 format('CHECK:(atom,ofinite,atmass)=(',
674 10 format('gFCSD(',i3,',',i3,',',i3,')=',f15.8)
684 1 format('-----ZPSO munu-mat(',i3,',',i3,')----- START')
688 2 format('-----ZPSO munu-mat(',i3,',',i3,')----- END')
694 3 format('-----FC+SD munu-mat(',i3,',',i3,',',i3,')----- START')
698 4 format('-----FC+SD munu-mat(',i3,',',i3,',',i3,')-----END')
702 17 continue
/dports/science/nwchem-data/nwchem-7.0.2-release/src/nwdft/zora/
H A Ddft_zora_Hyperfine.F501 subroutine get_Htensor_slow( subroutine
635 153 format('CHECK:(atom,ofinite,atmass)=(',
674 10 format('gFCSD(',i3,',',i3,',',i3,')=',f15.8)
684 1 format('-----ZPSO munu-mat(',i3,',',i3,')----- START')
688 2 format('-----ZPSO munu-mat(',i3,',',i3,')----- END')
694 3 format('-----FC+SD munu-mat(',i3,',',i3,',',i3,')----- START')
698 4 format('-----FC+SD munu-mat(',i3,',',i3,',',i3,')-----END')
702 17 continue