call_sub.f

        subroutine call_sub
          call mysub()
          call my_sub()
        end