From ec6e25000ec0be1aaf3945eabaf5db670f0d1ece Mon Sep 17 00:00:00 2001
From: herbelin
Date: Fri, 10 Oct 2003 19:31:54 +0000
Subject: Notation '^'

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@4586 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 theories/Reals/Rfunctions.v | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/theories/Reals/Rfunctions.v b/theories/Reals/Rfunctions.v
index 3ea74f8622..e9316e1ad9 100644
--- a/theories/Reals/Rfunctions.v
+++ b/theories/Reals/Rfunctions.v
@@ -67,6 +67,8 @@ Fixpoint pow [r:R;n:nat]:R:=
     |(S n) => (Rmult r (pow r n))
   end.
 
+Infix "^" pow (at level 2, left associativity) : R_scope.
+
 Lemma pow_O: (e : R)  (pow e O) == R1.
 Simpl; Auto with real.
 Qed.
-- 
cgit v1.2.3