Changeset 3 for palm/trunk/SOURCE/diffusion_u.f90

Timestamp:

Feb 13, 2007 11:30:58 AM (17 years ago)

Author:

raasch

Message:

RCS Log replace by Id keyword, revision history cleaned up

File:

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

palm/trunk/SOURCE/diffusion_u.f90

@@ -8 +8 @@
 ! Former revisions:
 ! -----------------
-! $Log: diffusion_u.f90,v $
+! $Id$
+! RCS Log replace by Id keyword, revision history cleaned up
+!
 ! Revision 1.15  2006/02/23 10:35:35  raasch
 ! nzb_2d replaced by nzb_u_outer in horizontal diffusion and by nzb_u_inner
@@ -16 +18 @@
 ! because they cause errors at the edges of topography
 ! WARNING: loops containing the MAX function are still not properly vectorized!
-!
-! Revision 1.14  2005/03/26 20:08:21  raasch
-! Extension of horizontal loop upper bounds for non-cyclic boundary conditions,
-! additional damping layer at the outflow in case of non-cyclic lateral
-! boundaries, additional argument km_damp_y
-!
-! Revision 1.13  2004/01/30 10:21:32  raasch
-! Scalar lower k index nzb replaced by 2d-array nzb_2d
-!
-! Revision 1.12  2003/03/12 16:26:14  raasch
-! Full code replaced in the call for all gridpoints instead of calling the
-! _ij version (required by NEC, because otherwise no vectorization)
-!
-! Revision 1.11  2002/06/11 12:53:12  raasch
-! Former subroutine changed to a module which allows to be called for all grid
-! points of a single vertical column with index i,j or for all grid points by
-! using function overloading.
-!
-! Revision 1.10  2001/08/21 08:25:55  raasch
-! Special treatment at k=1 generally if momentum flux is prescribed (not only in
-! case of a Prandtl layer)
-!
-! Revision 1.9  2001/03/30 07:12:02  raasch
-! Translation of remaining German identifiers (variables, subroutines, etc.)
-!
-! Revision 1.8  2001/01/22 06:14:00  raasch
-! Module test_variables removed
-!
-! Revision 1.7  2000/07/03 12:57:46  raasch
-! dummy arguments, whose corresponding actual arguments are pointers,
-! are now also defined as pointers,
-! all comments translated into English
-!
-! Revision 1.6  2000/03/14 13:55:33  schroeter
-! vertical impulse fluxes are computed over dz at the
-! top of the Prandtl-layer
-!
-! Revision 1.5  98/07/06  12:11:42  12:11:42  raasch (Siegfried Raasch)
-! + USE test_variables
-! 
-! Revision 1.4  1998/01/23 09:56:44  raasch
-! Einbau der Prandtl-Schicht
-!
-! Revision 1.3  1997/09/12 07:22:50  raasch
-! Leerzeilen mussten entfernt werden
-!
-! Revision 1.2  1997/09/12 06:43:27  raasch
-! HP-Compiler erfordert & am Beginn von Fortsetzungszeilen
 !
 ! Revision 1.1  1997/09/12 06:23:51  raasch