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

File:

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

palm/trunk/SOURCE/random_function.f90

@@ -1 +1 @@
  MODULE random_function_mod
-!------------------------------------------------------------------------------!
+!-------------------------------------------------------------------------------!
 ! Actual revisions:
 ! -----------------
@@ -7 +7 @@
 ! Former revisions:
 ! -----------------
-! $Id$
-! RCS Log replace by Id keyword, revision history cleaned up
-!
+! $Log: random_function.f90,v $
 ! Revision 1.3  2003/10/29 09:06:57  raasch
 ! Former function changed to a module.
+!
+! Revision 1.2  2001/01/22 08:00:23  raasch
+! Comments translated into English
 !
 ! Revision 1.1  1998/02/04 16:09:45  raasch
@@ -21 +22 @@
 ! Random number generator, produces numbers equally distributed in interval [0,1]
 ! This routine is taken from the "numerical recipies"
-!------------------------------------------------------------------------------!
+!-------------------------------------------------------------------------------!
 
     IMPLICIT NONE