Changeset 1808 for palm/trunk/SOURCE/pmc_mpi_wrapper.f90

Timestamp:

Apr 5, 2016 7:44:00 PM (8 years ago)

Author:

raasch

Message:

preprocessor directives using machine dependent flags (lc, ibm, etc.) mostly removed from the code

File:

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

palm/trunk/SOURCE/pmc_mpi_wrapper.f90

@@ -20 +20 @@
 ! Current revisions:
 ! ------------------
-!
+! MPI module used by default on all machines
 !
 ! Former revisions:
@@ -45 +45 @@
    use, intrinsic :: iso_c_binding
 
-#if defined( __lc )
+#if defined( __mpifh )
+    INCLUDE "mpif.h"
+#else
     USE MPI
-#else
-    INCLUDE "mpif.h"
 #endif
    USE  kinds