ICODE-ADC/lammps
4
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

More spacing

Browse Source
This commit is contained in:
Karl Hammond
2022-09-30 19:58:56 -05:00
parent eac855343f
commit 9c314966ae
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
doc/src/Fortran.rst
View File

@ -209,12 +209,12 @@ Below is an example demonstrating some of the possible uses.
CALL lmp%command('run 2 post no') CALL lmp%command('run 2 post no')
dt = lmp%extract_global('dt') dt = lmp%extract_global('dt')
ntimestep = lmp%extract_global('ntimestep') ntimestep = lmp%extract_global('ntimestep')
WRITE(OUTPUT_UNIT,'(A,I4,A,F4.1,A)') 'At step:', ntimestep, & WRITE(OUTPUT_UNIT,'(A,I0,A,F4.1,A)') 'At step: ', ntimestep, &
' Changing timestep from', dt, ' to 0.5' ' Changing timestep from', dt, ' to 0.5'
dt = 0.5_c_double dt = 0.5_c_double
CALL lmp%command('run 2 post no') CALL lmp%command('run 2 post no')
WRITE(OUTPUT_UNIT,'(A,I0)') 'At step:', ntimestep WRITE(OUTPUT_UNIT,'(A,I0)') 'At step: ', ntimestep
pe = lmp%get_thermo('pe') pe = lmp%get_thermo('pe')
ke = lmp%get_thermo('ke') ke = lmp%get_thermo('ke')
PRINT*, 'PE = ', pe PRINT*, 'PE = ', pe