Changeset 1682 for palm/trunk/SOURCE/lpm_write_restart_file.f90
- Timestamp:
- Oct 7, 2015 11:56:08 PM (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/lpm_write_restart_file.f90
r1360 r1682 1 SUBROUTINE lpm_write_restart_file 2 1 !> @file lpm_write_restart_file.f90 3 2 !--------------------------------------------------------------------------------! 4 3 ! This file is part of PALM. … … 20 19 ! Current revisions: 21 20 ! ------------------ 22 ! 21 ! Code annotations made doxygen readable 23 22 ! 24 23 ! Former revisions: … … 45 44 ! Description: 46 45 ! ------------ 47 ! Write particle data in FORTRAN binary format on restart file46 !> Write particle data in FORTRAN binary format on restart file 48 47 !------------------------------------------------------------------------------! 48 SUBROUTINE lpm_write_restart_file 49 49 50 50 51 USE control_parameters, & … … 69 70 IMPLICIT NONE 70 71 71 CHARACTER (LEN=10) :: particle_binary_version ! :72 CHARACTER (LEN=10) :: particle_binary_version !< 72 73 73 INTEGER(iwp) :: i ! :74 INTEGER(iwp) :: ip ! :75 INTEGER(iwp) :: jp ! :76 INTEGER(iwp) :: kp ! :74 INTEGER(iwp) :: i !< 75 INTEGER(iwp) :: ip !< 76 INTEGER(iwp) :: jp !< 77 INTEGER(iwp) :: kp !< 77 78 78 79 !
Note: See TracChangeset
for help on using the changeset viewer.