diff options
author | Andrew Cady <d@jerkface.net> | 2019-07-13 16:25:13 -0400 |
---|---|---|
committer | Andrew Cady <d@jerkface.net> | 2019-07-13 16:25:13 -0400 |
commit | 8820af82d2fccadb6de7e2623c87e48fb11378c5 (patch) | |
tree | 51d25e17c2b9262abf15418007b8be5829a5facc /lib/Numeric/Interval/Bounded.hs | |
parent | 803d8a03e5c787d1d57b327cbc30a5beb9f1ec7a (diff) |
remove more old cpp cruft
Diffstat (limited to 'lib/Numeric/Interval/Bounded.hs')
-rw-r--r-- | lib/Numeric/Interval/Bounded.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/Numeric/Interval/Bounded.hs b/lib/Numeric/Interval/Bounded.hs index 2dd4d7b..a0d5d0d 100644 --- a/lib/Numeric/Interval/Bounded.hs +++ b/lib/Numeric/Interval/Bounded.hs | |||
@@ -2,8 +2,8 @@ module Numeric.Interval.Bounded where | |||
2 | 2 | ||
3 | import Numeric.Interval | 3 | import Numeric.Interval |
4 | 4 | ||
5 | whole' :: Bounded a => Interval a | 5 | whole' :: (Ord a, Bounded a) => Interval a |
6 | whole' = ( minBound ... maxBound ) | 6 | whole' = ( minBound ... maxBound ) |
7 | 7 | ||
8 | empty' :: Bounded a => Interval a | 8 | empty' :: (Ord a, Bounded a) => Interval a |
9 | empty' = ( maxBound ... minBound ) | 9 | empty' = ( maxBound ... minBound ) |