module Stratosphere.IoTSiteWise.AssetModel.VariableValueProperty (
        module Exports, VariableValueProperty(..), mkVariableValueProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.IoTSiteWise.AssetModel.PropertyPathDefinitionProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data VariableValueProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-iotsitewise-assetmodel-variablevalue.html>
    VariableValueProperty {VariableValueProperty -> ()
haddock_workaround_ :: (),
                           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-iotsitewise-assetmodel-variablevalue.html#cfn-iotsitewise-assetmodel-variablevalue-hierarchyexternalid>
                           VariableValueProperty -> Maybe (Value Text)
hierarchyExternalId :: (Prelude.Maybe (Value Prelude.Text)),
                           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-iotsitewise-assetmodel-variablevalue.html#cfn-iotsitewise-assetmodel-variablevalue-hierarchyid>
                           VariableValueProperty -> Maybe (Value Text)
hierarchyId :: (Prelude.Maybe (Value Prelude.Text)),
                           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-iotsitewise-assetmodel-variablevalue.html#cfn-iotsitewise-assetmodel-variablevalue-hierarchylogicalid>
                           VariableValueProperty -> Maybe (Value Text)
hierarchyLogicalId :: (Prelude.Maybe (Value Prelude.Text)),
                           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-iotsitewise-assetmodel-variablevalue.html#cfn-iotsitewise-assetmodel-variablevalue-propertyexternalid>
                           VariableValueProperty -> Maybe (Value Text)
propertyExternalId :: (Prelude.Maybe (Value Prelude.Text)),
                           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-iotsitewise-assetmodel-variablevalue.html#cfn-iotsitewise-assetmodel-variablevalue-propertyid>
                           VariableValueProperty -> Maybe (Value Text)
propertyId :: (Prelude.Maybe (Value Prelude.Text)),
                           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-iotsitewise-assetmodel-variablevalue.html#cfn-iotsitewise-assetmodel-variablevalue-propertylogicalid>
                           VariableValueProperty -> Maybe (Value Text)
propertyLogicalId :: (Prelude.Maybe (Value Prelude.Text)),
                           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-iotsitewise-assetmodel-variablevalue.html#cfn-iotsitewise-assetmodel-variablevalue-propertypath>
                           VariableValueProperty -> Maybe [PropertyPathDefinitionProperty]
propertyPath :: (Prelude.Maybe [PropertyPathDefinitionProperty])}
  deriving stock (VariableValueProperty -> VariableValueProperty -> Bool
(VariableValueProperty -> VariableValueProperty -> Bool)
-> (VariableValueProperty -> VariableValueProperty -> Bool)
-> Eq VariableValueProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: VariableValueProperty -> VariableValueProperty -> Bool
== :: VariableValueProperty -> VariableValueProperty -> Bool
$c/= :: VariableValueProperty -> VariableValueProperty -> Bool
/= :: VariableValueProperty -> VariableValueProperty -> Bool
Prelude.Eq, Int -> VariableValueProperty -> ShowS
[VariableValueProperty] -> ShowS
VariableValueProperty -> String
(Int -> VariableValueProperty -> ShowS)
-> (VariableValueProperty -> String)
-> ([VariableValueProperty] -> ShowS)
-> Show VariableValueProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> VariableValueProperty -> ShowS
showsPrec :: Int -> VariableValueProperty -> ShowS
$cshow :: VariableValueProperty -> String
show :: VariableValueProperty -> String
$cshowList :: [VariableValueProperty] -> ShowS
showList :: [VariableValueProperty] -> ShowS
Prelude.Show)
mkVariableValueProperty :: VariableValueProperty
mkVariableValueProperty :: VariableValueProperty
mkVariableValueProperty
  = VariableValueProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), hierarchyExternalId :: Maybe (Value Text)
hierarchyExternalId = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       hierarchyId :: Maybe (Value Text)
hierarchyId = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       hierarchyLogicalId :: Maybe (Value Text)
hierarchyLogicalId = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       propertyExternalId :: Maybe (Value Text)
propertyExternalId = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, propertyId :: Maybe (Value Text)
propertyId = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       propertyLogicalId :: Maybe (Value Text)
propertyLogicalId = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       propertyPath :: Maybe [PropertyPathDefinitionProperty]
propertyPath = Maybe [PropertyPathDefinitionProperty]
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties VariableValueProperty where
  toResourceProperties :: VariableValueProperty -> ResourceProperties
