      SUBROUTINE GSQMIX(I)
      INCLUDE 'Parametres.f'
      i = imix_courant
      END
