Changeset 3963 for palm

Timestamp:

May 8, 2019 8:09:11 PM (6 years ago)

Author:

suehring

Message:

Remove unused variable

File:

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

palm/trunk/SOURCE/pmc_child_mod.f90

@@ -21 +21 @@
 ! Current revisions:
 ! ------------------
-! 
+! Remove unused variable
 ! 
 ! Former revisions:
@@ -605 +605 @@
     INTEGER(iwp), DIMENSION(:,:), ALLOCATABLE ::  myindex_r
 
-    INTEGER(iwp),DIMENSION(1024) ::  req  !<
-
     REAL(wp), DIMENSION(:), POINTER, SAVE ::  base_array_pc  !< base array
     REAL(wp), DIMENSION(:), POINTER, SAVE ::  base_array_cp  !< base array