@@ -36,7 +36,7 @@ module Squeal.PostgreSQL.Expression.Range
3636 , Range (..)
3737 , (<=..<=), (<..<), (<=..<), (<..<=)
3838 , halfGT, halfGTE, halfLT, halfLTE
39− , point
39+ , singleton, whole
4040 , Bound (..)
4141 , closed, open
4242 ) where
@@ -105,5 +105,8 @@ halfGTE x = NonEmpty (closed (Just x)) (open Nothing)
105105halfLT x = NonEmpty (open Nothing) (open (Just x))
106106halfLTE x = NonEmpty (open Nothing) (closed (Just x))
107107
108−point :: x -> Range x
109−point x = x <=..<= x
108+singleton :: x -> Range x
109+singleton x = x <=..<= x
110+
111+whole :: Range x
112+whole = NonEmpty (open Nothing) (open Nothing)