{-# 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.DevOpsGuru.Types.AnomalySeverity
-- 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.DevOpsGuru.Types.AnomalySeverity
  ( AnomalySeverity
      ( ..,
        AnomalySeverity_HIGH,
        AnomalySeverity_LOW,
        AnomalySeverity_MEDIUM
      ),
  )
where

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

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

pattern AnomalySeverity_HIGH :: AnomalySeverity
pattern $bAnomalySeverity_HIGH :: AnomalySeverity
$mAnomalySeverity_HIGH :: forall r. AnomalySeverity -> (Void# -> r) -> (Void# -> r) -> r
AnomalySeverity_HIGH = AnomalySeverity' "HIGH"

pattern AnomalySeverity_LOW :: AnomalySeverity
pattern $bAnomalySeverity_LOW :: AnomalySeverity
$mAnomalySeverity_LOW :: forall r. AnomalySeverity -> (Void# -> r) -> (Void# -> r) -> r
AnomalySeverity_LOW = AnomalySeverity' "LOW"

pattern AnomalySeverity_MEDIUM :: AnomalySeverity
pattern $bAnomalySeverity_MEDIUM :: AnomalySeverity
$mAnomalySeverity_MEDIUM :: forall r. AnomalySeverity -> (Void# -> r) -> (Void# -> r) -> r
AnomalySeverity_MEDIUM = AnomalySeverity' "MEDIUM"

{-# COMPLETE
  AnomalySeverity_HIGH,
  AnomalySeverity_LOW,
  AnomalySeverity_MEDIUM,
  AnomalySeverity'
  #-}