type Item      = (String, Int)
type ItemList  = [Item]
 
type Point     = (Float, Float, Float)
type Cuboid    = (Point, Point)
type Polygon   = [Point]
 
type Vector    = (Float, Float, Float)
 
type Euro      = Double
type Dollar    = Double
 
type String    = [Char]
 
type Function  = Int -> Int
type Function2 = Int -> Int -> Int
type Function2'= Int -> Function
 
type Dictionary= String -> Bool