Unified-Sub: lift_comm completed

[helm.git] / helm / software / matita / contribs / RELATIONAL / NLE / props.ma

diff --git a/helm/software/matita/contribs/RELATIONAL/NLE/props.ma b/helm/software/matita/contribs/RELATIONAL/NLE/props.ma
index eccc2f9db3f69974cedaeda2b1ec387601bf394b..a6d0ca7a88dbac1fb0b3232c984ffe5a5c0c67c6 100644 (file)
--- a/helm/software/matita/contribs/RELATIONAL/NLE/props.ma
+++ b/helm/software/matita/contribs/RELATIONAL/NLE/props.ma
@@ -65,7 +65,7 @@ theorem nle_lt_or_eq: \forall y,x. x <= y \to x < y \lor x = y.
  ].
 qed.
 
-theorem nat_dec_lt_ge: \forall x,y. x < y \lor y <= x.
+theorem nle_gt_or_le: \forall x,y. y > x \lor y <= x.
  intros 2; elim y; clear y;
  [ auto
  | decompose;