module Stratosphere.MPA.ApprovalTeam.MofNApprovalStrategyProperty (
        MofNApprovalStrategyProperty(..), mkMofNApprovalStrategyProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data MofNApprovalStrategyProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-mpa-approvalteam-mofnapprovalstrategy.html>
    MofNApprovalStrategyProperty {MofNApprovalStrategyProperty -> ()
haddock_workaround_ :: (),
                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-mpa-approvalteam-mofnapprovalstrategy.html#cfn-mpa-approvalteam-mofnapprovalstrategy-minapprovalsrequired>
                                  MofNApprovalStrategyProperty -> Value Integer
minApprovalsRequired :: (Value Prelude.Integer)}
  deriving stock (MofNApprovalStrategyProperty
-> MofNApprovalStrategyProperty -> Bool
(MofNApprovalStrategyProperty
 -> MofNApprovalStrategyProperty -> Bool)
-> (MofNApprovalStrategyProperty
    -> MofNApprovalStrategyProperty -> Bool)
-> Eq MofNApprovalStrategyProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: MofNApprovalStrategyProperty
-> MofNApprovalStrategyProperty -> Bool
== :: MofNApprovalStrategyProperty
-> MofNApprovalStrategyProperty -> Bool
$c/= :: MofNApprovalStrategyProperty
-> MofNApprovalStrategyProperty -> Bool
/= :: MofNApprovalStrategyProperty
-> MofNApprovalStrategyProperty -> Bool
Prelude.Eq, Int -> MofNApprovalStrategyProperty -> ShowS
[MofNApprovalStrategyProperty] -> ShowS
MofNApprovalStrategyProperty -> String
(Int -> MofNApprovalStrategyProperty -> ShowS)
-> (MofNApprovalStrategyProperty -> String)
-> ([MofNApprovalStrategyProperty] -> ShowS)
-> Show MofNApprovalStrategyProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> MofNApprovalStrategyProperty -> ShowS
showsPrec :: Int -> MofNApprovalStrategyProperty -> ShowS
$cshow :: MofNApprovalStrategyProperty -> String
show :: MofNApprovalStrategyProperty -> String
$cshowList :: [MofNApprovalStrategyProperty] -> ShowS
showList :: [MofNApprovalStrategyProperty] -> ShowS
Prelude.Show)
mkMofNApprovalStrategyProperty ::
  Value Prelude.Integer -> MofNApprovalStrategyProperty
mkMofNApprovalStrategyProperty :: Value Integer -> MofNApprovalStrategyProperty
mkMofNApprovalStrategyProperty Value Integer
minApprovalsRequired
  = MofNApprovalStrategyProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (),
       minApprovalsRequired :: Value Integer
minApprovalsRequired = Value Integer
minApprovalsRequired}
instance ToResourceProperties MofNApprovalStrategyProperty where
  toResourceProperties :: MofNApprovalStrategyProperty -> ResourceProperties
toResourceProperties MofNApprovalStrategyProperty {()
Value Integer
haddock_workaround_ :: MofNApprovalStrategyProperty -> ()
minApprovalsRequired :: MofNApprovalStrategyProperty -> Value Integer
haddock_workaround_ :: ()
minApprovalsRequired :: Value Integer
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::MPA::ApprovalTeam.MofNApprovalStrategy",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Key
"MinApprovalsRequired" Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Integer
minApprovalsRequired]}
instance JSON.ToJSON MofNApprovalStrategyProperty where
  toJSON :: MofNApprovalStrategyProperty -> Value
toJSON MofNApprovalStrategyProperty {()
Value Integer
haddock_workaround_ :: MofNApprovalStrategyProperty -> ()
minApprovalsRequired :: MofNApprovalStrategyProperty -> Value Integer
haddock_workaround_ :: ()
minApprovalsRequired :: Value Integer
..}
    = [(Key, Value)] -> Value
JSON.object [Key
"MinApprovalsRequired" Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Integer
minApprovalsRequired]
instance Property "MinApprovalsRequired" MofNApprovalStrategyProperty where
  type PropertyType "MinApprovalsRequired" MofNApprovalStrategyProperty = Value Prelude.Integer
  set :: PropertyType "MinApprovalsRequired" MofNApprovalStrategyProperty
-> MofNApprovalStrategyProperty -> MofNApprovalStrategyProperty
set PropertyType "MinApprovalsRequired" MofNApprovalStrategyProperty
newValue MofNApprovalStrategyProperty {()
Value Integer
haddock_workaround_ :: MofNApprovalStrategyProperty -> ()
minApprovalsRequired :: MofNApprovalStrategyProperty -> Value Integer
haddock_workaround_ :: ()
minApprovalsRequired :: Value Integer
..}
    = MofNApprovalStrategyProperty
        {minApprovalsRequired :: Value Integer
minApprovalsRequired = PropertyType "MinApprovalsRequired" MofNApprovalStrategyProperty
Value Integer
newValue, ()
haddock_workaround_ :: ()
haddock_workaround_ :: ()
..}