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

File:

• palm/trunk/SOURCE/local_getenv.f90 (modified) (3 diffs)

palm/trunk/SOURCE/local_getenv.f90

@@ -1 +1 @@
  SUBROUTINE local_getenv( var, ivar, value, ivalue )
 
-!-------------------------------------------------------------------------------!
+!------------------------------------------------------------------------------!
 ! Actual revisions:
 ! -----------------
@@ -8 +8 @@
 ! Former revisions:
 ! -----------------
-! $Log: local_getenv.f90,v $
+! $Id$
+! RCS Log replace by Id keyword, revision history cleaned up
+!
 ! Revision 1.5  2003/05/09 14:37:07  raasch
 ! On the MUK cluster, only PE0 is able to read environment variables.
 ! Therefore, they have to be communicated via broadcast to the other PEs.
-!
-! Revision 1.4  2003/03/16 09:40:22  raasch
-! Two underscores (_) are placed in front of all define-strings
-!
-! Revision 1.3  2001/01/22 07:23:55  raasch
-! Comments translated into English
-!
-! Revision 1.2  1998/07/16 06:50:50  raasch
-! cpp-Direktiven fuer t3ej2 und t3ej5 erweitert
 !
 ! Revision 1.1  1997/08/11 06:21:01  raasch
@@ -29 +22 @@
 ! ------------
 ! Getting the values of environment-variabls (for different operating-systems)
-!-------------------------------------------------------------------------------!
+!------------------------------------------------------------------------------!
 
 #if defined( __lcmuk )