Changeset 3552 for palm/trunk/SOURCE/sum_up_3d_data.f90
- Timestamp:
- Nov 22, 2018 10:28:35 AM (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/sum_up_3d_data.f90
r3525 r3552 20 20 ! Current revisions: 21 21 ! ----------------- 22 ! 22 ! variables documented 23 23 ! 24 24 ! Former revisions: … … 309 309 INTEGER(iwp) :: j !< grid index y direction 310 310 INTEGER(iwp) :: k !< grid index x direction 311 INTEGER(iwp) :: m !< running index surface type312 INTEGER(iwp) :: n !< 313 314 REAL(wp) :: mean_r !< 315 REAL(wp) :: s_r2 !< 316 REAL(wp) :: s_r3 !< 311 INTEGER(iwp) :: m !< running index over surfacle elements 312 INTEGER(iwp) :: n !< running index over number of particles per grid box 313 314 REAL(wp) :: mean_r !< mean-particle radius witin grid box 315 REAL(wp) :: s_r2 !< mean-particle radius witin grid box to the power of two 316 REAL(wp) :: s_r3 !< mean-particle radius witin grid box to the power of three 317 317 318 318 CHARACTER (LEN=varnamelength) :: trimvar !< TRIM of output-variable string
Note: See TracChangeset
for help on using the changeset viewer.