comp-chem/NWChem
1
0
Fork 0
mirror of https://github.com/nwchemgit/nwchem.git synced 2026-07-29 06:35:39 -04:00
Code Issues Projects Releases Packages Wiki Activity Actions 1

format fix...EJB

Browse source
This commit is contained in:
Eric Bylaska 2018-08-10 17:24:51 -07:00
parent f1d3f506c6
commit 19cf5d0ce0
6 changed files with 6 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/nwpw/pspw/cpsd/cpmd_qmmm_start.F
View file

@ -700,7 +700,7 @@ c end if
& '( ',I8,' waves ',I8,' per task)')
1260 FORMAT(5X,' Ewald summation: cut radius=',F8.2,' and',I3)
1261 FORMAT(5X,' madelung=',f11.8)
1261 FORMAT(5X,' madelung=',f14.8)
1270 FORMAT(/' technical parameters:')
1271 FORMAT(5x, ' translation constrained')
1272 FORMAT(5x, ' rotation constrained')

2
src/nwpw/pspw/cpsd/cpmd_qmmm_stop.F
View file

@ -655,7 +655,7 @@ ccc call frac_occ_end()
& '( ',I8,' waves ',I8,' per task)')
1260 FORMAT(5X,' Ewald summation: cut radius=',F8.2,' and',I3)
1261 FORMAT(5X,' madelung=',f11.8)
1261 FORMAT(5X,' madelung=',f14.8)
1270 FORMAT(/' technical parameters:')
1271 FORMAT(5x, ' translation constrained')
1272 FORMAT(5x, ' rotation constrained')

2
src/nwpw/pspw/cpsd/cpmdv5.F
View file

@ -1539,7 +1539,7 @@ c > ' set nwpw:makehmass2 .false.')
& '( ',I8,' waves ',I8,' per task)')
1260 FORMAT(5X,' Ewald summation: cut radius=',F8.2,' and',I3)
1261 FORMAT(5X,' madelung=',f11.8)
1261 FORMAT(5X,' madelung=',f14.8)
1270 FORMAT(/' technical parameters:')
1271 FORMAT(5x, ' translation constrained')
1272 FORMAT(5x, ' rotation constrained')

2
src/nwpw/pspw/cpsd/cprmdv1.F
View file

@ -1390,7 +1390,7 @@ c call frac_occ_end()
& '( ',I8,' waves ',I8,' per task)')
1260 FORMAT(5X,' Ewald summation: cut radius=',F8.2,' and',I3)
1261 FORMAT(5X,' madelung=',f11.8)
1261 FORMAT(5X,' madelung=',f14.8)
1270 FORMAT(/' technical parameters:')
1271 FORMAT(5x, ' translation constrained')
1272 FORMAT(5x, ' rotation constrained')

2
src/nwpw/pspw/cpsd/cpsdv5.F
View file

@ -1249,7 +1249,7 @@ c call frac_occ_end()
1251 FORMAT(5X,' wavefnc cutoff=',F7.3,' fft=',I3,'x',I3,'x',I3,
& '( ',I8,' waves ',I8,' per task)')
1260 FORMAT(5X,' Ewald summation: cut radius=',F8.2,' and',I3)
1261 FORMAT(5X,' madelung=',f11.8)
1261 FORMAT(5X,' madelung=',f14.8)
1270 FORMAT(/' technical parameters:')
1271 FORMAT(5x, ' translation constrained')
1272 FORMAT(5x, ' rotation constrained')

2
src/nwpw/pspw/cpsd/pspw_et.F
View file

@ -1279,7 +1279,7 @@ c
1251 FORMAT(5X,' wavefnc cutoff=',F7.3,' fft=',I3,'x',I3,'x',I3,
& '( ',I8,' waves ',I8,' per task)')
1260 FORMAT(5X,' Ewald summation: cut radius=',F8.2,' and',I3)
1261 FORMAT(5X,' madelung=',f11.8)
1261 FORMAT(5X,' madelung=',f14.8)
1270 FORMAT(/' technical parameters:')
1271 FORMAT(5x, ' translation constrained')
1272 FORMAT(5x, ' rotation constrained')