Changeset 3986 for palm/trunk/SOURCE/user_module.f90

Timestamp:

May 20, 2019 2:08:14 PM (5 years ago)

Author:

Giersch

Message:

Case statement in gust_rrd_local modifed, redundant integration of control parameters in user_rrd_global removed

File:

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

palm/trunk/SOURCE/user_module.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! Redundant integration of control parameters in user_rrd_global removed
+! 
+! 3911 2019-04-17 12:26:19Z knoop
 ! Bugfix: added before_prognostic_equations case in user_actions
 ! 
@@ -1129 +1132 @@
 
 
-    USE control_parameters,                                                 &
-        ONLY: length, restart_string
-
-
     LOGICAL, INTENT(OUT)  ::  found