3 subroutine alloc(coarray_alloc, coarray_not_alloc, t2_not_alloc, &  subroutine
13     integer, allocatable :: alloc(:)  component
18     real, allocatable :: coarray_alloc[:]  argument
23   integer :: not_alloc(100)  argument
24   real, allocatable :: x_alloc  argument
25   character(:), allocatable :: char_alloc(:)  argument
26   type(t1) :: dt_not_alloc(100)  argument
27   type(t1), allocatable :: dt_alloc(:)  argument
29   real, allocatable :: coarray_alloc[:, :]  argument
30   real, allocatable :: coarray_alloc_array(:)[:, :]  argument
31   real :: coarray_not_alloc(:)[*]  argument
33   type(t2) :: t2_not_alloc  argument
34   real, allocatable :: assumedRank(..)  argument