From f39ad090513e48fc2cbaf421c8b39fa3ca12a221 Mon Sep 17 00:00:00 2001 From: Alberto Ruiz Date: Wed, 19 Sep 2007 08:59:32 +0000 Subject: minor changes --- lib/Data/Packed/Internal/Matrix.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lib/Data/Packed/Internal/Matrix.hs') diff --git a/lib/Data/Packed/Internal/Matrix.hs b/lib/Data/Packed/Internal/Matrix.hs index 951cec6..63ebddf 100644 --- a/lib/Data/Packed/Internal/Matrix.hs +++ b/lib/Data/Packed/Internal/Matrix.hs @@ -349,7 +349,7 @@ foreign import ccall safe "aux.h constantC" @> constant 2 7 7 |> [2.0,2.0,2.0,2.0,2.0,2.0,2.0]@ -} -constant :: Double -> Int -> Vector Double +constant :: Field a => a -> Int -> Vector a constant = constantD -------------------------------------------------------------------------- -- cgit v1.2.3