type term = CicAst.term
type tactic = (term, string) TacticAst.tactic
-type tactical = (term, string) TacticAst.tactic TacticAst.tactical
-type command = term CommandAst.command
-type script = term CommandAst.Script.script
+type tactical = (term, string) TacticAst.tactical
type domain_item =
| Id of string (* literal *)