common /mlis3_rl/ tesf,tesd,fa,fpa,fn,barmin,barmul,barmax,barr
      double precision tesf,tesd,fa,fpa,fn,barmin,barmul,barmax,barr