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

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:
 ! -----------------
-! $Id$
-! RCS Log replace by Id keyword, revision history cleaned up
-!
+! $Log: local_getenv.f90,v $
 ! 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
@@ -22 +29 @@
 ! ------------
 ! Getting the values of environment-variabls (for different operating-systems)
-!------------------------------------------------------------------------------!
+!-------------------------------------------------------------------------------!
 
 #if defined( __lcmuk )