Ignore:
Timestamp:
Feb 27, 2018 3:02:57 PM (3 years ago)
Author:
knoop
Message:

Bugfix: wrong placement of include 'mpif.h' corrected

File:
1 edited

Legend:

Unmodified
Added
Removed
  • palm/trunk/SOURCE/pmc_general_mod.f90

    r2801 r2841  
    2626! -----------------
    2727! $Id$
     28! Bugfix: wrong placement of include 'mpif.h' corrected
     29!
     30! 2801 2018-02-14 16:01:55Z thiele
    2831! Introduce particle transfer in nested models.
    2932!
     
    8083    USE kinds
    8184
     85#if !defined( __mpifh )
     86    USE MPI
     87#endif
     88
     89    IMPLICIT NONE
     90
    8291#if defined( __mpifh )
    8392    INCLUDE "mpif.h"
    84 #else
    85     USE MPI
    8693#endif
    87 
    88     IMPLICIT NONE
    8994
    9095    PRIVATE
Note: See TracChangeset for help on using the changeset viewer.