double precision taumin
      common/taumin/taumin
      include 'xmin.f'