let rec _Suppression_Doublon_HashTable hashTable =
  match hashTable with
    [] -> []
  | cet_element::liste_restante -> 
      if (_Existe_Deja_Dans_HashTable cet_element liste_restante) = true
      then
        (_Suppression_Doublon_HashTable liste_restante)
      else
        cet_element
        ::(_Suppression_Doublon_HashTable liste_restante)