From a1f30af17c97dd7cfab60fd281abd2e3f1c2831c Mon Sep 17 00:00:00 2001 From: William Dawson Date: Tue, 2 Apr 2024 13:12:19 +0900 Subject: [PATCH] Fix definition of MPINTLONG --- Source/Fortran/DataTypesModule.F90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Source/Fortran/DataTypesModule.F90 b/Source/Fortran/DataTypesModule.F90 index e819c3ed..b32e6971 100644 --- a/Source/Fortran/DataTypesModule.F90 +++ b/Source/Fortran/DataTypesModule.F90 @@ -19,6 +19,6 @@ MODULE DataTypesModule !> MPI Integer type we will use in this program. INTEGER, PARAMETER, PUBLIC :: MPINTINTEGER = MPI_INTEGER !> MPI Integer type we will use in this program. - INTEGER, PARAMETER, PUBLIC :: MPINTLONG = MPI_INTEGER8 + INTEGER, PARAMETER, PUBLIC :: MPINTLONG = MPI_INTEGER4 !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! END MODULE DataTypesModule