let rec _Changer_Type_Param nomModule identifiant hashTable =
  match hashTable with
    [] -> (identifiant, Inconnu)
  | Parametre(nomM, id, sonType, _)::liste_restante -> 
      if nomM = nomModule && id = identifiant 
      then
        (identifiant, sonType)
      else
        _Changer_Type_Param nomModule identifiant liste_restante
  | _::liste_restante -> 
      _Changer_Type_Param nomModule identifiant liste_restante