diff options
author | Hugo Herbelin <Hugo.Herbelin@inria.fr> | 2016-09-24 19:03:25 +0200 |
---|---|---|
committer | Hugo Herbelin <Hugo.Herbelin@inria.fr> | 2016-09-24 19:27:53 +0200 |
commit | f487472a5628fdb43245e782b304705172a1f569 (patch) | |
tree | c748816ff6b3e0a8b7cbab5888731f465120784b /proofs/tacmach.ml | |
parent | 8463f0a3f34aa1ca314bde1f3d19a3895df9dcaa (diff) |
Moving "move" in the new proof engine.
Diffstat (limited to 'proofs/tacmach.ml')
-rw-r--r-- | proofs/tacmach.ml | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/proofs/tacmach.ml b/proofs/tacmach.ml index 50984c48e..b9330ff00 100644 --- a/proofs/tacmach.ml +++ b/proofs/tacmach.ml @@ -121,15 +121,11 @@ let internal_cut_rev_no_check replace id t gl = let refine_no_check c gl = refiner (Refine c) gl -let move_hyp_no_check id1 id2 gl = - refiner (Move (id1,id2)) gl - (* Versions with consistency checks *) let internal_cut b d t = with_check (internal_cut_no_check b d t) let internal_cut_rev b d t = with_check (internal_cut_rev_no_check b d t) let refine c = with_check (refine_no_check c) -let move_hyp id id' = with_check (move_hyp_no_check id id') (* Pretty-printers *) |