Skip to content
Snippets Groups Projects
Commit 6eb9b908 authored by Pierre Roux's avatar Pierre Roux
Browse files

Remove unused section

parent d4e42003
No related branches found
No related tags found
1 merge request!189Deprecate ltn leq trans
Pipeline #62346 passed
...@@ -115,26 +115,16 @@ Section Interval. ...@@ -115,26 +115,16 @@ Section Interval.
End Interval. End Interval.
(** In the section, we introduce an additional lemma about relation (* [ltn_leq_trans]: Establish that [m < p] if [m < n] and [n <= p], to mirror the
[<] over natural numbers. *) lemma [leq_ltn_trans] in [ssrnat].
Section NatOrderLemmas.
(* Mimic the way implicit arguments are used in [ssreflect]. *) NB: There is a good reason for this lemma to be "missing" in [ssrnat] --
Set Implicit Arguments. since [m < n] is defined as [m.+1 <= n], [ltn_leq_trans] is just
Unset Strict Implicit. [m.+1 <= n -> n <= p -> m.+1 <= p], that is [@leq_trans n m.+1 p].
(* [ltn_leq_trans]: Establish that [m < p] if [m < n] and [n <= p], to mirror the Nonetheless we introduce it here because an additional (even though
lemma [leq_ltn_trans] in [ssrnat]. arguably redundant) lemma doesn't hurt, and for newcomers the apparent
absence of the mirror case of [leq_ltn_trans] can be somewhat confusing. *)
NB: There is a good reason for this lemma to be "missing" in [ssrnat] -- #[deprecated(since="0.4",note="Use leq_trans instead since n < m is just a notation for n.+1 <= m (c.f., comment in util/nat.v).")]
since [m < n] is defined as [m.+1 <= n], [ltn_leq_trans] is just Lemma ltn_leq_trans [n m p] : m < n -> n <= p -> m < p.
[m.+1 <= n -> n <= p -> m.+1 <= p], that is [@leq_trans n m.+1 p]. Proof. exact: leq_trans. Qed.
Nonetheless we introduce it here because an additional (even though
arguably redundant) lemma doesn't hurt, and for newcomers the apparent
absence of the mirror case of [leq_ltn_trans] can be somewhat confusing. *)
#[deprecated(since="0.4",note="Use leq_trans instead since n < m is just a notation for n.+1 <= m (c.f., comment in util/nat.v).")]
Lemma ltn_leq_trans n m p : m < n -> n <= p -> m < p.
Proof. exact (@leq_trans n m.+1 p). Qed.
End NatOrderLemmas.
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment