Changeset 2172 for palm/trunk/SOURCE/disturb_field.f90

Timestamp:

Mar 8, 2017 3:55:25 PM (7 years ago)

Author:

knoop

Message:

Bugfix: parallel random number generator

File:

• palm/trunk/SOURCE/disturb_field.f90 (modified) (2 diffs)

palm/trunk/SOURCE/disturb_field.f90

@@ -20 +20 @@
 ! Current revisions:
 ! ------------------
-! 
+! Bugfix removed id_random_array from USE list
 ! 
 ! Former revisions:
@@ -89 +89 @@
     USE random_generator_parallel,                                             &
         ONLY:  random_number_parallel, random_seed_parallel, random_dummy,     &
-               id_random_array, seq_random_array
+               seq_random_array
 
     IMPLICIT NONE