module Stratosphere.NeptuneGraph.Graph (
        module Exports, Graph(..), mkGraph
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.NeptuneGraph.Graph.VectorSearchConfigurationProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Tag
import Stratosphere.Value
data Graph
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-neptunegraph-graph.html>
    Graph {Graph -> ()
haddock_workaround_ :: (),
           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-neptunegraph-graph.html#cfn-neptunegraph-graph-deletionprotection>
           Graph -> Maybe (Value Bool)
deletionProtection :: (Prelude.Maybe (Value Prelude.Bool)),
           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-neptunegraph-graph.html#cfn-neptunegraph-graph-graphname>
           Graph -> Maybe (Value Text)
graphName :: (Prelude.Maybe (Value Prelude.Text)),
           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-neptunegraph-graph.html#cfn-neptunegraph-graph-provisionedmemory>
           Graph -> Value Integer
provisionedMemory :: (Value Prelude.Integer),
           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-neptunegraph-graph.html#cfn-neptunegraph-graph-publicconnectivity>
           Graph -> Maybe (Value Bool)
publicConnectivity :: (Prelude.Maybe (Value Prelude.Bool)),
           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-neptunegraph-graph.html#cfn-neptunegraph-graph-replicacount>
           Graph -> Maybe (Value Integer)
replicaCount :: (Prelude.Maybe (Value Prelude.Integer)),
           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-neptunegraph-graph.html#cfn-neptunegraph-graph-tags>
           Graph -> Maybe [Tag]
tags :: (Prelude.Maybe [Tag]),
           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-neptunegraph-graph.html#cfn-neptunegraph-graph-vectorsearchconfiguration>
           Graph -> Maybe VectorSearchConfigurationProperty
vectorSearchConfiguration :: (Prelude.Maybe VectorSearchConfigurationProperty)}
  deriving stock (Graph -> Graph -> Bool
(Graph -> Graph -> Bool) -> (Graph -> Graph -> Bool) -> Eq Graph
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: Graph -> Graph -> Bool
== :: Graph -> Graph -> Bool
$c/= :: Graph -> Graph -> Bool
/= :: Graph -> Graph -> Bool
Prelude.Eq, Int -> Graph -> ShowS
[Graph] -> ShowS
Graph -> String
(Int -> Graph -> ShowS)
-> (Graph -> String) -> ([Graph] -> ShowS) -> Show Graph
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> Graph -> ShowS
showsPrec :: Int -> Graph -> ShowS
$cshow :: Graph -> String
show :: Graph -> String
$cshowList :: [Graph] -> ShowS
showList :: [Graph] -> ShowS
Prelude.Show)
mkGraph :: Value Prelude.Integer -> Graph
mkGraph :: Value Integer -> Graph
mkGraph Value Integer
provisionedMemory
  = Graph
      {haddock_workaround_ :: ()
haddock_workaround_ = (), provisionedMemory :: Value Integer
provisionedMemory = Value Integer
provisionedMemory,
       deletionProtection :: Maybe (Value Bool)
deletionProtection = Maybe (Value Bool)
forall a. Maybe a
Prelude.Nothing, graphName :: Maybe (Value Text)
graphName = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       publicConnectivity :: Maybe (Value Bool)
publicConnectivity = Maybe (Value Bool)
forall a. Maybe a
Prelude.Nothing,
       replicaCount :: Maybe (Value Integer)
replicaCount = Maybe (Value Integer)
forall a. Maybe a
Prelude.Nothing, tags :: Maybe [Tag]
tags = Maybe [Tag]
forall a. Maybe a
Prelude.Nothing,
       vectorSearchConfiguration :: Maybe VectorSearchConfigurationProperty
vectorSearchConfiguration = Maybe VectorSearchConfigurationProperty
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties Graph where
  toResourceProperties :: Graph -> ResourceProperties
toResourceProperties Graph {Maybe [Tag]
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe VectorSearchConfigurationProperty
()
Value Integer
haddock_workaround_ :: Graph -> ()
deletionProtection :: Graph -> Maybe (Value Bool)
graphName :: Graph -> Maybe (Value Text)
provisionedMemory :: Graph -> Value Integer
publicConnectivity :: Graph -> Maybe (Value Bool)
replicaCount :: Graph -> Maybe (Value Integer)
tags :: Graph -> Maybe [Tag]
vectorSearchConfiguration :: Graph -> Maybe VectorSearchConfigurationProperty
haddock_workaround_ :: ()
deletionProtection :: Maybe (Value Bool)
graphName :: Maybe (Value Text)
provisionedMemory :: Value Integer
publicConnectivity :: Maybe (Value Bool)
replicaCount :: Maybe (Value Integer)
tags :: Maybe [Tag]
vectorSearchConfiguration :: Maybe VectorSearchConfigurationProperty
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::NeptuneGraph::Graph", supportsTags :: Bool
supportsTags = Bool
Prelude.True,
         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
"ProvisionedMemory" Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Integer
provisionedMemory]
                           ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                              [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
"DeletionProtection" (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)
deletionProtection,
                               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
"GraphName" (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)
graphName,
                               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
"PublicConnectivity" (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)
publicConnectivity,
                               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
"ReplicaCount" (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)
replicaCount,
                               Key -> [Tag] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Tags" ([Tag] -> (Key, Value)) -> Maybe [Tag] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Tag]
tags,
                               Key -> VectorSearchConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"VectorSearchConfiguration"
                                 (VectorSearchConfigurationProperty -> (Key, Value))
-> Maybe VectorSearchConfigurationProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe VectorSearchConfigurationProperty
vectorSearchConfiguration]))}
instance JSON.ToJSON Graph where
  toJSON :: Graph -> Value
