{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DerivingStrategies #-}
{-# LANGUAGE GeneralizedNewtypeDeriving #-}
{-# LANGUAGE LambdaCase #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}

-- Derived from AWS service descriptions, licensed under Apache 2.0.

-- |
-- Module      : Amazonka.Redshift.Types.OperatorType
-- Copyright   : (c) 2013-2021 Brendan Hay
-- License     : Mozilla Public License, v. 2.0.
-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>
-- Stability   : auto-generated
-- Portability : non-portable (GHC extensions)
module Amazonka.Redshift.Types.OperatorType
  ( OperatorType
      ( ..,
        OperatorType_Between,
        OperatorType_Eq,
        OperatorType_Ge,
        OperatorType_Gt,
        OperatorType_In,
        OperatorType_Le,
        OperatorType_Lt
      ),
  )
where

import qualified Amazonka.Core as Core
import qualified Amazonka.Prelude as Prelude
import Amazonka.Redshift.Internal

newtype OperatorType = OperatorType'
  { OperatorType -> Text
fromOperatorType ::
      Core.Text
  }
  deriving stock
    ( Int -> OperatorType -> ShowS
[OperatorType] -> ShowS
OperatorType -> String
(Int -> OperatorType -> ShowS)
-> (OperatorType -> String)
-> ([OperatorType] -> ShowS)
-> Show OperatorType
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [OperatorType] -> ShowS
$cshowList :: [OperatorType] -> ShowS
show :: OperatorType -> String
$cshow :: OperatorType -> String
showsPrec :: Int -> OperatorType -> ShowS
$cshowsPrec :: Int -> OperatorType -> ShowS
Prelude.Show,
      ReadPrec [OperatorType]
ReadPrec OperatorType
Int -> ReadS OperatorType
ReadS [OperatorType]
(Int -> ReadS OperatorType)
-> ReadS [OperatorType]
-> ReadPrec OperatorType
-> ReadPrec [OperatorType]
-> Read OperatorType
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [OperatorType]
$creadListPrec :: ReadPrec [OperatorType]
readPrec :: ReadPrec OperatorType
$creadPrec :: ReadPrec OperatorType
readList :: ReadS [OperatorType]
$creadList :: ReadS [OperatorType]
readsPrec :: Int -> ReadS OperatorType
$creadsPrec :: Int -> ReadS OperatorType
Prelude.Read,
      OperatorType -> OperatorType -> Bool
(OperatorType -> OperatorType -> Bool)
-> (OperatorType -> OperatorType -> Bool) -> Eq OperatorType
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: OperatorType -> OperatorType -> Bool
$c/= :: OperatorType -> OperatorType -> Bool
== :: OperatorType -> OperatorType -> Bool
$c== :: OperatorType -> OperatorType -> Bool
Prelude.Eq,
      Eq OperatorType
Eq OperatorType
-> (OperatorType -> OperatorType -> Ordering)
-> (OperatorType -> OperatorType -> Bool)
-> (OperatorType -> OperatorType -> Bool)
-> (OperatorType -> OperatorType -> Bool)
-> (OperatorType -> OperatorType -> Bool)
-> (OperatorType -> OperatorType -> OperatorType)
-> (OperatorType -> OperatorType -> OperatorType)
-> Ord OperatorType
OperatorType -> OperatorType -> Bool
OperatorType -> OperatorType -> Ordering
OperatorType -> OperatorType -> OperatorType
forall a.
Eq a
-> (a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
min :: OperatorType -> OperatorType -> OperatorType
$cmin :: OperatorType -> OperatorType -> OperatorType
max :: OperatorType -> OperatorType -> OperatorType
$cmax :: OperatorType -> OperatorType -> OperatorType
>= :: OperatorType -> OperatorType -> Bool
$c>= :: OperatorType -> OperatorType -> Bool
> :: OperatorType -> OperatorType -> Bool
$c> :: OperatorType -> OperatorType -> Bool
<= :: OperatorType -> OperatorType -> Bool
$c<= :: OperatorType -> OperatorType -> Bool
< :: OperatorType -> OperatorType -> Bool
$c< :: OperatorType -> OperatorType -> Bool
compare :: OperatorType -> OperatorType -> Ordering
$ccompare :: OperatorType -> OperatorType -> Ordering
$cp1Ord :: Eq OperatorType
Prelude.Ord,
      (forall x. OperatorType -> Rep OperatorType x)
-> (forall x. Rep OperatorType x -> OperatorType)
-> Generic OperatorType
forall x. Rep OperatorType x -> OperatorType
forall x. OperatorType -> Rep OperatorType x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep OperatorType x -> OperatorType
$cfrom :: forall x. OperatorType -> Rep OperatorType x
Prelude.Generic
    )
  deriving newtype
    ( Int -> OperatorType -> Int
OperatorType -> Int
(Int -> OperatorType -> Int)
-> (OperatorType -> Int) -> Hashable OperatorType
forall a. (Int -> a -> Int) -> (a -> Int) -> Hashable a
hash :: OperatorType -> Int
$chash :: OperatorType -> Int
hashWithSalt :: Int -> OperatorType -> Int
$chashWithSalt :: Int -> OperatorType -> Int
Prelude.Hashable,
      OperatorType -> ()
(OperatorType -> ()) -> NFData OperatorType
forall a. (a -> ()) -> NFData a
rnf :: OperatorType -> ()
$crnf :: OperatorType -> ()
Prelude.NFData,
      Text -> Either String OperatorType
(Text -> Either String OperatorType) -> FromText OperatorType
forall a. (Text -> Either String a) -> FromText a
fromText :: Text -> Either String OperatorType
$cfromText :: Text -> Either String OperatorType
Core.FromText,
      OperatorType -> Text
(OperatorType -> Text) -> ToText OperatorType
forall a. (a -> Text) -> ToText a
toText :: OperatorType -> Text
$ctoText :: OperatorType -> Text
Core.ToText,
      OperatorType -> ByteString
(OperatorType -> ByteString) -> ToByteString OperatorType
forall a. (a -> ByteString) -> ToByteString a
toBS :: OperatorType -> ByteString
$ctoBS :: OperatorType -> ByteString
Core.ToByteString,
      OperatorType -> ByteStringBuilder
(OperatorType -> ByteStringBuilder) -> ToLog OperatorType
forall a. (a -> ByteStringBuilder) -> ToLog a
build :: OperatorType -> ByteStringBuilder
$cbuild :: OperatorType -> ByteStringBuilder
Core.ToLog,
      HeaderName -> OperatorType -> [Header]
(HeaderName -> OperatorType -> [Header]) -> ToHeader OperatorType
forall a. (HeaderName -> a -> [Header]) -> ToHeader a
toHeader :: HeaderName -> OperatorType -> [Header]
$ctoHeader :: HeaderName -> OperatorType -> [Header]
Core.ToHeader,
      OperatorType -> QueryString
(OperatorType -> QueryString) -> ToQuery OperatorType
forall a. (a -> QueryString) -> ToQuery a
toQuery :: OperatorType -> QueryString
$ctoQuery :: OperatorType -> QueryString
Core.ToQuery,
      Value -> Parser [OperatorType]
Value -> Parser OperatorType
(Value -> Parser OperatorType)
-> (Value -> Parser [OperatorType]) -> FromJSON OperatorType
forall a.
(Value -> Parser a) -> (Value -> Parser [a]) -> FromJSON a
parseJSONList :: Value -> Parser [OperatorType]
$cparseJSONList :: Value -> Parser [OperatorType]
parseJSON :: Value -> Parser OperatorType
$cparseJSON :: Value -> Parser OperatorType
Core.FromJSON,
      FromJSONKeyFunction [OperatorType]
FromJSONKeyFunction OperatorType
FromJSONKeyFunction OperatorType
-> FromJSONKeyFunction [OperatorType] -> FromJSONKey OperatorType
forall a.
FromJSONKeyFunction a -> FromJSONKeyFunction [a] -> FromJSONKey a
fromJSONKeyList :: FromJSONKeyFunction [OperatorType]
$cfromJSONKeyList :: FromJSONKeyFunction [OperatorType]
fromJSONKey :: FromJSONKeyFunction OperatorType
$cfromJSONKey :: FromJSONKeyFunction OperatorType
Core.FromJSONKey,
      [OperatorType] -> Encoding
[OperatorType] -> Value
OperatorType -> Encoding
OperatorType -> Value
(OperatorType -> Value)
-> (OperatorType -> Encoding)
-> ([OperatorType] -> Value)
-> ([OperatorType] -> Encoding)
-> ToJSON OperatorType
forall a.
(a -> Value)
-> (a -> Encoding)
-> ([a] -> Value)
-> ([a] -> Encoding)
-> ToJSON a
toEncodingList :: [OperatorType] -> Encoding
$ctoEncodingList :: [OperatorType] -> Encoding
toJSONList :: [OperatorType] -> Value
$ctoJSONList :: [OperatorType] -> Value
toEncoding :: OperatorType -> Encoding
$ctoEncoding :: OperatorType -> Encoding
toJSON :: OperatorType -> Value
$ctoJSON :: OperatorType -> Value
Core.ToJSON,
      ToJSONKeyFunction [OperatorType]
ToJSONKeyFunction OperatorType
ToJSONKeyFunction OperatorType
-> ToJSONKeyFunction [OperatorType] -> ToJSONKey OperatorType
forall a.
ToJSONKeyFunction a -> ToJSONKeyFunction [a] -> ToJSONKey a
toJSONKeyList :: ToJSONKeyFunction [OperatorType]
$ctoJSONKeyList :: ToJSONKeyFunction [OperatorType]
toJSONKey :: ToJSONKeyFunction OperatorType
$ctoJSONKey :: ToJSONKeyFunction OperatorType
Core.ToJSONKey,
      [Node] -> Either String OperatorType
([Node] -> Either String OperatorType) -> FromXML OperatorType
forall a. ([Node] -> Either String a) -> FromXML a
parseXML :: [Node] -> Either String OperatorType
$cparseXML :: [Node] -> Either String OperatorType
Core.FromXML,
      OperatorType -> XML
(OperatorType -> XML) -> ToXML OperatorType
forall a. (a -> XML) -> ToXML a
toXML :: OperatorType -> XML
$ctoXML :: OperatorType -> XML
Core.ToXML
    )

pattern OperatorType_Between :: OperatorType
pattern $bOperatorType_Between :: OperatorType
$mOperatorType_Between :: forall r. OperatorType -> (Void# -> r) -> (Void# -> r) -> r
OperatorType_Between = OperatorType' "between"

pattern OperatorType_Eq :: OperatorType
pattern $bOperatorType_Eq :: OperatorType
$mOperatorType_Eq :: forall r. OperatorType -> (Void# -> r) -> (Void# -> r) -> r
OperatorType_Eq = OperatorType' "eq"

pattern OperatorType_Ge :: OperatorType
pattern $bOperatorType_Ge :: OperatorType
$mOperatorType_Ge :: forall r. OperatorType -> (Void# -> r) -> (Void# -> r) -> r
OperatorType_Ge = OperatorType' "ge"

pattern OperatorType_Gt :: OperatorType
pattern $bOperatorType_Gt :: OperatorType
$mOperatorType_Gt :: forall r. OperatorType -> (Void# -> r) -> (Void# -> r) -> r
OperatorType_Gt = OperatorType' "gt"

pattern OperatorType_In :: OperatorType
pattern $bOperatorType_In :: OperatorType
$mOperatorType_In :: forall r. OperatorType -> (Void# -> r) -> (Void# -> r) -> r
OperatorType_In = OperatorType' "in"

pattern OperatorType_Le :: OperatorType
pattern $bOperatorType_Le :: OperatorType
$mOperatorType_Le :: forall r. OperatorType -> (Void# -> r) -> (Void# -> r) -> r
OperatorType_Le = OperatorType' "le"

pattern OperatorType_Lt :: OperatorType
pattern $bOperatorType_Lt :: OperatorType
$mOperatorType_Lt :: forall r. OperatorType -> (Void# -> r) -> (Void# -> r) -> r
OperatorType_Lt = OperatorType' "lt"

{-# COMPLETE
  OperatorType_Between,
  OperatorType_Eq,
  OperatorType_Ge,
  OperatorType_Gt,
  OperatorType_In,
  OperatorType_Le,
  OperatorType_Lt,
  OperatorType'
  #-}