module Stratosphere.Route53.RecordSet (
        module Exports, RecordSet(..), mkRecordSet
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.Route53.RecordSet.AliasTargetProperty as Exports
import {-# SOURCE #-} Stratosphere.Route53.RecordSet.CidrRoutingConfigProperty as Exports
import {-# SOURCE #-} Stratosphere.Route53.RecordSet.GeoLocationProperty as Exports
import {-# SOURCE #-} Stratosphere.Route53.RecordSet.GeoProximityLocationProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data RecordSet
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-route53-recordset.html>
    RecordSet {RecordSet -> ()
haddock_workaround_ :: (),
               -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-route53-recordset.html#cfn-route53-recordset-aliastarget>
               RecordSet -> Maybe AliasTargetProperty
aliasTarget :: (Prelude.Maybe AliasTargetProperty),
               -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-route53-recordset.html#cfn-route53-recordset-cidrroutingconfig>
               RecordSet -> Maybe CidrRoutingConfigProperty
cidrRoutingConfig :: (Prelude.Maybe CidrRoutingConfigProperty),
               -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-route53-recordset.html#cfn-route53-recordset-comment>
               RecordSet -> Maybe (Value Text)
comment :: (Prelude.Maybe (Value Prelude.Text)),
               -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-route53-recordset.html#cfn-route53-recordset-failover>
               RecordSet -> Maybe (Value Text)
failover :: (Prelude.Maybe (Value Prelude.Text)),
               -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-route53-recordset.html#cfn-route53-recordset-geolocation>
               RecordSet -> Maybe GeoLocationProperty
geoLocation :: (Prelude.Maybe GeoLocationProperty),
               -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-route53-recordset.html#cfn-route53-recordset-geoproximitylocation>
               RecordSet -> Maybe GeoProximityLocationProperty
geoProximityLocation :: (Prelude.Maybe GeoProximityLocationProperty),
               -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-route53-recordset.html#cfn-route53-recordset-healthcheckid>
               RecordSet -> Maybe (Value Text)
healthCheckId :: (Prelude.Maybe (Value Prelude.Text)),
               -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-route53-recordset.html#cfn-route53-recordset-hostedzoneid>
               RecordSet -> Maybe (Value Text)
hostedZoneId :: (Prelude.Maybe (Value Prelude.Text)),
               -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-route53-recordset.html#cfn-route53-recordset-hostedzonename>
               RecordSet -> Maybe (Value Text)
hostedZoneName :: (Prelude.Maybe (Value Prelude.Text)),
               -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-route53-recordset.html#cfn-route53-recordset-multivalueanswer>
               RecordSet -> Maybe (Value Bool)
multiValueAnswer :: (Prelude.Maybe (Value Prelude.Bool)),
               -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-route53-recordset.html#cfn-route53-recordset-name>
               RecordSet -> Value Text
name :: (Value Prelude.Text),
               -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-route53-recordset.html#cfn-route53-recordset-region>
               RecordSet -> Maybe (Value Text)
region :: (Prelude.Maybe (Value Prelude.Text)),
               -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-route53-recordset.html#cfn-route53-recordset-resourcerecords>
               RecordSet -> Maybe (ValueList Text)
resourceRecords :: (Prelude.Maybe (ValueList Prelude.Text)),
               -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-route53-recordset.html#cfn-route53-recordset-setidentifier>
               RecordSet -> Maybe (Value Text)
setIdentifier :: (Prelude.Maybe (Value Prelude.Text)),
               -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-route53-recordset.html#cfn-route53-recordset-ttl>
               RecordSet -> Maybe (Value Text)
tTL :: (Prelude.Maybe (Value Prelude.Text)),
               -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-route53-recordset.html#cfn-route53-recordset-type>
               RecordSet -> Value Text
type' :: (Value Prelude.Text),
               -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-route53-recordset.html#cfn-route53-recordset-weight>
               RecordSet -> Maybe (Value Integer)
weight :: (Prelude.Maybe (Value Prelude.Integer))}
  deriving stock (RecordSet -> RecordSet -> Bool
(RecordSet -> RecordSet -> Bool)
-> (RecordSet -> RecordSet -> Bool) -> Eq RecordSet
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RecordSet -> RecordSet -> Bool
== :: RecordSet -> RecordSet -> Bool
$c/= :: RecordSet -> RecordSet -> Bool
/= :: RecordSet -> RecordSet -> Bool
Prelude.Eq, Int -> RecordSet -> ShowS
[RecordSet] -> ShowS
RecordSet -> String
(Int -> RecordSet -> ShowS)
-> (RecordSet -> String)
-> ([RecordSet] -> ShowS)
-> Show RecordSet
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> RecordSet -> ShowS
showsPrec :: Int -> RecordSet -> ShowS
$cshow :: RecordSet -> String
show :: RecordSet -> String
$cshowList :: [RecordSet] -> ShowS
showList :: [RecordSet] -> ShowS
Prelude.Show)
mkRecordSet ::
  Value Prelude.Text -> Value Prelude.Text -> RecordSet
mkRecordSet :: Value Text -> Value Text -> RecordSet
mkRecordSet Value Text
name Value Text
type'
  = RecordSet
      {haddock_workaround_ :: ()
haddock_workaround_ = (), name :: Value Text
name = Value Text
name, type' :: Value Text
type' = Value Text
type',
       aliasTarget :: Maybe AliasTargetProperty
aliasTarget = Maybe AliasTargetProperty
forall a. Maybe a
Prelude.Nothing, cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
cidrRoutingConfig = Maybe CidrRoutingConfigProperty
forall a. Maybe a
Prelude.Nothing,
       comment :: Maybe (Value Text)
comment = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, failover :: Maybe (Value Text)
failover = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       geoLocation :: Maybe GeoLocationProperty
geoLocation = Maybe GeoLocationProperty
forall a. Maybe a
Prelude.Nothing,
       geoProximityLocation :: Maybe GeoProximityLocationProperty
geoProximityLocation = Maybe GeoProximityLocationProperty
forall a. Maybe a
Prelude.Nothing,
       healthCheckId :: Maybe (Value Text)
healthCheckId = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, hostedZoneId :: Maybe (Value Text)
hostedZoneId = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       hostedZoneName :: Maybe (Value Text)
hostedZoneName = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       multiValueAnswer :: Maybe (Value Bool)
multiValueAnswer = Maybe (Value Bool)
forall a. Maybe a
Prelude.Nothing, region :: Maybe (Value Text)
region = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       resourceRecords :: Maybe (ValueList Text)
resourceRecords = Maybe (ValueList Text)
forall a. Maybe a
Prelude.Nothing, setIdentifier :: Maybe (Value Text)
setIdentifier = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       tTL :: Maybe (Value Text)
tTL = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, weight :: Maybe (Value Integer)
weight = Maybe (Value Integer)
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties RecordSet where
  toResourceProperties :: RecordSet -> ResourceProperties
toResourceProperties RecordSet {Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe AliasTargetProperty
Maybe CidrRoutingConfigProperty
Maybe GeoLocationProperty
Maybe GeoProximityLocationProperty
()
Value Text
haddock_workaround_ :: RecordSet -> ()
aliasTarget :: RecordSet -> Maybe AliasTargetProperty
cidrRoutingConfig :: RecordSet -> Maybe CidrRoutingConfigProperty
comment :: RecordSet -> Maybe (Value Text)
failover :: RecordSet -> Maybe (Value Text)
geoLocation :: RecordSet -> Maybe GeoLocationProperty
geoProximityLocation :: RecordSet -> Maybe GeoProximityLocationProperty
healthCheckId :: RecordSet -> Maybe (Value Text)
hostedZoneId :: RecordSet -> Maybe (Value Text)
hostedZoneName :: RecordSet -> Maybe (Value Text)
multiValueAnswer :: RecordSet -> Maybe (Value Bool)
name :: RecordSet -> Value Text
region :: RecordSet -> Maybe (Value Text)
resourceRecords :: RecordSet -> Maybe (ValueList Text)
setIdentifier :: RecordSet -> Maybe (Value Text)
tTL :: RecordSet -> Maybe (Value Text)
type' :: RecordSet -> Value Text
weight :: RecordSet -> Maybe (Value Integer)
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::Route53::RecordSet", 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
"Name" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
name, Key
"Type" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
type']
                           ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                              [Key -> AliasTargetProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AliasTarget" (AliasTargetProperty -> (Key, Value))
-> Maybe AliasTargetProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe AliasTargetProperty
aliasTarget,
                               Key -> CidrRoutingConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"CidrRoutingConfig" (CidrRoutingConfigProperty -> (Key, Value))
-> Maybe CidrRoutingConfigProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe CidrRoutingConfigProperty
cidrRoutingConfig,
                               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Comment" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
comment,
                               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Failover" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
failover,
                               Key -> GeoLocationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"GeoLocation" (GeoLocationProperty -> (Key, Value))
-> Maybe GeoLocationProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe GeoLocationProperty
geoLocation,
                               Key -> GeoProximityLocationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"GeoProximityLocation" (GeoProximityLocationProperty -> (Key, Value))
-> Maybe GeoProximityLocationProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe GeoProximityLocationProperty
geoProximityLocation,
                               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"HealthCheckId" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
healthCheckId,
                               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"HostedZoneId" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
hostedZoneId,
                               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"HostedZoneName" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
hostedZoneName,
                               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..=) Key
"MultiValueAnswer" (Value Bool -> (Key, Value))
-> Maybe (Value Bool) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Bool)
multiValueAnswer,
                               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Region" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
region,
                               Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ResourceRecords" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
resourceRecords,
                               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"SetIdentifier" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
setIdentifier,
                               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"TTL" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
tTL,
                               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..=) Key
"Weight" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
weight]))}
instance JSON.ToJSON RecordSet where
  toJSON :: RecordSet -> Value
