intervals-0.7.2: Interval Arithmetic

Copyright(c) Edward Kmett 2010-2014
LicenseBSD3
Maintainerekmett@gmail.com
Stabilityexperimental
PortabilityDeriveDataTypeable
Safe HaskellSafe
LanguageHaskell98

Numeric.Interval.Kaucher

Description

Directed Interval arithmetic

Synopsis

Documentation

data Interval a

Constructors

I !a !a 

Instances

Monad Interval 
Functor Interval 
Applicative Interval 
Foldable Interval 
Traversable Interval 
Generic1 Interval 
Distributive Interval 
Eq a => Eq (Interval a) 
(RealFloat a, Ord a) => Floating (Interval a) 
(Fractional a, Ord a) => Fractional (Interval a) 
Data a => Data (Interval a) 
(Num a, Ord a) => Num (Interval a) 
Ord a => Ord (Interval a) 
Real a => Real (Interval a)

realToFrac will use the midpoint

RealFloat a => RealFloat (Interval a)

We have to play some semantic games to make these methods make sense. Most compute with the midpoint of the interval.

RealFrac a => RealFrac (Interval a) 
Show a => Show (Interval a) 
Generic (Interval a) 
type Rep1 Interval 
type Rep (Interval a) 

(...) :: a -> a -> Interval a infix 3

Create a directed interval.

interval :: Ord a => a -> a -> Maybe (Interval a)

Try to create a non-empty interval.

whole :: Fractional a => Interval a

The whole real number line

>>> whole
-Infinity ... Infinity

empty :: Fractional a => Interval a

An empty interval

>>> empty
NaN ... NaN

null :: Ord a => Interval a -> Bool

negation handles NaN properly

>>> null (1 ... 5)
False
>>> null (1 ... 1)
False
>>> null empty
True

singleton :: a -> Interval a

A singleton point

>>> singleton 1
1 ... 1

elem :: Ord a => a -> Interval a -> Bool

Determine if a point is in the interval.

>>> elem 3.2 (1.0 ... 5.0)
True
>>> elem 5 (1.0 ... 5.0)
True
>>> elem 1 (1.0 ... 5.0)
True
>>> elem 8 (1.0 ... 5.0)
False
>>> elem 5 empty
False

notElem :: Ord a => a -> Interval a -> Bool

Determine if a point is not included in the interval

>>> notElem 8 (1.0 ... 5.0)
True
>>> notElem 1.4 (1.0 ... 5.0)
False

And of course, nothing is a member of the empty interval.

>>> notElem 5 empty
True

inf :: Interval a -> a

The infinumum (lower bound) of an interval

>>> inf (1 ... 20)
1

sup :: Interval a -> a

The supremum (upper bound) of an interval

>>> sup (1 ... 20)
20

singular :: Ord a => Interval a -> Bool

Is the interval a singleton point? N.B. This is fairly fragile and likely will not hold after even a few operations that only involve singletons

>>> singular (singleton 1)
True
>>> singular (1.0 ... 20.0)
False

width :: Num a => Interval a -> a

Calculate the width of an interval.

>>> width (1 ... 20)
19
>>> width (singleton 1)
0
>>> width empty
NaN

midpoint :: Fractional a => Interval a -> a

Nearest point to the midpoint of the interval.

>>> midpoint (10.0 ... 20.0)
15.0
>>> midpoint (singleton 5.0)
5.0
>>> midpoint empty
NaN

intersection :: (Fractional a, Ord a) => Interval a -> Interval a -> Interval a

Calculate the intersection of two intervals.

>>> intersection (1 ... 10 :: Interval Double) (5 ... 15 :: Interval Double)
5.0 ... 10.0

hull :: Ord a => Interval a -> Interval a -> Interval a

Calculate the convex hull of two intervals

>>> hull (0 ... 10 :: Interval Double) (5 ... 15 :: Interval Double)
0.0 ... 15.0
>>> hull (15 ... 85 :: Interval Double) (0 ... 10 :: Interval Double)
0.0 ... 85.0

bisect :: Fractional a => Interval a -> (Interval a, Interval a)

Bisect an interval at its midpoint.

>>> bisect (10.0 ... 20.0)
(10.0 ... 15.0,15.0 ... 20.0)
>>> bisect (singleton 5.0)
(5.0 ... 5.0,5.0 ... 5.0)
>>> bisect empty
(NaN ... NaN,NaN ... NaN)

magnitude :: (Num a, Ord a) => Interval a -> a

Magnitude

>>> magnitude (1 ... 20)
20
>>> magnitude (-20 ... 10)
20
>>> magnitude (singleton 5)
5

mignitude :: (Num a, Ord a) => Interval a -> a

"mignitude"

>>> mignitude (1 ... 20)
1
>>> mignitude (-20 ... 10)
0
>>> mignitude (singleton 5)
5
>>> mignitude empty
NaN

distance :: (Num a, Ord a) => Interval a -> Interval a -> a

Hausdorff distance between non-empty intervals.

