src/Gargantext/Database/Schema/Prelude.hs

   1 {-|
   2 Module      : Gargantext.Database.Prelude
   3 Description :
   4 Copyright   : (c) CNRS, 2017-Present
   5 License     : AGPL + CECILL v3
   6 Maintainer  : team@gargantext.org
   7 Stability   : experimental
   8 Portability : POSIX
   9 -}
  10
  11
  12
  13 module Gargantext.Database.Schema.Prelude
  14   ( module Control.Arrow
  15   , module Control.Lens.TH
  16   , module Data.Aeson.TH
  17   , module Data.Profunctor.Product.TH
  18   , module Data.Swagger
  19   , module Database.PostgreSQL.Simple.FromField
  20   , module Database.PostgreSQL.Simple.FromRow
  21   , module Database.PostgreSQL.Simple.SqlQQ
  22   , module Database.PostgreSQL.Simple.ToField
  23   , module Database.PostgreSQL.Simple.ToRow
  24   , module Database.PostgreSQL.Simple.Types
  25   , module GHC.Generics
  26   , module Gargantext.Core.Utils.Prefix
  27   , module Opaleye
  28   , module Opaleye.Internal.QueryArr
  29   , module Test.QuickCheck.Arbitrary
  30   )
  31   where
  32
  33 import Control.Arrow (returnA)
  34 import Control.Lens.TH (makeLenses, makeLensesWith, abbreviatedFields)
  35 import Data.Aeson.TH (deriveJSON)
  36 import Data.Profunctor.Product.TH (makeAdaptorAndInstance)
  37 import Data.Swagger hiding (required, in_)
  38 import GHC.Generics (Generic)
  39 import Gargantext.Core.Utils.Prefix (unPrefix, unPrefixSwagger)
  40 import Opaleye hiding (FromField, readOnly)
  41 import Opaleye.Internal.QueryArr (Query)
  42 import Test.QuickCheck.Arbitrary
  43
  44 import Database.PostgreSQL.Simple.FromField (FromField, fromField)
  45 import Database.PostgreSQL.Simple.FromRow (FromRow, fromRow, field)
  46 import Database.PostgreSQL.Simple.SqlQQ   (sql)
  47 import Database.PostgreSQL.Simple.ToField (toField, ToField)
  48 import Database.PostgreSQL.Simple.ToRow   (toRow)
  49 import Database.PostgreSQL.Simple.Types   (Values(..), QualifiedIdentifier(..))
  50