From 0bd1ddd569f944b300549911ea9235f52abcae95 Mon Sep 17 00:00:00 2001 From: Paul Romano Date: Wed, 16 Nov 2016 09:16:03 -0600 Subject: [PATCH] Add back 'end subroutine' that was accidentally deleted --- src/initialize.F90 | 2 ++ 1 file changed, 2 insertions(+) diff --git a/src/initialize.F90 b/src/initialize.F90 index d51f9ef8eb..692319acb8 100644 --- a/src/initialize.F90 +++ b/src/initialize.F90 @@ -211,6 +211,8 @@ contains call MPI_TYPE_CREATE_STRUCT(5, bank_blocks, bank_disp, & bank_types, MPI_BANK, mpi_err) call MPI_TYPE_COMMIT(MPI_BANK, mpi_err) + + end subroutine initialize_mpi #endif !===============================================================================