From 9c4fdb1e58395efcd89924f8eae099766214b989 Mon Sep 17 00:00:00 2001 From: JUan ESCOBAR <juan.escobar@aero.obs-mip.fr> Date: Fri, 16 Oct 2020 15:04:41 +0200 Subject: [PATCH] Juan 16/10/2020:modd_precision.f90 , non standard MPI_LOGICAL4/MPI_LOGICAL8 -> MPI_LOGICAL , to be done correctly for integer*8 compilation --- src/MNH/modd_precision.f90 | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/MNH/modd_precision.f90 b/src/MNH/modd_precision.f90 index b7cec6c0e..8999304fd 100644 --- a/src/MNH/modd_precision.f90 +++ b/src/MNH/modd_precision.f90 @@ -53,8 +53,8 @@ integer, parameter :: MNHREAL128 = selected_real_kind( p = 33, r = 4931 ) integer, parameter :: MNHINT32_MPI = MPI_INTEGER4 integer, parameter :: MNHINT64_MPI = MPI_INTEGER8 -integer, parameter :: MNHLOG32_MPI = MPI_LOGICAL4 -integer, parameter :: MNHLOG64_MPI = MPI_LOGICAL8 +integer, parameter :: MNHLOG32_MPI = MPI_LOGICAL +integer, parameter :: MNHLOG64_MPI = MPI_LOGICAL integer, parameter :: MNHREAL32_MPI = MPI_REAL4 integer, parameter :: MNHREAL64_MPI = MPI_REAL8 -- GitLab