Changeset 1320 for palm/trunk/SOURCE/timestep_scheme_steering.f90

Timestamp:

Mar 20, 2014 8:40:49 AM (10 years ago)

Author:

raasch

Message:

ONLY-attribute added to USE-statements,
kind-parameters added to all INTEGER and REAL declaration statements,
kinds are defined in new module kinds,
old module precision_kind is removed,
revision history before 2012 removed,
comment fields (!:) to be used for variable explanations added to all variable declaration statements

File:

• palm/trunk/SOURCE/timestep_scheme_steering.f90 (modified) (3 diffs)

palm/trunk/SOURCE/timestep_scheme_steering.f90

@@ -20 +20 @@
 ! Current revisions:
 ! ------------------
-!
+! ONLY-attribute added to USE-statements,
 !
 ! Former revisions:
@@ -32 +32 @@
 ! all actions concerning leapfrog scheme removed
 !
-! 673 2011-01-18 16:19:48Z suehring
-! No pressure term during time integration (tsc(4)=0.0).
-!
-! RCS Log replace by Id keyword, revision history cleaned up
-!
-! Revision 1.2  2005/03/26 21:17:06  raasch
-! No pressure term for Runge-Kutta-schemes (tsc(4)=0.0)
-!
 ! Revision 1.1  2004/01/28 15:34:47  raasch
 ! Initial revision
@@ -50 +42 @@
 !------------------------------------------------------------------------------!
 
-    USE control_parameters
+    USE control_parameters,                                                    &
+        ONLY:  intermediate_timestep_count, timestep_scheme, tsc
 
     IMPLICIT NONE