>>> distance (1 ... 7) (6 ... 10)
0
>>> distance (1 ... 7) (15 ... 24)
8
>>> distance (1 ... 7) (-10 ... -2)
3
>>> distance empty (1 ... 1)
NaN

inflate :: (Num a, Ord a) => a -> Interval a -> Interval a

Inflate an interval by enlarging it at both ends.

>>> inflate 3 (-1 ... 7)
-4 ... 10
>>> inflate (-2) (0 ... 4)
2 ... 2

deflate :: Fractional a => a -> Interval a -> Interval a

Deflate an interval by shrinking it from both ends.

>>> deflate 3.0 (-4.0 ... 10.0)
-1.0 ... 7.0
>>> deflate 2.0 (-1.0 ... 1.0)
1.0 ... -1.0

scale :: Fractional a => a -> Interval a -> Interval a

Scale an interval about its midpoint.

>>> scale 1.1 (-6.0 ... 4.0)
-6.5 ... 4.5
>>> scale (-2.0) (-1.0 ... 1.0)
2.0 ... -2.0

symmetric :: Num a => a -> Interval a

Construct a symmetric interval.

>>> symmetric 3
-3 ... 3
>>> symmetric (-2)
2 ... -2

contains :: Ord a => Interval a -> Interval a -> Bool

Check if interval X totally contains interval Y

>>> (20 ... 40 :: Interval Double) `contains` (25 ... 35 :: Interval Double)
True
>>> (20 ... 40 :: Interval Double) `contains` (15 ... 35 :: Interval Double)
False

isSubsetOf :: Ord a => Interval a -> Interval a -> Bool

Flipped version of contains. Check if interval X a subset of interval Y

>>> (25 ... 35 :: Interval Double) `isSubsetOf` (20 ... 40 :: Interval Double)
True
>>> (20 ... 40 :: Interval Double) `isSubsetOf` (15 ... 35 :: Interval Double)
False

certainly :: Ord a => (forall b. Ord b => b -> b -> Bool) -> Interval a -> Interval a -> Bool

For all x in X, y in Y. x op y

(<!) :: Ord a => Interval a -> Interval a -> Bool

For all x in X, y in Y. x < y

>>> (5 ... 10 :: Interval Double) <! (20 ... 30 :: Interval Double)
True
>>> (5 ... 10 :: Interval Double) <! (10 ... 30 :: Interval Double)
False
>>> (20 ... 30 :: Interval Double) <! (5 ... 10 :: Interval Double)
False

(<=!) :: Ord a => Interval a -> Interval a -> Bool

For all x in X, y in Y. x <= y

>>> (5 ... 10 :: Interval Double) <=! (20 ... 30 :: Interval Double)
True
>>> (5 ... 10 :: Interval Double) <=! (10 ... 30 :: Interval Double)
True
>>> (20 ... 30 :: Interval Double) <=! (5 ... 10 :: Interval Double)
False

(==!) :: Eq a => Interval a -> Interval a -> Bool

For all x in X, y in Y. x == y

Only singleton intervals return true

>>> (singleton 5 :: Interval Double) ==! (singleton 5 :: Interval Double)
True
>>> (5 ... 10 :: Interval Double) ==! (5 ... 10 :: Interval Double)
False

(>=!) :: Ord a => Interval a -> Interval a -> Bool

For all x in X, y in Y. x >= y

>>> (20 ... 40 :: Interval Double) >=! (10 ... 20 :: Interval Double)
True
>>> (5 ... 20 :: Interval Double) >=! (15 ... 40 :: Interval Double)
False

(>!) :: Ord a => Interval a -> Interval a -> Bool

For all x in X, y in Y. x > y

>>> (20 ... 40 :: Interval Double) >! (10 ... 19 :: Interval Double)
True
>>> (5 ... 20 :: Interval Double) >! (15 ... 40 :: Interval Double)
False

possibly :: Ord a => (forall b. Ord b => b -> b -> Bool) -> Interval a -> Interval a -> Bool

Does there exist an x in X, y in Y such that x op y?

(<?) :: Ord a => Interval a -> Interval a -> Bool

Does there exist an x in X, y in Y such that x < y?

(<=?) :: Ord a => Interval a -> Interval a -> Bool

Does there exist an x in X, y in Y such that x <= y?

(==?) :: Ord a => Interval a -> Interval a -> Bool

Does there exist an x in X, y in Y such that x == y?

(>=?) :: Ord a => Interval a -> Interval a -> Bool

Does there exist an x in X, y in Y such that x >= y?

(>?) :: Ord a => Interval a -> Interval a -> Bool

Does there exist an x in X, y in Y such that x > y?

clamp :: Ord a => Interval a -> a -> a

The nearest value to that supplied which is contained in the interval.

idouble :: Interval Double -> Interval Double

id function. Useful for type specification

>>> :t idouble (1 ... 3)
idouble (1 ... 3) :: Interval Double

ifloat :: Interval Float -> Interval Float

id function. Useful for type specification

>>> :t ifloat (1 ... 3)
ifloat (1 ... 3) :: Interval Float