Tests/FortranModules/Submodules/main.f90

   1 program main
   2   use parent, only : child_function,grandchild_subroutine
   3   use parent, only : sibling_function,GreatGrandChild_subroutine
   4   ! Using a module without postfix
   5   use obfuscated_parent
   6   implicit none
   7   if (child_function())     call grandchild_subroutine
   8   if (sibling_function())   call GreatGrandChild_subroutine
   9   if (child_function_obf()) call grandchild_subroutine_obf
  10 end program