!*******************************************************************************
!$RCSfile$
!$Revision$
!$Date$
!*******************************************************************************
MODULE state_fd

  INTEGER, PARAMETER :: HSB_BUSY        =  0
  INTEGER, PARAMETER :: HSB_RUN         =  1
  INTEGER, PARAMETER :: HSB_STEP        =  2
  INTEGER, PARAMETER :: HSB_LOAD        =  3
  INTEGER, PARAMETER :: HSB_PBOX        = 14
  INTEGER, PARAMETER :: HSB_SYNC        = 15
  INTEGER, PARAMETER :: HSB_WAIT        = 16

  INTEGER, PARAMETER :: HS_IDLE        =  0
  INTEGER, PARAMETER :: HS_BUSY        =  2**HSB_BUSY
  INTEGER, PARAMETER :: HS_RUN         =  2**HSB_RUN
  INTEGER, PARAMETER :: HS_STEP        =  2**HSB_STEP
  INTEGER, PARAMETER :: HS_LOAD        =  2**HSB_LOAD
  INTEGER, PARAMETER :: HS_PBOX        =  2**HSB_PBOX
  INTEGER, PARAMETER :: HS_SYNC        =  2**HSB_SYNC
  INTEGER, PARAMETER :: HS_WAIT        =  2**HSB_WAIT

  INTEGER, PARAMETER :: HS_ANYSTATE    =  1
  INTEGER, PARAMETER :: HS_IDLESTATE   =  2
  INTEGER, PARAMETER :: HS_WAITSTATE   =  3
  INTEGER, PARAMETER :: HS_RUNSTATE    =  4
  INTEGER, PARAMETER :: HS_SYNCSTATE   =  5
  INTEGER, PARAMETER :: HS_IDLEWAIT    =  6
  INTEGER, PARAMETER :: HS_IDLERUN     =  7
  INTEGER, PARAMETER :: HS_IDLESYNC    =  8
  INTEGER, PARAMETER :: HS_IDLEBUSY    =  9
  INTEGER, PARAMETER :: HS_SINGLESTEP  =  10
  INTEGER, PARAMETER :: HS_LOADSYNC    =  11

  INTEGER, PARAMETER :: ID_SCIPTOOL    =  -282503916

END MODULE state_fd
