blob: bbbc2b047c4708205984cd5a92def59f63f5c399 (
plain)
1
2
3
4
5
6
7
8
9
10
11
|
open Tacmach
open Term
(* Rewriting rules *)
type rew_rule = constr * bool * tactic
(* To add rewriting rules to a base *)
val add_rew_rules : string -> rew_rule list -> unit
(* The AutoRewrite tactic *)
val autorewrite : tactic -> string list -> tactic
|