toJSON RecordSet {Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe AliasTargetProperty
Maybe CidrRoutingConfigProperty
Maybe GeoLocationProperty
Maybe GeoProximityLocationProperty
()
Value Text
haddock_workaround_ :: RecordSet -> ()
aliasTarget :: RecordSet -> Maybe AliasTargetProperty
cidrRoutingConfig :: RecordSet -> Maybe CidrRoutingConfigProperty
comment :: RecordSet -> Maybe (Value Text)
failover :: RecordSet -> Maybe (Value Text)
geoLocation :: RecordSet -> Maybe GeoLocationProperty
geoProximityLocation :: RecordSet -> Maybe GeoProximityLocationProperty
healthCheckId :: RecordSet -> Maybe (Value Text)
hostedZoneId :: RecordSet -> Maybe (Value Text)
hostedZoneName :: RecordSet -> Maybe (Value Text)
multiValueAnswer :: RecordSet -> Maybe (Value Bool)
name :: RecordSet -> Value Text
region :: RecordSet -> Maybe (Value Text)
resourceRecords :: RecordSet -> Maybe (ValueList Text)
setIdentifier :: RecordSet -> Maybe (Value Text)
tTL :: RecordSet -> Maybe (Value Text)
type' :: RecordSet -> Value Text
weight :: RecordSet -> Maybe (Value Integer)
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
..}
    = [(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
"Name" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
name, Key
"Type" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
type']
              ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                 [Key -> AliasTargetProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AliasTarget" (AliasTargetProperty -> (Key, Value))
-> Maybe AliasTargetProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe AliasTargetProperty
aliasTarget,
                  Key -> CidrRoutingConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"CidrRoutingConfig" (CidrRoutingConfigProperty -> (Key, Value))
-> Maybe CidrRoutingConfigProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe CidrRoutingConfigProperty
cidrRoutingConfig,
                  Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Comment" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
comment,
                  Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Failover" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
failover,
                  Key -> GeoLocationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"GeoLocation" (GeoLocationProperty -> (Key, Value))
-> Maybe GeoLocationProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe GeoLocationProperty
geoLocation,
                  Key -> GeoProximityLocationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"GeoProximityLocation" (GeoProximityLocationProperty -> (Key, Value))
-> Maybe GeoProximityLocationProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe GeoProximityLocationProperty
geoProximityLocation,
                  Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"HealthCheckId" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
healthCheckId,
                  Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"HostedZoneId" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
hostedZoneId,
                  Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"HostedZoneName" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
hostedZoneName,
                  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..=) Key
"MultiValueAnswer" (Value Bool -> (Key, Value))
-> Maybe (Value Bool) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Bool)
multiValueAnswer,
                  Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Region" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
region,
                  Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ResourceRecords" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
resourceRecords,
                  Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"SetIdentifier" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
setIdentifier,
                  Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"TTL" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
tTL,
                  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..=) Key
