X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=sidebyside;f=matita%2Fcomponents%2Fng_disambiguation%2FdisambiguateChoices.mli;h=1d98fa3a62a3b50dc70eedcc51bf8fca542c0633;hb=f6b7c6ae353e014761a3d24dbc87e00d828d7f2d;hp=f96d90459f58aa6dfcd84bfe7c0b220d6d6d88b1;hpb=d284dd23d0e12a62a001d3473eadf4942d12ffaa;p=helm.git

diff --git a/matita/components/ng_disambiguation/disambiguateChoices.mli b/matita/components/ng_disambiguation/disambiguateChoices.mli
index f96d90459..1d98fa3a6 100644
--- a/matita/components/ng_disambiguation/disambiguateChoices.mli
+++ b/matita/components/ng_disambiguation/disambiguateChoices.mli
@@ -30,20 +30,12 @@ open DisambiguateTypes
   (** raised by lookup_XXXX below *)
 exception Choice_not_found of string Lazy.t
 
-  (** register a new number choice *)
-val add_num_choice: Cic.term codomain_item -> unit
-
   (** register a new number choice *)
 val nadd_num_choice: NCic.term codomain_item -> unit
 
 (** {2 Choices lookup}
  * for user defined aliases *)
 
-val lookup_num_choices: unit -> Cic.term codomain_item list
-
-  (** @param dsc description (1st component of codomain_item) *)
-val lookup_num_by_dsc: string -> Cic.term codomain_item
-
   (** @param dsc description (1st component of codomain_item) *)
 val nlookup_num_by_dsc: string -> NCic.term codomain_item
 
@@ -53,14 +45,12 @@ val nlookup_num_by_dsc: string -> NCic.term codomain_item
 val lookup_symbol_by_dsc: 
   mk_appl: ('term list -> 'term) ->
   mk_implicit: (bool -> 'term) ->
-  term_of_uri: (UriManager.uri -> 'term) ->
   term_of_nref: (NReference.reference -> 'term) ->
   string -> string -> 'term codomain_item
 
 val mk_choice:
   mk_appl: ('term list -> 'term) ->
   mk_implicit: (bool -> 'term) ->
-  term_of_uri: (UriManager.uri -> 'term) ->
   term_of_nref: (NReference.reference -> 'term) ->
   string * NotationPt.argument_pattern list *
   NotationPt.cic_appl_pattern ->