diff --git a/src/swiftest/swiftest_io.f90 b/src/swiftest/swiftest_io.f90 index 1cf6f93e7..71ba57b7f 100644 --- a/src/swiftest/swiftest_io.f90 +++ b/src/swiftest/swiftest_io.f90 @@ -1882,9 +1882,9 @@ module subroutine swiftest_io_param_reader(self, unit, iotype, v_list, iostat, i logical :: seed_set = .false. !! Is the random seed set in the input file? character(len=:), allocatable :: integrator real(DP) :: tratio, y +#ifdef COARRAY type(swiftest_parameters), codimension[*], save :: coparam -#ifdef COARRAY if (this_image() == 1) then coparam = self associate(param => coparam)