{-# 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.CostExplorer.Types.MonitorType
-- 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.CostExplorer.Types.MonitorType
  ( MonitorType
      ( ..,
        MonitorType_CUSTOM,
        MonitorType_DIMENSIONAL
      ),
  )
where

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

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

pattern MonitorType_CUSTOM :: MonitorType
pattern $bMonitorType_CUSTOM :: MonitorType
$mMonitorType_CUSTOM :: forall r. MonitorType -> (Void# -> r) -> (Void# -> r) -> r
MonitorType_CUSTOM = MonitorType' "CUSTOM"

pattern MonitorType_DIMENSIONAL :: MonitorType
pattern $bMonitorType_DIMENSIONAL :: MonitorType
$mMonitorType_DIMENSIONAL :: forall r. MonitorType -> (Void# -> r) -> (Void# -> r) -> r
MonitorType_DIMENSIONAL = MonitorType' "DIMENSIONAL"

{-# COMPLETE
  MonitorType_CUSTOM,
  MonitorType_DIMENSIONAL,
  MonitorType'
  #-}