module Stratosphere.NetworkManager.VpcAttachment.ProposedNetworkFunctionGroupChangeProperty ( ProposedNetworkFunctionGroupChangeProperty(..), mkProposedNetworkFunctionGroupChangeProperty ) where import qualified Data.Aeson as JSON import qualified Stratosphere.Prelude as Prelude import Stratosphere.Property import Stratosphere.ResourceProperties import Stratosphere.Tag import Stratosphere.Value data ProposedNetworkFunctionGroupChangeProperty = -- | See: ProposedNetworkFunctionGroupChangeProperty {haddock_workaround_ :: (), -- | See: attachmentPolicyRuleNumber :: (Prelude.Maybe (Value Prelude.Integer)), -- | See: networkFunctionGroupName :: (Prelude.Maybe (Value Prelude.Text)), -- | See: tags :: (Prelude.Maybe [Tag])} deriving stock (Prelude.Eq, Prelude.Show) mkProposedNetworkFunctionGroupChangeProperty :: ProposedNetworkFunctionGroupChangeProperty mkProposedNetworkFunctionGroupChangeProperty = ProposedNetworkFunctionGroupChangeProperty {haddock_workaround_ = (), attachmentPolicyRuleNumber = Prelude.Nothing, networkFunctionGroupName = Prelude.Nothing, tags = Prelude.Nothing} instance ToResourceProperties ProposedNetworkFunctionGroupChangeProperty where toResourceProperties ProposedNetworkFunctionGroupChangeProperty {..} = ResourceProperties {awsType = "AWS::NetworkManager::VpcAttachment.ProposedNetworkFunctionGroupChange", supportsTags = Prelude.True, properties = Prelude.fromList (Prelude.catMaybes [(JSON..=) "AttachmentPolicyRuleNumber" Prelude.<$> attachmentPolicyRuleNumber, (JSON..=) "NetworkFunctionGroupName" Prelude.<$> networkFunctionGroupName, (JSON..=) "Tags" Prelude.<$> tags])} instance JSON.ToJSON ProposedNetworkFunctionGroupChangeProperty where toJSON ProposedNetworkFunctionGroupChangeProperty {..} = JSON.object (Prelude.fromList (Prelude.catMaybes [(JSON..=) "AttachmentPolicyRuleNumber" Prelude.<$> attachmentPolicyRuleNumber, (JSON..=) "NetworkFunctionGroupName" Prelude.<$> networkFunctionGroupName, (JSON..=) "Tags" Prelude.<$> tags])) instance Property "AttachmentPolicyRuleNumber" ProposedNetworkFunctionGroupChangeProperty where type PropertyType "AttachmentPolicyRuleNumber" ProposedNetworkFunctionGroupChangeProperty = Value Prelude.Integer set newValue ProposedNetworkFunctionGroupChangeProperty {..} = ProposedNetworkFunctionGroupChangeProperty {attachmentPolicyRuleNumber = Prelude.pure newValue, ..} instance Property "NetworkFunctionGroupName" ProposedNetworkFunctionGroupChangeProperty where type PropertyType "NetworkFunctionGroupName" ProposedNetworkFunctionGroupChangeProperty = Value Prelude.Text set newValue ProposedNetworkFunctionGroupChangeProperty {..} = ProposedNetworkFunctionGroupChangeProperty {networkFunctionGroupName = Prelude.pure newValue, ..} instance Property "Tags" ProposedNetworkFunctionGroupChangeProperty where type PropertyType "Tags" ProposedNetworkFunctionGroupChangeProperty = [Tag] set newValue ProposedNetworkFunctionGroupChangeProperty {..} = ProposedNetworkFunctionGroupChangeProperty {tags = Prelude.pure newValue, ..}