module m_sub2 contains subroutine sub2() implicit none print *,'Sub2' end subroutine sub2 end module m_sub2