Changeset 4329 for palm/trunk/SOURCE/virtual_measurement_mod.f90
- Timestamp:
- Dec 10, 2019 3:46:36 PM (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/virtual_measurement_mod.f90
r4226 r4329 25 25 ! ----------------- 26 26 ! $Id$ 27 ! Renamed wall_flags_0 to wall_flags_static_0 28 ! 29 ! 4226 2019-09-10 17:03:24Z suehring 27 30 ! Netcdf input routine for dimension length renamed 28 31 ! … … 121 124 122 125 USE indices, & 123 ONLY: nzb, nzt, nxl, nxr, nys, nyn, nx, ny, topo_top_ind, wall_flags_ 0126 ONLY: nzb, nzt, nxl, nxr, nys, nyn, nx, ny, topo_top_ind, wall_flags_static_0 124 127 125 128 USE kinds … … 783 786 IBSET( meas_flag(k,j,i), 0 ), & 784 787 0, & 785 BTEST( wall_flags_ 0(k,j,i), 0 ) &788 BTEST( wall_flags_static_0(k,j,i), 0 ) & 786 789 ) 787 790 ENDDO
Note: See TracChangeset
for help on using the changeset viewer.