[project @ 1996-07-25 21:02:03 by partain]
[nofib.git] / real / fem / Vector.hs
index e5b7613..b3d0f62 100644 (file)
@@ -84,7 +84,7 @@ import Basics
 
 data Vec a = VEC Int (Array Int a)
 
-displayvec :: (Text a) => Vec a -> [Char]
+displayvec :: (Show a) => Vec a -> [Char]
 
 vecprod :: (Num a) => Vec a -> Vec a -> a