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

File:

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

palm/trunk/SOURCE/init_grid.f90

@@ -8 +8 @@
 ! Former revisions:
 ! -----------------
-! $Log: init_grid.f90,v $
+! $Id$
+! RCS Log replace by Id keyword, revision history cleaned up
+!
 ! Revision 1.17  2006/08/22 14:00:05  raasch
 ! +dz_max to limit vertical stretching,
 ! bugfix in index array initialization for line- or point-like topography
 ! structures
-!
-! Revision 1.16  2006/03/03 14:28:31  letzel
-! call of user_init_grid now requires the actual parameter nzb_local
-!
-! Revision 1.15  2006/02/24 16:05:59  raasch
-! Error removed: l_wall modification (multiplication with wall adjustment
-! factor and ghost point exchange) must be taken out of the if-clause (see end
-! of this routine)
-!
-! Revision 1.14  2006/02/23 12:30:59  raasch
-! Definition of index and wall arrays describing topography
-!
-! Revision 1.13  2002/12/19 15:38:38  raasch
-! Calculation of dl_grid removed, STOP statement replaced by call of subroutine
-! local_stop
-!
-! Revision 1.12  2001/07/20 13:06:33  raasch
-! +dzu_mg, dzw_mg, f1_mg, f2_mg, f3_mg
-!
-! Revision 1.11  2001/03/30 07:31:20  raasch
-! Translation of remaining German identifiers (variables, subroutines, etc.)
-!
-! Revision 1.10  2001/01/22 19:35:19  letzel
-! All comments translated into English.
-!
-! Revision 1.9  2001/01/22 07:06:16  raasch
-! Module test_variables removed
-!
-! Revision 1.8  1999/02/05 09:08:32  raasch
-! Erweiterung von dzw um einen Gitterpunkt nach oben fuer Upstream-Spline-
-! Verfahren
-!
-! Revision 1.7  1998/07/06 12:16:43  raasch
-! + USE test_variables
-!
-! Revision 1.6  1998/03/18 20:13:16  raasch
-! dz wird unveraendert gelassen (hatte bisher den Wert der groessten,
-! gestreckten) Gitterweite
-!
-! Revision 1.5  1997/09/19 07:43:27  raasch
-! +dd2zu, dl_grid, l_grid
-!
-! Revision 1.4  1997/09/12 06:26:02  raasch
-! Kehrwerte der Gitterweitenquadrate werden berechnet
-!
-! Revision 1.3  1997/09/09 08:29:12  raasch
-! Kehrwerte der Gitterweiten werden berechnet
-!
-! Revision 1.2  1997/08/26 06:31:11  raasch
-! Berechnung der Vertikalniveaus und der Gitterweiten
 !
 ! Revision 1.1  1997/08/11 06:17:45  raasch