Changeset 3803 for palm/trunk/SOURCE
- Timestamp:
- Mar 19, 2019 1:44:40 PM (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/pmc_interface_mod.f90
r3798 r3803 20 20 ! Current revisions: 21 21 ! ------------------ 22 ! 22 ! Anterpolation domain is lowered from kct-1 to kct-3 to avoid exessive 23 ! kinetic energy from building up in CBL flows. 23 24 ! 24 25 ! Former revisions: … … 4161 4162 !-- child) are excluded in anterpolation, e.g. anterpolation is only from 4162 4163 !-- nzb:kct-1, as kct is used for interpolation. 4164 !-- 4165 !-- Note that kctant is changed from kct-1 to kct-3 to avoid exessive 4166 !-- kinetic energy from building up in CBL flows. 4163 4167 iclant = icl 4164 4168 icrant = icr 4165 4169 jcsant = jcs 4166 4170 jcnant = jcn 4167 kctant = kct - 1 4171 ! kctant = kct - 1 4172 kctant = kct - 3 4168 4173 4169 4174 kcb = 0
Note: See TracChangeset
for help on using the changeset viewer.