X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Ftactics%2Fauto.mli;h=57bb26b60ca52a5e2ad6d7f2118fd4fbfc58c16c;hb=36809208fa25a494e50004b321fa9a90108ae262;hp=6e64fb66eee33a638bb9339f43650f45cd850023;hpb=61f3a8a688132be943b81befa5805e27148f2038;p=helm.git diff --git a/helm/software/components/tactics/auto.mli b/helm/software/components/tactics/auto.mli index 6e64fb66e..57bb26b60 100644 --- a/helm/software/components/tactics/auto.mli +++ b/helm/software/components/tactics/auto.mli @@ -25,10 +25,36 @@ (* stops at the first solution *) val auto_tac: - dbd:HMysql.dbd -> params:(string * string) list -> ProofEngineTypes.tactic + dbd:HSql.dbd -> + params:(string * string) list -> + universe:Universe.universe -> + ProofEngineTypes.tactic val applyS_tac: - dbd:HMysql.dbd -> term: Cic.term -> params:(string * string) list -> + dbd:HSql.dbd -> + term: Cic.term -> + params:(string * string) list -> + universe:Universe.universe -> + ProofEngineTypes.tactic + +val demodulate_tac : + dbd:HSql.dbd -> + universe:Universe.universe -> ProofEngineTypes.tactic -val demodulate_tac : dbd:HMysql.dbd -> ProofEngineTypes.tactic +type auto_status = + Cic.context * (int * Cic.term * bool * int * (int * Cic.term) list) list * + (int * Cic.term * int) list * + Cic.term list +val get_auto_status : unit -> auto_status +val pause: bool -> unit +val step : unit -> unit +val give_hint : int -> unit +val give_prune_hint : int -> unit + +val lambda_close : + ?prefix_name:string -> Cic.term -> Cic.metasenv -> Cic.context -> Cic.term + +val pp_proofterm: Cic.term -> string +val revision : string (* svn revision *) +val size_and_depth : Cic.context -> Cic.metasenv -> Cic.term -> int * int