Changeset 19 for palm/trunk/SOURCE/init_grid.f90
- Timestamp:
- Feb 23, 2007 4:53:48 AM (17 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/init_grid.f90
r4 r19 4 4 ! Actual revisions: 5 5 ! ----------------- 6 ! 6 ! Setting of nzt_diff 7 7 ! 8 8 ! Former revisions: … … 202 202 203 203 ! 204 !-- Define vertical gridpoint from which on the usual finite difference204 !-- Define vertical gridpoint from (or to) which on the usual finite difference 205 205 !-- form (which does not use surface fluxes) is applied 206 206 IF ( prandtl_layer .OR. use_surface_fluxes ) THEN … … 208 208 ELSE 209 209 nzb_diff = nzb + 1 210 ENDIF 211 IF ( use_top_fluxes ) THEN 212 nzt_diff = nzt - 1 213 ELSE 214 nzt_diff = nzt 210 215 ENDIF 211 216
Note: See TracChangeset
for help on using the changeset viewer.