Changeset 2200 for palm/trunk/SOURCE/init_grid.f90

Timestamp:

Apr 11, 2017 11:37:51 AM (7 years ago)

Author:

suehring

Message:

Bugfixes in radiation_model; monotonic limiter in 5th order advection scheme removed

File:

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

palm/trunk/SOURCE/init_grid.f90

@@ -20 +20 @@
 ! Current revisions:
 ! -----------------
-! 
+! monotonic_adjustment removed
 ! 
 ! Former revisions:
@@ -1454 +1454 @@
 !-- Init flags for ws-scheme to degrade order of the numerics near walls, i.e. 
 !-- to decrease the numerical stencil appropriately.
-    IF ( momentum_advec == 'ws-scheme'  .OR.  scalar_advec == 'ws-scheme'  .OR.&
-         scalar_advec   == 'ws-scheme-mono' )  THEN
+    IF ( momentum_advec == 'ws-scheme'  .OR.  scalar_advec == 'ws-scheme'      &
+       )  THEN
        CALL ws_init_flags
     ENDIF