Fix definition of MPINTLONG

william-dawson · Apr 2, 2024 · a1f30af · a1f30af
1 parent b1ca2f5
commit a1f30af
Showing 1 changed file with 1 addition and 1 deletion.
diff --git 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