toJSON Graph {Maybe [Tag]
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe VectorSearchConfigurationProperty
()
Value Integer
haddock_workaround_ :: Graph -> ()
deletionProtection :: Graph -> Maybe (Value Bool)
graphName :: Graph -> Maybe (Value Text)
provisionedMemory :: Graph -> Value Integer
publicConnectivity :: Graph -> Maybe (Value Bool)
replicaCount :: Graph -> Maybe (Value Integer)
tags :: Graph -> Maybe [Tag]
vectorSearchConfiguration :: Graph -> Maybe VectorSearchConfigurationProperty
haddock_workaround_ :: ()
deletionProtection :: Maybe (Value Bool)
graphName :: Maybe (Value Text)
provisionedMemory :: Value Integer
publicConnectivity :: Maybe (Value Bool)
replicaCount :: Maybe (Value Integer)
tags :: Maybe [Tag]
vectorSearchConfiguration :: Maybe VectorSearchConfigurationProperty
..}
    = [(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
"ProvisionedMemory" Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Integer
provisionedMemory]
              ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                 [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
"DeletionProtection" (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)
deletionProtection,
                  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
"GraphName" (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)
graphName,
                  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
"PublicConnectivity" (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)
publicConnectivity,
                  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
"ReplicaCount" (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)
replicaCount,
                  Key -> [Tag] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Tags" ([Tag] -> (Key, Value)) -> Maybe [Tag] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Tag]
tags,
                  Key -> VectorSearchConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"VectorSearchConfiguration"
                    (VectorSearchConfigurationProperty -> (Key, Value))
-> Maybe VectorSearchConfigurationProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe VectorSearchConfigurationProperty
vectorSearchConfiguration])))
instance Property "DeletionProtection" Graph where
  type PropertyType "DeletionProtection" Graph = Value Prelude.Bool
  set :: PropertyType "DeletionProtection" Graph -> Graph -> Graph
set PropertyType "DeletionProtection" Graph
newValue Graph {Maybe [Tag]
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe VectorSearchConfigurationProperty
()
Value Integer
haddock_workaround_ :: Graph -> ()
deletionProtection :: Graph -> Maybe (Value Bool)
graphName :: Graph -> Maybe (Value Text)
provisionedMemory :: Graph -> Value Integer
publicConnectivity :: Graph -> Maybe (Value Bool)
replicaCount :: Graph -> Maybe (Value Integer)
tags :: Graph -> Maybe [Tag]
vectorSearchConfiguration :: Graph -> Maybe VectorSearchConfigurationProperty
haddock_workaround_ :: ()
deletionProtection :: Maybe (Value Bool)
graphName :: Maybe (Value Text)
provisionedMemory :: Value Integer
publicConnectivity :: Maybe (Value Bool)
replicaCount :: Maybe (Value Integer)
tags :: Maybe [Tag]
vectorSearchConfiguration :: Maybe VectorSearchConfigurationProperty
..}
    = Graph {deletionProtection :: Maybe (Value Bool)
deletionProtection = Value Bool -> Maybe (Value Bool)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "DeletionProtection" Graph
Value Bool
newValue, Maybe [Tag]
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe VectorSearchConfigurationProperty
()
Value Integer
haddock_workaround_ :: ()
graphName :: Maybe (Value Text)
provisionedMemory :: Value Integer
publicConnectivity :: Maybe (Value Bool)
replicaCount :: Maybe (Value Integer)
tags :: Maybe [Tag]
vectorSearchConfiguration :: Maybe VectorSearchConfigurationProperty
haddock_workaround_ :: ()
graphName :: Maybe (Value Text)
provisionedMemory :: Value Integer
publicConnectivity :: Maybe (Value Bool)
replicaCount :: Maybe (Value Integer)
tags :: Maybe [Tag]
vectorSearchConfiguration :: Maybe VectorSearchConfigurationProperty
..}
instance Property "GraphName" Graph where
  type PropertyType "GraphName" Graph = Value Prelude.Text
  set :: PropertyType "GraphName" Graph -> Graph -> Graph
