{-# 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.CloudDirectory.Types.FacetStyle
-- 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.CloudDirectory.Types.FacetStyle
  ( FacetStyle
      ( ..,
        FacetStyle_DYNAMIC,
        FacetStyle_STATIC
      ),
  )
where

import qualified Amazonka.Core as Core
import qualified Amazonka.Prelude as Prelude

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

pattern FacetStyle_DYNAMIC :: FacetStyle
pattern $bFacetStyle_DYNAMIC :: FacetStyle
$mFacetStyle_DYNAMIC :: forall r. FacetStyle -> (Void# -> r) -> (Void# -> r) -> r
FacetStyle_DYNAMIC = FacetStyle' "DYNAMIC"

pattern FacetStyle_STATIC :: FacetStyle
pattern $bFacetStyle_STATIC :: FacetStyle
$mFacetStyle_STATIC :: forall r. FacetStyle -> (Void# -> r) -> (Void# -> r) -> r
FacetStyle_STATIC = FacetStyle' "STATIC"

{-# COMPLETE
  FacetStyle_DYNAMIC,
  FacetStyle_STATIC,
  FacetStyle'
  #-}