{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DerivingStrategies #-}
{-# LANGUAGE GeneralizedNewtypeDeriving #-}
{-# LANGUAGE LambdaCase #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
module Amazonka.ComputeOptimizer.Types.CurrentPerformanceRisk
( CurrentPerformanceRisk
( ..,
CurrentPerformanceRisk_High,
CurrentPerformanceRisk_Low,
CurrentPerformanceRisk_Medium,
CurrentPerformanceRisk_VeryLow
),
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Data as Data
import qualified Amazonka.Prelude as Prelude
newtype CurrentPerformanceRisk = CurrentPerformanceRisk'
{ CurrentPerformanceRisk -> Text
fromCurrentPerformanceRisk ::
Data.Text
}
deriving stock
( Int -> CurrentPerformanceRisk -> ShowS
[CurrentPerformanceRisk] -> ShowS
CurrentPerformanceRisk -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [CurrentPerformanceRisk] -> ShowS
$cshowList :: [CurrentPerformanceRisk] -> ShowS
show :: CurrentPerformanceRisk -> String
$cshow :: CurrentPerformanceRisk -> String
showsPrec :: Int -> CurrentPerformanceRisk -> ShowS
$cshowsPrec :: Int -> CurrentPerformanceRisk -> ShowS
Prelude.Show,
ReadPrec [CurrentPerformanceRisk]
ReadPrec CurrentPerformanceRisk
Int -> ReadS CurrentPerformanceRisk
ReadS [CurrentPerformanceRisk]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [CurrentPerformanceRisk]
$creadListPrec :: ReadPrec [CurrentPerformanceRisk]
readPrec :: ReadPrec CurrentPerformanceRisk
$creadPrec :: ReadPrec CurrentPerformanceRisk
readList :: ReadS [CurrentPerformanceRisk]
$creadList :: ReadS [CurrentPerformanceRisk]
readsPrec :: Int -> ReadS CurrentPerformanceRisk
$creadsPrec :: Int -> ReadS CurrentPerformanceRisk
Prelude.Read,
CurrentPerformanceRisk -> CurrentPerformanceRisk -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: CurrentPerformanceRisk -> CurrentPerformanceRisk -> Bool
$c/= :: CurrentPerformanceRisk -> CurrentPerformanceRisk -> Bool
== :: CurrentPerformanceRisk -> CurrentPerformanceRisk -> Bool
$c== :: CurrentPerformanceRisk -> CurrentPerformanceRisk -> Bool
Prelude.Eq,
Eq CurrentPerformanceRisk
CurrentPerformanceRisk -> CurrentPerformanceRisk -> Bool
CurrentPerformanceRisk -> CurrentPerformanceRisk -> Ordering
CurrentPerformanceRisk
-> CurrentPerformanceRisk -> CurrentPerformanceRisk
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 :: CurrentPerformanceRisk
-> CurrentPerformanceRisk -> CurrentPerformanceRisk
$cmin :: CurrentPerformanceRisk
-> CurrentPerformanceRisk -> CurrentPerformanceRisk
max :: CurrentPerformanceRisk
-> CurrentPerformanceRisk -> CurrentPerformanceRisk
$cmax :: CurrentPerformanceRisk
-> CurrentPerformanceRisk -> CurrentPerformanceRisk
>= :: CurrentPerformanceRisk -> CurrentPerformanceRisk -> Bool
$c>= :: CurrentPerformanceRisk -> CurrentPerformanceRisk -> Bool
> :: CurrentPerformanceRisk -> CurrentPerformanceRisk -> Bool
$c> :: CurrentPerformanceRisk -> CurrentPerformanceRisk -> Bool
<= :: CurrentPerformanceRisk -> CurrentPerformanceRisk -> Bool
$c<= :: CurrentPerformanceRisk -> CurrentPerformanceRisk -> Bool
< :: CurrentPerformanceRisk -> CurrentPerformanceRisk -> Bool
$c< :: CurrentPerformanceRisk -> CurrentPerformanceRisk -> Bool
compare :: CurrentPerformanceRisk -> CurrentPerformanceRisk -> Ordering
$ccompare :: CurrentPerformanceRisk -> CurrentPerformanceRisk -> Ordering
Prelude.Ord,
forall x. Rep CurrentPerformanceRisk x -> CurrentPerformanceRisk
forall x. CurrentPerformanceRisk -> Rep CurrentPerformanceRisk x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep CurrentPerformanceRisk x -> CurrentPerformanceRisk
$cfrom :: forall x. CurrentPerformanceRisk -> Rep CurrentPerformanceRisk x
Prelude.Generic
)
deriving newtype
( Eq CurrentPerformanceRisk
Int -> CurrentPerformanceRisk -> Int
CurrentPerformanceRisk -> Int
forall a. Eq a -> (Int -> a -> Int) -> (a -> Int) -> Hashable a
hash :: CurrentPerformanceRisk -> Int
$chash :: CurrentPerformanceRisk -> Int
hashWithSalt :: Int -> CurrentPerformanceRisk -> Int
$chashWithSalt :: Int -> CurrentPerformanceRisk -> Int
Prelude.Hashable,
CurrentPerformanceRisk -> ()
forall a. (a -> ()) -> NFData a
rnf :: CurrentPerformanceRisk -> ()
$crnf :: CurrentPerformanceRisk -> ()
Prelude.NFData,
Text -> Either String CurrentPerformanceRisk
forall a. (Text -> Either String a) -> FromText a
fromText :: Text -> Either String CurrentPerformanceRisk
$cfromText :: Text -> Either String CurrentPerformanceRisk
Data.FromText,
CurrentPerformanceRisk -> Text
forall a. (a -> Text) -> ToText a
toText :: CurrentPerformanceRisk -> Text
$ctoText :: CurrentPerformanceRisk -> Text
Data.ToText,
CurrentPerformanceRisk -> ByteString
forall a. (a -> ByteString) -> ToByteString a
toBS :: CurrentPerformanceRisk -> ByteString
$ctoBS :: CurrentPerformanceRisk -> ByteString
Data.ToByteString,
CurrentPerformanceRisk -> ByteStringBuilder
forall a. (a -> ByteStringBuilder) -> ToLog a
build :: CurrentPerformanceRisk -> ByteStringBuilder
$cbuild :: CurrentPerformanceRisk -> ByteStringBuilder
Data.ToLog,
HeaderName -> CurrentPerformanceRisk -> [Header]
forall a. (HeaderName -> a -> [Header]) -> ToHeader a
toHeader :: HeaderName -> CurrentPerformanceRisk -> [Header]
$ctoHeader :: HeaderName -> CurrentPerformanceRisk -> [Header]
Data.ToHeader,
CurrentPerformanceRisk -> QueryString
forall a. (a -> QueryString) -> ToQuery a
toQuery :: CurrentPerformanceRisk -> QueryString
$ctoQuery :: CurrentPerformanceRisk -> QueryString
Data.ToQuery,
Value -> Parser [CurrentPerformanceRisk]
Value -> Parser CurrentPerformanceRisk
forall a.
(Value -> Parser a) -> (Value -> Parser [a]) -> FromJSON a
parseJSONList :: Value -> Parser [CurrentPerformanceRisk]
$cparseJSONList :: Value -> Parser [CurrentPerformanceRisk]
parseJSON :: Value -> Parser CurrentPerformanceRisk
$cparseJSON :: Value -> Parser CurrentPerformanceRisk
Data.FromJSON,
FromJSONKeyFunction [CurrentPerformanceRisk]
FromJSONKeyFunction CurrentPerformanceRisk
forall a.
FromJSONKeyFunction a -> FromJSONKeyFunction [a] -> FromJSONKey a
fromJSONKeyList :: FromJSONKeyFunction [CurrentPerformanceRisk]
$cfromJSONKeyList :: FromJSONKeyFunction [CurrentPerformanceRisk]
fromJSONKey :: FromJSONKeyFunction CurrentPerformanceRisk
$cfromJSONKey :: FromJSONKeyFunction CurrentPerformanceRisk
Data.FromJSONKey,
[CurrentPerformanceRisk] -> Encoding
[CurrentPerformanceRisk] -> Value
CurrentPerformanceRisk -> Encoding
CurrentPerformanceRisk -> Value
forall a.
(a -> Value)
-> (a -> Encoding)
-> ([a] -> Value)
-> ([a] -> Encoding)
-> ToJSON a
toEncodingList :: [CurrentPerformanceRisk] -> Encoding
$ctoEncodingList :: [CurrentPerformanceRisk] -> Encoding
toJSONList :: [CurrentPerformanceRisk] -> Value
$ctoJSONList :: [CurrentPerformanceRisk] -> Value
toEncoding :: CurrentPerformanceRisk -> Encoding
$ctoEncoding :: CurrentPerformanceRisk -> Encoding
toJSON :: CurrentPerformanceRisk -> Value
$ctoJSON :: CurrentPerformanceRisk -> Value
Data.ToJSON,
ToJSONKeyFunction [CurrentPerformanceRisk]
ToJSONKeyFunction CurrentPerformanceRisk
forall a.
ToJSONKeyFunction a -> ToJSONKeyFunction [a] -> ToJSONKey a
toJSONKeyList :: ToJSONKeyFunction [CurrentPerformanceRisk]
$ctoJSONKeyList :: ToJSONKeyFunction [CurrentPerformanceRisk]
toJSONKey :: ToJSONKeyFunction CurrentPerformanceRisk
$ctoJSONKey :: ToJSONKeyFunction CurrentPerformanceRisk
Data.ToJSONKey,
[Node] -> Either String CurrentPerformanceRisk
forall a. ([Node] -> Either String a) -> FromXML a
parseXML :: [Node] -> Either String CurrentPerformanceRisk
$cparseXML :: [Node] -> Either String CurrentPerformanceRisk
Data.FromXML,
CurrentPerformanceRisk -> XML
forall a. (a -> XML) -> ToXML a
toXML :: CurrentPerformanceRisk -> XML
$ctoXML :: CurrentPerformanceRisk -> XML
Data.ToXML
)
pattern CurrentPerformanceRisk_High :: CurrentPerformanceRisk
pattern $bCurrentPerformanceRisk_High :: CurrentPerformanceRisk
$mCurrentPerformanceRisk_High :: forall {r}.
CurrentPerformanceRisk -> ((# #) -> r) -> ((# #) -> r) -> r
CurrentPerformanceRisk_High = CurrentPerformanceRisk' "High"
pattern CurrentPerformanceRisk_Low :: CurrentPerformanceRisk
pattern $bCurrentPerformanceRisk_Low :: CurrentPerformanceRisk
$mCurrentPerformanceRisk_Low :: forall {r}.
CurrentPerformanceRisk -> ((# #) -> r) -> ((# #) -> r) -> r
CurrentPerformanceRisk_Low = CurrentPerformanceRisk' "Low"
pattern CurrentPerformanceRisk_Medium :: CurrentPerformanceRisk
pattern $bCurrentPerformanceRisk_Medium :: CurrentPerformanceRisk
$mCurrentPerformanceRisk_Medium :: forall {r}.
CurrentPerformanceRisk -> ((# #) -> r) -> ((# #) -> r) -> r
CurrentPerformanceRisk_Medium = CurrentPerformanceRisk' "Medium"
pattern CurrentPerformanceRisk_VeryLow :: CurrentPerformanceRisk
pattern $bCurrentPerformanceRisk_VeryLow :: CurrentPerformanceRisk
$mCurrentPerformanceRisk_VeryLow :: forall {r}.
CurrentPerformanceRisk -> ((# #) -> r) -> ((# #) -> r) -> r
CurrentPerformanceRisk_VeryLow = CurrentPerformanceRisk' "VeryLow"
{-# COMPLETE
CurrentPerformanceRisk_High,
CurrentPerformanceRisk_Low,
CurrentPerformanceRisk_Medium,
CurrentPerformanceRisk_VeryLow,
CurrentPerformanceRisk'
#-}