      SUBROUTINE mets2dfond(iopt)
      INCLUDE 'Parametres.f'
      i2dfond = iopt
      end