toResourceProperties VariableValueProperty {Maybe [PropertyPathDefinitionProperty]
Maybe (Value Text)
()
haddock_workaround_ :: VariableValueProperty -> ()
hierarchyExternalId :: VariableValueProperty -> Maybe (Value Text)
hierarchyId :: VariableValueProperty -> Maybe (Value Text)
hierarchyLogicalId :: VariableValueProperty -> Maybe (Value Text)
propertyExternalId :: VariableValueProperty -> Maybe (Value Text)
propertyId :: VariableValueProperty -> Maybe (Value Text)
propertyLogicalId :: VariableValueProperty -> Maybe (Value Text)
propertyPath :: VariableValueProperty -> Maybe [PropertyPathDefinitionProperty]
haddock_workaround_ :: ()
hierarchyExternalId :: Maybe (Value Text)
hierarchyId :: Maybe (Value Text)
hierarchyLogicalId :: Maybe (Value Text)
propertyExternalId :: Maybe (Value Text)
propertyId :: Maybe (Value Text)
propertyLogicalId :: Maybe (Value Text)
propertyPath :: Maybe [PropertyPathDefinitionProperty]
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::IoTSiteWise::AssetModel.VariableValue",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Item Object] -> Object
forall l. IsList l => [Item l] -> l
Prelude.fromList
                        ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                           [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
"HierarchyExternalId" (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)
hierarchyExternalId,
                            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
"HierarchyId" (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)
hierarchyId,
                            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
"HierarchyLogicalId" (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)
hierarchyLogicalId,
                            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
"PropertyExternalId" (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)
propertyExternalId,
                            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
"PropertyId" (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)
propertyId,
                            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
"PropertyLogicalId" (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)
propertyLogicalId,
                            Key -> [PropertyPathDefinitionProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"PropertyPath" ([PropertyPathDefinitionProperty] -> (Key, Value))
-> Maybe [PropertyPathDefinitionProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [PropertyPathDefinitionProperty]
propertyPath])}
instance JSON.ToJSON VariableValueProperty where
  toJSON :: VariableValueProperty -> Value
toJSON VariableValueProperty {Maybe [PropertyPathDefinitionProperty]
Maybe (Value Text)
()
haddock_workaround_ :: VariableValueProperty -> ()
hierarchyExternalId :: VariableValueProperty -> Maybe (Value Text)
hierarchyId :: VariableValueProperty -> Maybe (Value Text)
hierarchyLogicalId :: VariableValueProperty -> Maybe (Value Text)
propertyExternalId :: VariableValueProperty -> Maybe (Value Text)
propertyId :: VariableValueProperty -> Maybe (Value Text)
propertyLogicalId :: VariableValueProperty -> Maybe (Value Text)
propertyPath :: VariableValueProperty -> Maybe [PropertyPathDefinitionProperty]
haddock_workaround_ :: ()
hierarchyExternalId :: Maybe (Value Text)
hierarchyId :: Maybe (Value Text)
hierarchyLogicalId :: Maybe (Value Text)
propertyExternalId :: Maybe (Value Text)
propertyId :: Maybe (Value Text)
propertyLogicalId :: Maybe (Value Text)
propertyPath :: Maybe [PropertyPathDefinitionProperty]
..}
    = [(Key, Value)] -> Value
JSON.object
        ([Item [(Key, Value)]] -> [(Key, Value)]
forall l. IsList l => [Item l] -> l
Prelude.fromList
           ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
              [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
"HierarchyExternalId" (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)
hierarchyExternalId,
               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
"HierarchyId" (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)
hierarchyId,
               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
"HierarchyLogicalId" (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)
hierarchyLogicalId,
               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
"PropertyExternalId" (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)
propertyExternalId,
               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
"PropertyId" (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)
propertyId,
               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
"PropertyLogicalId" (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)
propertyLogicalId,
               Key -> [PropertyPathDefinitionProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"PropertyPath" ([PropertyPathDefinitionProperty] -> (Key, Value))
-> Maybe [PropertyPathDefinitionProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [PropertyPathDefinitionProperty]
propertyPath]))
instance Property "HierarchyExternalId" VariableValueProperty where
  type PropertyType "HierarchyExternalId" VariableValueProperty = Value Prelude.Text
  set :: PropertyType "HierarchyExternalId" VariableValueProperty
-> VariableValueProperty -> VariableValueProperty
set PropertyType "HierarchyExternalId" VariableValueProperty
newValue VariableValueProperty {Maybe [PropertyPathDefinitionProperty]
Maybe (Value Text)
()
haddock_workaround_ :: VariableValueProperty -> ()
hierarchyExternalId :: VariableValueProperty -> Maybe (Value Text)
hierarchyId :: VariableValueProperty -> Maybe (Value Text)
hierarchyLogicalId :: VariableValueProperty -> Maybe (Value Text)
propertyExternalId :: VariableValueProperty -> Maybe (Value Text)
propertyId :: VariableValueProperty -> Maybe (Value Text)
propertyLogicalId :: VariableValueProperty -> Maybe (Value Text)
propertyPath :: VariableValueProperty -> Maybe [PropertyPathDefinitionProperty]
haddock_workaround_ :: ()
hierarchyExternalId :: Maybe (Value Text)
hierarchyId :: Maybe (Value Text)
hierarchyLogicalId :: Maybe (Value Text)
propertyExternalId :: Maybe (Value Text)
propertyId :: Maybe (Value Text)
propertyLogicalId :: Maybe (Value Text)
propertyPath :: Maybe [PropertyPathDefinitionProperty]
..}
    = VariableValueProperty
        {hierarchyExternalId :: Maybe (Value Text)
hierarchyExternalId = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "HierarchyExternalId" VariableValueProperty
Value Text
newValue, Maybe [PropertyPathDefinitionProperty]
Maybe (Value Text)
()
haddock_workaround_ :: ()
hierarchyId :: Maybe (Value Text)
hierarchyLogicalId :: Maybe (Value Text)
propertyExternalId :: Maybe (Value Text)
propertyId :: Maybe (Value Text)
propertyLogicalId :: Maybe (Value Text)
propertyPath :: Maybe [PropertyPathDefinitionProperty]
haddock_workaround_ :: ()
hierarchyId :: Maybe (Value Text)
hierarchyLogicalId :: Maybe (Value Text)
propertyExternalId :: Maybe (Value Text)
propertyId :: Maybe (Value Text)
propertyLogicalId :: Maybe (Value Text)
propertyPath :: Maybe [PropertyPathDefinitionProperty]
..}
instance Property "HierarchyId" VariableValueProperty where
  type PropertyType "HierarchyId" VariableValueProperty = Value Prelude.Text
  set :: PropertyType "HierarchyId" VariableValueProperty
-> VariableValueProperty -> VariableValueProperty
set PropertyType "HierarchyId" VariableValueProperty
newValue VariableValueProperty {Maybe [PropertyPathDefinitionProperty]
Maybe (Value Text)
()
haddock_workaround_ :: VariableValueProperty -> ()
hierarchyExternalId :: VariableValueProperty -> Maybe (Value Text)
hierarchyId :: VariableValueProperty -> Maybe (Value Text)
hierarchyLogicalId :: VariableValueProperty -> Maybe (Value Text)
propertyExternalId :: VariableValueProperty -> Maybe (Value Text)
propertyId :: VariableValueProperty -> Maybe (Value Text)
propertyLogicalId :: VariableValueProperty -> Maybe (Value Text)
propertyPath :: VariableValueProperty -> Maybe [PropertyPathDefinitionProperty]
haddock_workaround_ :: ()
hierarchyExternalId :: Maybe (Value Text)
hierarchyId :: Maybe (Value Text)
hierarchyLogicalId :: Maybe (Value Text)
propertyExternalId :: Maybe (Value Text)
propertyId :: Maybe (Value Text)
propertyLogicalId :: Maybe (Value Text)
propertyPath :: Maybe [PropertyPathDefinitionProperty]
..}
    = VariableValueProperty {hierarchyId :: Maybe (Value Text)
hierarchyId = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "HierarchyId" VariableValueProperty
Value Text
newValue, Maybe [PropertyPathDefinitionProperty]
Maybe (Value Text)
()
haddock_workaround_ :: ()
hierarchyExternalId :: Maybe (Value Text)
hierarchyLogicalId :: Maybe (Value Text)
propertyExternalId :: Maybe (Value Text)
propertyId :: Maybe (Value Text)
propertyLogicalId :: Maybe (Value Text)
propertyPath :: Maybe [PropertyPathDefinitionProperty]
haddock_workaround_ :: ()
hierarchyExternalId :: Maybe (Value Text)
hierarchyLogicalId :: Maybe (Value Text)
propertyExternalId :: Maybe (Value Text)
propertyId :: Maybe (Value Text)
propertyLogicalId :: Maybe (Value Text)
propertyPath :: Maybe [PropertyPathDefinitionProperty]
..}
instance Property "HierarchyLogicalId" VariableValueProperty where
  type PropertyType "HierarchyLogicalId" VariableValueProperty = Value Prelude.Text
  set :: PropertyType "HierarchyLogicalId" VariableValueProperty
-> VariableValueProperty -> VariableValueProperty
set PropertyType "HierarchyLogicalId" VariableValueProperty
newValue VariableValueProperty {Maybe [PropertyPathDefinitionProperty]
Maybe (Value Text)
()
haddock_workaround_ :: VariableValueProperty -> ()
hierarchyExternalId :: VariableValueProperty -> Maybe (Value Text)
hierarchyId :: VariableValueProperty -> Maybe (Value Text)
hierarchyLogicalId :: VariableValueProperty -> Maybe (Value Text)
propertyExternalId :: VariableValueProperty -> Maybe (Value Text)
propertyId :: VariableValueProperty -> Maybe (Value Text)
propertyLogicalId :: VariableValueProperty -> Maybe (Value Text)
propertyPath :: VariableValueProperty -> Maybe [PropertyPathDefinitionProperty]
haddock_workaround_ :: ()
hierarchyExternalId :: Maybe (Value Text)
hierarchyId :: Maybe (Value Text)
hierarchyLogicalId :: Maybe (Value Text)
propertyExternalId :: Maybe (Value Text)
propertyId :: Maybe (Value Text)
propertyLogicalId :: Maybe (Value Text)
propertyPath :: Maybe [PropertyPathDefinitionProperty]
..}
    = VariableValueProperty
        {hierarchyLogicalId :: Maybe (Value Text)
hierarchyLogicalId = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "HierarchyLogicalId" VariableValueProperty
Value Text
newValue, Maybe [PropertyPathDefinitionProperty]
Maybe (Value Text)
()
haddock_workaround_ :: ()
hierarchyExternalId :: Maybe (Value Text)
hierarchyId :: Maybe (Value Text)
propertyExternalId :: Maybe (Value Text)
propertyId :: Maybe (Value Text)
propertyLogicalId :: Maybe (Value Text)
propertyPath :: Maybe [PropertyPathDefinitionProperty]
haddock_workaround_ :: ()
hierarchyExternalId :: Maybe (Value Text)
hierarchyId :: Maybe (Value Text)
propertyExternalId :: Maybe (Value Text)
propertyId :: Maybe (Value Text)
propertyLogicalId :: Maybe (Value Text)
propertyPath :: Maybe [PropertyPathDefinitionProperty]
..}
instance Property "PropertyExternalId" VariableValueProperty where
  type PropertyType "PropertyExternalId" VariableValueProperty = Value Prelude.Text
  set :: PropertyType "PropertyExternalId" VariableValueProperty
-> VariableValueProperty -> VariableValueProperty
set PropertyType "PropertyExternalId" VariableValueProperty
newValue VariableValueProperty {Maybe [PropertyPathDefinitionProperty]
Maybe (Value Text)
()
haddock_workaround_ :: VariableValueProperty -> ()
hierarchyExternalId :: VariableValueProperty -> Maybe (Value Text)
hierarchyId :: VariableValueProperty -> Maybe (Value Text)
hierarchyLogicalId :: VariableValueProperty -> Maybe (Value Text)
propertyExternalId :: VariableValueProperty -> Maybe (Value Text)
propertyId :: VariableValueProperty -> Maybe (Value Text)
propertyLogicalId :: VariableValueProperty -> Maybe (Value Text)
propertyPath :: VariableValueProperty -> Maybe [PropertyPathDefinitionProperty]
haddock_workaround_ :: ()
hierarchyExternalId :: Maybe (Value Text)
hierarchyId :: Maybe (Value Text)
hierarchyLogicalId :: Maybe (Value Text)
propertyExternalId :: Maybe (Value Text)
propertyId :: Maybe (Value Text)
propertyLogicalId :: Maybe (Value Text)
propertyPath :: Maybe [PropertyPathDefinitionProperty]
..}
    = VariableValueProperty
        {propertyExternalId :: Maybe (Value Text)
propertyExternalId = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "PropertyExternalId" VariableValueProperty
Value Text
newValue, Maybe [PropertyPathDefinitionProperty]
Maybe (Value Text)
()
haddock_workaround_ :: ()
hierarchyExternalId :: Maybe (Value Text)
hierarchyId :: Maybe (Value Text)
hierarchyLogicalId :: Maybe (Value Text)
propertyId :: Maybe (Value Text)
propertyLogicalId :: Maybe (Value Text)
propertyPath :: Maybe [PropertyPathDefinitionProperty]
haddock_workaround_ :: ()
hierarchyExternalId :: Maybe (Value Text)
hierarchyId :: Maybe (Value Text)
hierarchyLogicalId :: Maybe (Value Text)
propertyId :: Maybe (Value Text)
propertyLogicalId :: Maybe (Value Text)
propertyPath :: Maybe [PropertyPathDefinitionProperty]
..}
instance Property "PropertyId" VariableValueProperty where
  type PropertyType "PropertyId" VariableValueProperty = Value Prelude.Text
  set :: PropertyType "PropertyId" VariableValueProperty
-> VariableValueProperty -> VariableValueProperty
set PropertyType "PropertyId" VariableValueProperty
newValue VariableValueProperty {Maybe [PropertyPathDefinitionProperty]
Maybe (Value Text)
()
haddock_workaround_ :: VariableValueProperty -> ()
hierarchyExternalId :: VariableValueProperty -> Maybe (Value Text)
hierarchyId :: VariableValueProperty -> Maybe (Value Text)
hierarchyLogicalId :: VariableValueProperty -> Maybe (Value Text)
propertyExternalId :: VariableValueProperty -> Maybe (Value Text)
propertyId :: VariableValueProperty -> Maybe (Value Text)
propertyLogicalId :: VariableValueProperty -> Maybe (Value Text)
propertyPath :: VariableValueProperty -> Maybe [PropertyPathDefinitionProperty]
haddock_workaround_ :: ()
hierarchyExternalId :: Maybe (Value Text)
hierarchyId :: Maybe (Value Text)
hierarchyLogicalId :: Maybe (Value Text)
propertyExternalId :: Maybe (Value Text)
propertyId :: Maybe (Value Text)
propertyLogicalId :: Maybe (Value Text)
propertyPath :: Maybe [PropertyPathDefinitionProperty]
..}
    = VariableValueProperty {propertyId :: Maybe (Value Text)
propertyId = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "PropertyId" VariableValueProperty
Value Text
newValue, Maybe [PropertyPathDefinitionProperty]
Maybe (Value Text)
()
haddock_workaround_ :: ()
hierarchyExternalId :: Maybe (Value Text)
hierarchyId :: Maybe (Value Text)
hierarchyLogicalId :: Maybe (Value Text)
propertyExternalId :: Maybe (Value Text)
propertyLogicalId :: Maybe (Value Text)
propertyPath :: Maybe [PropertyPathDefinitionProperty]
haddock_workaround_ :: ()
hierarchyExternalId :: Maybe (Value Text)
hierarchyId :: Maybe (Value Text)
hierarchyLogicalId :: Maybe (Value Text)
propertyExternalId :: Maybe (Value Text)
propertyLogicalId :: Maybe (Value Text)
propertyPath :: Maybe [PropertyPathDefinitionProperty]
..}
instance Property "PropertyLogicalId" VariableValueProperty where
  type PropertyType "PropertyLogicalId" VariableValueProperty = Value Prelude.Text
  set :: PropertyType "PropertyLogicalId" VariableValueProperty
-> VariableValueProperty -> VariableValueProperty
set PropertyType "PropertyLogicalId" VariableValueProperty
newValue VariableValueProperty {Maybe [PropertyPathDefinitionProperty]
Maybe (Value Text)
()
haddock_workaround_ :: VariableValueProperty -> ()
hierarchyExternalId :: VariableValueProperty -> Maybe (Value Text)
hierarchyId :: VariableValueProperty -> Maybe (Value Text)
hierarchyLogicalId :: VariableValueProperty -> Maybe (Value Text)
propertyExternalId :: VariableValueProperty -> Maybe (Value Text)
propertyId :: VariableValueProperty -> Maybe (Value Text)
propertyLogicalId :: VariableValueProperty -> Maybe (Value Text)
propertyPath :: VariableValueProperty -> Maybe [PropertyPathDefinitionProperty]
haddock_workaround_ :: ()
hierarchyExternalId :: Maybe (Value Text)
hierarchyId :: Maybe (Value Text)
hierarchyLogicalId :: Maybe (Value Text)
propertyExternalId :: Maybe (Value Text)
propertyId :: Maybe (Value Text)
propertyLogicalId :: Maybe (Value Text)
propertyPath :: Maybe [PropertyPathDefinitionProperty]
..}
    = VariableValueProperty
        {propertyLogicalId :: Maybe (Value Text)
propertyLogicalId = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "PropertyLogicalId" VariableValueProperty
Value Text
newValue, Maybe [PropertyPathDefinitionProperty]
Maybe (Value Text)
()
haddock_workaround_ :: ()
hierarchyExternalId :: Maybe (Value Text)
hierarchyId :: Maybe (Value Text)
hierarchyLogicalId :: Maybe (Value Text)
propertyExternalId :: Maybe (Value Text)
propertyId :: Maybe (Value Text)
propertyPath :: Maybe [PropertyPathDefinitionProperty]
haddock_workaround_ :: ()
hierarchyExternalId :: Maybe (Value Text)
hierarchyId :: Maybe (Value Text)
hierarchyLogicalId :: Maybe (Value Text)
propertyExternalId :: Maybe (Value Text)
propertyId :: Maybe (Value Text)
propertyPath :: Maybe [PropertyPathDefinitionProperty]
..}
instance Property "PropertyPath" VariableValueProperty where
  type PropertyType "PropertyPath" VariableValueProperty = [PropertyPathDefinitionProperty]
  set :: PropertyType "PropertyPath" VariableValueProperty
-> VariableValueProperty -> VariableValueProperty
set PropertyType "PropertyPath" VariableValueProperty
newValue VariableValueProperty {Maybe [PropertyPathDefinitionProperty]
Maybe (Value Text)
()
haddock_workaround_ :: VariableValueProperty -> ()
hierarchyExternalId :: VariableValueProperty -> Maybe (Value Text)
hierarchyId :: VariableValueProperty -> Maybe (Value Text)
hierarchyLogicalId :: VariableValueProperty -> Maybe (Value Text)
propertyExternalId :: VariableValueProperty -> Maybe (Value Text)
propertyId :: VariableValueProperty -> Maybe (Value Text)
propertyLogicalId :: VariableValueProperty -> Maybe (Value Text)
propertyPath :: VariableValueProperty -> Maybe [PropertyPathDefinitionProperty]
haddock_workaround_ :: ()
hierarchyExternalId :: Maybe (Value Text)
hierarchyId :: Maybe (Value Text)
hierarchyLogicalId :: Maybe (Value Text)
propertyExternalId :: Maybe (Value Text)
propertyId :: Maybe (Value Text)
propertyLogicalId :: Maybe (Value Text)
propertyPath :: Maybe [PropertyPathDefinitionProperty]
..}
    = VariableValueProperty {propertyPath :: Maybe [PropertyPathDefinitionProperty]
propertyPath = [PropertyPathDefinitionProperty]
-> Maybe [PropertyPathDefinitionProperty]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [PropertyPathDefinitionProperty]
PropertyType "PropertyPath" VariableValueProperty
newValue, Maybe (Value Text)
()
haddock_workaround_ :: ()
hierarchyExternalId :: Maybe (Value Text)
hierarchyId :: Maybe (Value Text)
hierarchyLogicalId :: Maybe (Value Text)
propertyExternalId :: Maybe (Value Text)
propertyId :: Maybe (Value Text)
propertyLogicalId :: Maybe (Value Text)
haddock_workaround_ :: ()
hierarchyExternalId :: Maybe (Value Text)
hierarchyId :: Maybe (Value Text)
hierarchyLogicalId :: Maybe (Value Text)
propertyExternalId :: Maybe (Value Text)
propertyId :: Maybe (Value Text)
propertyLogicalId :: Maybe (Value Text)
..}