*
* $Id$
*
* $Log$
* Revision 1.1.1.1  1996/04/01 15:02:21  mclareni
* Mathlib gen
*
*
*
* d510si.inc
*
      COMMON/D510SI/Z(2485),G(100),DA(100),ENDFLG,NA,INDFLG(5)
      COMMON/DF/DF(100),/X/X(10)