module Stratosphere.Batch.JobDefinition.EksPodPropertiesProperty (
module Exports, EksPodPropertiesProperty(..),
mkEksPodPropertiesProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.Batch.JobDefinition.EksContainerProperty as Exports
import {-# SOURCE #-} Stratosphere.Batch.JobDefinition.EksMetadataProperty as Exports
import {-# SOURCE #-} Stratosphere.Batch.JobDefinition.EksVolumeProperty as Exports
import {-# SOURCE #-} Stratosphere.Batch.JobDefinition.ImagePullSecretProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data EksPodPropertiesProperty
=
EksPodPropertiesProperty {EksPodPropertiesProperty -> ()
haddock_workaround_ :: (),
EksPodPropertiesProperty -> Maybe [EksContainerProperty]
containers :: (Prelude.Maybe [EksContainerProperty]),
EksPodPropertiesProperty -> Maybe (Value Text)
dnsPolicy :: (Prelude.Maybe (Value Prelude.Text)),
EksPodPropertiesProperty -> Maybe (Value Bool)
hostNetwork :: (Prelude.Maybe (Value Prelude.Bool)),
EksPodPropertiesProperty -> Maybe [ImagePullSecretProperty]
imagePullSecrets :: (Prelude.Maybe [ImagePullSecretProperty]),
EksPodPropertiesProperty -> Maybe [EksContainerProperty]
initContainers :: (Prelude.Maybe [EksContainerProperty]),
EksPodPropertiesProperty -> Maybe EksMetadataProperty
metadata :: (Prelude.Maybe EksMetadataProperty),
EksPodPropertiesProperty -> Maybe (Value Text)
serviceAccountName :: (Prelude.Maybe (Value Prelude.Text)),
EksPodPropertiesProperty -> Maybe (Value Bool)
shareProcessNamespace :: (Prelude.Maybe (Value Prelude.Bool)),
EksPodPropertiesProperty -> Maybe [EksVolumeProperty]
volumes :: (Prelude.Maybe [EksVolumeProperty])}
deriving stock (EksPodPropertiesProperty -> EksPodPropertiesProperty -> Bool
(EksPodPropertiesProperty -> EksPodPropertiesProperty -> Bool)
-> (EksPodPropertiesProperty -> EksPodPropertiesProperty -> Bool)
-> Eq EksPodPropertiesProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: EksPodPropertiesProperty -> EksPodPropertiesProperty -> Bool
== :: EksPodPropertiesProperty -> EksPodPropertiesProperty -> Bool
$c/= :: EksPodPropertiesProperty -> EksPodPropertiesProperty -> Bool
/= :: EksPodPropertiesProperty -> EksPodPropertiesProperty -> Bool
Prelude.Eq, Int -> EksPodPropertiesProperty -> ShowS
[EksPodPropertiesProperty] -> ShowS
EksPodPropertiesProperty -> String
(Int -> EksPodPropertiesProperty -> ShowS)
-> (EksPodPropertiesProperty -> String)
-> ([EksPodPropertiesProperty] -> ShowS)
-> Show EksPodPropertiesProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> EksPodPropertiesProperty -> ShowS
showsPrec :: Int -> EksPodPropertiesProperty -> ShowS
$cshow :: EksPodPropertiesProperty -> String
show :: EksPodPropertiesProperty -> String
$cshowList :: [EksPodPropertiesProperty] -> ShowS
showList :: [EksPodPropertiesProperty] -> ShowS
Prelude.Show)
mkEksPodPropertiesProperty :: EksPodPropertiesProperty
mkEksPodPropertiesProperty :: EksPodPropertiesProperty
mkEksPodPropertiesProperty
= EksPodPropertiesProperty
{haddock_workaround_ :: ()
haddock_workaround_ = (), containers :: Maybe [EksContainerProperty]
containers = Maybe [EksContainerProperty]
forall a. Maybe a
Prelude.Nothing,
dnsPolicy :: Maybe (Value Text)
dnsPolicy = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, hostNetwork :: Maybe (Value Bool)
hostNetwork = Maybe (Value Bool)
forall a. Maybe a
Prelude.Nothing,
imagePullSecrets :: Maybe [ImagePullSecretProperty]
imagePullSecrets = Maybe [ImagePullSecretProperty]
forall a. Maybe a
Prelude.Nothing,
initContainers :: Maybe [EksContainerProperty]
initContainers = Maybe [EksContainerProperty]
forall a. Maybe a
Prelude.Nothing, metadata :: Maybe EksMetadataProperty
metadata = Maybe EksMetadataProperty
forall a. Maybe a
Prelude.Nothing,
serviceAccountName :: Maybe (Value Text)
serviceAccountName = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
shareProcessNamespace :: Maybe (Value Bool)
shareProcessNamespace = Maybe (Value Bool)
forall a. Maybe a
Prelude.Nothing, volumes :: Maybe [EksVolumeProperty]
volumes = Maybe [EksVolumeProperty]
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties EksPodPropertiesProperty where
toResourceProperties :: EksPodPropertiesProperty -> ResourceProperties
toResourceProperties EksPodPropertiesProperty {Maybe [EksContainerProperty]
Maybe [EksVolumeProperty]
Maybe [ImagePullSecretProperty]
Maybe (Value Bool)
Maybe (Value Text)
Maybe EksMetadataProperty
()
haddock_workaround_ :: EksPodPropertiesProperty -> ()
containers :: EksPodPropertiesProperty -> Maybe [EksContainerProperty]
dnsPolicy :: EksPodPropertiesProperty -> Maybe (Value Text)
hostNetwork :: EksPodPropertiesProperty -> Maybe (Value Bool)
imagePullSecrets :: EksPodPropertiesProperty -> Maybe [ImagePullSecretProperty]
initContainers :: EksPodPropertiesProperty -> Maybe [EksContainerProperty]
metadata :: EksPodPropertiesProperty -> Maybe EksMetadataProperty
serviceAccountName :: EksPodPropertiesProperty -> Maybe (Value Text)
shareProcessNamespace :: EksPodPropertiesProperty -> Maybe (Value Bool)
volumes :: EksPodPropertiesProperty -> Maybe [EksVolumeProperty]
haddock_workaround_ :: ()
containers :: Maybe [EksContainerProperty]
dnsPolicy :: Maybe (Value Text)
hostNetwork :: Maybe (Value Bool)
imagePullSecrets :: Maybe [ImagePullSecretProperty]
initContainers :: Maybe [EksContainerProperty]
metadata :: Maybe EksMetadataProperty
serviceAccountName :: Maybe (Value Text)
shareProcessNamespace :: Maybe (Value Bool)
volumes :: Maybe [EksVolumeProperty]
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::Batch::JobDefinition.EksPodProperties",
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 -> [EksContainerProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Containers" ([EksContainerProperty] -> (Key, Value))
-> Maybe [EksContainerProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [EksContainerProperty]
containers,
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
"DnsPolicy" (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)
dnsPolicy,
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
"HostNetwork" (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)
hostNetwork,
Key -> [ImagePullSecretProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ImagePullSecrets" ([ImagePullSecretProperty] -> (Key, Value))
-> Maybe [ImagePullSecretProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [ImagePullSecretProperty]
imagePullSecrets,
Key -> [EksContainerProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"InitContainers" ([EksContainerProperty] -> (Key, Value))
-> Maybe [EksContainerProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [EksContainerProperty]
initContainers,
Key -> EksMetadataProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Metadata" (EksMetadataProperty -> (Key, Value))
-> Maybe EksMetadataProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe EksMetadataProperty
metadata,
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
"ServiceAccountName" (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)
serviceAccountName,
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
"ShareProcessNamespace"
(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)
shareProcessNamespace,
Key -> [EksVolumeProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Volumes" ([EksVolumeProperty] -> (Key, Value))
-> Maybe [EksVolumeProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [EksVolumeProperty]
volumes])}
instance JSON.ToJSON EksPodPropertiesProperty where
toJSON :: EksPodPropertiesProperty -> Value
toJSON EksPodPropertiesProperty {Maybe [EksContainerProperty]
Maybe [EksVolumeProperty]
Maybe [ImagePullSecretProperty]
Maybe (Value Bool)
Maybe (Value Text)
Maybe EksMetadataProperty
()
haddock_workaround_ :: EksPodPropertiesProperty -> ()
containers :: EksPodPropertiesProperty -> Maybe [EksContainerProperty]
dnsPolicy :: EksPodPropertiesProperty -> Maybe (Value Text)
hostNetwork :: EksPodPropertiesProperty -> Maybe (Value Bool)
imagePullSecrets :: EksPodPropertiesProperty -> Maybe [ImagePullSecretProperty]
initContainers :: EksPodPropertiesProperty -> Maybe [EksContainerProperty]
metadata :: EksPodPropertiesProperty -> Maybe EksMetadataProperty
serviceAccountName :: EksPodPropertiesProperty -> Maybe (Value Text)
shareProcessNamespace :: EksPodPropertiesProperty -> Maybe (Value Bool)
volumes :: EksPodPropertiesProperty -> Maybe [EksVolumeProperty]
haddock_workaround_ :: ()
containers :: Maybe [EksContainerProperty]
dnsPolicy :: Maybe (Value Text)
hostNetwork :: Maybe (Value Bool)
imagePullSecrets :: Maybe [ImagePullSecretProperty]
initContainers :: Maybe [EksContainerProperty]
metadata :: Maybe EksMetadataProperty
serviceAccountName :: Maybe (Value Text)
shareProcessNamespace :: Maybe (Value Bool)
volumes :: Maybe [EksVolumeProperty]
..}
= [(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 -> [EksContainerProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Containers" ([EksContainerProperty] -> (Key, Value))
-> Maybe [EksContainerProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [EksContainerProperty]
containers,
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
"DnsPolicy" (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)
dnsPolicy,
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
"HostNetwork" (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)
hostNetwork,
Key -> [ImagePullSecretProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ImagePullSecrets" ([ImagePullSecretProperty] -> (Key, Value))
-> Maybe [ImagePullSecretProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [ImagePullSecretProperty]
imagePullSecrets,
Key -> [EksContainerProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"InitContainers" ([EksContainerProperty] -> (Key, Value))
-> Maybe [EksContainerProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [EksContainerProperty]
initContainers,
Key -> EksMetadataProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Metadata" (EksMetadataProperty -> (Key, Value))
-> Maybe EksMetadataProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe EksMetadataProperty
metadata,
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
"ServiceAccountName" (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)
serviceAccountName,
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
"ShareProcessNamespace"
(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)
shareProcessNamespace,
Key -> [EksVolumeProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Volumes" ([EksVolumeProperty] -> (Key, Value))
-> Maybe [EksVolumeProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [EksVolumeProperty]
volumes]))
instance Property "Containers" EksPodPropertiesProperty where
type PropertyType "Containers" EksPodPropertiesProperty = [EksContainerProperty]
set :: PropertyType "Containers" EksPodPropertiesProperty
-> EksPodPropertiesProperty -> EksPodPropertiesProperty
set PropertyType "Containers" EksPodPropertiesProperty
newValue EksPodPropertiesProperty {Maybe [EksContainerProperty]
Maybe [EksVolumeProperty]
Maybe [ImagePullSecretProperty]
Maybe (Value Bool)
Maybe (Value Text)
Maybe EksMetadataProperty
()
haddock_workaround_ :: EksPodPropertiesProperty -> ()
containers :: EksPodPropertiesProperty -> Maybe [EksContainerProperty]
dnsPolicy :: EksPodPropertiesProperty -> Maybe (Value Text)
hostNetwork :: EksPodPropertiesProperty -> Maybe (Value Bool)
imagePullSecrets :: EksPodPropertiesProperty -> Maybe [ImagePullSecretProperty]
initContainers :: EksPodPropertiesProperty -> Maybe [EksContainerProperty]
metadata :: EksPodPropertiesProperty -> Maybe EksMetadataProperty
serviceAccountName :: EksPodPropertiesProperty -> Maybe (Value Text)
shareProcessNamespace :: EksPodPropertiesProperty -> Maybe (Value Bool)
volumes :: EksPodPropertiesProperty -> Maybe [EksVolumeProperty]
haddock_workaround_ :: ()
containers :: Maybe [EksContainerProperty]
dnsPolicy :: Maybe (Value Text)
hostNetwork :: Maybe (Value Bool)
imagePullSecrets :: Maybe [ImagePullSecretProperty]
initContainers :: Maybe [EksContainerProperty]
metadata :: Maybe EksMetadataProperty
serviceAccountName :: Maybe (Value Text)
shareProcessNamespace :: Maybe (Value Bool)
volumes :: Maybe [EksVolumeProperty]
..}
= EksPodPropertiesProperty {containers :: Maybe [EksContainerProperty]
containers = [EksContainerProperty] -> Maybe [EksContainerProperty]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [EksContainerProperty]
PropertyType "Containers" EksPodPropertiesProperty
newValue, Maybe [EksContainerProperty]
Maybe [EksVolumeProperty]
Maybe [ImagePullSecretProperty]
Maybe (Value Bool)
Maybe (Value Text)
Maybe EksMetadataProperty
()
haddock_workaround_ :: ()
dnsPolicy :: Maybe (Value Text)
hostNetwork :: Maybe (Value Bool)
imagePullSecrets :: Maybe [ImagePullSecretProperty]
initContainers :: Maybe [EksContainerProperty]
metadata :: Maybe EksMetadataProperty
serviceAccountName :: Maybe (Value Text)
shareProcessNamespace :: Maybe (Value Bool)
volumes :: Maybe [EksVolumeProperty]
haddock_workaround_ :: ()
dnsPolicy :: Maybe (Value Text)
hostNetwork :: Maybe (Value Bool)
imagePullSecrets :: Maybe [ImagePullSecretProperty]
initContainers :: Maybe [EksContainerProperty]
metadata :: Maybe EksMetadataProperty
serviceAccountName :: Maybe (Value Text)
shareProcessNamespace :: Maybe (Value Bool)
volumes :: Maybe [EksVolumeProperty]
..}
instance Property "DnsPolicy" EksPodPropertiesProperty where
type PropertyType "DnsPolicy" EksPodPropertiesProperty = Value Prelude.Text
set :: PropertyType "DnsPolicy" EksPodPropertiesProperty
-> EksPodPropertiesProperty -> EksPodPropertiesProperty
set PropertyType "DnsPolicy" EksPodPropertiesProperty
newValue EksPodPropertiesProperty {Maybe [EksContainerProperty]
Maybe [EksVolumeProperty]
Maybe [ImagePullSecretProperty]
Maybe (Value Bool)
Maybe (Value Text)
Maybe EksMetadataProperty
()
haddock_workaround_ :: EksPodPropertiesProperty -> ()
containers :: EksPodPropertiesProperty -> Maybe [EksContainerProperty]
dnsPolicy :: EksPodPropertiesProperty -> Maybe (Value Text)
hostNetwork :: EksPodPropertiesProperty -> Maybe (Value Bool)
imagePullSecrets :: EksPodPropertiesProperty -> Maybe [ImagePullSecretProperty]
initContainers :: EksPodPropertiesProperty -> Maybe [EksContainerProperty]
metadata :: EksPodPropertiesProperty -> Maybe EksMetadataProperty
serviceAccountName :: EksPodPropertiesProperty -> Maybe (Value Text)
shareProcessNamespace :: EksPodPropertiesProperty -> Maybe (Value Bool)
volumes :: EksPodPropertiesProperty -> Maybe [EksVolumeProperty]
haddock_workaround_ :: ()
containers :: Maybe [EksContainerProperty]
dnsPolicy :: Maybe (Value Text)
hostNetwork :: Maybe (Value Bool)
imagePullSecrets :: Maybe [ImagePullSecretProperty]
initContainers :: Maybe [EksContainerProperty]
metadata :: Maybe EksMetadataProperty
serviceAccountName :: Maybe (Value Text)
shareProcessNamespace :: Maybe (Value Bool)
volumes :: Maybe [EksVolumeProperty]
..}
= EksPodPropertiesProperty {dnsPolicy :: Maybe (Value Text)
dnsPolicy = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "DnsPolicy" EksPodPropertiesProperty
Value Text
newValue, Maybe [EksContainerProperty]
Maybe [EksVolumeProperty]
Maybe [ImagePullSecretProperty]
Maybe (Value Bool)
Maybe (Value Text)
Maybe EksMetadataProperty
()
haddock_workaround_ :: ()
containers :: Maybe [EksContainerProperty]
hostNetwork :: Maybe (Value Bool)
imagePullSecrets :: Maybe [ImagePullSecretProperty]
initContainers :: Maybe [EksContainerProperty]
metadata :: Maybe EksMetadataProperty
serviceAccountName :: Maybe (Value Text)
shareProcessNamespace :: Maybe (Value Bool)
volumes :: Maybe [EksVolumeProperty]
haddock_workaround_ :: ()
containers :: Maybe [EksContainerProperty]
hostNetwork :: Maybe (Value Bool)
imagePullSecrets :: Maybe [ImagePullSecretProperty]
initContainers :: Maybe [EksContainerProperty]
metadata :: Maybe EksMetadataProperty
serviceAccountName :: Maybe (Value Text)
shareProcessNamespace :: Maybe (Value Bool)
volumes :: Maybe [EksVolumeProperty]
..}
instance Property "HostNetwork" EksPodPropertiesProperty where
type PropertyType "HostNetwork" EksPodPropertiesProperty = Value Prelude.Bool
set :: PropertyType "HostNetwork" EksPodPropertiesProperty
-> EksPodPropertiesProperty -> EksPodPropertiesProperty
set PropertyType "HostNetwork" EksPodPropertiesProperty
newValue EksPodPropertiesProperty {Maybe [EksContainerProperty]
Maybe [EksVolumeProperty]
Maybe [ImagePullSecretProperty]
Maybe (Value Bool)
Maybe (Value Text)
Maybe EksMetadataProperty
()
haddock_workaround_ :: EksPodPropertiesProperty -> ()
containers :: EksPodPropertiesProperty -> Maybe [EksContainerProperty]
dnsPolicy :: EksPodPropertiesProperty -> Maybe (Value Text)
hostNetwork :: EksPodPropertiesProperty -> Maybe (Value Bool)
imagePullSecrets :: EksPodPropertiesProperty -> Maybe [ImagePullSecretProperty]
initContainers :: EksPodPropertiesProperty -> Maybe [EksContainerProperty]
metadata :: EksPodPropertiesProperty -> Maybe EksMetadataProperty
serviceAccountName :: EksPodPropertiesProperty -> Maybe (Value Text)
shareProcessNamespace :: EksPodPropertiesProperty -> Maybe (Value Bool)
volumes :: EksPodPropertiesProperty -> Maybe [EksVolumeProperty]
haddock_workaround_ :: ()
containers :: Maybe [EksContainerProperty]
dnsPolicy :: Maybe (Value Text)
hostNetwork :: Maybe (Value Bool)
imagePullSecrets :: Maybe [ImagePullSecretProperty]
initContainers :: Maybe [EksContainerProperty]
metadata :: Maybe EksMetadataProperty
serviceAccountName :: Maybe (Value Text)
shareProcessNamespace :: Maybe (Value Bool)
volumes :: Maybe [EksVolumeProperty]
..}
= EksPodPropertiesProperty
{hostNetwork :: Maybe (Value Bool)
hostNetwork = Value Bool -> Maybe (Value Bool)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "HostNetwork" EksPodPropertiesProperty
Value Bool
newValue, Maybe [EksContainerProperty]
Maybe [EksVolumeProperty]
Maybe [ImagePullSecretProperty]
Maybe (Value Bool)
Maybe (Value Text)
Maybe EksMetadataProperty
()
haddock_workaround_ :: ()
containers :: Maybe [EksContainerProperty]
dnsPolicy :: Maybe (Value Text)
imagePullSecrets :: Maybe [ImagePullSecretProperty]
initContainers :: Maybe [EksContainerProperty]
metadata :: Maybe EksMetadataProperty
serviceAccountName :: Maybe (Value Text)
shareProcessNamespace :: Maybe (Value Bool)
volumes :: Maybe [EksVolumeProperty]
haddock_workaround_ :: ()
containers :: Maybe [EksContainerProperty]
dnsPolicy :: Maybe (Value Text)
imagePullSecrets :: Maybe [ImagePullSecretProperty]
initContainers :: Maybe [EksContainerProperty]
metadata :: Maybe EksMetadataProperty
serviceAccountName :: Maybe (Value Text)
shareProcessNamespace :: Maybe (Value Bool)
volumes :: Maybe [EksVolumeProperty]
..}
instance Property "ImagePullSecrets" EksPodPropertiesProperty where
type PropertyType "ImagePullSecrets" EksPodPropertiesProperty = [ImagePullSecretProperty]
set :: PropertyType "ImagePullSecrets" EksPodPropertiesProperty
-> EksPodPropertiesProperty -> EksPodPropertiesProperty
set PropertyType "ImagePullSecrets" EksPodPropertiesProperty
newValue EksPodPropertiesProperty {Maybe [EksContainerProperty]
Maybe [EksVolumeProperty]
Maybe [ImagePullSecretProperty]
Maybe (Value Bool)
Maybe (Value Text)
Maybe EksMetadataProperty
()
haddock_workaround_ :: EksPodPropertiesProperty -> ()
containers :: EksPodPropertiesProperty -> Maybe [EksContainerProperty]
dnsPolicy :: EksPodPropertiesProperty -> Maybe (Value Text)
hostNetwork :: EksPodPropertiesProperty -> Maybe (Value Bool)
imagePullSecrets :: EksPodPropertiesProperty -> Maybe [ImagePullSecretProperty]
initContainers :: EksPodPropertiesProperty -> Maybe [EksContainerProperty]
metadata :: EksPodPropertiesProperty -> Maybe EksMetadataProperty
serviceAccountName :: EksPodPropertiesProperty -> Maybe (Value Text)
shareProcessNamespace :: EksPodPropertiesProperty -> Maybe (Value Bool)
volumes :: EksPodPropertiesProperty -> Maybe [EksVolumeProperty]
haddock_workaround_ :: ()
containers :: Maybe [EksContainerProperty]
dnsPolicy :: Maybe (Value Text)
hostNetwork :: Maybe (Value Bool)
imagePullSecrets :: Maybe [ImagePullSecretProperty]
initContainers :: Maybe [EksContainerProperty]
metadata :: Maybe EksMetadataProperty
serviceAccountName :: Maybe (Value Text)
shareProcessNamespace :: Maybe (Value Bool)
volumes :: Maybe [EksVolumeProperty]
..}
= EksPodPropertiesProperty
{imagePullSecrets :: Maybe [ImagePullSecretProperty]
imagePullSecrets = [ImagePullSecretProperty] -> Maybe [ImagePullSecretProperty]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [ImagePullSecretProperty]
PropertyType "ImagePullSecrets" EksPodPropertiesProperty
newValue, Maybe [EksContainerProperty]
Maybe [EksVolumeProperty]
Maybe (Value Bool)
Maybe (Value Text)
Maybe EksMetadataProperty
()
haddock_workaround_ :: ()
containers :: Maybe [EksContainerProperty]
dnsPolicy :: Maybe (Value Text)
hostNetwork :: Maybe (Value Bool)
initContainers :: Maybe [EksContainerProperty]
metadata :: Maybe EksMetadataProperty
serviceAccountName :: Maybe (Value Text)
shareProcessNamespace :: Maybe (Value Bool)
volumes :: Maybe [EksVolumeProperty]
haddock_workaround_ :: ()
containers :: Maybe [EksContainerProperty]
dnsPolicy :: Maybe (Value Text)
hostNetwork :: Maybe (Value Bool)
initContainers :: Maybe [EksContainerProperty]
metadata :: Maybe EksMetadataProperty
serviceAccountName :: Maybe (Value Text)
shareProcessNamespace :: Maybe (Value Bool)
volumes :: Maybe [EksVolumeProperty]
..}
instance Property "InitContainers" EksPodPropertiesProperty where
type PropertyType "InitContainers" EksPodPropertiesProperty = [EksContainerProperty]
set :: PropertyType "InitContainers" EksPodPropertiesProperty
-> EksPodPropertiesProperty -> EksPodPropertiesProperty
set PropertyType "InitContainers" EksPodPropertiesProperty
newValue EksPodPropertiesProperty {Maybe [EksContainerProperty]
Maybe [EksVolumeProperty]
Maybe [ImagePullSecretProperty]
Maybe (Value Bool)
Maybe (Value Text)
Maybe EksMetadataProperty
()
haddock_workaround_ :: EksPodPropertiesProperty -> ()
containers :: EksPodPropertiesProperty -> Maybe [EksContainerProperty]
dnsPolicy :: EksPodPropertiesProperty -> Maybe (Value Text)
hostNetwork :: EksPodPropertiesProperty -> Maybe (Value Bool)
imagePullSecrets :: EksPodPropertiesProperty -> Maybe [ImagePullSecretProperty]
initContainers :: EksPodPropertiesProperty -> Maybe [EksContainerProperty]
metadata :: EksPodPropertiesProperty -> Maybe EksMetadataProperty
serviceAccountName :: EksPodPropertiesProperty -> Maybe (Value Text)
shareProcessNamespace :: EksPodPropertiesProperty -> Maybe (Value Bool)
volumes :: EksPodPropertiesProperty -> Maybe [EksVolumeProperty]
haddock_workaround_ :: ()
containers :: Maybe [EksContainerProperty]
dnsPolicy :: Maybe (Value Text)
hostNetwork :: Maybe (Value Bool)
imagePullSecrets :: Maybe [ImagePullSecretProperty]
initContainers :: Maybe [EksContainerProperty]
metadata :: Maybe EksMetadataProperty
serviceAccountName :: Maybe (Value Text)
shareProcessNamespace :: Maybe (Value Bool)
volumes :: Maybe [EksVolumeProperty]
..}
= EksPodPropertiesProperty
{initContainers :: Maybe [EksContainerProperty]
initContainers = [EksContainerProperty] -> Maybe [EksContainerProperty]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [EksContainerProperty]
PropertyType "InitContainers" EksPodPropertiesProperty
newValue, Maybe [EksContainerProperty]
Maybe [EksVolumeProperty]
Maybe [ImagePullSecretProperty]
Maybe (Value Bool)
Maybe (Value Text)
Maybe EksMetadataProperty
()
haddock_workaround_ :: ()
containers :: Maybe [EksContainerProperty]
dnsPolicy :: Maybe (Value Text)
hostNetwork :: Maybe (Value Bool)
imagePullSecrets :: Maybe [ImagePullSecretProperty]
metadata :: Maybe EksMetadataProperty
serviceAccountName :: Maybe (Value Text)
shareProcessNamespace :: Maybe (Value Bool)
volumes :: Maybe [EksVolumeProperty]
haddock_workaround_ :: ()
containers :: Maybe [EksContainerProperty]
dnsPolicy :: Maybe (Value Text)
hostNetwork :: Maybe (Value Bool)
imagePullSecrets :: Maybe [ImagePullSecretProperty]
metadata :: Maybe EksMetadataProperty
serviceAccountName :: Maybe (Value Text)
shareProcessNamespace :: Maybe (Value Bool)
volumes :: Maybe [EksVolumeProperty]
..}
instance Property "Metadata" EksPodPropertiesProperty where
type PropertyType "Metadata" EksPodPropertiesProperty = EksMetadataProperty
set :: PropertyType "Metadata" EksPodPropertiesProperty
-> EksPodPropertiesProperty -> EksPodPropertiesProperty
set PropertyType "Metadata" EksPodPropertiesProperty
newValue EksPodPropertiesProperty {Maybe [EksContainerProperty]
Maybe [EksVolumeProperty]
Maybe [ImagePullSecretProperty]
Maybe (Value Bool)
Maybe (Value Text)
Maybe EksMetadataProperty
()
haddock_workaround_ :: EksPodPropertiesProperty -> ()
containers :: EksPodPropertiesProperty -> Maybe [EksContainerProperty]
dnsPolicy :: EksPodPropertiesProperty -> Maybe (Value Text)
hostNetwork :: EksPodPropertiesProperty -> Maybe (Value Bool)
imagePullSecrets :: EksPodPropertiesProperty -> Maybe [ImagePullSecretProperty]
initContainers :: EksPodPropertiesProperty -> Maybe [EksContainerProperty]
metadata :: EksPodPropertiesProperty -> Maybe EksMetadataProperty
serviceAccountName :: EksPodPropertiesProperty -> Maybe (Value Text)
shareProcessNamespace :: EksPodPropertiesProperty -> Maybe (Value Bool)
volumes :: EksPodPropertiesProperty -> Maybe [EksVolumeProperty]
haddock_workaround_ :: ()
containers :: Maybe [EksContainerProperty]
dnsPolicy :: Maybe (Value Text)
hostNetwork :: Maybe (Value Bool)
imagePullSecrets :: Maybe [ImagePullSecretProperty]
initContainers :: Maybe [EksContainerProperty]
metadata :: Maybe EksMetadataProperty
serviceAccountName :: Maybe (Value Text)
shareProcessNamespace :: Maybe (Value Bool)
volumes :: Maybe [EksVolumeProperty]
..}
= EksPodPropertiesProperty {metadata :: Maybe EksMetadataProperty
metadata = EksMetadataProperty -> Maybe EksMetadataProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Metadata" EksPodPropertiesProperty
EksMetadataProperty
newValue, Maybe [EksContainerProperty]
Maybe [EksVolumeProperty]
Maybe [ImagePullSecretProperty]
Maybe (Value Bool)
Maybe (Value Text)
()
haddock_workaround_ :: ()
containers :: Maybe [EksContainerProperty]
dnsPolicy :: Maybe (Value Text)
hostNetwork :: Maybe (Value Bool)
imagePullSecrets :: Maybe [ImagePullSecretProperty]
initContainers :: Maybe [EksContainerProperty]
serviceAccountName :: Maybe (Value Text)
shareProcessNamespace :: Maybe (Value Bool)
volumes :: Maybe [EksVolumeProperty]
haddock_workaround_ :: ()
containers :: Maybe [EksContainerProperty]
dnsPolicy :: Maybe (Value Text)
hostNetwork :: Maybe (Value Bool)
imagePullSecrets :: Maybe [ImagePullSecretProperty]
initContainers :: Maybe [EksContainerProperty]
serviceAccountName :: Maybe (Value Text)
shareProcessNamespace :: Maybe (Value Bool)
volumes :: Maybe [EksVolumeProperty]
..}
instance Property "ServiceAccountName" EksPodPropertiesProperty where
type PropertyType "ServiceAccountName" EksPodPropertiesProperty = Value Prelude.Text
set :: PropertyType "ServiceAccountName" EksPodPropertiesProperty
-> EksPodPropertiesProperty -> EksPodPropertiesProperty
set PropertyType "ServiceAccountName" EksPodPropertiesProperty
newValue EksPodPropertiesProperty {Maybe [EksContainerProperty]
Maybe [EksVolumeProperty]
Maybe [ImagePullSecretProperty]
Maybe (Value Bool)
Maybe (Value Text)
Maybe EksMetadataProperty
()
haddock_workaround_ :: EksPodPropertiesProperty -> ()
containers :: EksPodPropertiesProperty -> Maybe [EksContainerProperty]
dnsPolicy :: EksPodPropertiesProperty -> Maybe (Value Text)
hostNetwork :: EksPodPropertiesProperty -> Maybe (Value Bool)
imagePullSecrets :: EksPodPropertiesProperty -> Maybe [ImagePullSecretProperty]
initContainers :: EksPodPropertiesProperty -> Maybe [EksContainerProperty]
metadata :: EksPodPropertiesProperty -> Maybe EksMetadataProperty
serviceAccountName :: EksPodPropertiesProperty -> Maybe (Value Text)
shareProcessNamespace :: EksPodPropertiesProperty -> Maybe (Value Bool)
volumes :: EksPodPropertiesProperty -> Maybe [EksVolumeProperty]
haddock_workaround_ :: ()
containers :: Maybe [EksContainerProperty]
dnsPolicy :: Maybe (Value Text)
hostNetwork :: Maybe (Value Bool)
imagePullSecrets :: Maybe [ImagePullSecretProperty]
initContainers :: Maybe [EksContainerProperty]
metadata :: Maybe EksMetadataProperty
serviceAccountName :: Maybe (Value Text)
shareProcessNamespace :: Maybe (Value Bool)
volumes :: Maybe [EksVolumeProperty]
..}
= EksPodPropertiesProperty
{serviceAccountName :: Maybe (Value Text)
serviceAccountName = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ServiceAccountName" EksPodPropertiesProperty
Value Text
newValue, Maybe [EksContainerProperty]
Maybe [EksVolumeProperty]
Maybe [ImagePullSecretProperty]
Maybe (Value Bool)
Maybe (Value Text)
Maybe EksMetadataProperty
()
haddock_workaround_ :: ()
containers :: Maybe [EksContainerProperty]
dnsPolicy :: Maybe (Value Text)
hostNetwork :: Maybe (Value Bool)
imagePullSecrets :: Maybe [ImagePullSecretProperty]
initContainers :: Maybe [EksContainerProperty]
metadata :: Maybe EksMetadataProperty
shareProcessNamespace :: Maybe (Value Bool)
volumes :: Maybe [EksVolumeProperty]
haddock_workaround_ :: ()
containers :: Maybe [EksContainerProperty]
dnsPolicy :: Maybe (Value Text)
hostNetwork :: Maybe (Value Bool)
imagePullSecrets :: Maybe [ImagePullSecretProperty]
initContainers :: Maybe [EksContainerProperty]
metadata :: Maybe EksMetadataProperty
shareProcessNamespace :: Maybe (Value Bool)
volumes :: Maybe [EksVolumeProperty]
..}
instance Property "ShareProcessNamespace" EksPodPropertiesProperty where
type PropertyType "ShareProcessNamespace" EksPodPropertiesProperty = Value Prelude.Bool
set :: PropertyType "ShareProcessNamespace" EksPodPropertiesProperty
-> EksPodPropertiesProperty -> EksPodPropertiesProperty
set PropertyType "ShareProcessNamespace" EksPodPropertiesProperty
newValue EksPodPropertiesProperty {Maybe [EksContainerProperty]
Maybe [EksVolumeProperty]
Maybe [ImagePullSecretProperty]
Maybe (Value Bool)
Maybe (Value Text)
Maybe EksMetadataProperty
()
haddock_workaround_ :: EksPodPropertiesProperty -> ()
containers :: EksPodPropertiesProperty -> Maybe [EksContainerProperty]
dnsPolicy :: EksPodPropertiesProperty -> Maybe (Value Text)
hostNetwork :: EksPodPropertiesProperty -> Maybe (Value Bool)
imagePullSecrets :: EksPodPropertiesProperty -> Maybe [ImagePullSecretProperty]
initContainers :: EksPodPropertiesProperty -> Maybe [EksContainerProperty]
metadata :: EksPodPropertiesProperty -> Maybe EksMetadataProperty
serviceAccountName :: EksPodPropertiesProperty -> Maybe (Value Text)
shareProcessNamespace :: EksPodPropertiesProperty -> Maybe (Value Bool)
volumes :: EksPodPropertiesProperty -> Maybe [EksVolumeProperty]
haddock_workaround_ :: ()
containers :: Maybe [EksContainerProperty]
dnsPolicy :: Maybe (Value Text)
hostNetwork :: Maybe (Value Bool)
imagePullSecrets :: Maybe [ImagePullSecretProperty]
initContainers :: Maybe [EksContainerProperty]
metadata :: Maybe EksMetadataProperty
serviceAccountName :: Maybe (Value Text)
shareProcessNamespace :: Maybe (Value Bool)
volumes :: Maybe [EksVolumeProperty]
..}
= EksPodPropertiesProperty
{shareProcessNamespace :: Maybe (Value Bool)
shareProcessNamespace = Value Bool -> Maybe (Value Bool)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ShareProcessNamespace" EksPodPropertiesProperty
Value Bool
newValue, Maybe [EksContainerProperty]
Maybe [EksVolumeProperty]
Maybe [ImagePullSecretProperty]
Maybe (Value Bool)
Maybe (Value Text)
Maybe EksMetadataProperty
()
haddock_workaround_ :: ()
containers :: Maybe [EksContainerProperty]
dnsPolicy :: Maybe (Value Text)
hostNetwork :: Maybe (Value Bool)
imagePullSecrets :: Maybe [ImagePullSecretProperty]
initContainers :: Maybe [EksContainerProperty]
metadata :: Maybe EksMetadataProperty
serviceAccountName :: Maybe (Value Text)
volumes :: Maybe [EksVolumeProperty]
haddock_workaround_ :: ()
containers :: Maybe [EksContainerProperty]
dnsPolicy :: Maybe (Value Text)
hostNetwork :: Maybe (Value Bool)
imagePullSecrets :: Maybe [ImagePullSecretProperty]
initContainers :: Maybe [EksContainerProperty]
metadata :: Maybe EksMetadataProperty
serviceAccountName :: Maybe (Value Text)
volumes :: Maybe [EksVolumeProperty]
..}
instance Property "Volumes" EksPodPropertiesProperty where
type PropertyType "Volumes" EksPodPropertiesProperty = [EksVolumeProperty]
set :: PropertyType "Volumes" EksPodPropertiesProperty
-> EksPodPropertiesProperty -> EksPodPropertiesProperty
set PropertyType "Volumes" EksPodPropertiesProperty
newValue EksPodPropertiesProperty {Maybe [EksContainerProperty]
Maybe [EksVolumeProperty]
Maybe [ImagePullSecretProperty]
Maybe (Value Bool)
Maybe (Value Text)
Maybe EksMetadataProperty
()
haddock_workaround_ :: EksPodPropertiesProperty -> ()
containers :: EksPodPropertiesProperty -> Maybe [EksContainerProperty]
dnsPolicy :: EksPodPropertiesProperty -> Maybe (Value Text)
hostNetwork :: EksPodPropertiesProperty -> Maybe (Value Bool)
imagePullSecrets :: EksPodPropertiesProperty -> Maybe [ImagePullSecretProperty]
initContainers :: EksPodPropertiesProperty -> Maybe [EksContainerProperty]
metadata :: EksPodPropertiesProperty -> Maybe EksMetadataProperty
serviceAccountName :: EksPodPropertiesProperty -> Maybe (Value Text)
shareProcessNamespace :: EksPodPropertiesProperty -> Maybe (Value Bool)
volumes :: EksPodPropertiesProperty -> Maybe [EksVolumeProperty]
haddock_workaround_ :: ()
containers :: Maybe [EksContainerProperty]
dnsPolicy :: Maybe (Value Text)
hostNetwork :: Maybe (Value Bool)
imagePullSecrets :: Maybe [ImagePullSecretProperty]
initContainers :: Maybe [EksContainerProperty]
metadata :: Maybe EksMetadataProperty
serviceAccountName :: Maybe (Value Text)
shareProcessNamespace :: Maybe (Value Bool)
volumes :: Maybe [EksVolumeProperty]
..}
= EksPodPropertiesProperty {volumes :: Maybe [EksVolumeProperty]
volumes = [EksVolumeProperty] -> Maybe [EksVolumeProperty]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [EksVolumeProperty]
PropertyType "Volumes" EksPodPropertiesProperty
newValue, Maybe [EksContainerProperty]
Maybe [ImagePullSecretProperty]
Maybe (Value Bool)
Maybe (Value Text)
Maybe EksMetadataProperty
()
haddock_workaround_ :: ()
containers :: Maybe [EksContainerProperty]
dnsPolicy :: Maybe (Value Text)
hostNetwork :: Maybe (Value Bool)
imagePullSecrets :: Maybe [ImagePullSecretProperty]
initContainers :: Maybe [EksContainerProperty]
metadata :: Maybe EksMetadataProperty
serviceAccountName :: Maybe (Value Text)
shareProcessNamespace :: Maybe (Value Bool)
haddock_workaround_ :: ()
containers :: Maybe [EksContainerProperty]
dnsPolicy :: Maybe (Value Text)
hostNetwork :: Maybe (Value Bool)
imagePullSecrets :: Maybe [ImagePullSecretProperty]
initContainers :: Maybe [EksContainerProperty]
metadata :: Maybe EksMetadataProperty
serviceAccountName :: Maybe (Value Text)
shareProcessNamespace :: Maybe (Value Bool)
..}