X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Fng_tactics%2FnTactics.mli;h=142300cc0bb91d30d74ef1381adb53fe0678f02f;hb=a3ee89dab26307ce1cedc8041ede995a97d51446;hp=0605b993ff125785f7b121a4f3ce2b89cfa4ff5a;hpb=ee242468b221c64b25c99b52110fe00380f4eebe;p=helm.git diff --git a/helm/software/components/ng_tactics/nTactics.mli b/helm/software/components/ng_tactics/nTactics.mli index 0605b993f..142300cc0 100644 --- a/helm/software/components/ng_tactics/nTactics.mli +++ b/helm/software/components/ng_tactics/nTactics.mli @@ -41,11 +41,16 @@ val rewrite_tac: 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 ] -> +val reduce_tac: + reduction:[ `Normalize of bool | `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 +val auto_tac: + params:'a -> NTacStatus.tactic