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

palm/trunk/SOURCE/swap_timelevel.f90

@@ -1 +1 @@
  SUBROUTINE swap_timelevel
 
-!-------------------------------------------------------------------------------!
+!------------------------------------------------------------------------------!
 ! Actual revisions:
 ! -----------------
@@ -8 +8 @@
 ! Former revisions:
 ! -----------------
-! $Log: swap_timelevel.f90,v $
+! $Id$
+! RCS Log replace by Id keyword, revision history cleaned up
+!
 ! Revision 1.8  2004/01/28 15:28:18  raasch
 ! Swaping for Runge-Kutta schemes implemented
-!
-! Revision 1.7  2002/05/02 18:58:36  raasch
-! Swaping of prognostic quantities re-changed to three timelevels
-!
-! Revision 1.6  2001/08/21  10:01:58  10:01:58  raasch (Siegfried Raasch)
-! Surface momentum fluxes are swapped also when they are prescribed
-! 
-! Revision 1.5  2001/03/30 07:54:39  raasch
-! Swaping of prognostic quantities changed over from three to two timelevels,
-! Translation of remaining German identifiers (variables, subroutines, etc.)
-!
-! Revision 1.4  2001/01/29 12:36:03  raasch
-! Passive scalar is considered
-!
-! Revision 1.3  2001/01/25 07:26:48  raasch
-! Sensible and latent heat fluxes are swaped, when use_surface_fluxes = .TRUE.,
-! module test_variables removed
-!
-! Revision 1.2  2000/04/13 13:59:26  schroeter
-! + swapping timelevels of moisture variables
 !
 ! Revision 1.1  2000/01/10  10:08:58  10:08:58  raasch (Siegfried Raasch)
@@ -39 +21 @@
 ! ------------
 ! Swap of timelevels of variables after each timestep
-!-------------------------------------------------------------------------------!
+!------------------------------------------------------------------------------!
 
     USE arrays_3d