diff options
| author |  Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr> | 2014-04-22 15:31:12 +0200 |
|---|---|---|
| committer | Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr> | 2014-04-23 12:09:14 +0200 |
| commit | 74ddca99c649f2f8c203582a9b82bddf64fb6b52 (patch) | |
| tree | f23aa6340c2630619864666ef5eed257d3d765d9 /tactics/tacticals.mli | |
| parent | d23c7539887366202bc370d0f80c26a557486e1c (diff) | |
Removing dead code, thanks to new OCaml warnings and a bit of scripting.
Diffstat (limited to 'tactics/tacticals.mli')
| -rw-r--r-- | tactics/tacticals.mli | 6 |
1 files changed, 0 insertions, 6 deletions
diff --git a/tactics/tacticals.mli b/tactics/tacticals.mli index 2944ff690..fcc23df22 100644 --- a/tactics/tacticals.mli +++ b/tactics/tacticals.mli @@ -58,8 +58,6 @@ val tclIFTHENSELSE : tactic -> tactic list -> tactic -> tactic val tclIFTHENSVELSE : tactic -> tactic array -> tactic -> tactic val tclIFTHENTRYELSEMUST : tactic -> tactic -> tactic -val tclFIRST_PROGRESS_ON : ('a -> tactic) -> 'a list -> tactic - (** {6 Tacticals applying to hypotheses } *) val onNthHypId : int -> (Id.t -> tactic) -> tactic @@ -94,9 +92,6 @@ val onHyps : (goal sigma -> named_context) -> goal; in particular, it can abstractly refer to the set of hypotheses independently of the effective contents of the current goal *) -val tryAllHyps : (Id.t -> tactic) -> tactic -val tryAllHypsAndConcl : (Id.t option -> tactic) -> tactic - val onAllHyps : (Id.t -> tactic) -> tactic val onAllHypsAndConcl : (Id.t option -> tactic) -> tactic @@ -200,7 +195,6 @@ module New : sig val tclTRY : unit tactic -> unit tactic val tclFIRST : unit tactic list -> unit tactic - val tclFIRST_PROGRESS_ON : ('a -> unit tactic) -> 'a list -> unit tactic val tclIFTHENELSE : unit tactic -> unit tactic -> unit tactic -> unit tactic val tclIFTHENSVELSE : unit tactic -> unit tactic array -> unit tactic -> unit tactic val tclIFTHENTRYELSEMUST : unit tactic -> unit tactic -> unit tactic |