let rec _Modification_autre nomModule identifiant our_Hash_table =
  match our_Hash_table with
    [] -> ((identifiant, Inconnu),false)
  | Parametre(nomM, id, sonType, _)::liste_restante -> 
      if (nomM = nomModule) && (identifiant = id) 
      then 
        (match sonType with
          Inconnu -> 
            ((identifiant, Inconnu), false)                                                          
        | Constructeur(Construct(nomObj, _)) -> 
            ((identifiant, Objet nomObj),true)
        | Enum([_]) -> 
            ((identifiant, Enum[(Chaine "")]), true)
        | _ ->  
            ((identifiant, sonType),true))
      else  
        _Modification_autre nomModule identifiant liste_restante
          
  | Autre(nomM, id, sonType)::liste_restante ->  
      if (nomM = nomModule) && (identifiant = id) 
      then
        (match sonType with  
          Inconnu -> 
            ((identifiant, Inconnu), false)                                        
        | Constructeur(Construct(nomObj, _)) -> 
            ((identifiant, Objet nomObj), true)
        | Enum([]) -> 
            ((identifiant, Enum[(Chaine "")]), true)
        | _ -> 
            ((identifiant, sonType), true)) 
      else  
        _Modification_autre nomModule identifiant liste_restante