X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fcomponents%2Fng_disambiguation%2FnCicDisambiguate.mli;h=715be6a85993b5881c5d3d31f8af87ac14eb3fc4;hb=894d518aa760c9f816ddb0dc2b3fa88e1fe20a94;hp=d28708e3a533565276449683e61bc6be95ad308c;hpb=2c01ff6094173915e7023076ea48b5804dca7778;p=helm.git diff --git a/matita/components/ng_disambiguation/nCicDisambiguate.mli b/matita/components/ng_disambiguation/nCicDisambiguate.mli index d28708e3a..715be6a85 100644 --- a/matita/components/ng_disambiguation/nCicDisambiguate.mli +++ b/matita/components/ng_disambiguation/nCicDisambiguate.mli @@ -11,9 +11,8 @@ (* $Id: nCic.ml 9058 2008-10-13 17:42:30Z tassi $ *) -val set_reference_of_oxuri: (UriManager.uri -> NReference.reference) -> unit - val disambiguate_term : + #NCicCoercion.status -> context:NCic.context -> metasenv:NCic.metasenv -> subst:NCic.substitution -> @@ -24,13 +23,12 @@ val disambiguate_term : mk_choice:('alias -> NCic.term DisambiguateTypes.codomain_item) -> aliases:'alias DisambiguateTypes.Environment.t -> universe:'alias list DisambiguateTypes.Environment.t option -> - rdb:#NRstatus.status -> lookup_in_library:( DisambiguateTypes.interactive_user_uri_choice_type -> DisambiguateTypes.input_or_locate_uri_type -> DisambiguateTypes.Environment.key -> 'alias list) -> - CicNotationPt.term Disambiguate.disambiguator_input -> + NotationPt.term Disambiguate.disambiguator_input -> ((DisambiguateTypes.domain_item * 'alias) list * NCic.metasenv * NCic.substitution * @@ -38,23 +36,22 @@ val disambiguate_term : bool val disambiguate_obj : + #NCicCoercion.status -> mk_implicit:(bool -> 'alias) -> description_of_alias:('alias -> string) -> fix_instance:(DisambiguateTypes.domain_item -> 'alias list -> 'alias list) -> mk_choice:('alias -> NCic.term DisambiguateTypes.codomain_item) -> aliases:'alias DisambiguateTypes.Environment.t -> universe:'alias list DisambiguateTypes.Environment.t option -> - rdb:#NRstatus.status -> lookup_in_library:( DisambiguateTypes.interactive_user_uri_choice_type -> DisambiguateTypes.input_or_locate_uri_type -> DisambiguateTypes.Environment.key -> 'alias list) -> uri:NUri.uri -> - string * int * CicNotationPt.term CicNotationPt.obj -> + string * int * NotationPt.term NotationPt.obj -> ((DisambiguateTypes.Environment.key * 'alias) list * NCic.metasenv * NCic.substitution * NCic.obj) list * bool -val disambiguate_path: CicNotationPt.term -> NCic.term - +val disambiguate_path: #NCic.status -> NotationPt.term -> NCic.term