SUBROUTINE SYSCMD(CMD,ERR)
      INCLUDE 'syspar.d'
C
C     ***UNIX SYSTEM DEPENDENT ROUTINE ***
C
C     EXECUTE A SYSTEM (UNIX shell) COMMAND
C
      CHARACTER*(*) CMD
C
      err = system(cmd)
C
      RETURN
      END