C                                           *--> FROM COMMON.FCIOBF
      COMMON/FCIOBF/MZZBUF,ZZZBUF(100)
C