diff options
| author |  Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr> | 2016-05-16 21:21:42 +0200 |
|---|---|---|
| committer | Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr> | 2016-05-16 21:36:08 +0200 |
| commit | a4bd166bd2119a5290276f0ded44f8186ba1ecee (patch) | |
| tree | a99e711e613edb17d3172a3bbf9f178a6e8a9019 /proofs/tacmach.ml | |
| parent | 1394bab8ba40dd4714e941586109fd88a79ef653 (diff) | |
Put the "cofix" tactic in the monad.
Diffstat (limited to 'proofs/tacmach.ml')
| -rw-r--r-- | proofs/tacmach.ml | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/proofs/tacmach.ml b/proofs/tacmach.ml index 8eb8b2cec..8c0b4ba98 100644 --- a/proofs/tacmach.ml +++ b/proofs/tacmach.ml @@ -124,9 +124,6 @@ let refine_no_check c gl = let move_hyp_no_check id1 id2 gl = refiner (Move (id1,id2)) gl -let mutual_cofix f others j gl = - with_check (refiner (Cofix (f,others,j))) gl - (* Versions with consistency checks *) let internal_cut b d t = with_check (internal_cut_no_check b d t) |