Universes speedup:

[helm.git] / helm / ocaml / tactics / tactics.mli

diff --git a/helm/ocaml/tactics/tactics.mli b/helm/ocaml/tactics/tactics.mli
index 9d5bc475398251f61a38a77ba1930a50138cbe9a..c8c225cddd2ae8a8015f8d3b241aecffa23c635b 100644 (file)
--- a/helm/ocaml/tactics/tactics.mli
+++ b/helm/ocaml/tactics/tactics.mli
@@ -9,7 +9,7 @@ val auto :
   ?full:string -> dbd:HMysql.dbd -> unit -> ProofEngineTypes.tactic
 val change :
   pattern:ProofEngineTypes.lazy_pattern ->
-  ProofEngineTypes.lazy_term -> ProofEngineTypes.tactic
+  Cic.lazy_term -> ProofEngineTypes.tactic
 val clear : hyp:string -> ProofEngineTypes.tactic
 val clearbody : hyp:string -> ProofEngineTypes.tactic
 val compare : term:Cic.term -> ProofEngineTypes.tactic
@@ -23,6 +23,9 @@ val decompose :
   ?mk_fresh_name_callback:ProofEngineTypes.mk_fresh_name_type ->
   ?user_types:(UriManager.uri * int) list ->
   dbd:HMysql.dbd -> string -> ProofEngineTypes.tactic
+val demodulate :
+  dbd:HMysql.dbd ->
+  pattern:ProofEngineTypes.lazy_pattern -> ProofEngineTypes.tactic
 val discriminate : term:Cic.term -> ProofEngineTypes.tactic
 val elim_intros :
   ?mk_fresh_name_callback:ProofEngineTypes.mk_fresh_name_type ->
@@ -38,7 +41,7 @@ val exists : ProofEngineTypes.tactic
 val fail : ProofEngineTypes.tactic
 val fold :
   reduction:ProofEngineTypes.lazy_reduction ->
-  term:ProofEngineTypes.lazy_term ->
+  term:Cic.lazy_term ->
   pattern:ProofEngineTypes.lazy_pattern -> ProofEngineTypes.tactic
 val fourier : ProofEngineTypes.tactic
 val fwd_simpl :
@@ -53,6 +56,7 @@ val intros :
   ?howmany:int ->
   ?mk_fresh_name_callback:ProofEngineTypes.mk_fresh_name_type ->
   unit -> ProofEngineTypes.tactic
+val inversion : term:Cic.term -> ProofEngineTypes.tactic
 val lapply :
   ?mk_fresh_name_callback:ProofEngineTypes.mk_fresh_name_type ->
   ?how_many:int ->
@@ -67,7 +71,7 @@ val reduce : pattern:ProofEngineTypes.lazy_pattern -> ProofEngineTypes.tactic
 val reflexivity : ProofEngineTypes.tactic
 val replace :
   pattern:ProofEngineTypes.lazy_pattern ->
-  with_what:ProofEngineTypes.lazy_term -> ProofEngineTypes.tactic
+  with_what:Cic.lazy_term -> ProofEngineTypes.tactic
 val rewrite :
   direction:[ `LeftToRight | `RightToLeft ] ->
   pattern:ProofEngineTypes.lazy_pattern ->
@@ -84,6 +88,6 @@ val split : ProofEngineTypes.tactic
 val symmetry : ProofEngineTypes.tactic
 val transitivity : term:Cic.term -> ProofEngineTypes.tactic
 val unfold :
-  ProofEngineTypes.lazy_term option ->
+  Cic.lazy_term option ->
   pattern:ProofEngineTypes.lazy_pattern -> ProofEngineTypes.tactic
 val whd : pattern:ProofEngineTypes.lazy_pattern -> ProofEngineTypes.tactic