{-# 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.GroundStation.Types.FrequencyUnits
-- Copyright   : (c) 2013-2023 Brendan Hay
-- License     : Mozilla Public License, v. 2.0.
-- Maintainer  : Brendan Hay
-- Stability   : auto-generated
-- Portability : non-portable (GHC extensions)
module Amazonka.GroundStation.Types.FrequencyUnits
  ( FrequencyUnits
      ( ..,
        FrequencyUnits_GHz,
        FrequencyUnits_KHz,
        FrequencyUnits_MHz
      ),
  )
where

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

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

pattern FrequencyUnits_GHz :: FrequencyUnits
pattern $bFrequencyUnits_GHz :: FrequencyUnits
$mFrequencyUnits_GHz :: forall {r}. FrequencyUnits -> ((# #) -> r) -> ((# #) -> r) -> r
FrequencyUnits_GHz = FrequencyUnits' "GHz"

pattern FrequencyUnits_KHz :: FrequencyUnits
pattern $bFrequencyUnits_KHz :: FrequencyUnits
$mFrequencyUnits_KHz :: forall {r}. FrequencyUnits -> ((# #) -> r) -> ((# #) -> r) -> r
FrequencyUnits_KHz = FrequencyUnits' "kHz"

pattern FrequencyUnits_MHz :: FrequencyUnits
pattern $bFrequencyUnits_MHz :: FrequencyUnits
$mFrequencyUnits_MHz :: forall {r}. FrequencyUnits -> ((# #) -> r) -> ((# #) -> r) -> r
FrequencyUnits_MHz = FrequencyUnits' "MHz"

{-# COMPLETE
  FrequencyUnits_GHz,
  FrequencyUnits_KHz,
  FrequencyUnits_MHz,
  FrequencyUnits'
  #-}