Juan 16/04/2021: modd_precision.f90+Rules.LXifort.mk , for mpiifort/intel-mpi...

Juan 16/04/2021: modd_precision.f90+Rules.LXifort.mk , for mpiifort/intel-mpi add cpp key = -DMNH_NO_MPI_LOGICAL48

src/MNH/modd_precision.f90

@@ -54,8 +54,13 @@ integer, parameter :: MNHREAL128 = selected_real_kind( p = 33, r = 4931 )
 integer, parameter :: MNHINT32_MPI  = MPI_INTEGER4
 integer, parameter :: MNHINT64_MPI  = MPI_INTEGER8
 
+#ifdef MNH_NO_MPI_LOGICAL48
+integer, parameter :: MNHLOG32_MPI  = MPI_LOGICAL
+integer, parameter :: MNHLOG64_MPI  = MPI_LOGICAL
+#else
 integer, parameter :: MNHLOG32_MPI  = MPI_LOGICAL4
 integer, parameter :: MNHLOG64_MPI  = MPI_LOGICAL8
+#endif
 
 integer, parameter :: MNHREAL32_MPI  = MPI_REAL4
 integer, parameter :: MNHREAL64_MPI  = MPI_REAL8

src/Rules.LXifort.mk

@@ -137,13 +137,13 @@ CPPFLAGS_SURCOUCHE += -DMNH_USE_MPI_STATUSES_IGNORE
 endif
 else
 ifeq "$(VER_MPI)" "MPIINTEL"
+CPPFLAGS_SURCOUCHE += -DMNH_USE_MPI_STATUSES_IGNORE -DMNH_NO_MPI_LOGICAL48
 ifneq "$(findstring TAU,$(XYZ))" ""
 F90 = tau_f90.sh 
 export TAU_MAKEFILE?=/home/escj/PATCH/TAU/TAU-2.21.1-IFORT10-OMPI152-THREAD/x86_64/lib/Makefile.tau-mpi
 LIBS += -lz 
 else
 F90 = mpiifort
-CPPFLAGS_SURCOUCHE += -DMNH_USE_MPI_STATUSES_IGNORE
 endif
 ifeq "$(MNH_INT)" "8"
 OPT_BASE         += -ilp64