module Stratosphere.IoTWireless.TaskDefinition (
module Exports, TaskDefinition(..), mkTaskDefinition
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.IoTWireless.TaskDefinition.LoRaWANUpdateGatewayTaskEntryProperty as Exports
import {-# SOURCE #-} Stratosphere.IoTWireless.TaskDefinition.UpdateWirelessGatewayTaskCreateProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Tag
import Stratosphere.Value
data TaskDefinition
=
TaskDefinition {TaskDefinition -> ()
haddock_workaround_ :: (),
TaskDefinition -> Value Bool
autoCreateTasks :: (Value Prelude.Bool),
TaskDefinition -> Maybe LoRaWANUpdateGatewayTaskEntryProperty
loRaWANUpdateGatewayTaskEntry :: (Prelude.Maybe LoRaWANUpdateGatewayTaskEntryProperty),
TaskDefinition -> Maybe (Value Text)
name :: (Prelude.Maybe (Value Prelude.Text)),
TaskDefinition -> Maybe [Tag]
tags :: (Prelude.Maybe [Tag]),
TaskDefinition -> Maybe (Value Text)
taskDefinitionType :: (Prelude.Maybe (Value Prelude.Text)),
TaskDefinition -> Maybe UpdateWirelessGatewayTaskCreateProperty
update :: (Prelude.Maybe UpdateWirelessGatewayTaskCreateProperty)}
deriving stock (TaskDefinition -> TaskDefinition -> Bool
(TaskDefinition -> TaskDefinition -> Bool)
-> (TaskDefinition -> TaskDefinition -> Bool) -> Eq TaskDefinition
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: TaskDefinition -> TaskDefinition -> Bool
== :: TaskDefinition -> TaskDefinition -> Bool
$c/= :: TaskDefinition -> TaskDefinition -> Bool
/= :: TaskDefinition -> TaskDefinition -> Bool
Prelude.Eq, Int -> TaskDefinition -> ShowS
[TaskDefinition] -> ShowS
TaskDefinition -> String
(Int -> TaskDefinition -> ShowS)
-> (TaskDefinition -> String)
-> ([TaskDefinition] -> ShowS)
-> Show TaskDefinition
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> TaskDefinition -> ShowS
showsPrec :: Int -> TaskDefinition -> ShowS
$cshow :: TaskDefinition -> String
show :: TaskDefinition -> String
$cshowList :: [TaskDefinition] -> ShowS
showList :: [TaskDefinition] -> ShowS
Prelude.Show)
mkTaskDefinition :: Value Prelude.Bool -> TaskDefinition
mkTaskDefinition :: Value Bool -> TaskDefinition
mkTaskDefinition Value Bool
autoCreateTasks
= TaskDefinition
{haddock_workaround_ :: ()
haddock_workaround_ = (), autoCreateTasks :: Value Bool
autoCreateTasks = Value Bool
autoCreateTasks,
loRaWANUpdateGatewayTaskEntry :: Maybe LoRaWANUpdateGatewayTaskEntryProperty
loRaWANUpdateGatewayTaskEntry = Maybe LoRaWANUpdateGatewayTaskEntryProperty
forall a. Maybe a
Prelude.Nothing,
name :: Maybe (Value Text)
name = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, tags :: Maybe [Tag]
tags = Maybe [Tag]
forall a. Maybe a
Prelude.Nothing,
taskDefinitionType :: Maybe (Value Text)
taskDefinitionType = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, update :: Maybe UpdateWirelessGatewayTaskCreateProperty
update = Maybe UpdateWirelessGatewayTaskCreateProperty
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties TaskDefinition where
toResourceProperties :: TaskDefinition -> ResourceProperties
toResourceProperties TaskDefinition {Maybe [Tag]
Maybe (Value Text)
Maybe LoRaWANUpdateGatewayTaskEntryProperty
Maybe UpdateWirelessGatewayTaskCreateProperty
()
Value Bool
haddock_workaround_ :: TaskDefinition -> ()
autoCreateTasks :: TaskDefinition -> Value Bool
loRaWANUpdateGatewayTaskEntry :: TaskDefinition -> Maybe LoRaWANUpdateGatewayTaskEntryProperty
name :: TaskDefinition -> Maybe (Value Text)
tags :: TaskDefinition -> Maybe [Tag]
taskDefinitionType :: TaskDefinition -> Maybe (Value Text)
update :: TaskDefinition -> Maybe UpdateWirelessGatewayTaskCreateProperty
haddock_workaround_ :: ()
autoCreateTasks :: Value Bool
loRaWANUpdateGatewayTaskEntry :: Maybe LoRaWANUpdateGatewayTaskEntryProperty
name :: Maybe (Value Text)
tags :: Maybe [Tag]
taskDefinitionType :: Maybe (Value Text)
update :: Maybe UpdateWirelessGatewayTaskCreateProperty
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::IoTWireless::TaskDefinition",
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
"AutoCreateTasks" 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..= Value Bool
autoCreateTasks]
([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
[Key -> LoRaWANUpdateGatewayTaskEntryProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"LoRaWANUpdateGatewayTaskEntry"
(LoRaWANUpdateGatewayTaskEntryProperty -> (Key, Value))
-> Maybe LoRaWANUpdateGatewayTaskEntryProperty
-> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe LoRaWANUpdateGatewayTaskEntryProperty
loRaWANUpdateGatewayTaskEntry,
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
"Name" (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)
name,
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 -> 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
"TaskDefinitionType" (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)
taskDefinitionType,
Key -> UpdateWirelessGatewayTaskCreateProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Update" (UpdateWirelessGatewayTaskCreateProperty -> (Key, Value))
-> Maybe UpdateWirelessGatewayTaskCreateProperty
-> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe UpdateWirelessGatewayTaskCreateProperty
update]))}
instance JSON.ToJSON TaskDefinition where
toJSON :: TaskDefinition -> Value
toJSON TaskDefinition {Maybe [Tag]
Maybe (Value Text)
Maybe LoRaWANUpdateGatewayTaskEntryProperty
Maybe UpdateWirelessGatewayTaskCreateProperty
()
Value Bool
haddock_workaround_ :: TaskDefinition -> ()
autoCreateTasks :: TaskDefinition -> Value Bool
loRaWANUpdateGatewayTaskEntry :: TaskDefinition -> Maybe LoRaWANUpdateGatewayTaskEntryProperty
name :: TaskDefinition -> Maybe (Value Text)
tags :: TaskDefinition -> Maybe [Tag]
taskDefinitionType :: TaskDefinition -> Maybe (Value Text)
update :: TaskDefinition -> Maybe UpdateWirelessGatewayTaskCreateProperty
haddock_workaround_ :: ()
autoCreateTasks :: Value Bool
loRaWANUpdateGatewayTaskEntry :: Maybe LoRaWANUpdateGatewayTaskEntryProperty
name :: Maybe (Value Text)
tags :: Maybe [Tag]
taskDefinitionType :: Maybe (Value Text)
update :: Maybe UpdateWirelessGatewayTaskCreateProperty
..}
= [(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
"AutoCreateTasks" 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..= Value Bool
autoCreateTasks]
([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
[Key -> LoRaWANUpdateGatewayTaskEntryProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"LoRaWANUpdateGatewayTaskEntry"
(LoRaWANUpdateGatewayTaskEntryProperty -> (Key, Value))
-> Maybe LoRaWANUpdateGatewayTaskEntryProperty
-> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe LoRaWANUpdateGatewayTaskEntryProperty
loRaWANUpdateGatewayTaskEntry,
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
"Name" (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)
name,
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 -> 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
"TaskDefinitionType" (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)
taskDefinitionType,
Key -> UpdateWirelessGatewayTaskCreateProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Update" (UpdateWirelessGatewayTaskCreateProperty -> (Key, Value))
-> Maybe UpdateWirelessGatewayTaskCreateProperty
-> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe UpdateWirelessGatewayTaskCreateProperty
update])))
instance Property "AutoCreateTasks" TaskDefinition where
type PropertyType "AutoCreateTasks" TaskDefinition = Value Prelude.Bool
set :: PropertyType "AutoCreateTasks" TaskDefinition
-> TaskDefinition -> TaskDefinition
set PropertyType "AutoCreateTasks" TaskDefinition
newValue TaskDefinition {Maybe [Tag]
Maybe (Value Text)
Maybe LoRaWANUpdateGatewayTaskEntryProperty
Maybe UpdateWirelessGatewayTaskCreateProperty
()
Value Bool
haddock_workaround_ :: TaskDefinition -> ()
autoCreateTasks :: TaskDefinition -> Value Bool
loRaWANUpdateGatewayTaskEntry :: TaskDefinition -> Maybe LoRaWANUpdateGatewayTaskEntryProperty
name :: TaskDefinition -> Maybe (Value Text)
tags :: TaskDefinition -> Maybe [Tag]
taskDefinitionType :: TaskDefinition -> Maybe (Value Text)
update :: TaskDefinition -> Maybe UpdateWirelessGatewayTaskCreateProperty
haddock_workaround_ :: ()
autoCreateTasks :: Value Bool
loRaWANUpdateGatewayTaskEntry :: Maybe LoRaWANUpdateGatewayTaskEntryProperty
name :: Maybe (Value Text)
tags :: Maybe [Tag]
taskDefinitionType :: Maybe (Value Text)
update :: Maybe UpdateWirelessGatewayTaskCreateProperty
..}
= TaskDefinition {autoCreateTasks :: Value Bool
autoCreateTasks = PropertyType "AutoCreateTasks" TaskDefinition
Value Bool
newValue, Maybe [Tag]
Maybe (Value Text)
Maybe LoRaWANUpdateGatewayTaskEntryProperty
Maybe UpdateWirelessGatewayTaskCreateProperty
()
haddock_workaround_ :: ()
loRaWANUpdateGatewayTaskEntry :: Maybe LoRaWANUpdateGatewayTaskEntryProperty
name :: Maybe (Value Text)
tags :: Maybe [Tag]
taskDefinitionType :: Maybe (Value Text)
update :: Maybe UpdateWirelessGatewayTaskCreateProperty
haddock_workaround_ :: ()
loRaWANUpdateGatewayTaskEntry :: Maybe LoRaWANUpdateGatewayTaskEntryProperty
name :: Maybe (Value Text)
tags :: Maybe [Tag]
taskDefinitionType :: Maybe (Value Text)
update :: Maybe UpdateWirelessGatewayTaskCreateProperty
..}
instance Property "LoRaWANUpdateGatewayTaskEntry" TaskDefinition where
type PropertyType "LoRaWANUpdateGatewayTaskEntry" TaskDefinition = LoRaWANUpdateGatewayTaskEntryProperty
set :: PropertyType "LoRaWANUpdateGatewayTaskEntry" TaskDefinition
-> TaskDefinition -> TaskDefinition
set PropertyType "LoRaWANUpdateGatewayTaskEntry" TaskDefinition
newValue TaskDefinition {Maybe [Tag]
Maybe (Value Text)
Maybe LoRaWANUpdateGatewayTaskEntryProperty
Maybe UpdateWirelessGatewayTaskCreateProperty
()
Value Bool
haddock_workaround_ :: TaskDefinition -> ()
autoCreateTasks :: TaskDefinition -> Value Bool
loRaWANUpdateGatewayTaskEntry :: TaskDefinition -> Maybe LoRaWANUpdateGatewayTaskEntryProperty
name :: TaskDefinition -> Maybe (Value Text)
tags :: TaskDefinition -> Maybe [Tag]
taskDefinitionType :: TaskDefinition -> Maybe (Value Text)
update :: TaskDefinition -> Maybe UpdateWirelessGatewayTaskCreateProperty
haddock_workaround_ :: ()
autoCreateTasks :: Value Bool
loRaWANUpdateGatewayTaskEntry :: Maybe LoRaWANUpdateGatewayTaskEntryProperty
name :: Maybe (Value Text)
tags :: Maybe [Tag]
taskDefinitionType :: Maybe (Value Text)
update :: Maybe UpdateWirelessGatewayTaskCreateProperty
..}
= TaskDefinition
{loRaWANUpdateGatewayTaskEntry :: Maybe LoRaWANUpdateGatewayTaskEntryProperty
loRaWANUpdateGatewayTaskEntry = LoRaWANUpdateGatewayTaskEntryProperty
-> Maybe LoRaWANUpdateGatewayTaskEntryProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "LoRaWANUpdateGatewayTaskEntry" TaskDefinition
LoRaWANUpdateGatewayTaskEntryProperty
newValue, Maybe [Tag]
Maybe (Value Text)
Maybe UpdateWirelessGatewayTaskCreateProperty
()
Value Bool
haddock_workaround_ :: ()
autoCreateTasks :: Value Bool
name :: Maybe (Value Text)
tags :: Maybe [Tag]
taskDefinitionType :: Maybe (Value Text)
update :: Maybe UpdateWirelessGatewayTaskCreateProperty
haddock_workaround_ :: ()
autoCreateTasks :: Value Bool
name :: Maybe (Value Text)
tags :: Maybe [Tag]
taskDefinitionType :: Maybe (Value Text)
update :: Maybe UpdateWirelessGatewayTaskCreateProperty
..}
instance Property "Name" TaskDefinition where
type PropertyType "Name" TaskDefinition = Value Prelude.Text
set :: PropertyType "Name" TaskDefinition
-> TaskDefinition -> TaskDefinition
set PropertyType "Name" TaskDefinition
newValue TaskDefinition {Maybe [Tag]
Maybe (Value Text)
Maybe LoRaWANUpdateGatewayTaskEntryProperty
Maybe UpdateWirelessGatewayTaskCreateProperty
()
Value Bool
haddock_workaround_ :: TaskDefinition -> ()
autoCreateTasks :: TaskDefinition -> Value Bool
loRaWANUpdateGatewayTaskEntry :: TaskDefinition -> Maybe LoRaWANUpdateGatewayTaskEntryProperty
name :: TaskDefinition -> Maybe (Value Text)
tags :: TaskDefinition -> Maybe [Tag]
taskDefinitionType :: TaskDefinition -> Maybe (Value Text)
update :: TaskDefinition -> Maybe UpdateWirelessGatewayTaskCreateProperty
haddock_workaround_ :: ()
autoCreateTasks :: Value Bool
loRaWANUpdateGatewayTaskEntry :: Maybe LoRaWANUpdateGatewayTaskEntryProperty
name :: Maybe (Value Text)
tags :: Maybe [Tag]
taskDefinitionType :: Maybe (Value Text)
update :: Maybe UpdateWirelessGatewayTaskCreateProperty
..}
= TaskDefinition {name :: Maybe (Value Text)
name = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Name" TaskDefinition
Value Text
newValue, Maybe [Tag]
Maybe (Value Text)
Maybe LoRaWANUpdateGatewayTaskEntryProperty
Maybe UpdateWirelessGatewayTaskCreateProperty
()
Value Bool
haddock_workaround_ :: ()
autoCreateTasks :: Value Bool
loRaWANUpdateGatewayTaskEntry :: Maybe LoRaWANUpdateGatewayTaskEntryProperty
tags :: Maybe [Tag]
taskDefinitionType :: Maybe (Value Text)
update :: Maybe UpdateWirelessGatewayTaskCreateProperty
haddock_workaround_ :: ()
autoCreateTasks :: Value Bool
loRaWANUpdateGatewayTaskEntry :: Maybe LoRaWANUpdateGatewayTaskEntryProperty
tags :: Maybe [Tag]
taskDefinitionType :: Maybe (Value Text)
update :: Maybe UpdateWirelessGatewayTaskCreateProperty
..}
instance Property "Tags" TaskDefinition where
type PropertyType "Tags" TaskDefinition = [Tag]
set :: PropertyType "Tags" TaskDefinition
-> TaskDefinition -> TaskDefinition
set PropertyType "Tags" TaskDefinition
newValue TaskDefinition {Maybe [Tag]
Maybe (Value Text)
Maybe LoRaWANUpdateGatewayTaskEntryProperty
Maybe UpdateWirelessGatewayTaskCreateProperty
()
Value Bool
haddock_workaround_ :: TaskDefinition -> ()
autoCreateTasks :: TaskDefinition -> Value Bool
loRaWANUpdateGatewayTaskEntry :: TaskDefinition -> Maybe LoRaWANUpdateGatewayTaskEntryProperty
name :: TaskDefinition -> Maybe (Value Text)
tags :: TaskDefinition -> Maybe [Tag]
taskDefinitionType :: TaskDefinition -> Maybe (Value Text)
update :: TaskDefinition -> Maybe UpdateWirelessGatewayTaskCreateProperty
haddock_workaround_ :: ()
autoCreateTasks :: Value Bool
loRaWANUpdateGatewayTaskEntry :: Maybe LoRaWANUpdateGatewayTaskEntryProperty
name :: Maybe (Value Text)
tags :: Maybe [Tag]
taskDefinitionType :: Maybe (Value Text)
update :: Maybe UpdateWirelessGatewayTaskCreateProperty
..}
= TaskDefinition {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" TaskDefinition
newValue, Maybe (Value Text)
Maybe LoRaWANUpdateGatewayTaskEntryProperty
Maybe UpdateWirelessGatewayTaskCreateProperty
()
Value Bool
haddock_workaround_ :: ()
autoCreateTasks :: Value Bool
loRaWANUpdateGatewayTaskEntry :: Maybe LoRaWANUpdateGatewayTaskEntryProperty
name :: Maybe (Value Text)
taskDefinitionType :: Maybe (Value Text)
update :: Maybe UpdateWirelessGatewayTaskCreateProperty
haddock_workaround_ :: ()
autoCreateTasks :: Value Bool
loRaWANUpdateGatewayTaskEntry :: Maybe LoRaWANUpdateGatewayTaskEntryProperty
name :: Maybe (Value Text)
taskDefinitionType :: Maybe (Value Text)
update :: Maybe UpdateWirelessGatewayTaskCreateProperty
..}
instance Property "TaskDefinitionType" TaskDefinition where
type PropertyType "TaskDefinitionType" TaskDefinition = Value Prelude.Text
set :: PropertyType "TaskDefinitionType" TaskDefinition
-> TaskDefinition -> TaskDefinition
set PropertyType "TaskDefinitionType" TaskDefinition
newValue TaskDefinition {Maybe [Tag]
Maybe (Value Text)
Maybe LoRaWANUpdateGatewayTaskEntryProperty
Maybe UpdateWirelessGatewayTaskCreateProperty
()
Value Bool
haddock_workaround_ :: TaskDefinition -> ()
autoCreateTasks :: TaskDefinition -> Value Bool
loRaWANUpdateGatewayTaskEntry :: TaskDefinition -> Maybe LoRaWANUpdateGatewayTaskEntryProperty
name :: TaskDefinition -> Maybe (Value Text)
tags :: TaskDefinition -> Maybe [Tag]
taskDefinitionType :: TaskDefinition -> Maybe (Value Text)
update :: TaskDefinition -> Maybe UpdateWirelessGatewayTaskCreateProperty
haddock_workaround_ :: ()
autoCreateTasks :: Value Bool
loRaWANUpdateGatewayTaskEntry :: Maybe LoRaWANUpdateGatewayTaskEntryProperty
name :: Maybe (Value Text)
tags :: Maybe [Tag]
taskDefinitionType :: Maybe (Value Text)
update :: Maybe UpdateWirelessGatewayTaskCreateProperty
..}
= TaskDefinition {taskDefinitionType :: Maybe (Value Text)
taskDefinitionType = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "TaskDefinitionType" TaskDefinition
Value Text
newValue, Maybe [Tag]
Maybe (Value Text)
Maybe LoRaWANUpdateGatewayTaskEntryProperty
Maybe UpdateWirelessGatewayTaskCreateProperty
()
Value Bool
haddock_workaround_ :: ()
autoCreateTasks :: Value Bool
loRaWANUpdateGatewayTaskEntry :: Maybe LoRaWANUpdateGatewayTaskEntryProperty
name :: Maybe (Value Text)
tags :: Maybe [Tag]
update :: Maybe UpdateWirelessGatewayTaskCreateProperty
haddock_workaround_ :: ()
autoCreateTasks :: Value Bool
loRaWANUpdateGatewayTaskEntry :: Maybe LoRaWANUpdateGatewayTaskEntryProperty
name :: Maybe (Value Text)
tags :: Maybe [Tag]
update :: Maybe UpdateWirelessGatewayTaskCreateProperty
..}
instance Property "Update" TaskDefinition where
type PropertyType "Update" TaskDefinition = UpdateWirelessGatewayTaskCreateProperty
set :: PropertyType "Update" TaskDefinition
-> TaskDefinition -> TaskDefinition
set PropertyType "Update" TaskDefinition
newValue TaskDefinition {Maybe [Tag]
Maybe (Value Text)
Maybe LoRaWANUpdateGatewayTaskEntryProperty
Maybe UpdateWirelessGatewayTaskCreateProperty
()
Value Bool
haddock_workaround_ :: TaskDefinition -> ()
autoCreateTasks :: TaskDefinition -> Value Bool
loRaWANUpdateGatewayTaskEntry :: TaskDefinition -> Maybe LoRaWANUpdateGatewayTaskEntryProperty
name :: TaskDefinition -> Maybe (Value Text)
tags :: TaskDefinition -> Maybe [Tag]
taskDefinitionType :: TaskDefinition -> Maybe (Value Text)
update :: TaskDefinition -> Maybe UpdateWirelessGatewayTaskCreateProperty
haddock_workaround_ :: ()
autoCreateTasks :: Value Bool
loRaWANUpdateGatewayTaskEntry :: Maybe LoRaWANUpdateGatewayTaskEntryProperty
name :: Maybe (Value Text)
tags :: Maybe [Tag]
taskDefinitionType :: Maybe (Value Text)
update :: Maybe UpdateWirelessGatewayTaskCreateProperty
..}
= TaskDefinition {update :: Maybe UpdateWirelessGatewayTaskCreateProperty
update = UpdateWirelessGatewayTaskCreateProperty
-> Maybe UpdateWirelessGatewayTaskCreateProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Update" TaskDefinition
UpdateWirelessGatewayTaskCreateProperty
newValue, Maybe [Tag]
Maybe (Value Text)
Maybe LoRaWANUpdateGatewayTaskEntryProperty
()
Value Bool
haddock_workaround_ :: ()
autoCreateTasks :: Value Bool
loRaWANUpdateGatewayTaskEntry :: Maybe LoRaWANUpdateGatewayTaskEntryProperty
name :: Maybe (Value Text)
tags :: Maybe [Tag]
taskDefinitionType :: Maybe (Value Text)
haddock_workaround_ :: ()
autoCreateTasks :: Value Bool
loRaWANUpdateGatewayTaskEntry :: Maybe LoRaWANUpdateGatewayTaskEntryProperty
name :: Maybe (Value Text)
tags :: Maybe [Tag]
taskDefinitionType :: Maybe (Value Text)
..}