module Stratosphere.NeptuneGraph.Graph.VectorSearchConfigurationProperty (
        VectorSearchConfigurationProperty(..),
        mkVectorSearchConfigurationProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data VectorSearchConfigurationProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-neptunegraph-graph-vectorsearchconfiguration.html>
    VectorSearchConfigurationProperty {VectorSearchConfigurationProperty -> ()
haddock_workaround_ :: (),
                                       -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-neptunegraph-graph-vectorsearchconfiguration.html#cfn-neptunegraph-graph-vectorsearchconfiguration-vectorsearchdimension>
                                       VectorSearchConfigurationProperty -> Value Integer
vectorSearchDimension :: (Value Prelude.Integer)}
  deriving stock (VectorSearchConfigurationProperty
-> VectorSearchConfigurationProperty -> Bool
(VectorSearchConfigurationProperty
 -> VectorSearchConfigurationProperty -> Bool)
-> (VectorSearchConfigurationProperty
    -> VectorSearchConfigurationProperty -> Bool)
-> Eq VectorSearchConfigurationProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: VectorSearchConfigurationProperty
-> VectorSearchConfigurationProperty -> Bool
== :: VectorSearchConfigurationProperty
-> VectorSearchConfigurationProperty -> Bool
$c/= :: VectorSearchConfigurationProperty
-> VectorSearchConfigurationProperty -> Bool
/= :: VectorSearchConfigurationProperty
-> VectorSearchConfigurationProperty -> Bool
Prelude.Eq, Int -> VectorSearchConfigurationProperty -> ShowS
[VectorSearchConfigurationProperty] -> ShowS
VectorSearchConfigurationProperty -> String
(Int -> VectorSearchConfigurationProperty -> ShowS)
-> (VectorSearchConfigurationProperty -> String)
-> ([VectorSearchConfigurationProperty] -> ShowS)
-> Show VectorSearchConfigurationProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> VectorSearchConfigurationProperty -> ShowS
showsPrec :: Int -> VectorSearchConfigurationProperty -> ShowS
$cshow :: VectorSearchConfigurationProperty -> String
show :: VectorSearchConfigurationProperty -> String
$cshowList :: [VectorSearchConfigurationProperty] -> ShowS
showList :: [VectorSearchConfigurationProperty] -> ShowS
Prelude.Show)
mkVectorSearchConfigurationProperty ::
  Value Prelude.Integer -> VectorSearchConfigurationProperty
mkVectorSearchConfigurationProperty :: Value Integer -> VectorSearchConfigurationProperty
mkVectorSearchConfigurationProperty Value Integer
vectorSearchDimension
  = VectorSearchConfigurationProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (),
       vectorSearchDimension :: Value Integer
vectorSearchDimension = Value Integer
vectorSearchDimension}
instance ToResourceProperties VectorSearchConfigurationProperty where
  toResourceProperties :: VectorSearchConfigurationProperty -> ResourceProperties
toResourceProperties VectorSearchConfigurationProperty {()
Value Integer
haddock_workaround_ :: VectorSearchConfigurationProperty -> ()
vectorSearchDimension :: VectorSearchConfigurationProperty -> Value Integer
haddock_workaround_ :: ()
vectorSearchDimension :: Value Integer
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::NeptuneGraph::Graph.VectorSearchConfiguration",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Key
"VectorSearchDimension"
                         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
vectorSearchDimension]}
instance JSON.ToJSON VectorSearchConfigurationProperty where
  toJSON :: VectorSearchConfigurationProperty -> Value
toJSON VectorSearchConfigurationProperty {()
Value Integer
haddock_workaround_ :: VectorSearchConfigurationProperty -> ()
vectorSearchDimension :: VectorSearchConfigurationProperty -> Value Integer
haddock_workaround_ :: ()
vectorSearchDimension :: Value Integer
..}
    = [(Key, Value)] -> Value
JSON.object
        [Key
"VectorSearchDimension" 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
vectorSearchDimension]
instance Property "VectorSearchDimension" VectorSearchConfigurationProperty where
  type PropertyType "VectorSearchDimension" VectorSearchConfigurationProperty = Value Prelude.Integer
  set :: PropertyType
  "VectorSearchDimension" VectorSearchConfigurationProperty
-> VectorSearchConfigurationProperty
-> VectorSearchConfigurationProperty
set PropertyType
  "VectorSearchDimension" VectorSearchConfigurationProperty
newValue VectorSearchConfigurationProperty {()
Value Integer
haddock_workaround_ :: VectorSearchConfigurationProperty -> ()
vectorSearchDimension :: VectorSearchConfigurationProperty -> Value Integer
haddock_workaround_ :: ()
vectorSearchDimension :: Value Integer
..}
    = VectorSearchConfigurationProperty
        {vectorSearchDimension :: Value Integer
vectorSearchDimension = PropertyType
  "VectorSearchDimension" VectorSearchConfigurationProperty
Value Integer
newValue, ()
haddock_workaround_ :: ()
haddock_workaround_ :: ()
..}