diff options
| author |  delahaye <delahaye@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2001-12-04 17:06:09 +0000 |
|---|---|---|
| committer | delahaye <delahaye@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2001-12-04 17:06:09 +0000 |
| commit | 0f4d47058356bb93a0945b561d84f411b0ef5ca5 (patch) | |
| tree | 7cd5011b886339b138147206777c924ae6cf3f8b /theories/Reals/DiscrR.v | |
| parent | 448d6a3e04209fdc04e1710e8c6bad29472e4567 (diff) | |
Traitement t de -1<>0
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@2265 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'theories/Reals/DiscrR.v')
| -rw-r--r-- | theories/Reals/DiscrR.v | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/theories/Reals/DiscrR.v b/theories/Reals/DiscrR.v index c955c57ef..ae58bee31 100644 --- a/theories/Reals/DiscrR.v +++ b/theories/Reals/DiscrR.v @@ -34,6 +34,6 @@ Tactic Definition DiscrR := Isrealint ?1;Isrealint ?2; Apply Rminus_not_eq; Ring ``?1-?2``; (Match Context With - | [ |- ``-1+?<>0`` ] -> + | [ |- [``-1``] ] -> Repeat Rewrite <- Ropp_distr1;Apply Ropp_neq | _ -> Idtac);Apply Rgt_not_eq;Sup0. |