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
No related merge requests found
...@@ -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