module Stratosphere.CustomerProfiles.Domain.MatchingProperty (
        module Exports, MatchingProperty(..), mkMatchingProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.CustomerProfiles.Domain.AutoMergingProperty as Exports
import {-# SOURCE #-} Stratosphere.CustomerProfiles.Domain.ExportingConfigProperty as Exports
import {-# SOURCE #-} Stratosphere.CustomerProfiles.Domain.JobScheduleProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data MatchingProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-customerprofiles-domain-matching.html>
    MatchingProperty {MatchingProperty -> ()
haddock_workaround_ :: (),
                      -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-customerprofiles-domain-matching.html#cfn-customerprofiles-domain-matching-automerging>
                      MatchingProperty -> Maybe AutoMergingProperty
autoMerging :: (Prelude.Maybe AutoMergingProperty),
                      -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-customerprofiles-domain-matching.html#cfn-customerprofiles-domain-matching-enabled>
                      MatchingProperty -> Value Bool
enabled :: (Value Prelude.Bool),
                      -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-customerprofiles-domain-matching.html#cfn-customerprofiles-domain-matching-exportingconfig>
                      MatchingProperty -> Maybe ExportingConfigProperty
exportingConfig :: (Prelude.Maybe ExportingConfigProperty),
                      -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-customerprofiles-domain-matching.html#cfn-customerprofiles-domain-matching-jobschedule>
                      MatchingProperty -> Maybe JobScheduleProperty
jobSchedule :: (Prelude.Maybe JobScheduleProperty)}
  deriving stock (MatchingProperty -> MatchingProperty -> Bool
(MatchingProperty -> MatchingProperty -> Bool)
-> (MatchingProperty -> MatchingProperty -> Bool)
-> Eq MatchingProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: MatchingProperty -> MatchingProperty -> Bool
== :: MatchingProperty -> MatchingProperty -> Bool
$c/= :: MatchingProperty -> MatchingProperty -> Bool
/= :: MatchingProperty -> MatchingProperty -> Bool
Prelude.Eq, Int -> MatchingProperty -> ShowS
[MatchingProperty] -> ShowS
MatchingProperty -> String
(Int -> MatchingProperty -> ShowS)
-> (MatchingProperty -> String)
-> ([MatchingProperty] -> ShowS)
-> Show MatchingProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> MatchingProperty -> ShowS
showsPrec :: Int -> MatchingProperty -> ShowS
$cshow :: MatchingProperty -> String
show :: MatchingProperty -> String
$cshowList :: [MatchingProperty] -> ShowS
showList :: [MatchingProperty] -> ShowS
Prelude.Show)
mkMatchingProperty :: Value Prelude.Bool -> MatchingProperty
mkMatchingProperty :: Value Bool -> MatchingProperty
mkMatchingProperty Value Bool
enabled
  = MatchingProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), enabled :: Value Bool
enabled = Value Bool
enabled,
       autoMerging :: Maybe AutoMergingProperty
autoMerging = Maybe AutoMergingProperty
forall a. Maybe a
Prelude.Nothing, exportingConfig :: Maybe ExportingConfigProperty
exportingConfig = Maybe ExportingConfigProperty
forall a. Maybe a
Prelude.Nothing,
       jobSchedule :: Maybe JobScheduleProperty
jobSchedule = Maybe JobScheduleProperty
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties MatchingProperty where
  toResourceProperties :: MatchingProperty -> ResourceProperties
toResourceProperties MatchingProperty {Maybe AutoMergingProperty
Maybe JobScheduleProperty
Maybe ExportingConfigProperty
()
Value Bool
haddock_workaround_ :: MatchingProperty -> ()
autoMerging :: MatchingProperty -> Maybe AutoMergingProperty
enabled :: MatchingProperty -> Value Bool
exportingConfig :: MatchingProperty -> Maybe ExportingConfigProperty
jobSchedule :: MatchingProperty -> Maybe JobScheduleProperty
haddock_workaround_ :: ()
autoMerging :: Maybe AutoMergingProperty
enabled :: Value Bool
exportingConfig :: Maybe ExportingConfigProperty
jobSchedule :: Maybe JobScheduleProperty
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::CustomerProfiles::Domain.Matching",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Item Object] -> Object
forall l. IsList l => [Item l] -> l
Prelude.fromList
                        ([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
                           [Key
"Enabled" Key -> Value Bool -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Bool
enabled]
                           ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                              [Key -> AutoMergingProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AutoMerging" (AutoMergingProperty -> (Key, Value))
-> Maybe AutoMergingProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe AutoMergingProperty
autoMerging,
                               Key -> ExportingConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ExportingConfig" (ExportingConfigProperty -> (Key, Value))
-> Maybe ExportingConfigProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ExportingConfigProperty
exportingConfig,
                               Key -> JobScheduleProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"JobSchedule" (JobScheduleProperty -> (Key, Value))
-> Maybe JobScheduleProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe JobScheduleProperty
jobSchedule]))}
instance JSON.ToJSON MatchingProperty where
  toJSON :: MatchingProperty -> Value
toJSON MatchingProperty {Maybe AutoMergingProperty
Maybe JobScheduleProperty
Maybe ExportingConfigProperty
()
Value Bool
haddock_workaround_ :: MatchingProperty -> ()
autoMerging :: MatchingProperty -> Maybe AutoMergingProperty
enabled :: MatchingProperty -> Value Bool
exportingConfig :: MatchingProperty -> Maybe ExportingConfigProperty
jobSchedule :: MatchingProperty -> Maybe JobScheduleProperty
haddock_workaround_ :: ()
autoMerging :: Maybe AutoMergingProperty
enabled :: Value Bool
exportingConfig :: Maybe ExportingConfigProperty
jobSchedule :: Maybe JobScheduleProperty
..}
    = [(Key, Value)] -> Value
JSON.object
        ([Item [(Key, Value)]] -> [(Key, Value)]
forall l. IsList l => [Item l] -> l
Prelude.fromList
           ([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
              [Key
"Enabled" Key -> Value Bool -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Bool
enabled]
              ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                 [Key -> AutoMergingProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AutoMerging" (AutoMergingProperty -> (Key, Value))
-> Maybe AutoMergingProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe AutoMergingProperty
autoMerging,
                  Key -> ExportingConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ExportingConfig" (ExportingConfigProperty -> (Key, Value))
-> Maybe ExportingConfigProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ExportingConfigProperty
exportingConfig,
                  Key -> JobScheduleProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"JobSchedule" (JobScheduleProperty -> (Key, Value))
-> Maybe JobScheduleProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe JobScheduleProperty
jobSchedule])))
instance Property "AutoMerging" MatchingProperty where
  type PropertyType "AutoMerging" MatchingProperty = AutoMergingProperty
  set :: PropertyType "AutoMerging" MatchingProperty
-> MatchingProperty -> MatchingProperty
set PropertyType "AutoMerging" MatchingProperty
newValue MatchingProperty {Maybe AutoMergingProperty
Maybe JobScheduleProperty
Maybe ExportingConfigProperty
()
Value Bool
haddock_workaround_ :: MatchingProperty -> ()
autoMerging :: MatchingProperty -> Maybe AutoMergingProperty
enabled :: MatchingProperty -> Value Bool
exportingConfig :: MatchingProperty -> Maybe ExportingConfigProperty
jobSchedule :: MatchingProperty -> Maybe JobScheduleProperty
haddock_workaround_ :: ()
autoMerging :: Maybe AutoMergingProperty
enabled :: Value Bool
exportingConfig :: Maybe ExportingConfigProperty
jobSchedule :: Maybe JobScheduleProperty
..}
    = MatchingProperty {autoMerging :: Maybe AutoMergingProperty
autoMerging = AutoMergingProperty -> Maybe AutoMergingProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "AutoMerging" MatchingProperty
AutoMergingProperty
newValue, Maybe JobScheduleProperty
Maybe ExportingConfigProperty
()
Value Bool
haddock_workaround_ :: ()
enabled :: Value Bool
exportingConfig :: Maybe ExportingConfigProperty
jobSchedule :: Maybe JobScheduleProperty
haddock_workaround_ :: ()
enabled :: Value Bool
exportingConfig :: Maybe ExportingConfigProperty
jobSchedule :: Maybe JobScheduleProperty
..}
instance Property "Enabled" MatchingProperty where
  type PropertyType "Enabled" MatchingProperty = Value Prelude.Bool
  set :: PropertyType "Enabled" MatchingProperty
-> MatchingProperty -> MatchingProperty
set PropertyType "Enabled" MatchingProperty
newValue MatchingProperty {Maybe AutoMergingProperty
Maybe JobScheduleProperty
Maybe ExportingConfigProperty
()
Value Bool
haddock_workaround_ :: MatchingProperty -> ()
autoMerging :: MatchingProperty -> Maybe AutoMergingProperty
enabled :: MatchingProperty -> Value Bool
exportingConfig :: MatchingProperty -> Maybe ExportingConfigProperty
jobSchedule :: MatchingProperty -> Maybe JobScheduleProperty
haddock_workaround_ :: ()
autoMerging :: Maybe AutoMergingProperty
enabled :: Value Bool
exportingConfig :: Maybe ExportingConfigProperty
jobSchedule :: Maybe JobScheduleProperty
..}
    = MatchingProperty {enabled :: Value Bool
enabled = PropertyType "Enabled" MatchingProperty
Value Bool
newValue, Maybe AutoMergingProperty
Maybe JobScheduleProperty
Maybe ExportingConfigProperty
()
haddock_workaround_ :: ()
autoMerging :: Maybe AutoMergingProperty
exportingConfig :: Maybe ExportingConfigProperty
jobSchedule :: Maybe JobScheduleProperty
haddock_workaround_ :: ()
autoMerging :: Maybe AutoMergingProperty
exportingConfig :: Maybe ExportingConfigProperty
jobSchedule :: Maybe JobScheduleProperty
..}
instance Property "ExportingConfig" MatchingProperty where
  type PropertyType "ExportingConfig" MatchingProperty = ExportingConfigProperty
  set :: PropertyType "ExportingConfig" MatchingProperty
-> MatchingProperty -> MatchingProperty
set PropertyType "ExportingConfig" MatchingProperty
newValue MatchingProperty {Maybe AutoMergingProperty
Maybe JobScheduleProperty
Maybe ExportingConfigProperty
()
Value Bool
haddock_workaround_ :: MatchingProperty -> ()
autoMerging :: MatchingProperty -> Maybe AutoMergingProperty
enabled :: MatchingProperty -> Value Bool
exportingConfig :: MatchingProperty -> Maybe ExportingConfigProperty
jobSchedule :: MatchingProperty -> Maybe JobScheduleProperty
haddock_workaround_ :: ()
autoMerging :: Maybe AutoMergingProperty
enabled :: Value Bool
exportingConfig :: Maybe ExportingConfigProperty
jobSchedule :: Maybe JobScheduleProperty
..}
    = MatchingProperty {exportingConfig :: Maybe ExportingConfigProperty
exportingConfig = ExportingConfigProperty -> Maybe ExportingConfigProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ExportingConfig" MatchingProperty
ExportingConfigProperty
newValue, Maybe AutoMergingProperty
Maybe JobScheduleProperty
()
Value Bool
haddock_workaround_ :: ()
autoMerging :: Maybe AutoMergingProperty
enabled :: Value Bool
jobSchedule :: Maybe JobScheduleProperty
haddock_workaround_ :: ()
autoMerging :: Maybe AutoMergingProperty
enabled :: Value Bool
jobSchedule :: Maybe JobScheduleProperty
..}
instance Property "JobSchedule" MatchingProperty where
  type PropertyType "JobSchedule" MatchingProperty = JobScheduleProperty
  set :: PropertyType "JobSchedule" MatchingProperty
-> MatchingProperty -> MatchingProperty
set PropertyType "JobSchedule" MatchingProperty
newValue MatchingProperty {Maybe AutoMergingProperty
Maybe JobScheduleProperty
Maybe ExportingConfigProperty
()
Value Bool
haddock_workaround_ :: MatchingProperty -> ()
autoMerging :: MatchingProperty -> Maybe AutoMergingProperty
enabled :: MatchingProperty -> Value Bool
exportingConfig :: MatchingProperty -> Maybe ExportingConfigProperty
jobSchedule :: MatchingProperty -> Maybe JobScheduleProperty
haddock_workaround_ :: ()
autoMerging :: Maybe AutoMergingProperty
enabled :: Value Bool
exportingConfig :: Maybe ExportingConfigProperty
jobSchedule :: Maybe JobScheduleProperty
..}
    = MatchingProperty {jobSchedule :: Maybe JobScheduleProperty
jobSchedule = JobScheduleProperty -> Maybe JobScheduleProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "JobSchedule" MatchingProperty
JobScheduleProperty
newValue, Maybe AutoMergingProperty
Maybe ExportingConfigProperty
()
Value Bool
haddock_workaround_ :: ()
autoMerging :: Maybe AutoMergingProperty
enabled :: Value Bool
exportingConfig :: Maybe ExportingConfigProperty
haddock_workaround_ :: ()
autoMerging :: Maybe AutoMergingProperty
enabled :: Value Bool
exportingConfig :: Maybe ExportingConfigProperty
..}