diff options
Diffstat (limited to 'packages')
-rw-r--r-- | packages/base/src/Internal/Specialized.hs | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/packages/base/src/Internal/Specialized.hs b/packages/base/src/Internal/Specialized.hs index 9a68ad5..d840434 100644 --- a/packages/base/src/Internal/Specialized.hs +++ b/packages/base/src/Internal/Specialized.hs | |||
@@ -99,11 +99,11 @@ f2iM :: Storable t => Matrix (Mod n t) -> Matrix t | |||
99 | f2iM m = m { xdat = f2i (xdat m) } | 99 | f2iM m = m { xdat = f2i (xdat m) } |
100 | 100 | ||
101 | data IntegralRep t a = IntegralRep | 101 | data IntegralRep t a = IntegralRep |
102 | { i2rep :: Vector t -> Vector a | 102 | { i2rep :: !(Vector t -> Vector a) |
103 | , i2repM :: Matrix t -> Matrix a | 103 | , i2repM :: !(Matrix t -> Matrix a) |
104 | , rep2i :: Vector a -> Vector t | 104 | , rep2i :: !(Vector a -> Vector t) |
105 | , rep2iM :: Matrix a -> Matrix t | 105 | , rep2iM :: !(Matrix a -> Matrix t) |
106 | , rep2one :: a -> t | 106 | , rep2one :: !(a -> t) |
107 | , modulo :: !(Maybe t) | 107 | , modulo :: !(Maybe t) |
108 | } | 108 | } |
109 | 109 | ||