set PropertyType "GraphName" Graph
newValue Graph {Maybe [Tag]
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe VectorSearchConfigurationProperty
()
Value Integer
haddock_workaround_ :: Graph -> ()
deletionProtection :: Graph -> Maybe (Value Bool)
graphName :: Graph -> Maybe (Value Text)
provisionedMemory :: Graph -> Value Integer
publicConnectivity :: Graph -> Maybe (Value Bool)
replicaCount :: Graph -> Maybe (Value Integer)
tags :: Graph -> Maybe [Tag]
vectorSearchConfiguration :: Graph -> Maybe VectorSearchConfigurationProperty
haddock_workaround_ :: ()
deletionProtection :: Maybe (Value Bool)
graphName :: Maybe (Value Text)
provisionedMemory :: Value Integer
publicConnectivity :: Maybe (Value Bool)
replicaCount :: Maybe (Value Integer)
tags :: Maybe [Tag]
vectorSearchConfiguration :: Maybe VectorSearchConfigurationProperty
..}
    = Graph {graphName :: Maybe (Value Text)
graphName = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "GraphName" Graph
Value Text
newValue, Maybe [Tag]
Maybe (Value Bool)
Maybe (Value Integer)
Maybe VectorSearchConfigurationProperty
()
Value Integer
haddock_workaround_ :: ()
deletionProtection :: Maybe (Value Bool)
provisionedMemory :: Value Integer
publicConnectivity :: Maybe (Value Bool)
replicaCount :: Maybe (Value Integer)
tags :: Maybe [Tag]
vectorSearchConfiguration :: Maybe VectorSearchConfigurationProperty
haddock_workaround_ :: ()
deletionProtection :: Maybe (Value Bool)
provisionedMemory :: Value Integer
publicConnectivity :: Maybe (Value Bool)
replicaCount :: Maybe (Value Integer)
tags :: Maybe [Tag]
vectorSearchConfiguration :: Maybe VectorSearchConfigurationProperty
..}
instance Property "ProvisionedMemory" Graph where
  type PropertyType "ProvisionedMemory" Graph = Value Prelude.Integer
  set :: PropertyType "ProvisionedMemory" Graph -> Graph -> Graph
set PropertyType "ProvisionedMemory" Graph
newValue Graph {Maybe [Tag]
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe VectorSearchConfigurationProperty
()
Value Integer
haddock_workaround_ :: Graph -> ()
deletionProtection :: Graph -> Maybe (Value Bool)
graphName :: Graph -> Maybe (Value Text)
provisionedMemory :: Graph -> Value Integer
publicConnectivity :: Graph -> Maybe (Value Bool)
replicaCount :: Graph -> Maybe (Value Integer)
tags :: Graph -> Maybe [Tag]
vectorSearchConfiguration :: Graph -> Maybe VectorSearchConfigurationProperty
haddock_workaround_ :: ()
deletionProtection :: Maybe (Value Bool)
graphName :: Maybe (Value Text)
provisionedMemory :: Value Integer
publicConnectivity :: Maybe (Value Bool)
replicaCount :: Maybe (Value Integer)
tags :: Maybe [Tag]
vectorSearchConfiguration :: Maybe VectorSearchConfigurationProperty
..} = Graph {provisionedMemory :: Value Integer
provisionedMemory = PropertyType "ProvisionedMemory" Graph
Value Integer
newValue, Maybe [Tag]
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe VectorSearchConfigurationProperty
()
haddock_workaround_ :: ()
deletionProtection :: Maybe (Value Bool)
graphName :: Maybe (Value Text)
publicConnectivity :: Maybe (Value Bool)
replicaCount :: Maybe (Value Integer)
tags :: Maybe [Tag]
vectorSearchConfiguration :: Maybe VectorSearchConfigurationProperty
haddock_workaround_ :: ()
deletionProtection :: Maybe (Value Bool)
graphName :: Maybe (Value Text)
publicConnectivity :: Maybe (Value Bool)
replicaCount :: Maybe (Value Integer)
tags :: Maybe [Tag]
vectorSearchConfiguration :: Maybe VectorSearchConfigurationProperty
..}
instance Property "PublicConnectivity" Graph where
  type PropertyType "PublicConnectivity" Graph = Value Prelude.Bool
  set :: PropertyType "PublicConnectivity" Graph -> Graph -> Graph
