]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/components/grafite_engine/grafiteEngine.mli
fix queries
[helm.git] / matita / components / grafite_engine / grafiteEngine.mli
index 921718611f0016b9de8c1e43c082a54859c949bb..334488dd396c72d7618285b087da65748b04b6c8 100644 (file)
@@ -32,12 +32,11 @@ type 'a disambiguator_input = string * int * 'a
 val eval_ast :
   disambiguate_command:
    (GrafiteTypes.status ->
-    (GrafiteAst.command) disambiguator_input ->
+    GrafiteAst.command disambiguator_input ->
     GrafiteTypes.status * GrafiteAst.command) ->
 
   ?do_heavy_checks:bool ->
   GrafiteTypes.status ->
-  (('term, 'lazy_term, 'reduction, 'obj, 'ident) GrafiteAst.statement)
-  disambiguator_input ->
+  GrafiteAst.statement disambiguator_input ->
    (* the new status and generated objects, if any *)
    GrafiteTypes.status * [`Old of UriManager.uri list | `New of NUri.uri list]