"Weight" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
weight])))
instance Property "AliasTarget" RecordSet where
  type PropertyType "AliasTarget" RecordSet = AliasTargetProperty
  set :: PropertyType "AliasTarget" RecordSet -> RecordSet -> RecordSet
set PropertyType "AliasTarget" RecordSet
newValue RecordSet {Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe AliasTargetProperty
Maybe CidrRoutingConfigProperty
Maybe GeoLocationProperty
Maybe GeoProximityLocationProperty
()
Value Text
haddock_workaround_ :: RecordSet -> ()
aliasTarget :: RecordSet -> Maybe AliasTargetProperty
cidrRoutingConfig :: RecordSet -> Maybe CidrRoutingConfigProperty
comment :: RecordSet -> Maybe (Value Text)
failover :: RecordSet -> Maybe (Value Text)
geoLocation :: RecordSet -> Maybe GeoLocationProperty
geoProximityLocation :: RecordSet -> Maybe GeoProximityLocationProperty
healthCheckId :: RecordSet -> Maybe (Value Text)
hostedZoneId :: RecordSet -> Maybe (Value Text)
hostedZoneName :: RecordSet -> Maybe (Value Text)
multiValueAnswer :: RecordSet -> Maybe (Value Bool)
name :: RecordSet -> Value Text
region :: RecordSet -> Maybe (Value Text)
resourceRecords :: RecordSet -> Maybe (ValueList Text)
setIdentifier :: RecordSet -> Maybe (Value Text)
tTL :: RecordSet -> Maybe (Value Text)
type' :: RecordSet -> Value Text
weight :: RecordSet -> Maybe (Value Integer)
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
..}
    = RecordSet {aliasTarget :: Maybe AliasTargetProperty
aliasTarget = AliasTargetProperty -> Maybe AliasTargetProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "AliasTarget" RecordSet
AliasTargetProperty
newValue, Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe CidrRoutingConfigProperty
Maybe GeoLocationProperty
Maybe GeoProximityLocationProperty
()
Value Text
haddock_workaround_ :: ()
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
haddock_workaround_ :: ()
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
..}
instance Property "CidrRoutingConfig" RecordSet where
  type PropertyType "CidrRoutingConfig" RecordSet = CidrRoutingConfigProperty
  set :: PropertyType "CidrRoutingConfig" RecordSet
-> RecordSet -> RecordSet
set PropertyType "CidrRoutingConfig" RecordSet
newValue RecordSet {Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe AliasTargetProperty
Maybe CidrRoutingConfigProperty
Maybe GeoLocationProperty
Maybe GeoProximityLocationProperty
()
Value Text
haddock_workaround_ :: RecordSet -> ()
aliasTarget :: RecordSet -> Maybe AliasTargetProperty
cidrRoutingConfig :: RecordSet -> Maybe CidrRoutingConfigProperty
comment :: RecordSet -> Maybe (Value Text)
failover :: RecordSet -> Maybe (Value Text)
geoLocation :: RecordSet -> Maybe GeoLocationProperty
geoProximityLocation :: RecordSet -> Maybe GeoProximityLocationProperty
healthCheckId :: RecordSet -> Maybe (Value Text)
hostedZoneId :: RecordSet -> Maybe (Value Text)
hostedZoneName :: RecordSet -> Maybe (Value Text)
multiValueAnswer :: RecordSet -> Maybe (Value Bool)
name :: RecordSet -> Value Text
region :: RecordSet -> Maybe (Value Text)
resourceRecords :: RecordSet -> Maybe (ValueList Text)
setIdentifier :: RecordSet -> Maybe (Value Text)
tTL :: RecordSet -> Maybe (Value Text)
type' :: RecordSet -> Value Text
weight :: RecordSet -> Maybe (Value Integer)
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
..}
    = RecordSet {cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
cidrRoutingConfig = CidrRoutingConfigProperty -> Maybe CidrRoutingConfigProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "CidrRoutingConfig" RecordSet
CidrRoutingConfigProperty
newValue, Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe AliasTargetProperty
Maybe GeoLocationProperty
Maybe GeoProximityLocationProperty
()
Value Text
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
..}
instance Property "Comment" RecordSet where
  type PropertyType "Comment" RecordSet = Value Prelude.Text
  set :: PropertyType "Comment" RecordSet -> RecordSet -> RecordSet
