diff options
| author | Jim Fehrle | 2021-01-19 10:34:22 -0800 |
|---|---|---|
| committer | Jim Fehrle | 2021-01-19 13:06:08 -0800 |
| commit | 4fffbe45f42517fbe41fbcf4bf77bfa72fff2579 (patch) | |
| tree | 15d1f73403e32d25322f43595eacc04fa12f26ea /tactics | |
| parent | f44e65e0d209fdada20998d661ad10a5e82a0d92 (diff) | |
Remove convert_concl_no_check
Diffstat (limited to 'tactics')
| -rw-r--r-- | tactics/tactics.ml | 3 | ||||
| -rw-r--r-- | tactics/tactics.mli | 4 |
2 files changed, 0 insertions, 7 deletions
diff --git a/tactics/tactics.ml b/tactics/tactics.ml index b40bdbc25e..3c51b0fe40 100644 --- a/tactics/tactics.ml +++ b/tactics/tactics.ml @@ -156,9 +156,6 @@ let convert_hyp ~check ~reorder d = end end -let convert_concl_no_check = convert_concl ~check:false -let convert_hyp_no_check = convert_hyp ~check:false ~reorder:false - let convert_gen pb x y = Proofview.Goal.enter begin fun gl -> match Tacmach.New.pf_apply (Reductionops.infer_conv ~pb) gl x y with diff --git a/tactics/tactics.mli b/tactics/tactics.mli index a6471be549..d93f3bc434 100644 --- a/tactics/tactics.mli +++ b/tactics/tactics.mli @@ -35,10 +35,6 @@ val is_quantified_hypothesis : Id.t -> Proofview.Goal.t -> bool val introduction : Id.t -> unit Proofview.tactic val convert_concl : check:bool -> types -> cast_kind -> unit Proofview.tactic val convert_hyp : check:bool -> reorder:bool -> named_declaration -> unit Proofview.tactic -val convert_concl_no_check : types -> cast_kind -> unit Proofview.tactic -[@@ocaml.deprecated "use [Tactics.convert_concl]"] -val convert_hyp_no_check : named_declaration -> unit Proofview.tactic -[@@ocaml.deprecated "use [Tactics.convert_hyp]"] val mutual_fix : Id.t -> int -> (Id.t * int * constr) list -> int -> unit Proofview.tactic val fix : Id.t -> int -> unit Proofview.tactic |