2 ! A public subroutine can have private-type, dummy arguments
3 ! in Fortran 2003 (but not in Fortran 95).
4 ! See private_type_1.f90 for the F95 test.
14 subroutine dummysub(size
, arg_array
)
15 type(intwrapper
) :: size
16 real, dimension(size
%n
) :: arg_array
17 real :: local_array(4)
18 end subroutine dummysub