set PropertyType "Comment" RecordSet
newValue RecordSet {Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe AliasTargetProperty
Maybe CidrRoutingConfigProperty
Maybe GeoLocationProperty
Maybe GeoProximityLocationProperty
()
Value Text
haddock_workaround_ :: RecordSet -> ()
aliasTarget :: RecordSet -> Maybe AliasTargetProperty
cidrRoutingConfig :: RecordSet -> Maybe CidrRoutingConfigProperty
comment :: RecordSet -> Maybe (Value Text)
failover :: RecordSet -> Maybe (Value Text)
geoLocation :: RecordSet -> Maybe GeoLocationProperty
geoProximityLocation :: RecordSet -> Maybe GeoProximityLocationProperty
healthCheckId :: RecordSet -> Maybe (Value Text)
hostedZoneId :: RecordSet -> Maybe (Value Text)
hostedZoneName :: RecordSet -> Maybe (Value Text)
multiValueAnswer :: RecordSet -> Maybe (Value Bool)
name :: RecordSet -> Value Text
region :: RecordSet -> Maybe (Value Text)
resourceRecords :: RecordSet -> Maybe (ValueList Text)
setIdentifier :: RecordSet -> Maybe (Value Text)
tTL :: RecordSet -> Maybe (Value Text)
type' :: RecordSet -> Value Text
weight :: RecordSet -> Maybe (Value Integer)
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
..}
    = RecordSet {comment :: Maybe (Value Text)
comment = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Comment" RecordSet
Value Text
newValue, Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe AliasTargetProperty
Maybe CidrRoutingConfigProperty
Maybe GeoLocationProperty
Maybe GeoProximityLocationProperty
()
Value Text
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
..}
instance Property "Failover" RecordSet where
  type PropertyType "Failover" RecordSet = Value Prelude.Text
  set :: PropertyType "Failover" RecordSet -> RecordSet -> RecordSet
set PropertyType "Failover" RecordSet
newValue RecordSet {Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe AliasTargetProperty
Maybe CidrRoutingConfigProperty
Maybe GeoLocationProperty
Maybe GeoProximityLocationProperty
()
Value Text
haddock_workaround_ :: RecordSet -> ()
aliasTarget :: RecordSet -> Maybe AliasTargetProperty
cidrRoutingConfig :: RecordSet -> Maybe CidrRoutingConfigProperty
comment :: RecordSet -> Maybe (Value Text)
failover :: RecordSet -> Maybe (Value Text)
geoLocation :: RecordSet -> Maybe GeoLocationProperty
geoProximityLocation :: RecordSet -> Maybe GeoProximityLocationProperty
healthCheckId :: RecordSet -> Maybe (Value Text)
hostedZoneId :: RecordSet -> Maybe (Value Text)
hostedZoneName :: RecordSet -> Maybe (Value Text)
multiValueAnswer :: RecordSet -> Maybe (Value Bool)
name :: RecordSet -> Value Text
region :: RecordSet -> Maybe (Value Text)
resourceRecords :: RecordSet -> Maybe (ValueList Text)
setIdentifier :: RecordSet -> Maybe (Value Text)
tTL :: RecordSet -> Maybe (Value Text)
type' :: RecordSet -> Value Text
weight :: RecordSet -> Maybe (Value Integer)
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
..}
    = RecordSet {failover :: Maybe (Value Text)
failover = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Failover" RecordSet
Value Text
newValue, Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe AliasTargetProperty
Maybe CidrRoutingConfigProperty
Maybe GeoLocationProperty
Maybe GeoProximityLocationProperty
()
Value Text
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
..}
instance Property "GeoLocation" RecordSet where
  type PropertyType "GeoLocation" RecordSet = GeoLocationProperty
  set :: PropertyType "GeoLocation" RecordSet -> RecordSet -> RecordSet
set PropertyType "GeoLocation" RecordSet
newValue RecordSet {Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe AliasTargetProperty
Maybe CidrRoutingConfigProperty
Maybe GeoLocationProperty
Maybe GeoProximityLocationProperty
()
Value Text
haddock_workaround_ :: RecordSet -> ()
aliasTarget :: RecordSet -> Maybe AliasTargetProperty
cidrRoutingConfig :: RecordSet -> Maybe CidrRoutingConfigProperty
comment :: RecordSet -> Maybe (Value Text)
failover :: RecordSet -> Maybe (Value Text)
geoLocation :: RecordSet -> Maybe GeoLocationProperty
geoProximityLocation :: RecordSet -> Maybe GeoProximityLocationProperty
healthCheckId :: RecordSet -> Maybe (Value Text)
hostedZoneId :: RecordSet -> Maybe (Value Text)
hostedZoneName :: RecordSet -> Maybe (Value Text)
multiValueAnswer :: RecordSet -> Maybe (Value Bool)
name :: RecordSet -> Value Text
region :: RecordSet -> Maybe (Value Text)
resourceRecords :: RecordSet -> Maybe (ValueList Text)
setIdentifier :: RecordSet -> Maybe (Value Text)
tTL :: RecordSet -> Maybe (Value Text)
type' :: RecordSet -> Value Text
weight :: RecordSet -> Maybe (Value Integer)
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
..}
    = RecordSet {geoLocation :: Maybe GeoLocationProperty
geoLocation = GeoLocationProperty -> Maybe GeoLocationProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "GeoLocation" RecordSet
GeoLocationProperty
newValue, Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe AliasTargetProperty
Maybe CidrRoutingConfigProperty
Maybe GeoProximityLocationProperty
()
Value Text
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
..}
instance Property "GeoProximityLocation" RecordSet where
  type PropertyType "GeoProximityLocation" RecordSet = GeoProximityLocationProperty
  set :: PropertyType "GeoProximityLocation" RecordSet
