From 98a86e50e7dc06b77a34bf34a0476aebc07efbcd Mon Sep 17 00:00:00 2001 From: letouzey Date: Fri, 12 Dec 2008 19:51:03 +0000 Subject: Uniformity with the rest of the StdLib : _symm --> _sym git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@11675 85f007b7-540e-0410-9357-904b9bb8a0f7 --- theories/Numbers/NatInt/NZBase.v | 2 +- theories/Numbers/NatInt/NZOrder.v | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) (limited to 'theories/Numbers/NatInt') diff --git a/theories/Numbers/NatInt/NZBase.v b/theories/Numbers/NatInt/NZBase.v index 0b917e9983..985466979d 100644 --- a/theories/Numbers/NatInt/NZBase.v +++ b/theories/Numbers/NatInt/NZBase.v @@ -15,7 +15,7 @@ Require Import NZAxioms. Module NZBasePropFunct (Import NZAxiomsMod : NZAxiomsSig). Open Local Scope NatIntScope. -Theorem NZneq_symm : forall n m : NZ, n ~= m -> m ~= n. +Theorem NZneq_sym : forall n m : NZ, n ~= m -> m ~= n. Proof. intros n m H1 H2; symmetry in H2; false_hyp H2 H1. Qed. diff --git a/theories/Numbers/NatInt/NZOrder.v b/theories/Numbers/NatInt/NZOrder.v index d8eaeb99c2..8747a4c44a 100644 --- a/theories/Numbers/NatInt/NZOrder.v +++ b/theories/Numbers/NatInt/NZOrder.v @@ -118,7 +118,7 @@ Qed. Theorem NZneq_succ_diag_r : forall n : NZ, n ~= S n. Proof. -intro n; apply NZneq_symm; apply NZneq_succ_diag_l. +intro n; apply NZneq_sym; apply NZneq_succ_diag_l. Qed. Theorem NZnlt_succ_diag_l : forall n : NZ, ~ S n < n. -- cgit v1.2.3