summaryrefslogtreecommitdiffstats
path: root/Tests/FortranModules/Submodules/main.f90
blob: 3c750ce38b79424736a568b910502fdc7afb8465 (plain)
1
2
3
4
5
program main
  use parent, only : child_function,grandchild_subroutine
  implicit none
  if (child_function()) call grandchild_subroutine
end program