summaryrefslogtreecommitdiffstats
path: root/test cases/fortran/12 submodule/a2.f90
blob: ba8a0dd2a2c42b314e09294b793fa4e1cf66ae89 (plain)
1
2
3
4
5
6
7
8
9
10
! testing no space between submodule()
submodule(a1) a2

contains

module procedure pi2tau
  pi2tau = 2*pi
end procedure pi2tau

end submodule a2