Changeset 1679 for palm/trunk/SOURCE/init_grid.f90
- Timestamp:
- Oct 5, 2015 11:29:24 AM (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/init_grid.f90
r1678 r1679 1456 1456 ! 1457 1457 !-- w component - z-direction 1458 !-- WS1 (33), WS3 (34) IF ( inflow_l .OR. outflow_l ) THEN, WS5 (35)1458 !-- WS1 (33), WS3 (34), WS5 (35) 1459 1459 flag_set = .FALSE. 1460 1460 IF ( k == nzb_w_inner(j,i) .OR. k == nzb_w_inner(j,i) + 1 &
Note: See TracChangeset
for help on using the changeset viewer.