
      INTEGER IDIff , IDOubd , IFLagd , ISIngd
 
 
      COMMON /DTFLG3/ ISIngd , IDOubd , IFLagd , IDIff
