C                                           *--> FROM COMMON.FLAS26
      COMMON/FLAS26/BGNGAT,COEF,DISTLG,DISTSM,GATMAX,GOFLSH,NELSOH,
     $NELVFL,NELVLG,NELVSM,NFAL,NFUTUR,NGASOH,NGATE,NLGDN,NLGSOH,NOSTEP,
     $NPOSOH,NRIS,NSIGEL,NSMDN,NSMSOH,NUMLG,NUMSM,PCTERF
      LOGICAL GOFLSH
C