Moved coarray conditional preprocessor statement to above a coarray d…

…eclaration
MintonGroup · Apr 14, 2023 · 042a882 · 042a882
1 parent be4985c
commit 042a882
Showing 1 changed file with 1 addition and 1 deletion.
diff --git 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)