let rec _Attribution_Arbre_Param nomModule liste_parametre hashTable =
  match liste_parametre with
    [] -> []
  | (identifiant, Inconnu)::liste_restante -> 
      (_Changer_Type_Param nomModule identifiant hashTable)
      ::(_Attribution_Arbre_Param nomModule liste_restante hashTable)
  | _ -> raise Cas_impossible