aboutsummaryrefslogtreecommitdiffstats
path: root/meson/test cases/fortran/12 submodule/child.f90
blob: dc076ec47ae55a771501c5c22a579711d6ee2d2e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
submodule (parent) parent

contains

module procedure pi2tau
  pi2tau = 2*pi
end procedure pi2tau

module procedure good
print *, 'Good!'
end procedure good

end submodule parent