@@ -72,21 +72,25 @@ sge = \case
72 NonNullable -> ge
72 NonNullable -> ge
75+-- | The PostgreSQL @<@ operator.
75(<.) :: (DBOrd db, Nullabilizes db a) => Expr a -> Expr a -> Expr Bool
76(<.) :: (DBOrd db, Nullabilizes db a) => Expr a -> Expr a -> Expr Bool
76(<.) = slt nullabilization
77(<.) = slt nullabilization
81+-- | The PostgreSQL @<=@ operator.
80(<=.) :: (DBOrd db, Nullabilizes db a) => Expr a -> Expr a -> Expr Bool
82(<=.) :: (DBOrd db, Nullabilizes db a) => Expr a -> Expr a -> Expr Bool
81(<=.) = sle nullabilization
83(<=.) = sle nullabilization
82infix 4 <=.
84infix 4 <=.
87+-- | The PostgreSQL @>@ operator.
85(>.) :: (DBOrd db, Nullabilizes db a) => Expr a -> Expr a -> Expr Bool
88(>.) :: (DBOrd db, Nullabilizes db a) => Expr a -> Expr a -> Expr Bool
86(>.) = sgt nullabilization
89(>.) = sgt nullabilization
93+-- | The PostgreSQL @>=@ operator.
90(>=.) :: (DBOrd db, Nullabilizes db a) => Expr a -> Expr a -> Expr Bool
94(>=.) :: (DBOrd db, Nullabilizes db a) => Expr a -> Expr a -> Expr Bool
91(>=.) = sge nullabilization
95(>=.) = sge nullabilization
92infix 4 >=.
96infix 4 >=.