{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.SimSpaceWeaver.Types.SimulationAppMetadata where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import qualified Amazonka.Prelude as Prelude
import Amazonka.SimSpaceWeaver.Types.SimulationAppStatus
import Amazonka.SimSpaceWeaver.Types.SimulationAppTargetStatus
data SimulationAppMetadata = SimulationAppMetadata'
{
SimulationAppMetadata -> Maybe Text
domain :: Prelude.Maybe Prelude.Text,
SimulationAppMetadata -> Maybe Text
name :: Prelude.Maybe Prelude.Text,
SimulationAppMetadata -> Maybe Text
simulation :: Prelude.Maybe Prelude.Text,
SimulationAppMetadata -> Maybe SimulationAppStatus
status :: Prelude.Maybe SimulationAppStatus,
SimulationAppMetadata -> Maybe SimulationAppTargetStatus
targetStatus :: Prelude.Maybe SimulationAppTargetStatus
}
deriving (SimulationAppMetadata -> SimulationAppMetadata -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: SimulationAppMetadata -> SimulationAppMetadata -> Bool
$c/= :: SimulationAppMetadata -> SimulationAppMetadata -> Bool
== :: SimulationAppMetadata -> SimulationAppMetadata -> Bool
$c== :: SimulationAppMetadata -> SimulationAppMetadata -> Bool
Prelude.Eq, ReadPrec [SimulationAppMetadata]
ReadPrec SimulationAppMetadata
Int -> ReadS SimulationAppMetadata
ReadS [SimulationAppMetadata]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [SimulationAppMetadata]
$creadListPrec :: ReadPrec [SimulationAppMetadata]
readPrec :: ReadPrec SimulationAppMetadata
$creadPrec :: ReadPrec SimulationAppMetadata
readList :: ReadS [SimulationAppMetadata]
$creadList :: ReadS [SimulationAppMetadata]
readsPrec :: Int -> ReadS SimulationAppMetadata
$creadsPrec :: Int -> ReadS SimulationAppMetadata
Prelude.Read, Int -> SimulationAppMetadata -> ShowS
[SimulationAppMetadata] -> ShowS
SimulationAppMetadata -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [SimulationAppMetadata] -> ShowS
$cshowList :: [SimulationAppMetadata] -> ShowS
show :: SimulationAppMetadata -> String
$cshow :: SimulationAppMetadata -> String
showsPrec :: Int -> SimulationAppMetadata -> ShowS
$cshowsPrec :: Int -> SimulationAppMetadata -> ShowS
Prelude.Show, forall x. Rep SimulationAppMetadata x -> SimulationAppMetadata
forall x. SimulationAppMetadata -> Rep SimulationAppMetadata x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep SimulationAppMetadata x -> SimulationAppMetadata
$cfrom :: forall x. SimulationAppMetadata -> Rep SimulationAppMetadata x
Prelude.Generic)
newSimulationAppMetadata ::
SimulationAppMetadata
newSimulationAppMetadata :: SimulationAppMetadata
newSimulationAppMetadata =
SimulationAppMetadata'
{ $sel:domain:SimulationAppMetadata' :: Maybe Text
domain = forall a. Maybe a
Prelude.Nothing,
$sel:name:SimulationAppMetadata' :: Maybe Text
name = forall a. Maybe a
Prelude.Nothing,
$sel:simulation:SimulationAppMetadata' :: Maybe Text
simulation = forall a. Maybe a
Prelude.Nothing,
$sel:status:SimulationAppMetadata' :: Maybe SimulationAppStatus
status = forall a. Maybe a
Prelude.Nothing,
$sel:targetStatus:SimulationAppMetadata' :: Maybe SimulationAppTargetStatus
targetStatus = forall a. Maybe a
Prelude.Nothing
}
simulationAppMetadata_domain :: Lens.Lens' SimulationAppMetadata (Prelude.Maybe Prelude.Text)
simulationAppMetadata_domain :: Lens' SimulationAppMetadata (Maybe Text)
simulationAppMetadata_domain = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\SimulationAppMetadata' {Maybe Text
domain :: Maybe Text
$sel:domain:SimulationAppMetadata' :: SimulationAppMetadata -> Maybe Text
domain} -> Maybe Text
domain) (\s :: SimulationAppMetadata
s@SimulationAppMetadata' {} Maybe Text
a -> SimulationAppMetadata
s {$sel:domain:SimulationAppMetadata' :: Maybe Text
domain = Maybe Text
a} :: SimulationAppMetadata)
simulationAppMetadata_name :: Lens.Lens' SimulationAppMetadata (Prelude.Maybe Prelude.Text)
simulationAppMetadata_name :: Lens' SimulationAppMetadata (Maybe Text)
simulationAppMetadata_name = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\SimulationAppMetadata' {Maybe Text
name :: Maybe Text
$sel:name:SimulationAppMetadata' :: SimulationAppMetadata -> Maybe Text
name} -> Maybe Text
name) (\s :: SimulationAppMetadata
s@SimulationAppMetadata' {} Maybe Text
a -> SimulationAppMetadata
s {$sel:name:SimulationAppMetadata' :: Maybe Text
name = Maybe Text
a} :: SimulationAppMetadata)
simulationAppMetadata_simulation :: Lens.Lens' SimulationAppMetadata (Prelude.Maybe Prelude.Text)
simulationAppMetadata_simulation :: Lens' SimulationAppMetadata (Maybe Text)
simulationAppMetadata_simulation = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\SimulationAppMetadata' {Maybe Text
simulation :: Maybe Text
$sel:simulation:SimulationAppMetadata' :: SimulationAppMetadata -> Maybe Text
simulation} -> Maybe Text
simulation) (\s :: SimulationAppMetadata
s@SimulationAppMetadata' {} Maybe Text
a -> SimulationAppMetadata
s {$sel:simulation:SimulationAppMetadata' :: Maybe Text
simulation = Maybe Text
a} :: SimulationAppMetadata)
simulationAppMetadata_status :: Lens.Lens' SimulationAppMetadata (Prelude.Maybe SimulationAppStatus)
simulationAppMetadata_status :: Lens' SimulationAppMetadata (Maybe SimulationAppStatus)
simulationAppMetadata_status = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\SimulationAppMetadata' {Maybe SimulationAppStatus
status :: Maybe SimulationAppStatus
$sel:status:SimulationAppMetadata' :: SimulationAppMetadata -> Maybe SimulationAppStatus
status} -> Maybe SimulationAppStatus
status) (\s :: SimulationAppMetadata
s@SimulationAppMetadata' {} Maybe SimulationAppStatus
a -> SimulationAppMetadata
s {$sel:status:SimulationAppMetadata' :: Maybe SimulationAppStatus
status = Maybe SimulationAppStatus
a} :: SimulationAppMetadata)
simulationAppMetadata_targetStatus :: Lens.Lens' SimulationAppMetadata (Prelude.Maybe SimulationAppTargetStatus)
simulationAppMetadata_targetStatus :: Lens' SimulationAppMetadata (Maybe SimulationAppTargetStatus)
simulationAppMetadata_targetStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\SimulationAppMetadata' {Maybe SimulationAppTargetStatus
targetStatus :: Maybe SimulationAppTargetStatus
$sel:targetStatus:SimulationAppMetadata' :: SimulationAppMetadata -> Maybe SimulationAppTargetStatus
targetStatus} -> Maybe SimulationAppTargetStatus
targetStatus) (\s :: SimulationAppMetadata
s@SimulationAppMetadata' {} Maybe SimulationAppTargetStatus
a -> SimulationAppMetadata
s {$sel:targetStatus:SimulationAppMetadata' :: Maybe SimulationAppTargetStatus
targetStatus = Maybe SimulationAppTargetStatus
a} :: SimulationAppMetadata)
instance Data.FromJSON SimulationAppMetadata where
parseJSON :: Value -> Parser SimulationAppMetadata
parseJSON =
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Data.withObject
String
"SimulationAppMetadata"
( \Object
x ->
Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe SimulationAppStatus
-> Maybe SimulationAppTargetStatus
-> SimulationAppMetadata
SimulationAppMetadata'
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"Domain")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"Name")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"Simulation")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"Status")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"TargetStatus")
)
instance Prelude.Hashable SimulationAppMetadata where
hashWithSalt :: Int -> SimulationAppMetadata -> Int
hashWithSalt Int
_salt SimulationAppMetadata' {Maybe Text
Maybe SimulationAppStatus
Maybe SimulationAppTargetStatus
targetStatus :: Maybe SimulationAppTargetStatus
status :: Maybe SimulationAppStatus
simulation :: Maybe Text
name :: Maybe Text
domain :: Maybe Text
$sel:targetStatus:SimulationAppMetadata' :: SimulationAppMetadata -> Maybe SimulationAppTargetStatus
$sel:status:SimulationAppMetadata' :: SimulationAppMetadata -> Maybe SimulationAppStatus
$sel:simulation:SimulationAppMetadata' :: SimulationAppMetadata -> Maybe Text
$sel:name:SimulationAppMetadata' :: SimulationAppMetadata -> Maybe Text
$sel:domain:SimulationAppMetadata' :: SimulationAppMetadata -> Maybe Text
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
domain
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
name
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
simulation
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe SimulationAppStatus
status
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe SimulationAppTargetStatus
targetStatus
instance Prelude.NFData SimulationAppMetadata where
rnf :: SimulationAppMetadata -> ()
rnf SimulationAppMetadata' {Maybe Text
Maybe SimulationAppStatus
Maybe SimulationAppTargetStatus
targetStatus :: Maybe SimulationAppTargetStatus
status :: Maybe SimulationAppStatus
simulation :: Maybe Text
name :: Maybe Text
domain :: Maybe Text
$sel:targetStatus:SimulationAppMetadata' :: SimulationAppMetadata -> Maybe SimulationAppTargetStatus
$sel:status:SimulationAppMetadata' :: SimulationAppMetadata -> Maybe SimulationAppStatus
$sel:simulation:SimulationAppMetadata' :: SimulationAppMetadata -> Maybe Text
$sel:name:SimulationAppMetadata' :: SimulationAppMetadata -> Maybe Text
$sel:domain:SimulationAppMetadata' :: SimulationAppMetadata -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
domain
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
name
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
simulation
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe SimulationAppStatus
status
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe SimulationAppTargetStatus
targetStatus