org.eclipse.photran.core.vpg.tests/parser-test-code/reg_tests/bug337623.f90

PROGRAM main

    CALL MySub(5)

END PROGRAM

SUBROUTINE MySub(n)

      implicit           logical (a-z)
      integer            n
      integer            nzloc(n)

END SUBROUTINE