{-# LANGUAGE FlexibleContexts #-}
module Opaleye.Distinct (distinct,
distinctOn,
distinctOnBy,
distinctExplicit,
Distinctspec,
distinctspecField,
distinctspecMaybeFields,
distinctOnCorrect,
distinctOnByCorrect,
)
where
import Opaleye.Select (Select)
import Opaleye.Internal.Distinct
import Opaleye.Order
import qualified Data.Profunctor.Product.Default as D
distinct :: D.Default Distinctspec fields fields =>
Select fields -> Select fields
distinct :: Select fields -> Select fields
distinct = Distinctspec fields fields -> Select fields -> Select fields
forall fields fields'.
Distinctspec fields fields' -> Select fields -> Select fields'
distinctExplicit Distinctspec fields fields
forall (p :: * -> * -> *) a b. Default p a b => p a b
D.def