Changeset 1679 for palm/trunk/SOURCE

Timestamp:

Oct 5, 2015 11:29:24 AM (9 years ago)

Author:

boeske

Message:

Comment line corrected

File:

• palm/trunk/SOURCE/init_grid.f90 (modified) (1 diff)

palm/trunk/SOURCE/init_grid.f90

@@ -1456 +1456 @@
 !
 !--             w component - z-direction
-!--             WS1 (33), WS3 (34)IF ( inflow_l .OR. outflow_l )  THEN, WS5 (35)
+!--             WS1 (33), WS3 (34), WS5 (35)
                 flag_set = .FALSE.
                 IF ( k == nzb_w_inner(j,i) .OR. k == nzb_w_inner(j,i) + 1      &