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

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

File:
1 edited

Legend:

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

    r2812 r2841  
    2525! -----------------
    2626! $Id$
     27! Bugfix: wrong placement of include 'mpif.h' corrected
     28!
     29! 2812 2018-02-16 13:40:25Z hellstea
    2730! Bugfixes in computation of the interpolation loglaw-correction parameters
    2831!
     
    275278
    276279#if defined( __parallel )
    277 #if defined( __mpifh )
    278     INCLUDE "mpif.h"
    279 #else
     280#if !defined( __mpifh )
    280281    USE MPI
    281282#endif
     
    314315
    315316    IMPLICIT NONE
     317
     318#if defined( __parallel )
     319#if defined( __mpifh )
     320    INCLUDE "mpif.h"
     321#endif
     322#endif
    316323
    317324    PRIVATE
Note: See TracChangeset for help on using the changeset viewer.