Ignore:
Timestamp:
Dec 10, 2019 3:46:36 PM (17 months ago)
Author:
motisi
Message:

Renamed wall_flags_0 to wall_flags_static_0

File:
1 edited

Legend:

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

    r4182 r4329  
    2525! -----------------
    2626! $Id$
     27! Renamed wall_flags_0 to wall_flags_static_0
     28!
     29! 4182 2019-08-22 15:20:23Z scharf
    2730! Corrected "Former revisions" section
    2831!
     
    6366       USE indices,                                                            &
    6467           ONLY:  ngp_2dh_s_inner, nxl, nxr, nyn, nys, nzb, nzb, nzt,          &
    65                   wall_flags_0
     68                  wall_flags_static_0
    6669
    6770       USE kinds
     
    107110                   sums_l(k,pr,tn) = sums_l(k,pr,tn) + var(k,j,i)              &
    108111                                     * MERGE( 1.0_wp, 0.0_wp,                  &
    109                                               BTEST( wall_flags_0(k,j,i), 22 ) )
     112                                              BTEST( wall_flags_static_0(k,j,i), 22 ) )
    110113                ENDDO
    111114             ENDDO
Note: See TracChangeset for help on using the changeset viewer.