Ignore:
Timestamp:
Dec 18, 2019 11:55:56 AM (5 years ago)
Author:
motisi
Message:

Introduction of wall_flags_total_0, which currently sets bits based on static topography information used in wall_flags_static_0

File:
1 edited

Legend:

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

    r4329 r4346  
    2626! -----------------
    2727! $Id$
     28! Introduction of wall_flags_total_0, which currently sets bits based on static
     29! topography information used in wall_flags_static_0
     30!
     31! 4329 2019-12-10 15:46:36Z motisi
    2832! Renamed wall_flags_0 to wall_flags_static_0
    2933!
     
    481485
    482486    USE indices,                                                               &
    483         ONLY:  nxl, nxr, nyn, nys, nzb, nzt, wall_flags_static_0
     487        ONLY:  nxl, nxr, nyn, nys, nzb, nzt, wall_flags_total_0
    484488
    485489    USE grid_variables,                                                        &
     
    671675!
    672676!--             Check if grid point belongs to a building.
    673                 IF ( BTEST( wall_flags_static_0(k,j,i), 6 ) )  THEN
     677                IF ( BTEST( wall_flags_total_0(k,j,i), 6 ) )  THEN
    674678                   k_min_l(nb) = MIN( k_min_l(nb), k )
    675679                   k_max_l(nb) = MAX( k_max_l(nb), k )
Note: See TracChangeset for help on using the changeset viewer.