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

Bug fix in ma_print

Browse source
This commit is contained in:
Daniel Mejia-Rodriguez 2023-07-24 10:54:18 -07:00 • committed by edoapra
parent 396fd02972
commit a5a9ea348b
No known key found for this signature in database
GPG key ID: 9E6A0B70826967BA
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/util/ma_print.F
View file

@ -16,7 +16,7 @@ c (c) Battelle, PNNL, 2002.
write(LuOut,*)
write(LuOut,*) title
write(LuOut,9000)
do k = 0,mdim/6
do k = 0,(mdim-1)/6
write(LuOut,*)
write(LuOut,9010) (j,j=k*6+1,min(mdim,k*6+6))
do i=1,ndim