set PropertyType "PublicConnectivity" Graph
newValue Graph {Maybe [Tag]
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe VectorSearchConfigurationProperty
()
Value Integer
haddock_workaround_ :: Graph -> ()
deletionProtection :: Graph -> Maybe (Value Bool)
graphName :: Graph -> Maybe (Value Text)
provisionedMemory :: Graph -> Value Integer
publicConnectivity :: Graph -> Maybe (Value Bool)
replicaCount :: Graph -> Maybe (Value Integer)
tags :: Graph -> Maybe [Tag]
vectorSearchConfiguration :: Graph -> Maybe VectorSearchConfigurationProperty
haddock_workaround_ :: ()
deletionProtection :: Maybe (Value Bool)
graphName :: Maybe (Value Text)
provisionedMemory :: Value Integer
publicConnectivity :: Maybe (Value Bool)
replicaCount :: Maybe (Value Integer)
tags :: Maybe [Tag]
vectorSearchConfiguration :: Maybe VectorSearchConfigurationProperty
..}
    = Graph {publicConnectivity :: Maybe (Value Bool)
publicConnectivity = Value Bool -> Maybe (Value Bool)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "PublicConnectivity" Graph
Value Bool
newValue, Maybe [Tag]
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe VectorSearchConfigurationProperty
()
Value Integer
haddock_workaround_ :: ()
deletionProtection :: Maybe (Value Bool)
graphName :: Maybe (Value Text)
provisionedMemory :: Value Integer
replicaCount :: Maybe (Value Integer)
tags :: Maybe [Tag]
vectorSearchConfiguration :: Maybe VectorSearchConfigurationProperty
haddock_workaround_ :: ()
deletionProtection :: Maybe (Value Bool)
graphName :: Maybe (Value Text)
provisionedMemory :: Value Integer
replicaCount :: Maybe (Value Integer)
tags :: Maybe [Tag]
vectorSearchConfiguration :: Maybe VectorSearchConfigurationProperty
..}
instance Property "ReplicaCount" Graph where
  type PropertyType "ReplicaCount" Graph = Value Prelude.Integer
  set :: PropertyType "ReplicaCount" Graph -> Graph -> Graph