-> RecordSet -> RecordSet
set PropertyType "GeoProximityLocation" RecordSet
newValue RecordSet {Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe AliasTargetProperty
Maybe CidrRoutingConfigProperty
Maybe GeoLocationProperty
Maybe GeoProximityLocationProperty
()
Value Text
haddock_workaround_ :: RecordSet -> ()
aliasTarget :: RecordSet -> Maybe AliasTargetProperty
cidrRoutingConfig :: RecordSet -> Maybe CidrRoutingConfigProperty
comment :: RecordSet -> Maybe (Value Text)
failover :: RecordSet -> Maybe (Value Text)
geoLocation :: RecordSet -> Maybe GeoLocationProperty
geoProximityLocation :: RecordSet -> Maybe GeoProximityLocationProperty
healthCheckId :: RecordSet -> Maybe (Value Text)
hostedZoneId :: RecordSet -> Maybe (Value Text)
hostedZoneName :: RecordSet -> Maybe (Value Text)
multiValueAnswer :: RecordSet -> Maybe (Value Bool)
name :: RecordSet -> Value Text
region :: RecordSet -> Maybe (Value Text)
resourceRecords :: RecordSet -> Maybe (ValueList Text)
setIdentifier :: RecordSet -> Maybe (Value Text)
tTL :: RecordSet -> Maybe (Value Text)
type' :: RecordSet -> Value Text
weight :: RecordSet -> Maybe (Value Integer)
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
..}
    = RecordSet {geoProximityLocation :: Maybe GeoProximityLocationProperty
geoProximityLocation = GeoProximityLocationProperty -> Maybe GeoProximityLocationProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "GeoProximityLocation" RecordSet
GeoProximityLocationProperty
newValue, Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe AliasTargetProperty
Maybe CidrRoutingConfigProperty
Maybe GeoLocationProperty
()
Value Text
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
..}
instance Property "HealthCheckId" RecordSet where
  type PropertyType "HealthCheckId" RecordSet = Value Prelude.Text
  set :: PropertyType "HealthCheckId" RecordSet -> RecordSet -> RecordSet
set PropertyType "HealthCheckId" RecordSet
newValue RecordSet {Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe AliasTargetProperty
Maybe CidrRoutingConfigProperty
Maybe GeoLocationProperty
Maybe GeoProximityLocationProperty
()
Value Text
haddock_workaround_ :: RecordSet -> ()
aliasTarget :: RecordSet -> Maybe AliasTargetProperty
cidrRoutingConfig :: RecordSet -> Maybe CidrRoutingConfigProperty
comment :: RecordSet -> Maybe (Value Text)
failover :: RecordSet -> Maybe (Value Text)
geoLocation :: RecordSet -> Maybe GeoLocationProperty
geoProximityLocation :: RecordSet -> Maybe GeoProximityLocationProperty
healthCheckId :: RecordSet -> Maybe (Value Text)
hostedZoneId :: RecordSet -> Maybe (Value Text)
hostedZoneName :: RecordSet -> Maybe (Value Text)
multiValueAnswer :: RecordSet -> Maybe (Value Bool)
name :: RecordSet -> Value Text
region :: RecordSet -> Maybe (Value Text)
resourceRecords :: RecordSet -> Maybe (ValueList Text)
setIdentifier :: RecordSet -> Maybe (Value Text)
tTL :: RecordSet -> Maybe (Value Text)
type' :: RecordSet -> Value Text
weight :: RecordSet -> Maybe (Value Integer)
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
..}
    = RecordSet {healthCheckId :: Maybe (Value Text)
healthCheckId = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "HealthCheckId" RecordSet
Value Text
newValue, Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe AliasTargetProperty
Maybe CidrRoutingConfigProperty
Maybe GeoLocationProperty
Maybe GeoProximityLocationProperty
()
Value Text
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
..}
instance Property "HostedZoneId" RecordSet where
  type PropertyType "HostedZoneId" RecordSet = Value Prelude.Text
  set :: PropertyType "HostedZoneId" RecordSet -> RecordSet -> RecordSet
set PropertyType "HostedZoneId" RecordSet
newValue RecordSet {Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe AliasTargetProperty
Maybe CidrRoutingConfigProperty
Maybe GeoLocationProperty
Maybe GeoProximityLocationProperty
()
Value Text
haddock_workaround_ :: RecordSet -> ()
aliasTarget :: RecordSet -> Maybe AliasTargetProperty
cidrRoutingConfig :: RecordSet -> Maybe CidrRoutingConfigProperty
comment :: RecordSet -> Maybe (Value Text)
failover :: RecordSet -> Maybe (Value Text)
geoLocation :: RecordSet -> Maybe GeoLocationProperty
geoProximityLocation :: RecordSet -> Maybe GeoProximityLocationProperty
healthCheckId :: RecordSet -> Maybe (Value Text)
hostedZoneId :: RecordSet -> Maybe (Value Text)
hostedZoneName :: RecordSet -> Maybe (Value Text)
multiValueAnswer :: RecordSet -> Maybe (Value Bool)
name :: RecordSet -> Value Text
region :: RecordSet -> Maybe (Value Text)
resourceRecords :: RecordSet -> Maybe (ValueList Text)
setIdentifier :: RecordSet -> Maybe (Value Text)
tTL :: RecordSet -> Maybe (Value Text)
type' :: RecordSet -> Value Text
weight :: RecordSet -> Maybe (Value Integer)
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
..}
    = RecordSet {hostedZoneId :: Maybe (Value Text)
hostedZoneId = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "HostedZoneId" RecordSet
Value Text
newValue, Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe AliasTargetProperty
Maybe CidrRoutingConfigProperty
Maybe GeoLocationProperty
Maybe GeoProximityLocationProperty
()
Value Text
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
..}
instance Property "HostedZoneName" RecordSet where
  type PropertyType "HostedZoneName" RecordSet = Value Prelude.Text
  set :: PropertyType "HostedZoneName" RecordSet -> RecordSet -> RecordSet
