1! { dg-do compile }
2! { dg-options "-fcoarray=single" }
3
4! To be used by coarray_29_2.f90
5! PR fortran/55272
6
7module co_sum_module
8  implicit none
9contains
10  subroutine co_sum(scalar)
11    integer scalar[*]
12  end subroutine
13end module
14