Ignore:
Timestamp:
May 23, 2014 12:11:32 PM (7 years ago)
Author:
suehring
Message:

Bugfix: set inflow boundary conditions also if no humidity or passive_scalar is used

File:
1 edited

Legend:

Unmodified
Added
Removed
  • palm/trunk/SOURCE/init_grid.f90

    r1354 r1409  
    2020! Current revisions:
    2121! -----------------
    22 !
     22! Bugfix: set wall_flags_0 at inflow and outflow boundary also for i <= nxlu
     23! j <= nysv
    2324!
    2425! Former revisions:
     
    12291230!--             WS1 (9), WS3 (10), WS5 (11)
    12301231                IF ( k <= nzb_u_inner(j,i+1)                                  &
    1231                      .OR. ( ( inflow_l .OR. outflow_l ) .AND. i == nxlu )     &
     1232                     .OR. ( ( inflow_l .OR. outflow_l ) .AND. i <= nxlu )     &
    12321233                     .OR. ( ( inflow_r .OR. outflow_r ) .AND. i == nxr  )     &
    12331234                   )  THEN
     
    12981299!--             WS1 (21), WS3 (22), WS5 (23)
    12991300                IF ( k <= nzb_v_inner(j+1,i)                                   &
    1300                      .OR. ( ( inflow_s .OR. outflow_s ) .AND. i == nysv )      &
     1301                     .OR. ( ( inflow_s .OR. outflow_s ) .AND. j <= nysv )      &
    13011302                     .OR. ( ( inflow_n .OR. outflow_n ) .AND. j == nyn  )      &
    13021303                   )  THEN
Note: See TracChangeset for help on using the changeset viewer.