COMMON /OUTFIL/ OUTFIL
      CHARACTER*20    OUTFIL
      COMMON /OUTLEN/ LOUTF