set PropertyType "HostedZoneName" RecordSet
newValue RecordSet {Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe AliasTargetProperty
Maybe CidrRoutingConfigProperty
Maybe GeoLocationProperty
Maybe GeoProximityLocationProperty
()
Value Text
haddock_workaround_ :: RecordSet -> ()
aliasTarget :: RecordSet -> Maybe AliasTargetProperty
cidrRoutingConfig :: RecordSet -> Maybe CidrRoutingConfigProperty
comment :: RecordSet -> Maybe (Value Text)
failover :: RecordSet -> Maybe (Value Text)
geoLocation :: RecordSet -> Maybe GeoLocationProperty
geoProximityLocation :: RecordSet -> Maybe GeoProximityLocationProperty
healthCheckId :: RecordSet -> Maybe (Value Text)
hostedZoneId :: RecordSet -> Maybe (Value Text)
hostedZoneName :: RecordSet -> Maybe (Value Text)
multiValueAnswer :: RecordSet -> Maybe (Value Bool)
name :: RecordSet -> Value Text
region :: RecordSet -> Maybe (Value Text)
resourceRecords :: RecordSet -> Maybe (ValueList Text)
setIdentifier :: RecordSet -> Maybe (Value Text)
tTL :: RecordSet -> Maybe (Value Text)
type' :: RecordSet -> Value Text
weight :: RecordSet -> Maybe (Value Integer)
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
..}
    = RecordSet {hostedZoneName :: Maybe (Value Text)
hostedZoneName = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "HostedZoneName" RecordSet
Value Text
newValue, Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe AliasTargetProperty
Maybe CidrRoutingConfigProperty
Maybe GeoLocationProperty
Maybe GeoProximityLocationProperty
()
Value Text
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
..}
instance Property "MultiValueAnswer" RecordSet where
  type PropertyType "MultiValueAnswer" RecordSet = Value Prelude.Bool
  set :: PropertyType "MultiValueAnswer" RecordSet -> RecordSet -> RecordSet
set PropertyType "MultiValueAnswer" RecordSet
newValue RecordSet {Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe AliasTargetProperty
Maybe CidrRoutingConfigProperty
Maybe GeoLocationProperty
Maybe GeoProximityLocationProperty
()
Value Text
haddock_workaround_ :: RecordSet -> ()
aliasTarget :: RecordSet -> Maybe AliasTargetProperty
cidrRoutingConfig :: RecordSet -> Maybe CidrRoutingConfigProperty
comment :: RecordSet -> Maybe (Value Text)
failover :: RecordSet -> Maybe (Value Text)
geoLocation :: RecordSet -> Maybe GeoLocationProperty
geoProximityLocation :: RecordSet -> Maybe GeoProximityLocationProperty
healthCheckId :: RecordSet -> Maybe (Value Text)
hostedZoneId :: RecordSet -> Maybe (Value Text)
hostedZoneName :: RecordSet -> Maybe (Value Text)
multiValueAnswer :: RecordSet -> Maybe (Value Bool)
name :: RecordSet -> Value Text
region :: RecordSet -> Maybe (Value Text)
resourceRecords :: RecordSet -> Maybe (ValueList Text)
setIdentifier :: RecordSet -> Maybe (Value Text)
tTL :: RecordSet -> Maybe (Value Text)
type' :: RecordSet -> Value Text
weight :: RecordSet -> Maybe (Value Integer)
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
..}
    = RecordSet {multiValueAnswer :: Maybe (Value Bool)
multiValueAnswer = Value Bool -> Maybe (Value Bool)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "MultiValueAnswer" RecordSet
Value Bool
newValue, Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe AliasTargetProperty
Maybe CidrRoutingConfigProperty
Maybe GeoLocationProperty
Maybe GeoProximityLocationProperty
()
Value Text
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
..}
instance Property "Name" RecordSet where
  type PropertyType "Name" RecordSet = Value Prelude.Text
  set :: PropertyType "Name" RecordSet -> RecordSet -> RecordSet
set PropertyType "Name" RecordSet
newValue RecordSet {Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe AliasTargetProperty
Maybe CidrRoutingConfigProperty
Maybe GeoLocationProperty
Maybe GeoProximityLocationProperty
()
Value Text
haddock_workaround_ :: RecordSet -> ()
aliasTarget :: RecordSet -> Maybe AliasTargetProperty
cidrRoutingConfig :: RecordSet -> Maybe CidrRoutingConfigProperty
comment :: RecordSet -> Maybe (Value Text)
failover :: RecordSet -> Maybe (Value Text)
geoLocation :: RecordSet -> Maybe GeoLocationProperty
geoProximityLocation :: RecordSet -> Maybe GeoProximityLocationProperty
healthCheckId :: RecordSet -> Maybe (Value Text)
hostedZoneId :: RecordSet -> Maybe (Value Text)
hostedZoneName :: RecordSet -> Maybe (Value Text)
multiValueAnswer :: RecordSet -> Maybe (Value Bool)
name :: RecordSet -> Value Text
region :: RecordSet -> Maybe (Value Text)
resourceRecords :: RecordSet -> Maybe (ValueList Text)
setIdentifier :: RecordSet -> Maybe (Value Text)
tTL :: RecordSet -> Maybe (Value Text)
type' :: RecordSet -> Value Text
weight :: RecordSet -> Maybe (Value Integer)
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
..} = RecordSet {name :: Value Text
name = PropertyType "Name" RecordSet
Value Text
newValue, Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe AliasTargetProperty
Maybe CidrRoutingConfigProperty
Maybe GeoLocationProperty
Maybe GeoProximityLocationProperty
()
Value Text
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
..}
instance Property "Region" RecordSet where
  type PropertyType "Region" RecordSet = Value Prelude.Text
  set :: PropertyType "Region" RecordSet -> RecordSet -> RecordSet
