Changes in palm/trunk/SOURCE/timestep.f90 [1:3]

File:

• palm/trunk/SOURCE/timestep.f90 (modified) (1 diff)

palm/trunk/SOURCE/timestep.f90

@@ -8 +8 @@
 ! Former revisions:
 ! -----------------
-! $Log: timestep.f90,v $
+! $Id$
+! RCS Log replace by Id keyword, revision history cleaned up
+!
 ! Revision 1.21  2006/02/23 12:59:44  raasch
 ! nt_anz renamed current_timestep_number
-!
-! Revision 1.20  2005/04/23 09:45:38  raasch
-! fcl_factor renamed cfl_factor
-!
-! Revision 1.19  2005/03/26 21:11:53  raasch
-! In case of non-cyclic lateral boundary conditions, the increased diffusivity
-! in the lateral damping layer is regarded in the minimum timestep calculation.
-!
-! Revision 1.18  2004/01/30 10:40:02  raasch
-! Timestep increment limitation in case of Runge-Kutta removed
-!
-! Revision 1.17  2004/01/28 15:34:03  raasch
-! Setting of steering factors for the prognostic equations moved to new
-! routine timestep_scheme_steering now called in routine leap_frog.
-!
-! Revision 1.16  2003/03/16 09:49:47  raasch
-! Two underscores (_) are placed in front of all define-strings
-!
-! Revision 1.15  2002/12/19 16:19:54  raasch
-! Two mpi_allreduce calls for determining mean horizontal velocity reduced to
-! one call. Calculation of minimum timestep for diffusion optimized by
-! determining minimum grid spacing in a single k loop.
-!
-! Revision 1.14  2001/03/30 07:55:12  raasch
-! Translation of remaining German identifiers (variables, subroutines, etc.)
-!
-! Revision 1.13  2001/01/30 22:10:11  letzel
-! All comments translated into English.
-!
-! Revision 1.12  2001/01/22 08:17:33  raasch
-! Module test_variables removed
-!
-! Revision 1.11  2000/01/10 10:10:30  raasch
-! Translationsgeschwindigkeit fuer Galilei-Transformation wird nur noch
-! bedingt berechnet
-!
-! Revision 1.10  1999/02/05 09:19:06  raasch
-! Zeitschrittsteuerung beruecksichtigt jetzt auch Wahl des reinen Euler-
-! Verfahrens
-!
-! Revision 1.9  1998/09/22 17:30:41  raasch
-! Ausfuehrlichere Informationen bei Abbruch durch Unterschreitung des
-! minimalen Zeitschritts
-!
-! Revision 1.8  1998/07/06 12:33:52  raasch
-! Korrektur der ermittelten horizontalen Geschwindigkeitsmaxima, falls diese
-! bei k=0 gefunden wurden (wegen Spiegelungsrandbedingung treten dort negative
-! Werte auf, die bei Galilei-Transformation den Zeitschritt erheblich
-! einschraenken). + USE test_variables
-!
-! Revision 1.7  1998/04/21 15:57:46  raasch
-! Implementierung der Galilei-Transformation
-!
-! Revision 1.6  1998/03/25 13:57:20  raasch
-! dt in dt_3d umbenannt
-!
-! Revision 1.5  1998/03/09 16:25:10  raasch
-! Schoenheitskorrekturen
-!
-! Revision 1.4  1998/03/03 08:02:15  raasch
-! Leap-Frog auch nach Zeitschrittaenderung erlaubt
-!
-! Revision 1.3  1997/09/12 06:30:27  raasch
-! Einbau des Diffusions-Kriteriums
-!
-! Revision 1.2  1997/08/26 06:34:55  raasch
-! Fehler bei w_max_ijk - Index
 !
 ! Revision 1.1  1997/08/11 06:26:19  raasch