diff --git a/src/initialize.F90 b/src/initialize.F90
index 5b7cc8c063..52853f72ff 100644
--- a/src/initialize.F90
+++ b/src/initialize.F90
@@ -201,7 +201,7 @@ contains
 
   subroutine initialize_mpi()
 
-    integer                   :: bank_blocks(6)   ! Count for each datatype
+    integer                   :: bank_blocks(5)   ! Count for each datatype
 #ifdef MPIF08
     type(MPI_Datatype)        :: bank_types(5)
     type(MPI_Datatype)        :: result_types(1)