set PropertyType "Region" RecordSet
newValue RecordSet {Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe AliasTargetProperty
Maybe CidrRoutingConfigProperty
Maybe GeoLocationProperty
Maybe GeoProximityLocationProperty
()
Value Text
haddock_workaround_ :: RecordSet -> ()
aliasTarget :: RecordSet -> Maybe AliasTargetProperty
cidrRoutingConfig :: RecordSet -> Maybe CidrRoutingConfigProperty
comment :: RecordSet -> Maybe (Value Text)
failover :: RecordSet -> Maybe (Value Text)
geoLocation :: RecordSet -> Maybe GeoLocationProperty
geoProximityLocation :: RecordSet -> Maybe GeoProximityLocationProperty
healthCheckId :: RecordSet -> Maybe (Value Text)
hostedZoneId :: RecordSet -> Maybe (Value Text)
hostedZoneName :: RecordSet -> Maybe (Value Text)
multiValueAnswer :: RecordSet -> Maybe (Value Bool)
name :: RecordSet -> Value Text
region :: RecordSet -> Maybe (Value Text)
resourceRecords :: RecordSet -> Maybe (ValueList Text)
setIdentifier :: RecordSet -> Maybe (Value Text)
tTL :: RecordSet -> Maybe (Value Text)
type' :: RecordSet -> Value Text
weight :: RecordSet -> Maybe (Value Integer)
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
..}
    = RecordSet {region :: Maybe (Value Text)
region = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Region" RecordSet
Value Text
newValue, Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe AliasTargetProperty
Maybe CidrRoutingConfigProperty
Maybe GeoLocationProperty
Maybe GeoProximityLocationProperty
()
Value Text
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
..}
instance Property "ResourceRecords" RecordSet where
  type PropertyType "ResourceRecords" RecordSet = ValueList Prelude.Text
  set :: PropertyType "ResourceRecords" RecordSet -> RecordSet -> RecordSet
