Bug #349 ยป ppm_std_type_kinds_mp.f90-missing-include-non-MPI.patch
| src/core/ppm_std_type_kinds_mp.f90 | ||
|---|---|---|
|
! SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
||
|
!
|
||
|
MODULE ppm_std_type_kinds_mp
|
||
|
#ifdef USE_MPI
|
||
|
#include "mpi_fc_conf.inc"
|
||
|
#endif
|
||
|
USE ppm_base, ONLY: abort_ppm
|
||
|
#ifndef HAVE_MPI_INTEGER4
|
||
|
USE ppm_std_type_kinds, ONLY: pi4
|
||