Changeset 3803 for palm

Timestamp:

Mar 19, 2019 1:44:40 PM (6 years ago)

Author:

hellstea

Message:

Nesting anterpolation domain height reduced

File:

• palm/trunk/SOURCE/pmc_interface_mod.f90 (modified) (2 diffs)

palm/trunk/SOURCE/pmc_interface_mod.f90

@@ -20 +20 @@
 ! Current revisions:
 ! ------------------
-! 
+! Anterpolation domain is lowered from kct-1 to kct-3 to avoid exessive       
+! kinetic energy from building up in CBL flows.
 ! 
 ! Former revisions:
@@ -4161 +4162 @@
 !--   child) are excluded in anterpolation, e.g. anterpolation is only from 
 !--   nzb:kct-1, as kct is used for interpolation.
+!--
+!--   Note that kctant is changed from kct-1 to kct-3 to avoid exessive       
+!--   kinetic energy from building up in CBL flows.
       iclant = icl
       icrant = icr
       jcsant = jcs
       jcnant = jcn
-      kctant = kct - 1
+!      kctant = kct - 1
+      kctant = kct - 3
       
       kcb  = 0