X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Fng_tactics%2FnTactics.mli;h=b558b4c9b48cae4e627c2687d265e4c42eff6979;hb=6bd0d331d096d862754b42f9a7fb8af1b823685d;hp=0b805d22bdbc40f7e1b43bcdb58909835843e3da;hpb=d58b48162ad53fb369d285e60a99f746a497ad89;p=helm.git diff --git a/helm/software/components/ng_tactics/nTactics.mli b/helm/software/components/ng_tactics/nTactics.mli index 0b805d22b..b558b4c9b 100644 --- a/helm/software/components/ng_tactics/nTactics.mli +++ b/helm/software/components/ng_tactics/nTactics.mli @@ -40,3 +40,14 @@ val rewrite_tac: dir:[ `LeftToRight | `RightToLeft ] -> what:NTacStatus.tactic_term -> where:NTacStatus.tactic_pattern -> NTacStatus.tactic +val generalize_tac : where:NTacStatus.tactic_pattern -> NTacStatus.tactic +val eval_tac: + reduction:[ `Whd of bool ] -> + where:NTacStatus.tactic_pattern -> NTacStatus.tactic +val letin_tac: + where:NTacStatus.tactic_pattern -> + what: NTacStatus.tactic_term -> + string -> NTacStatus.tactic +val assert_tac: + ((string * [`Decl of NTacStatus.tactic_term | `Def of NTacStatus.tactic_term * NTacStatus.tactic_term]) list * NTacStatus.tactic_term) list -> + NTacStatus.tactic