C     ---------------------------------------
C
C     General buffer for subroutines to use
      PARAMETER (NGBUFF=200)
      COMMON /ZDSSBF/ IGBUFF(NGBUFF)
C     INTEGER*6 IGBUFF                                                  H
      INTEGER*4 IGBUFF                                                  ML
C
C     ---------------------------------------
