aboutsummaryrefslogtreecommitdiff
path: root/translate/pptacticnew.ml
diff options
context:
space:
mode:
Diffstat (limited to 'translate/pptacticnew.ml')
-rw-r--r--translate/pptacticnew.ml4
1 files changed, 2 insertions, 2 deletions
diff --git a/translate/pptacticnew.ml b/translate/pptacticnew.ml
index 491076b0be..72d4a56082 100644
--- a/translate/pptacticnew.ml
+++ b/translate/pptacticnew.ml
@@ -492,13 +492,13 @@ and pr_atom1 env = function
pr_clauses pr_ident cls))
(* Derived basic tactics *)
| TacSimpleInduction h ->
- hov 1 (str "simple_induction" ++ pr_arg pr_quantified_hypothesis h)
+ hov 1 (str "simple induction" ++ pr_arg pr_quantified_hypothesis h)
| TacNewInduction (h,e,ids) ->
hov 1 (str "induction" ++ spc () ++
pr_induction_arg (pr_constr env) h ++ pr_with_names ids ++
pr_opt (pr_eliminator env) e)
| TacSimpleDestruct h ->
- hov 1 (str "simple_destruct" ++ pr_arg pr_quantified_hypothesis h)
+ hov 1 (str "simple destruct" ++ pr_arg pr_quantified_hypothesis h)
| TacNewDestruct (h,e,ids) ->
hov 1 (str "destruct" ++ spc () ++
pr_induction_arg (pr_constr env) h ++ pr_with_names ids ++