Changeset 4232 for palm/trunk/SOURCE/lagrangian_particle_model_mod.f90

Timestamp:

Sep 20, 2019 9:34:22 AM (5 years ago)

Author:

knoop

Message:

Bugfix: wrong placement of INCLUDE "mpif.h" fixed.

File:

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

palm/trunk/SOURCE/lagrangian_particle_model_mod.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! Removed INCLUDE "mpif.h", as it is not needed because of USE pegrid
+! 
+! 4195 2019-08-28 13:44:27Z schwenkel
 ! Bugfix for simple_corrector interpolation method in case of ocean runs and
 ! output particle advection interpolation method into header
@@ -168 +171 @@
     USE MPI
 #endif
-
-#if defined( __parallel )  &&  defined( __mpifh )
-    INCLUDE "mpif.h"
-#endif      
 
 #if defined( __netcdf )