Changeset 4c64400 in flexpart.git for src/conccalc.f90
- Timestamp:
- Nov 8, 2016, 4:42:27 PM (7 years ago)
- Branches:
- master, 10.4.1_pesei, GFS_025, bugfixes+enhancements, dev, release-10, release-10.4.1, scaling-bug, univie
- Children:
- c8fc724
- Parents:
- 16b61a5
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
src/conccalc.f90
r16b61a5 r4c64400 181 181 !***************************************************************************** 182 182 183 if ( (itage.lt.10800).or.(xl.lt.0.5).or.(yl.lt.0.5).or. &183 if (lnokernel.or.(itage.lt.10800).or.(xl.lt.0.5).or.(yl.lt.0.5).or. & 184 184 (xl.gt.real(numxgrid-1)-0.5).or. & 185 185 (yl.gt.real(numygrid-1)-0.5)) then ! no kernel, direct attribution to grid cell
Note: See TracChangeset
for help on using the changeset viewer.