aboutsummaryrefslogtreecommitdiff
path: root/src/getarg.f
blob: 815179e2f0dc0521594be66a9c142c6457105c05 (plain)
1
2
3
4
5
6
7
8
9

      SUBROUTINE GETARG(K,ARG)
      CHARACTER*(*) ARG
C
      CALL GETARG_(K,ARG)
C
      RETURN
      END