From 6c349719bf95c7f0c276d6d799051649d29b3ec8 Mon Sep 17 00:00:00 2001
From: sof <unknown>
Date: Tue, 3 Jun 1997 22:27:39 +0000
Subject: [PATCH] [project @ 1997-06-03 22:27:39 by sof] Wibble

---
 ghc/lib/required/Complex.lhs |    4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/ghc/lib/required/Complex.lhs b/ghc/lib/required/Complex.lhs
index 99c60ca..adcdc59 100644
--- a/ghc/lib/required/Complex.lhs
+++ b/ghc/lib/required/Complex.lhs
@@ -68,7 +68,7 @@ phase (x:+y)	 =  atan2 y x
 %*********************************************************
 
 \begin{code}
-instance  (RealFloat a) => Prelude.Num (Complex a)  where
+instance  (RealFloat a) => Num (Complex a)  where
     (x:+y) + (x':+y')	=  (x+x') :+ (y+y')
     (x:+y) - (x':+y')	=  (x-x') :+ (y-y')
     (x:+y) * (x':+y')	=  (x*x'-y*y') :+ (x*y'+y*x')
@@ -87,7 +87,7 @@ instance  (RealFloat a) => Fractional (Complex a)  where
 
     fromRational a	=  fromRational a :+ 0
 
-instance  (Prelude.RealFloat a) => Floating (Complex a)	where
+instance  (RealFloat a) => Floating (Complex a)	where
     pi             =  pi :+ 0
     exp (x:+y)     =  expx * cos y :+ expx * sin y
                       where expx = exp x
-- 
1.7.10.4