Changeset 3 for palm/trunk/SOURCE/advec_s_pw.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/advec_s_pw.f90 (modified) (1 diff)

palm/trunk/SOURCE/advec_s_pw.f90

@@ -8 +8 @@
 ! Former revisions:
 ! -----------------
-! $Log: advec_s_pw.f90,v $
+! $Id$
+! RCS Log replace by Id keyword, revision history cleaned up
+!
 ! Revision 1.12  2006/02/23 09:42:55  raasch
 ! nzb_2d replaced by nzb_s_inner
-!
-! Revision 1.11  2004/01/30 10:10:03  raasch
-! Scalar lower k index nzb replaced by 2d-array nzb_2d
-!
-! Revision 1.10  2003/03/12 16:15:32  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.9  2002/06/11 12:22:14  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.
-! Array sk now declared as a pointer.
-!
-! Revision 1.8  2001/03/29 17:30:14  raasch
-! Translation of remaining German identifiers (variables, subroutines, etc.)
-!
-! Revision 1.7  2001/01/22 04:41:39  raasch
-! Module test_variables removed
-!
-! Revision 1.6  2000/01/20 09:13:33  letzel
-! All comments translated into English
-!
-! Revision 1.5  1998/07/06 12:03:09  raasch
-! + USE test_variables
-!
-! Revision 1.4  1998/04/21 15:51:53  raasch
-! Galilei-Transformation eingebaut
-!
-! Revision 1.3  1998/02/10 14:57:53  raasch
-! Es wird jetzt grundsaetzlich die Form C3 verwendet
-!
-! Revision 1.2  1997/09/09 08:27:10  raasch
-! Kehrwerte der Gitterweiten implementiert
 !
 ! Revision 1.1  1997/08/29 08:54:20  raasch