crp/OpenMC
1
0
Fork 0
mirror of https://github.com/openmc-dev/openmc.git synced 2026-07-28 22:26:08 -04:00
Code Issues Projects Releases Packages Wiki Activity Actions 5

Think I fixed the mpi problems; #2

Browse source
This commit is contained in:
Adam Nelson 2016-02-22 21:43:03 -05:00
parent 095f3e0510
commit 3aa332e8d2
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/initialize.F90
View file

@ -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)