Changeset 2841 for palm/trunk/SOURCE/pmc_particle_interface.f90
- Timestamp:
- Feb 27, 2018 3:02:57 PM (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/pmc_particle_interface.f90
r2809 r2841 26 26 ! -----------------! 27 27 ! $Id$ 28 ! Bugfix: wrong placement of include 'mpif.h' corrected 29 ! 30 ! 2809 2018-02-15 09:55:58Z schwenkel 28 31 ! Bugfix for gfortran: Replace the function C_SIZEOF with STORAGE_SIZE. 29 32 ! … … 40 43 41 44 USE, INTRINSIC :: ISO_C_BINDING 45 46 #if !defined( __mpifh ) 42 47 USE MPI 48 #endif 43 49 44 50 USE kinds … … 92 98 93 99 IMPLICIT NONE 100 101 #if defined( __mpifh ) 102 INCLUDE "mpif.h" 103 #endif 104 94 105 PRIVATE 95 106 SAVE
Note: See TracChangeset
for help on using the changeset viewer.