set PropertyType "ReplicaCount" Graph
newValue Graph {Maybe [Tag]
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe VectorSearchConfigurationProperty
()
Value Integer
haddock_workaround_ :: Graph -> ()
deletionProtection :: Graph -> Maybe (Value Bool)
graphName :: Graph -> Maybe (Value Text)
provisionedMemory :: Graph -> Value Integer
publicConnectivity :: Graph -> Maybe (Value Bool)
replicaCount :: Graph -> Maybe (Value Integer)
tags :: Graph -> Maybe [Tag]
vectorSearchConfiguration :: Graph -> Maybe VectorSearchConfigurationProperty
haddock_workaround_ :: ()
deletionProtection :: Maybe (Value Bool)
graphName :: Maybe (Value Text)
provisionedMemory :: Value Integer
publicConnectivity :: Maybe (Value Bool)
replicaCount :: Maybe (Value Integer)
tags :: Maybe [Tag]
vectorSearchConfiguration :: Maybe VectorSearchConfigurationProperty
..}
    = Graph {replicaCount :: Maybe (Value Integer)
replicaCount = Value Integer -> Maybe (Value Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ReplicaCount" Graph
Value Integer
newValue, Maybe [Tag]
Maybe (Value Bool)
Maybe (Value Text)
Maybe VectorSearchConfigurationProperty
()
Value Integer
haddock_workaround_ :: ()
deletionProtection :: Maybe (Value Bool)
graphName :: Maybe (Value Text)
provisionedMemory :: Value Integer
publicConnectivity :: Maybe (Value Bool)
tags :: Maybe [Tag]
vectorSearchConfiguration :: Maybe VectorSearchConfigurationProperty
haddock_workaround_ :: ()
deletionProtection :: Maybe (Value Bool)
graphName :: Maybe (Value Text)
provisionedMemory :: Value Integer
publicConnectivity :: Maybe (Value Bool)
tags :: Maybe [Tag]
vectorSearchConfiguration :: Maybe VectorSearchConfigurationProperty
..}
instance Property "Tags" Graph where
  type PropertyType "Tags" Graph = [Tag]
  set :: PropertyType "Tags" Graph -> Graph -> Graph
set PropertyType "Tags" Graph
newValue Graph {Maybe [Tag]
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe VectorSearchConfigurationProperty
()
Value Integer
haddock_workaround_ :: Graph -> ()
deletionProtection :: Graph -> Maybe (Value Bool)
graphName :: Graph -> Maybe (Value Text)
provisionedMemory :: Graph -> Value Integer
publicConnectivity :: Graph -> Maybe (Value Bool)
replicaCount :: Graph -> Maybe (Value Integer)
tags :: Graph -> Maybe [Tag]
vectorSearchConfiguration :: Graph -> Maybe VectorSearchConfigurationProperty
haddock_workaround_ :: ()
deletionProtection :: Maybe (Value Bool)
graphName :: Maybe (Value Text)
provisionedMemory :: Value Integer
publicConnectivity :: Maybe (Value Bool)
replicaCount :: Maybe (Value Integer)
tags :: Maybe [Tag]
vectorSearchConfiguration :: Maybe VectorSearchConfigurationProperty
..} = Graph {tags :: Maybe [Tag]
tags = [Tag] -> Maybe [Tag]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [Tag]
PropertyType "Tags" Graph
newValue, Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe VectorSearchConfigurationProperty
()
Value Integer
haddock_workaround_ :: ()
deletionProtection :: Maybe (Value Bool)
graphName :: Maybe (Value Text)
provisionedMemory :: Value Integer
publicConnectivity :: Maybe (Value Bool)
replicaCount :: Maybe (Value Integer)
vectorSearchConfiguration :: Maybe VectorSearchConfigurationProperty
haddock_workaround_ :: ()
deletionProtection :: Maybe (Value Bool)
graphName :: Maybe (Value Text)
provisionedMemory :: Value Integer
publicConnectivity :: Maybe (Value Bool)
replicaCount :: Maybe (Value Integer)
vectorSearchConfiguration :: Maybe VectorSearchConfigurationProperty
..}
instance Property "VectorSearchConfiguration" Graph where
  type PropertyType "VectorSearchConfiguration" Graph = VectorSearchConfigurationProperty
  set :: PropertyType "VectorSearchConfiguration" Graph -> Graph -> Graph
set PropertyType "VectorSearchConfiguration" Graph
newValue Graph {Maybe [Tag]
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe VectorSearchConfigurationProperty
()
Value Integer
haddock_workaround_ :: Graph -> ()
deletionProtection :: Graph -> Maybe (Value Bool)
graphName :: Graph -> Maybe (Value Text)
provisionedMemory :: Graph -> Value Integer
publicConnectivity :: Graph -> Maybe (Value Bool)
replicaCount :: Graph -> Maybe (Value Integer)
tags :: Graph -> Maybe [Tag]
vectorSearchConfiguration :: Graph -> Maybe VectorSearchConfigurationProperty
haddock_workaround_ :: ()
deletionProtection :: Maybe (Value Bool)
graphName :: Maybe (Value Text)
provisionedMemory :: Value Integer
publicConnectivity :: Maybe (Value Bool)
replicaCount :: Maybe (Value Integer)
tags :: Maybe [Tag]
vectorSearchConfiguration :: Maybe VectorSearchConfigurationProperty
..}
    = Graph {vectorSearchConfiguration :: Maybe VectorSearchConfigurationProperty
vectorSearchConfiguration = VectorSearchConfigurationProperty
-> Maybe VectorSearchConfigurationProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "VectorSearchConfiguration" Graph
VectorSearchConfigurationProperty
newValue, Maybe [Tag]
Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
()
Value Integer
haddock_workaround_ :: ()
deletionProtection :: Maybe (Value Bool)
graphName :: Maybe (Value Text)
provisionedMemory :: Value Integer
publicConnectivity :: Maybe (Value Bool)
replicaCount :: Maybe (Value Integer)
tags :: Maybe [Tag]
haddock_workaround_ :: ()
deletionProtection :: Maybe (Value Bool)
graphName :: Maybe (Value Text)
provisionedMemory :: Value Integer
publicConnectivity :: Maybe (Value Bool)
replicaCount :: Maybe (Value Integer)
tags :: Maybe [Tag]
..}