let rec _Traitement_Enum nomModule identifiant our_Hash_table =
  match our_Hash_table with
    [] -> 
      ((identifiant, Inconnu), false)
  | Autre(nomM, _, Enum(arguments))
    ::liste_restante -> 
      if nomModule = nomM 
      then
        let _type, modification = _Parcours_Enum arguments identifiant
        in
        ((identifiant, _type), modification)
      else
        _Traitement_Enum nomModule identifiant liste_restante
  | _::liste_restante -> 
      _Traitement_Enum nomModule identifiant liste_restante