From cb076c8e4fa81b45e09de37be41362cf17c1d1c9 Mon Sep 17 00:00:00 2001 From: Paul Romano Date: Sat, 3 Feb 2018 12:38:01 -0600 Subject: [PATCH] Update ifdef for MPI F08 --- src/simulation.F90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/simulation.F90 b/src/simulation.F90 index faf3c4016..424c55e9b 100644 --- a/src/simulation.F90 +++ b/src/simulation.F90 @@ -475,7 +475,7 @@ contains integer :: count_per_filter ! number of result values for one filter bin integer(8) :: temp real(8) :: tempr(3) ! temporary array for communication -#ifdef MPIF08 +#ifdef OPENMC_MPIF08 type(MPI_Datatype) :: result_block #else integer :: result_block