set PropertyType "ResourceRecords" RecordSet
newValue RecordSet {Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe AliasTargetProperty
Maybe CidrRoutingConfigProperty
Maybe GeoLocationProperty
Maybe GeoProximityLocationProperty
()
Value Text
haddock_workaround_ :: RecordSet -> ()
aliasTarget :: RecordSet -> Maybe AliasTargetProperty
cidrRoutingConfig :: RecordSet -> Maybe CidrRoutingConfigProperty
comment :: RecordSet -> Maybe (Value Text)
failover :: RecordSet -> Maybe (Value Text)
geoLocation :: RecordSet -> Maybe GeoLocationProperty
geoProximityLocation :: RecordSet -> Maybe GeoProximityLocationProperty
healthCheckId :: RecordSet -> Maybe (Value Text)
hostedZoneId :: RecordSet -> Maybe (Value Text)
hostedZoneName :: RecordSet -> Maybe (Value Text)
multiValueAnswer :: RecordSet -> Maybe (Value Bool)
name :: RecordSet -> Value Text
region :: RecordSet -> Maybe (Value Text)
resourceRecords :: RecordSet -> Maybe (ValueList Text)
setIdentifier :: RecordSet -> Maybe (Value Text)
tTL :: RecordSet -> Maybe (Value Text)
type' :: RecordSet -> Value Text
weight :: RecordSet -> Maybe (Value Integer)
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
..}
    = RecordSet {resourceRecords :: Maybe (ValueList Text)
resourceRecords = ValueList Text -> Maybe (ValueList Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ResourceRecords" RecordSet
ValueList Text
newValue, Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe AliasTargetProperty
Maybe CidrRoutingConfigProperty
Maybe GeoLocationProperty
Maybe GeoProximityLocationProperty
()
Value Text
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
..}
instance Property "SetIdentifier" RecordSet where
  type PropertyType "SetIdentifier" RecordSet = Value Prelude.Text
  set :: PropertyType "SetIdentifier" RecordSet -> RecordSet -> RecordSet
set PropertyType "SetIdentifier" RecordSet
newValue RecordSet {Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe AliasTargetProperty
Maybe CidrRoutingConfigProperty
Maybe GeoLocationProperty
Maybe GeoProximityLocationProperty
()
Value Text
haddock_workaround_ :: RecordSet -> ()
aliasTarget :: RecordSet -> Maybe AliasTargetProperty
cidrRoutingConfig :: RecordSet -> Maybe CidrRoutingConfigProperty
comment :: RecordSet -> Maybe (Value Text)
failover :: RecordSet -> Maybe (Value Text)
geoLocation :: RecordSet -> Maybe GeoLocationProperty
geoProximityLocation :: RecordSet -> Maybe GeoProximityLocationProperty
healthCheckId :: RecordSet -> Maybe (Value Text)
hostedZoneId :: RecordSet -> Maybe (Value Text)
hostedZoneName :: RecordSet -> Maybe (Value Text)
multiValueAnswer :: RecordSet -> Maybe (Value Bool)
name :: RecordSet -> Value Text
region :: RecordSet -> Maybe (Value Text)
resourceRecords :: RecordSet -> Maybe (ValueList Text)
setIdentifier :: RecordSet -> Maybe (Value Text)
tTL :: RecordSet -> Maybe (Value Text)
type' :: RecordSet -> Value Text
weight :: RecordSet -> Maybe (Value Integer)
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
..}
    = RecordSet {setIdentifier :: Maybe (Value Text)
setIdentifier = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "SetIdentifier" RecordSet
Value Text
newValue, Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe AliasTargetProperty
Maybe CidrRoutingConfigProperty
Maybe GeoLocationProperty
Maybe GeoProximityLocationProperty
()
Value Text
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
..}
instance Property "TTL" RecordSet where
  type PropertyType "TTL" RecordSet = Value Prelude.Text
  set :: PropertyType "TTL" RecordSet -> RecordSet -> RecordSet
set PropertyType "TTL" RecordSet
newValue RecordSet {Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe AliasTargetProperty
Maybe CidrRoutingConfigProperty
Maybe GeoLocationProperty
Maybe GeoProximityLocationProperty
()
Value Text
haddock_workaround_ :: RecordSet -> ()
aliasTarget :: RecordSet -> Maybe AliasTargetProperty
cidrRoutingConfig :: RecordSet -> Maybe CidrRoutingConfigProperty
comment :: RecordSet -> Maybe (Value Text)
failover :: RecordSet -> Maybe (Value Text)
geoLocation :: RecordSet -> Maybe GeoLocationProperty
geoProximityLocation :: RecordSet -> Maybe GeoProximityLocationProperty
healthCheckId :: RecordSet -> Maybe (Value Text)
hostedZoneId :: RecordSet -> Maybe (Value Text)
hostedZoneName :: RecordSet -> Maybe (Value Text)
multiValueAnswer :: RecordSet -> Maybe (Value Bool)
name :: RecordSet -> Value Text
region :: RecordSet -> Maybe (Value Text)
resourceRecords :: RecordSet -> Maybe (ValueList Text)
setIdentifier :: RecordSet -> Maybe (Value Text)
tTL :: RecordSet -> Maybe (Value Text)
type' :: RecordSet -> Value Text
weight :: RecordSet -> Maybe (Value Integer)
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
..}
    = RecordSet {tTL :: Maybe (Value Text)
tTL = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "TTL" RecordSet
Value Text
newValue, Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe AliasTargetProperty
Maybe CidrRoutingConfigProperty
Maybe GeoLocationProperty
Maybe GeoProximityLocationProperty
()
Value Text
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
..}
instance Property "Type" RecordSet where
  type PropertyType "Type" RecordSet = Value Prelude.Text
  set :: PropertyType "Type" RecordSet -> RecordSet -> RecordSet
set PropertyType "Type" RecordSet
newValue RecordSet {Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe AliasTargetProperty
Maybe CidrRoutingConfigProperty
Maybe GeoLocationProperty
Maybe GeoProximityLocationProperty
()
Value Text
haddock_workaround_ :: RecordSet -> ()
aliasTarget :: RecordSet -> Maybe AliasTargetProperty
cidrRoutingConfig :: RecordSet -> Maybe CidrRoutingConfigProperty
comment :: RecordSet -> Maybe (Value Text)
failover :: RecordSet -> Maybe (Value Text)
geoLocation :: RecordSet -> Maybe GeoLocationProperty
geoProximityLocation :: RecordSet -> Maybe GeoProximityLocationProperty
healthCheckId :: RecordSet -> Maybe (Value Text)
hostedZoneId :: RecordSet -> Maybe (Value Text)
hostedZoneName :: RecordSet -> Maybe (Value Text)
multiValueAnswer :: RecordSet -> Maybe (Value Bool)
name :: RecordSet -> Value Text
region :: RecordSet -> Maybe (Value Text)
resourceRecords :: RecordSet -> Maybe (ValueList Text)
setIdentifier :: RecordSet -> Maybe (Value Text)
tTL :: RecordSet -> Maybe (Value Text)
type' :: RecordSet -> Value Text
weight :: RecordSet -> Maybe (Value Integer)
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
..} = RecordSet {type' :: Value Text
type' = PropertyType "Type" RecordSet
Value Text
newValue, Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe AliasTargetProperty
Maybe CidrRoutingConfigProperty
Maybe GeoLocationProperty
Maybe GeoProximityLocationProperty
()
Value Text
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
weight :: Maybe (Value Integer)
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
weight :: Maybe (Value Integer)
..}
instance Property "Weight" RecordSet where
  type PropertyType "Weight" RecordSet = Value Prelude.Integer
  set :: PropertyType "Weight" RecordSet -> RecordSet -> RecordSet
set PropertyType "Weight" RecordSet
newValue RecordSet {Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe AliasTargetProperty
Maybe CidrRoutingConfigProperty
Maybe GeoLocationProperty
Maybe GeoProximityLocationProperty
()
Value Text
haddock_workaround_ :: RecordSet -> ()
aliasTarget :: RecordSet -> Maybe AliasTargetProperty
cidrRoutingConfig :: RecordSet -> Maybe CidrRoutingConfigProperty
comment :: RecordSet -> Maybe (Value Text)
failover :: RecordSet -> Maybe (Value Text)
geoLocation :: RecordSet -> Maybe GeoLocationProperty
geoProximityLocation :: RecordSet -> Maybe GeoProximityLocationProperty
healthCheckId :: RecordSet -> Maybe (Value Text)
hostedZoneId :: RecordSet -> Maybe (Value Text)
hostedZoneName :: RecordSet -> Maybe (Value Text)
multiValueAnswer :: RecordSet -> Maybe (Value Bool)
name :: RecordSet -> Value Text
region :: RecordSet -> Maybe (Value Text)
resourceRecords :: RecordSet -> Maybe (ValueList Text)
setIdentifier :: RecordSet -> Maybe (Value Text)
tTL :: RecordSet -> Maybe (Value Text)
type' :: RecordSet -> Value Text
weight :: RecordSet -> Maybe (Value Integer)
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
weight :: Maybe (Value Integer)
..}
    = RecordSet {weight :: Maybe (Value Integer)
weight = Value Integer -> Maybe (Value Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Weight" RecordSet
Value Integer
newValue, Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Text)
Maybe AliasTargetProperty
Maybe CidrRoutingConfigProperty
Maybe GeoLocationProperty
Maybe GeoProximityLocationProperty
()
Value Text
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
haddock_workaround_ :: ()
aliasTarget :: Maybe AliasTargetProperty
cidrRoutingConfig :: Maybe CidrRoutingConfigProperty
comment :: Maybe (Value Text)
failover :: Maybe (Value Text)
geoLocation :: Maybe GeoLocationProperty
geoProximityLocation :: Maybe GeoProximityLocationProperty
healthCheckId :: Maybe (Value Text)
hostedZoneId :: Maybe (Value Text)
hostedZoneName :: Maybe (Value Text)
multiValueAnswer :: Maybe (Value Bool)
name :: Value Text
region :: Maybe (Value Text)
resourceRecords :: Maybe (ValueList Text)
setIdentifier :: Maybe (Value Text)
tTL :: Maybe (Value Text)
type' :: Value Text
..}