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

making sure broadcast is commented out.

Browse source
This commit is contained in:
Jose Salcedo Perez 2018-04-12 19:06:50 +00:00
parent f704a8a240
commit 6db7cc2977
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/simulation.F90
View file

@ -514,7 +514,7 @@ contains
!n = size(results, 3)
!count_per_filter = size(results, 1) * size(results, 2)
!call MPI_TYPE_CONTIGUOUS(count_per_filter, MPI_DOUBLE, &
! result_block, mpi_err)
! result_block, mpi_err)
!call MPI_TYPE_COMMIT(result_block, mpi_err)
!call MPI_BCAST(results, n, result_block, 0, mpi_intracomm, mpi_err)
!call MPI_TYPE_FREE(result_block, mpi_err)