Ignore:
File:
1 edited

Legend:

Unmodified
Added
Removed
  • palm/trunk/SOURCE/timestep.f90

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