From 0787c47de8e78b0fc8664b07aaabab60ec3089c5 Mon Sep 17 00:00:00 2001 From: Ollie Charles Date: Tue, 23 Mar 2021 16:30:57 +0000 Subject: [PATCH] Document Rel8.Expr.Ord --- src/Rel8/Expr/Ord.hs | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/src/Rel8/Expr/Ord.hs b/src/Rel8/Expr/Ord.hs index 4b9b73b..e0b3c04 100644 --- a/src/Rel8/Expr/Ord.hs +++ b/src/Rel8/Expr/Ord.hs @@ -72,21 +72,25 @@ sge = \case NonNullable -> ge +-- | The PostgreSQL @<@ operator. (<.) :: (DBOrd db, Nullabilizes db a) => Expr a -> Expr a -> Expr Bool (<.) = slt nullabilization infix 4 <. +-- | The PostgreSQL @<=@ operator. (<=.) :: (DBOrd db, Nullabilizes db a) => Expr a -> Expr a -> Expr Bool (<=.) = sle nullabilization infix 4 <=. +-- | The PostgreSQL @>@ operator. (>.) :: (DBOrd db, Nullabilizes db a) => Expr a -> Expr a -> Expr Bool (>.) = sgt nullabilization infix 4 >. +-- | The PostgreSQL @>=@ operator. (>=.) :: (DBOrd db, Nullabilizes db a) => Expr a -> Expr a -> Expr Bool (>=.) = sge nullabilization infix 4 >=.