void trie_rliste(rliste * l)
{
  int lgr = longueur(*l) ; 
  int i, j ;
  float x, y ; 

  for (i=1 ; i<lgr ; i++)
    for (j=lgr ; j > i ; j--) {
      x = element(*l, j) ;
      y = element(*l, j-1) ;
      if (x < y) {
        // echange de x et de y :
        supprimer (l, j-1) ;
        inserer (l, j, y) ;
      }
    }
}