diff --git a/src/polychord/generate.F90 b/src/polychord/generate.F90 index 78fbed26..092dd3b7 100644 --- a/src/polychord/generate.F90 +++ b/src/polychord/generate.F90 @@ -69,7 +69,7 @@ subroutine GenerateLivePoints(loglikelihood,prior,settings,RTI,mpi_information) use array_module, only: add_point use abort_module #ifdef MPI - use mpi_module, only: mpi_bundle,is_root,linear_mode,throw_point,catch_point,more_points_needed,sum_integers,sum_doubles,request_point,no_more_points,scatter_points,gather_points + use mpi_module, only: mpi_bundle,is_root,linear_mode,sum_integers,sum_doubles,scatter_points,gather_points #else use mpi_module, only: mpi_bundle,is_root,linear_mode #endif