subroutine Dummy()
c
c***********************************************************************
c     Dummy is a dummy routine (as the name says). It is used as a
c     place holder and should not be actually called. It sugests an
c     error input on the caller routine when dummy is called
c***********************************************************************
c
      implicit none
c
c***********************************************************************
c
      stop 'Error: Dummy routine being called'
c
      return
      end