2 ||M|| This file is part of HELM, an Hypertextual, Electronic
3 ||A|| Library of Mathematics, developed at the Computer Science
4 ||T|| Department, University of Bologna, Italy.
6 ||T|| HELM is free software; you can redistribute it and/or
7 ||A|| modify it under the terms of the GNU General Public License
8 \ / version 2 or (at your option) any later version.
9 \ / This software is distributed as is, NO WARRANTY.
10 V_______________________________________________________________ *)
12 (* $Id: nCic.ml 9058 2008-10-13 17:42:30Z tassi $ *)
14 val disambiguate_term :
15 context:NCic.context ->
16 metasenv:NCic.metasenv ->
17 subst:NCic.substitution ->
19 mk_implicit: (bool -> 'alias) ->
20 description_of_alias:('alias -> string) ->
21 mk_choice:('alias -> NCic.term DisambiguateTypes.codomain_item) ->
22 aliases:'alias DisambiguateTypes.Environment.t ->
23 universe:'alias list DisambiguateTypes.Environment.t option ->
24 coercion_db:NCicCoercion.db ->
26 DisambiguateTypes.interactive_user_uri_choice_type ->
27 DisambiguateTypes.input_or_locate_uri_type ->
28 DisambiguateTypes.Environment.key ->
30 CicNotationPt.term Disambiguate.disambiguator_input ->
31 ((DisambiguateTypes.domain_item * 'alias) list *