module Stratosphere.AmplifyUIBuilder.Form (
        module Exports, Form(..), mkForm
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.AmplifyUIBuilder.Form.FieldConfigProperty as Exports
import {-# SOURCE #-} Stratosphere.AmplifyUIBuilder.Form.FormCTAProperty as Exports
import {-# SOURCE #-} Stratosphere.AmplifyUIBuilder.Form.FormDataTypeConfigProperty as Exports
import {-# SOURCE #-} Stratosphere.AmplifyUIBuilder.Form.FormStyleProperty as Exports
import {-# SOURCE #-} Stratosphere.AmplifyUIBuilder.Form.SectionalElementProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data Form
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-amplifyuibuilder-form.html>
    Form {Form -> ()
haddock_workaround_ :: (),
          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-amplifyuibuilder-form.html#cfn-amplifyuibuilder-form-appid>
          Form -> Maybe (Value Text)
appId :: (Prelude.Maybe (Value Prelude.Text)),
          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-amplifyuibuilder-form.html#cfn-amplifyuibuilder-form-cta>
          Form -> Maybe FormCTAProperty
cta :: (Prelude.Maybe FormCTAProperty),
          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-amplifyuibuilder-form.html#cfn-amplifyuibuilder-form-datatype>
          Form -> Maybe FormDataTypeConfigProperty
dataType :: (Prelude.Maybe FormDataTypeConfigProperty),
          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-amplifyuibuilder-form.html#cfn-amplifyuibuilder-form-environmentname>
          Form -> Maybe (Value Text)
environmentName :: (Prelude.Maybe (Value Prelude.Text)),
          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-amplifyuibuilder-form.html#cfn-amplifyuibuilder-form-fields>
          Form -> Maybe (Map Text FieldConfigProperty)
fields :: (Prelude.Maybe (Prelude.Map Prelude.Text FieldConfigProperty)),
          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-amplifyuibuilder-form.html#cfn-amplifyuibuilder-form-formactiontype>
          Form -> Maybe (Value Text)
formActionType :: (Prelude.Maybe (Value Prelude.Text)),
          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-amplifyuibuilder-form.html#cfn-amplifyuibuilder-form-labeldecorator>
          Form -> Maybe (Value Text)
labelDecorator :: (Prelude.Maybe (Value Prelude.Text)),
          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-amplifyuibuilder-form.html#cfn-amplifyuibuilder-form-name>
          Form -> Maybe (Value Text)
name :: (Prelude.Maybe (Value Prelude.Text)),
          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-amplifyuibuilder-form.html#cfn-amplifyuibuilder-form-schemaversion>
          Form -> Maybe (Value Text)
schemaVersion :: (Prelude.Maybe (Value Prelude.Text)),
          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-amplifyuibuilder-form.html#cfn-amplifyuibuilder-form-sectionalelements>
          Form -> Maybe (Map Text SectionalElementProperty)
sectionalElements :: (Prelude.Maybe (Prelude.Map Prelude.Text SectionalElementProperty)),
          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-amplifyuibuilder-form.html#cfn-amplifyuibuilder-form-style>
          Form -> Maybe FormStyleProperty
style :: (Prelude.Maybe FormStyleProperty),
          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-amplifyuibuilder-form.html#cfn-amplifyuibuilder-form-tags>
          Form -> Maybe (Map Text (Value Text))
tags :: (Prelude.Maybe (Prelude.Map Prelude.Text (Value Prelude.Text)))}
  deriving stock (Form -> Form -> Bool
(Form -> Form -> Bool) -> (Form -> Form -> Bool) -> Eq Form
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: Form -> Form -> Bool
== :: Form -> Form -> Bool
$c/= :: Form -> Form -> Bool
/= :: Form -> Form -> Bool
Prelude.Eq, Int -> Form -> ShowS
[Form] -> ShowS
Form -> String
(Int -> Form -> ShowS)
-> (Form -> String) -> ([Form] -> ShowS) -> Show Form
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> Form -> ShowS
showsPrec :: Int -> Form -> ShowS
$cshow :: Form -> String
show :: Form -> String
$cshowList :: [Form] -> ShowS
showList :: [Form] -> ShowS
Prelude.Show)
mkForm :: Form
mkForm :: Form
mkForm
  = Form
      {haddock_workaround_ :: ()
haddock_workaround_ = (), appId :: Maybe (Value Text)
appId = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       cta :: Maybe FormCTAProperty
cta = Maybe FormCTAProperty
forall a. Maybe a
Prelude.Nothing, dataType :: Maybe FormDataTypeConfigProperty
dataType = Maybe FormDataTypeConfigProperty
forall a. Maybe a
Prelude.Nothing,
       environmentName :: Maybe (Value Text)
environmentName = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, fields :: Maybe (Map Text FieldConfigProperty)
fields = Maybe (Map Text FieldConfigProperty)
forall a. Maybe a
Prelude.Nothing,
       formActionType :: Maybe (Value Text)
formActionType = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, labelDecorator :: Maybe (Value Text)
labelDecorator = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       name :: Maybe (Value Text)
name = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, schemaVersion :: Maybe (Value Text)
schemaVersion = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       sectionalElements :: Maybe (Map Text SectionalElementProperty)
sectionalElements = Maybe (Map Text SectionalElementProperty)
forall a. Maybe a
Prelude.Nothing, style :: Maybe FormStyleProperty
style = Maybe FormStyleProperty
forall a. Maybe a
Prelude.Nothing,
       tags :: Maybe (Map Text (Value Text))
tags = Maybe (Map Text (Value Text))
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties Form where
  toResourceProperties :: Form -> ResourceProperties
toResourceProperties Form {Maybe (Map Text (Value Text))
Maybe (Map Text SectionalElementProperty)
Maybe (Map Text FieldConfigProperty)
Maybe (Value Text)
Maybe FormCTAProperty
Maybe FormDataTypeConfigProperty
Maybe FormStyleProperty
()
haddock_workaround_ :: Form -> ()
appId :: Form -> Maybe (Value Text)
cta :: Form -> Maybe FormCTAProperty
dataType :: Form -> Maybe FormDataTypeConfigProperty
environmentName :: Form -> Maybe (Value Text)
fields :: Form -> Maybe (Map Text FieldConfigProperty)
formActionType :: Form -> Maybe (Value Text)
labelDecorator :: Form -> Maybe (Value Text)
name :: Form -> Maybe (Value Text)
schemaVersion :: Form -> Maybe (Value Text)
sectionalElements :: Form -> Maybe (Map Text SectionalElementProperty)
style :: Form -> Maybe FormStyleProperty
tags :: Form -> Maybe (Map Text (Value Text))
haddock_workaround_ :: ()
appId :: Maybe (Value Text)
cta :: Maybe FormCTAProperty
dataType :: Maybe FormDataTypeConfigProperty
environmentName :: Maybe (Value Text)
fields :: Maybe (Map Text FieldConfigProperty)
formActionType :: Maybe (Value Text)
labelDecorator :: Maybe (Value Text)
name :: Maybe (Value Text)
schemaVersion :: Maybe (Value Text)
sectionalElements :: Maybe (Map Text SectionalElementProperty)
style :: Maybe FormStyleProperty
tags :: Maybe (Map Text (Value Text))
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::AmplifyUIBuilder::Form",
         supportsTags :: Bool
supportsTags = Bool
Prelude.True,
         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 -> 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
"AppId" (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)
appId,
                            Key -> FormCTAProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Cta" (FormCTAProperty -> (Key, Value))
-> Maybe FormCTAProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe FormCTAProperty
cta,
                            Key -> FormDataTypeConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"DataType" (FormDataTypeConfigProperty -> (Key, Value))
-> Maybe FormDataTypeConfigProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe FormDataTypeConfigProperty
dataType,
                            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
"EnvironmentName" (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)
environmentName,
                            Key -> Map Text FieldConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Fields" (Map Text FieldConfigProperty -> (Key, Value))
-> Maybe (Map Text FieldConfigProperty) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Map Text FieldConfigProperty)
fields,
                            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
"FormActionType" (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)
formActionType,
                            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
"LabelDecorator" (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)
labelDecorator,
                            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 -> 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
"SchemaVersion" (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)
schemaVersion,
                            Key -> Map Text SectionalElementProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"SectionalElements" (Map Text SectionalElementProperty -> (Key, Value))
-> Maybe (Map Text SectionalElementProperty) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Map Text SectionalElementProperty)
sectionalElements,
                            Key -> FormStyleProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Style" (FormStyleProperty -> (Key, Value))
-> Maybe FormStyleProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe FormStyleProperty
style,
                            Key -> Map Text (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
"Tags" (Map Text (Value Text) -> (Key, Value))
-> Maybe (Map Text (Value Text)) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Map Text (Value Text))
tags])}
instance JSON.ToJSON Form where
  toJSON :: Form -> Value
toJSON Form {Maybe (Map Text (Value Text))
Maybe (Map Text SectionalElementProperty)
Maybe (Map Text FieldConfigProperty)
Maybe (Value Text)
Maybe FormCTAProperty
Maybe FormDataTypeConfigProperty
Maybe FormStyleProperty
()
haddock_workaround_ :: Form -> ()
appId :: Form -> Maybe (Value Text)
cta :: Form -> Maybe FormCTAProperty
dataType :: Form -> Maybe FormDataTypeConfigProperty
environmentName :: Form -> Maybe (Value Text)
fields :: Form -> Maybe (Map Text FieldConfigProperty)
formActionType :: Form -> Maybe (Value Text)
labelDecorator :: Form -> Maybe (Value Text)
name :: Form -> Maybe (Value Text)
schemaVersion :: Form -> Maybe (Value Text)
sectionalElements :: Form -> Maybe (Map Text SectionalElementProperty)
style :: Form -> Maybe FormStyleProperty
tags :: Form -> Maybe (Map Text (Value Text))
haddock_workaround_ :: ()
appId :: Maybe (Value Text)
cta :: Maybe FormCTAProperty
dataType :: Maybe FormDataTypeConfigProperty
environmentName :: Maybe (Value Text)
fields :: Maybe (Map Text FieldConfigProperty)
formActionType :: Maybe (Value Text)
labelDecorator :: Maybe (Value Text)
name :: Maybe (Value Text)
schemaVersion :: Maybe (Value Text)
sectionalElements :: Maybe (Map Text SectionalElementProperty)
style :: Maybe FormStyleProperty
tags :: Maybe (Map Text (Value Text))
..}
    = [(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 -> 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
"AppId" (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)
appId,
               Key -> FormCTAProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Cta" (FormCTAProperty -> (Key, Value))
-> Maybe FormCTAProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe FormCTAProperty
cta,
               Key -> FormDataTypeConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"DataType" (FormDataTypeConfigProperty -> (Key, Value))
-> Maybe FormDataTypeConfigProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe FormDataTypeConfigProperty
dataType,
               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
"EnvironmentName" (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)
environmentName,
               Key -> Map Text FieldConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Fields" (Map Text FieldConfigProperty -> (Key, Value))
-> Maybe (Map Text FieldConfigProperty) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Map Text FieldConfigProperty)
fields,
               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
"FormActionType" (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)
formActionType,
               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
"LabelDecorator" (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)
labelDecorator,
               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 -> 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
"SchemaVersion" (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)
schemaVersion,
               Key -> Map Text SectionalElementProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"SectionalElements" (Map Text SectionalElementProperty -> (Key, Value))
-> Maybe (Map Text SectionalElementProperty) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Map Text SectionalElementProperty)
sectionalElements,
               Key -> FormStyleProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Style" (FormStyleProperty -> (Key, Value))
-> Maybe FormStyleProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe FormStyleProperty
style,
               Key -> Map Text (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
"Tags" (Map Text (Value Text) -> (Key, Value))
-> Maybe (Map Text (Value Text)) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Map Text (Value Text))
tags]))
instance Property "AppId" Form where
  type PropertyType "AppId" Form = Value Prelude.Text
  set :: PropertyType "AppId" Form -> Form -> Form
set PropertyType "AppId" Form
newValue Form {Maybe (Map Text (Value Text))
Maybe (Map Text SectionalElementProperty)
Maybe (Map Text FieldConfigProperty)
Maybe (Value Text)
Maybe FormCTAProperty
Maybe FormDataTypeConfigProperty
Maybe FormStyleProperty
()
haddock_workaround_ :: Form -> ()
appId :: Form -> Maybe (Value Text)
cta :: Form -> Maybe FormCTAProperty
dataType :: Form -> Maybe FormDataTypeConfigProperty
environmentName :: Form -> Maybe (Value Text)
fields :: Form -> Maybe (Map Text FieldConfigProperty)
formActionType :: Form -> Maybe (Value Text)
labelDecorator :: Form -> Maybe (Value Text)
name :: Form -> Maybe (Value Text)
schemaVersion :: Form -> Maybe (Value Text)
sectionalElements :: Form -> Maybe (Map Text SectionalElementProperty)
style :: Form -> Maybe FormStyleProperty
tags :: Form -> Maybe (Map Text (Value Text))
haddock_workaround_ :: ()
appId :: Maybe (Value Text)
cta :: Maybe FormCTAProperty
dataType :: Maybe FormDataTypeConfigProperty
environmentName :: Maybe (Value Text)
fields :: Maybe (Map Text FieldConfigProperty)
formActionType :: Maybe (Value Text)
labelDecorator :: Maybe (Value Text)
name :: Maybe (Value Text)
schemaVersion :: Maybe (Value Text)
sectionalElements :: Maybe (Map Text SectionalElementProperty)
style :: Maybe FormStyleProperty
tags :: Maybe (Map Text (Value Text))
..} = Form {appId :: Maybe (Value Text)
appId = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "AppId" Form
Value Text
newValue, Maybe (Map Text (Value Text))
Maybe (Map Text SectionalElementProperty)
Maybe (Map Text FieldConfigProperty)
Maybe (Value Text)
Maybe FormCTAProperty
Maybe FormDataTypeConfigProperty
Maybe FormStyleProperty
()
haddock_workaround_ :: ()
cta :: Maybe FormCTAProperty
dataType :: Maybe FormDataTypeConfigProperty
environmentName :: Maybe (Value Text)
fields :: Maybe (Map Text FieldConfigProperty)
formActionType :: Maybe (Value Text)
labelDecorator :: Maybe (Value Text)
name :: Maybe (Value Text)
schemaVersion :: Maybe (Value Text)
sectionalElements :: Maybe (Map Text SectionalElementProperty)
style :: Maybe FormStyleProperty
tags :: Maybe (Map Text (Value Text))
haddock_workaround_ :: ()
cta :: Maybe FormCTAProperty
dataType :: Maybe FormDataTypeConfigProperty
environmentName :: Maybe (Value Text)
fields :: Maybe (Map Text FieldConfigProperty)
formActionType :: Maybe (Value Text)
labelDecorator :: Maybe (Value Text)
name :: Maybe (Value Text)
schemaVersion :: Maybe (Value Text)
sectionalElements :: Maybe (Map Text SectionalElementProperty)
style :: Maybe FormStyleProperty
tags :: Maybe (Map Text (Value Text))
..}
instance Property "Cta" Form where
  type PropertyType "Cta" Form = FormCTAProperty
  set :: PropertyType "Cta" Form -> Form -> Form
set PropertyType "Cta" Form
newValue Form {Maybe (Map Text (Value Text))
Maybe (Map Text SectionalElementProperty)
Maybe (Map Text FieldConfigProperty)
Maybe (Value Text)
Maybe FormCTAProperty
Maybe FormDataTypeConfigProperty
Maybe FormStyleProperty
()
haddock_workaround_ :: Form -> ()
appId :: Form -> Maybe (Value Text)
cta :: Form -> Maybe FormCTAProperty
dataType :: Form -> Maybe FormDataTypeConfigProperty
environmentName :: Form -> Maybe (Value Text)
fields :: Form -> Maybe (Map Text FieldConfigProperty)
formActionType :: Form -> Maybe (Value Text)
labelDecorator :: Form -> Maybe (Value Text)
name :: Form -> Maybe (Value Text)
schemaVersion :: Form -> Maybe (Value Text)
sectionalElements :: Form -> Maybe (Map Text SectionalElementProperty)
style :: Form -> Maybe FormStyleProperty
tags :: Form -> Maybe (Map Text (Value Text))
haddock_workaround_ :: ()
appId :: Maybe (Value Text)
cta :: Maybe FormCTAProperty
dataType :: Maybe FormDataTypeConfigProperty
environmentName :: Maybe (Value Text)
fields :: Maybe (Map Text FieldConfigProperty)
formActionType :: Maybe (Value Text)
labelDecorator :: Maybe (Value Text)
name :: Maybe (Value Text)
schemaVersion :: Maybe (Value Text)
sectionalElements :: Maybe (Map Text SectionalElementProperty)
style :: Maybe FormStyleProperty
tags :: Maybe (Map Text (Value Text))
..} = Form {cta :: Maybe FormCTAProperty
cta = FormCTAProperty -> Maybe FormCTAProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Cta" Form
FormCTAProperty
newValue, Maybe (Map Text (Value Text))
Maybe (Map Text SectionalElementProperty)
Maybe (Map Text FieldConfigProperty)
Maybe (Value Text)
Maybe FormDataTypeConfigProperty
Maybe FormStyleProperty
()
haddock_workaround_ :: ()
appId :: Maybe (Value Text)
dataType :: Maybe FormDataTypeConfigProperty
environmentName :: Maybe (Value Text)
fields :: Maybe (Map Text FieldConfigProperty)
formActionType :: Maybe (Value Text)
labelDecorator :: Maybe (Value Text)
name :: Maybe (Value Text)
schemaVersion :: Maybe (Value Text)
sectionalElements :: Maybe (Map Text SectionalElementProperty)
style :: Maybe FormStyleProperty
tags :: Maybe (Map Text (Value Text))
haddock_workaround_ :: ()
appId :: Maybe (Value Text)
dataType :: Maybe FormDataTypeConfigProperty
environmentName :: Maybe (Value Text)
fields :: Maybe (Map Text FieldConfigProperty)
formActionType :: Maybe (Value Text)
labelDecorator :: Maybe (Value Text)
name :: Maybe (Value Text)
schemaVersion :: Maybe (Value Text)
sectionalElements :: Maybe (Map Text SectionalElementProperty)
style :: Maybe FormStyleProperty
tags :: Maybe (Map Text (Value Text))
..}
instance Property "DataType" Form where
  type PropertyType "DataType" Form = FormDataTypeConfigProperty
  set :: PropertyType "DataType" Form -> Form -> Form
set PropertyType "DataType" Form
newValue Form {Maybe (Map Text (Value Text))
Maybe (Map Text SectionalElementProperty)
Maybe (Map Text FieldConfigProperty)
Maybe (Value Text)
Maybe FormCTAProperty
Maybe FormDataTypeConfigProperty
Maybe FormStyleProperty
()
haddock_workaround_ :: Form -> ()
appId :: Form -> Maybe (Value Text)
cta :: Form -> Maybe FormCTAProperty
dataType :: Form -> Maybe FormDataTypeConfigProperty
environmentName :: Form -> Maybe (Value Text)
fields :: Form -> Maybe (Map Text FieldConfigProperty)
formActionType :: Form -> Maybe (Value Text)
labelDecorator :: Form -> Maybe (Value Text)
name :: Form -> Maybe (Value Text)
schemaVersion :: Form -> Maybe (Value Text)
sectionalElements :: Form -> Maybe (Map Text SectionalElementProperty)
style :: Form -> Maybe FormStyleProperty
tags :: Form -> Maybe (Map Text (Value Text))
haddock_workaround_ :: ()
appId :: Maybe (Value Text)
cta :: Maybe FormCTAProperty
dataType :: Maybe FormDataTypeConfigProperty
environmentName :: Maybe (Value Text)
fields :: Maybe (Map Text FieldConfigProperty)
formActionType :: Maybe (Value Text)
labelDecorator :: Maybe (Value Text)
name :: Maybe (Value Text)
schemaVersion :: Maybe (Value Text)
sectionalElements :: Maybe (Map Text SectionalElementProperty)
style :: Maybe FormStyleProperty
tags :: Maybe (Map Text (Value Text))
..}
    = Form {dataType :: Maybe FormDataTypeConfigProperty
dataType = FormDataTypeConfigProperty -> Maybe FormDataTypeConfigProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "DataType" Form
FormDataTypeConfigProperty
newValue, Maybe (Map Text (Value Text))
Maybe (Map Text SectionalElementProperty)
Maybe (Map Text FieldConfigProperty)
Maybe (Value Text)
Maybe FormCTAProperty
Maybe FormStyleProperty
()
haddock_workaround_ :: ()
appId :: Maybe (Value Text)
cta :: Maybe FormCTAProperty
environmentName :: Maybe (Value Text)
fields :: Maybe (Map Text FieldConfigProperty)
formActionType :: Maybe (Value Text)
labelDecorator :: Maybe (Value Text)
name :: Maybe (Value Text)
schemaVersion :: Maybe (Value Text)
sectionalElements :: Maybe (Map Text SectionalElementProperty)
style :: Maybe FormStyleProperty
tags :: Maybe (Map Text (Value Text))
haddock_workaround_ :: ()
appId :: Maybe (Value Text)
cta :: Maybe FormCTAProperty
environmentName :: Maybe (Value Text)
fields :: Maybe (Map Text FieldConfigProperty)
formActionType :: Maybe (Value Text)
labelDecorator :: Maybe (Value Text)
name :: Maybe (Value Text)
schemaVersion :: Maybe (Value Text)
sectionalElements :: Maybe (Map Text SectionalElementProperty)
style :: Maybe FormStyleProperty
tags :: Maybe (Map Text (Value Text))
..}
instance Property "EnvironmentName" Form where
  type PropertyType "EnvironmentName" Form = Value Prelude.Text
  set :: PropertyType "EnvironmentName" Form -> Form -> Form
set PropertyType "EnvironmentName" Form
newValue Form {Maybe (Map Text (Value Text))
Maybe (Map Text SectionalElementProperty)
Maybe (Map Text FieldConfigProperty)
Maybe (Value Text)
Maybe FormCTAProperty
Maybe FormDataTypeConfigProperty
Maybe FormStyleProperty
()
haddock_workaround_ :: Form -> ()
appId :: Form -> Maybe (Value Text)
cta :: Form -> Maybe FormCTAProperty
dataType :: Form -> Maybe FormDataTypeConfigProperty
environmentName :: Form -> Maybe (Value Text)
fields :: Form -> Maybe (Map Text FieldConfigProperty)
formActionType :: Form -> Maybe (Value Text)
labelDecorator :: Form -> Maybe (Value Text)
name :: Form -> Maybe (Value Text)
schemaVersion :: Form -> Maybe (Value Text)
sectionalElements :: Form -> Maybe (Map Text SectionalElementProperty)
style :: Form -> Maybe FormStyleProperty
tags :: Form -> Maybe (Map Text (Value Text))
haddock_workaround_ :: ()
appId :: Maybe (Value Text)
cta :: Maybe FormCTAProperty
dataType :: Maybe FormDataTypeConfigProperty
environmentName :: Maybe (Value Text)
fields :: Maybe (Map Text FieldConfigProperty)
formActionType :: Maybe (Value Text)
labelDecorator :: Maybe (Value Text)
name :: Maybe (Value Text)
schemaVersion :: Maybe (Value Text)
sectionalElements :: Maybe (Map Text SectionalElementProperty)
style :: Maybe FormStyleProperty
tags :: Maybe (Map Text (Value Text))
..}
    = Form {environmentName :: Maybe (Value Text)
environmentName = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "EnvironmentName" Form
Value Text
newValue, Maybe (Map Text (Value Text))
Maybe (Map Text SectionalElementProperty)
Maybe (Map Text FieldConfigProperty)
Maybe (Value Text)
Maybe FormCTAProperty
Maybe FormDataTypeConfigProperty
Maybe FormStyleProperty
()
haddock_workaround_ :: ()
appId :: Maybe (Value Text)
cta :: Maybe FormCTAProperty
dataType :: Maybe FormDataTypeConfigProperty
fields :: Maybe (Map Text FieldConfigProperty)
formActionType :: Maybe (Value Text)
labelDecorator :: Maybe (Value Text)
name :: Maybe (Value Text)
schemaVersion :: Maybe (Value Text)
sectionalElements :: Maybe (Map Text SectionalElementProperty)
style :: Maybe FormStyleProperty
tags :: Maybe (Map Text (Value Text))
haddock_workaround_ :: ()
appId :: Maybe (Value Text)
cta :: Maybe FormCTAProperty
dataType :: Maybe FormDataTypeConfigProperty
fields :: Maybe (Map Text FieldConfigProperty)
formActionType :: Maybe (Value Text)
labelDecorator :: Maybe (Value Text)
name :: Maybe (Value Text)
schemaVersion :: Maybe (Value Text)
sectionalElements :: Maybe (Map Text SectionalElementProperty)
style :: Maybe FormStyleProperty
tags :: Maybe (Map Text (Value Text))
..}
instance Property "Fields" Form where
  type PropertyType "Fields" Form = Prelude.Map Prelude.Text FieldConfigProperty
  set :: PropertyType "Fields" Form -> Form -> Form
set PropertyType "Fields" Form
newValue Form {Maybe (Map Text (Value Text))
Maybe (Map Text SectionalElementProperty)
Maybe (Map Text FieldConfigProperty)
Maybe (Value Text)
Maybe FormCTAProperty
Maybe FormDataTypeConfigProperty
Maybe FormStyleProperty
()
haddock_workaround_ :: Form -> ()
appId :: Form -> Maybe (Value Text)
cta :: Form -> Maybe FormCTAProperty
dataType :: Form -> Maybe FormDataTypeConfigProperty
environmentName :: Form -> Maybe (Value Text)
fields :: Form -> Maybe (Map Text FieldConfigProperty)
formActionType :: Form -> Maybe (Value Text)
labelDecorator :: Form -> Maybe (Value Text)
name :: Form -> Maybe (Value Text)
schemaVersion :: Form -> Maybe (Value Text)
sectionalElements :: Form -> Maybe (Map Text SectionalElementProperty)
style :: Form -> Maybe FormStyleProperty
tags :: Form -> Maybe (Map Text (Value Text))
haddock_workaround_ :: ()
appId :: Maybe (Value Text)
cta :: Maybe FormCTAProperty
dataType :: Maybe FormDataTypeConfigProperty
environmentName :: Maybe (Value Text)
fields :: Maybe (Map Text FieldConfigProperty)
formActionType :: Maybe (Value Text)
labelDecorator :: Maybe (Value Text)
name :: Maybe (Value Text)
schemaVersion :: Maybe (Value Text)
sectionalElements :: Maybe (Map Text SectionalElementProperty)
style :: Maybe FormStyleProperty
tags :: Maybe (Map Text (Value Text))
..} = Form {fields :: Maybe (Map Text FieldConfigProperty)
fields = Map Text FieldConfigProperty
-> Maybe (Map Text FieldConfigProperty)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure Map Text FieldConfigProperty
PropertyType "Fields" Form
newValue, Maybe (Map Text (Value Text))
Maybe (Map Text SectionalElementProperty)
Maybe (Value Text)
Maybe FormCTAProperty
Maybe FormDataTypeConfigProperty
Maybe FormStyleProperty
()
haddock_workaround_ :: ()
appId :: Maybe (Value Text)
cta :: Maybe FormCTAProperty
dataType :: Maybe FormDataTypeConfigProperty
environmentName :: Maybe (Value Text)
formActionType :: Maybe (Value Text)
labelDecorator :: Maybe (Value Text)
name :: Maybe (Value Text)
schemaVersion :: Maybe (Value Text)
sectionalElements :: Maybe (Map Text SectionalElementProperty)
style :: Maybe FormStyleProperty
tags :: Maybe (Map Text (Value Text))
haddock_workaround_ :: ()
appId :: Maybe (Value Text)
cta :: Maybe FormCTAProperty
dataType :: Maybe FormDataTypeConfigProperty
environmentName :: Maybe (Value Text)
formActionType :: Maybe (Value Text)
labelDecorator :: Maybe (Value Text)
name :: Maybe (Value Text)
schemaVersion :: Maybe (Value Text)
sectionalElements :: Maybe (Map Text SectionalElementProperty)
style :: Maybe FormStyleProperty
tags :: Maybe (Map Text (Value Text))
..}
instance Property "FormActionType" Form where
  type PropertyType "FormActionType" Form = Value Prelude.Text
  set :: PropertyType "FormActionType" Form -> Form -> Form
set PropertyType "FormActionType" Form
newValue Form {Maybe (Map Text (Value Text))
Maybe (Map Text SectionalElementProperty)
Maybe (Map Text FieldConfigProperty)
Maybe (Value Text)
Maybe FormCTAProperty
Maybe FormDataTypeConfigProperty
Maybe FormStyleProperty
()
haddock_workaround_ :: Form -> ()
appId :: Form -> Maybe (Value Text)
cta :: Form -> Maybe FormCTAProperty
dataType :: Form -> Maybe FormDataTypeConfigProperty
environmentName :: Form -> Maybe (Value Text)
fields :: Form -> Maybe (Map Text FieldConfigProperty)
formActionType :: Form -> Maybe (Value Text)
labelDecorator :: Form -> Maybe (Value Text)
name :: Form -> Maybe (Value Text)
schemaVersion :: Form -> Maybe (Value Text)
sectionalElements :: Form -> Maybe (Map Text SectionalElementProperty)
style :: Form -> Maybe FormStyleProperty
tags :: Form -> Maybe (Map Text (Value Text))
haddock_workaround_ :: ()
appId :: Maybe (Value Text)
cta :: Maybe FormCTAProperty
dataType :: Maybe FormDataTypeConfigProperty
environmentName :: Maybe (Value Text)
fields :: Maybe (Map Text FieldConfigProperty)
formActionType :: Maybe (Value Text)
labelDecorator :: Maybe (Value Text)
name :: Maybe (Value Text)
schemaVersion :: Maybe (Value Text)
sectionalElements :: Maybe (Map Text SectionalElementProperty)
style :: Maybe FormStyleProperty
tags :: Maybe (Map Text (Value Text))
..}
    = Form {formActionType :: Maybe (Value Text)
formActionType = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "FormActionType" Form
Value Text
newValue, Maybe (Map Text (Value Text))
Maybe (Map Text SectionalElementProperty)
Maybe (Map Text FieldConfigProperty)
Maybe (Value Text)
Maybe FormCTAProperty
Maybe FormDataTypeConfigProperty
Maybe FormStyleProperty
()
haddock_workaround_ :: ()
appId :: Maybe (Value Text)
cta :: Maybe FormCTAProperty
dataType :: Maybe FormDataTypeConfigProperty
environmentName :: Maybe (Value Text)
fields :: Maybe (Map Text FieldConfigProperty)
labelDecorator :: Maybe (Value Text)
name :: Maybe (Value Text)
schemaVersion :: Maybe (Value Text)
sectionalElements :: Maybe (Map Text SectionalElementProperty)
style :: Maybe FormStyleProperty
tags :: Maybe (Map Text (Value Text))
haddock_workaround_ :: ()
appId :: Maybe (Value Text)
cta :: Maybe FormCTAProperty
dataType :: Maybe FormDataTypeConfigProperty
environmentName :: Maybe (Value Text)
fields :: Maybe (Map Text FieldConfigProperty)
labelDecorator :: Maybe (Value Text)
name :: Maybe (Value Text)
schemaVersion :: Maybe (Value Text)
sectionalElements :: Maybe (Map Text SectionalElementProperty)
style :: Maybe FormStyleProperty
tags :: Maybe (Map Text (Value Text))
..}
instance Property "LabelDecorator" Form where
  type PropertyType "LabelDecorator" Form = Value Prelude.Text
  set :: PropertyType "LabelDecorator" Form -> Form -> Form
set PropertyType "LabelDecorator" Form
newValue Form {Maybe (Map Text (Value Text))
Maybe (Map Text SectionalElementProperty)
Maybe (Map Text FieldConfigProperty)
Maybe (Value Text)
Maybe FormCTAProperty
Maybe FormDataTypeConfigProperty
Maybe FormStyleProperty
()
haddock_workaround_ :: Form -> ()
appId :: Form -> Maybe (Value Text)
cta :: Form -> Maybe FormCTAProperty
dataType :: Form -> Maybe FormDataTypeConfigProperty
environmentName :: Form -> Maybe (Value Text)
fields :: Form -> Maybe (Map Text FieldConfigProperty)
formActionType :: Form -> Maybe (Value Text)
labelDecorator :: Form -> Maybe (Value Text)
name :: Form -> Maybe (Value Text)
schemaVersion :: Form -> Maybe (Value Text)
sectionalElements :: Form -> Maybe (Map Text SectionalElementProperty)
style :: Form -> Maybe FormStyleProperty
tags :: Form -> Maybe (Map Text (Value Text))
haddock_workaround_ :: ()
appId :: Maybe (Value Text)
cta :: Maybe FormCTAProperty
dataType :: Maybe FormDataTypeConfigProperty
environmentName :: Maybe (Value Text)
fields :: Maybe (Map Text FieldConfigProperty)
formActionType :: Maybe (Value Text)
labelDecorator :: Maybe (Value Text)
name :: Maybe (Value Text)
schemaVersion :: Maybe (Value Text)
sectionalElements :: Maybe (Map Text SectionalElementProperty)
style :: Maybe FormStyleProperty
tags :: Maybe (Map Text (Value Text))
..}
    = Form {labelDecorator :: Maybe (Value Text)
labelDecorator = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "LabelDecorator" Form
Value Text
newValue, Maybe (Map Text (Value Text))
Maybe (Map Text SectionalElementProperty)
Maybe (Map Text FieldConfigProperty)
Maybe (Value Text)
Maybe FormCTAProperty
Maybe FormDataTypeConfigProperty
Maybe FormStyleProperty
()
haddock_workaround_ :: ()
appId :: Maybe (Value Text)
cta :: Maybe FormCTAProperty
dataType :: Maybe FormDataTypeConfigProperty
environmentName :: Maybe (Value Text)
fields :: Maybe (Map Text FieldConfigProperty)
formActionType :: Maybe (Value Text)
name :: Maybe (Value Text)
schemaVersion :: Maybe (Value Text)
sectionalElements :: Maybe (Map Text SectionalElementProperty)
style :: Maybe FormStyleProperty
tags :: Maybe (Map Text (Value Text))
haddock_workaround_ :: ()
appId :: Maybe (Value Text)
cta :: Maybe FormCTAProperty
dataType :: Maybe FormDataTypeConfigProperty
environmentName :: Maybe (Value Text)
fields :: Maybe (Map Text FieldConfigProperty)
formActionType :: Maybe (Value Text)
name :: Maybe (Value Text)
schemaVersion :: Maybe (Value Text)
sectionalElements :: Maybe (Map Text SectionalElementProperty)
style :: Maybe FormStyleProperty
tags :: Maybe (Map Text (Value Text))
..}
instance Property "Name" Form where
  type PropertyType "Name" Form = Value Prelude.Text
  set :: PropertyType "Name" Form -> Form -> Form
set PropertyType "Name" Form
newValue Form {Maybe (Map Text (Value Text))
Maybe (Map Text SectionalElementProperty)
Maybe (Map Text FieldConfigProperty)
Maybe (Value Text)
Maybe FormCTAProperty
Maybe FormDataTypeConfigProperty
Maybe FormStyleProperty
()
haddock_workaround_ :: Form -> ()
appId :: Form -> Maybe (Value Text)
cta :: Form -> Maybe FormCTAProperty
dataType :: Form -> Maybe FormDataTypeConfigProperty
environmentName :: Form -> Maybe (Value Text)
fields :: Form -> Maybe (Map Text FieldConfigProperty)
formActionType :: Form -> Maybe (Value Text)
labelDecorator :: Form -> Maybe (Value Text)
name :: Form -> Maybe (Value Text)
schemaVersion :: Form -> Maybe (Value Text)
sectionalElements :: Form -> Maybe (Map Text SectionalElementProperty)
style :: Form -> Maybe FormStyleProperty
tags :: Form -> Maybe (Map Text (Value Text))
haddock_workaround_ :: ()
appId :: Maybe (Value Text)
cta :: Maybe FormCTAProperty
dataType :: Maybe FormDataTypeConfigProperty
environmentName :: Maybe (Value Text)
fields :: Maybe (Map Text FieldConfigProperty)
formActionType :: Maybe (Value Text)
labelDecorator :: Maybe (Value Text)
name :: Maybe (Value Text)
schemaVersion :: Maybe (Value Text)
sectionalElements :: Maybe (Map Text SectionalElementProperty)
style :: Maybe FormStyleProperty
tags :: Maybe (Map Text (Value Text))
..} = Form {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" Form
Value Text
newValue, Maybe (Map Text (Value Text))
Maybe (Map Text SectionalElementProperty)
Maybe (Map Text FieldConfigProperty)
Maybe (Value Text)
Maybe FormCTAProperty
Maybe FormDataTypeConfigProperty
Maybe FormStyleProperty
()
haddock_workaround_ :: ()
appId :: Maybe (Value Text)
cta :: Maybe FormCTAProperty
dataType :: Maybe FormDataTypeConfigProperty
environmentName :: Maybe (Value Text)
fields :: Maybe (Map Text FieldConfigProperty)
formActionType :: Maybe (Value Text)
labelDecorator :: Maybe (Value Text)
schemaVersion :: Maybe (Value Text)
sectionalElements :: Maybe (Map Text SectionalElementProperty)
style :: Maybe FormStyleProperty
tags :: Maybe (Map Text (Value Text))
haddock_workaround_ :: ()
appId :: Maybe (Value Text)
cta :: Maybe FormCTAProperty
dataType :: Maybe FormDataTypeConfigProperty
environmentName :: Maybe (Value Text)
fields :: Maybe (Map Text FieldConfigProperty)
formActionType :: Maybe (Value Text)
labelDecorator :: Maybe (Value Text)
schemaVersion :: Maybe (Value Text)
sectionalElements :: Maybe (Map Text SectionalElementProperty)
style :: Maybe FormStyleProperty
tags :: Maybe (Map Text (Value Text))
..}
instance Property "SchemaVersion" Form where
  type PropertyType "SchemaVersion" Form = Value Prelude.Text
  set :: PropertyType "SchemaVersion" Form -> Form -> Form
set PropertyType "SchemaVersion" Form
newValue Form {Maybe (Map Text (Value Text))
Maybe (Map Text SectionalElementProperty)
Maybe (Map Text FieldConfigProperty)
Maybe (Value Text)
Maybe FormCTAProperty
Maybe FormDataTypeConfigProperty
Maybe FormStyleProperty
()
haddock_workaround_ :: Form -> ()
appId :: Form -> Maybe (Value Text)
cta :: Form -> Maybe FormCTAProperty
dataType :: Form -> Maybe FormDataTypeConfigProperty
environmentName :: Form -> Maybe (Value Text)
fields :: Form -> Maybe (Map Text FieldConfigProperty)
formActionType :: Form -> Maybe (Value Text)
labelDecorator :: Form -> Maybe (Value Text)
name :: Form -> Maybe (Value Text)
schemaVersion :: Form -> Maybe (Value Text)
sectionalElements :: Form -> Maybe (Map Text SectionalElementProperty)
style :: Form -> Maybe FormStyleProperty
tags :: Form -> Maybe (Map Text (Value Text))
haddock_workaround_ :: ()
appId :: Maybe (Value Text)
cta :: Maybe FormCTAProperty
dataType :: Maybe FormDataTypeConfigProperty
environmentName :: Maybe (Value Text)
fields :: Maybe (Map Text FieldConfigProperty)
formActionType :: Maybe (Value Text)
labelDecorator :: Maybe (Value Text)
name :: Maybe (Value Text)
schemaVersion :: Maybe (Value Text)
sectionalElements :: Maybe (Map Text SectionalElementProperty)
style :: Maybe FormStyleProperty
tags :: Maybe (Map Text (Value Text))
..}
    = Form {schemaVersion :: Maybe (Value Text)
schemaVersion = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "SchemaVersion" Form
Value Text
newValue, Maybe (Map Text (Value Text))
Maybe (Map Text SectionalElementProperty)
Maybe (Map Text FieldConfigProperty)
Maybe (Value Text)
Maybe FormCTAProperty
Maybe FormDataTypeConfigProperty
Maybe FormStyleProperty
()
haddock_workaround_ :: ()
appId :: Maybe (Value Text)
cta :: Maybe FormCTAProperty
dataType :: Maybe FormDataTypeConfigProperty
environmentName :: Maybe (Value Text)
fields :: Maybe (Map Text FieldConfigProperty)
formActionType :: Maybe (Value Text)
labelDecorator :: Maybe (Value Text)
name :: Maybe (Value Text)
sectionalElements :: Maybe (Map Text SectionalElementProperty)
style :: Maybe FormStyleProperty
tags :: Maybe (Map Text (Value Text))
haddock_workaround_ :: ()
appId :: Maybe (Value Text)
cta :: Maybe FormCTAProperty
dataType :: Maybe FormDataTypeConfigProperty
environmentName :: Maybe (Value Text)
fields :: Maybe (Map Text FieldConfigProperty)
formActionType :: Maybe (Value Text)
labelDecorator :: Maybe (Value Text)
name :: Maybe (Value Text)
sectionalElements :: Maybe (Map Text SectionalElementProperty)
style :: Maybe FormStyleProperty
tags :: Maybe (Map Text (Value Text))
..}
instance Property "SectionalElements" Form where
  type PropertyType "SectionalElements" Form = Prelude.Map Prelude.Text SectionalElementProperty
  set :: PropertyType "SectionalElements" Form -> Form -> Form
set PropertyType "SectionalElements" Form
newValue Form {Maybe (Map Text (Value Text))
Maybe (Map Text SectionalElementProperty)
Maybe (Map Text FieldConfigProperty)
Maybe (Value Text)
Maybe FormCTAProperty
Maybe FormDataTypeConfigProperty
Maybe FormStyleProperty
()
haddock_workaround_ :: Form -> ()
appId :: Form -> Maybe (Value Text)
cta :: Form -> Maybe FormCTAProperty
dataType :: Form -> Maybe FormDataTypeConfigProperty
environmentName :: Form -> Maybe (Value Text)
fields :: Form -> Maybe (Map Text FieldConfigProperty)
formActionType :: Form -> Maybe (Value Text)
labelDecorator :: Form -> Maybe (Value Text)
name :: Form -> Maybe (Value Text)
schemaVersion :: Form -> Maybe (Value Text)
sectionalElements :: Form -> Maybe (Map Text SectionalElementProperty)
style :: Form -> Maybe FormStyleProperty
tags :: Form -> Maybe (Map Text (Value Text))
haddock_workaround_ :: ()
appId :: Maybe (Value Text)
cta :: Maybe FormCTAProperty
dataType :: Maybe FormDataTypeConfigProperty
environmentName :: Maybe (Value Text)
fields :: Maybe (Map Text FieldConfigProperty)
formActionType :: Maybe (Value Text)
labelDecorator :: Maybe (Value Text)
name :: Maybe (Value Text)
schemaVersion :: Maybe (Value Text)
sectionalElements :: Maybe (Map Text SectionalElementProperty)
style :: Maybe FormStyleProperty
tags :: Maybe (Map Text (Value Text))
..}
    = Form {sectionalElements :: Maybe (Map Text SectionalElementProperty)
sectionalElements = Map Text SectionalElementProperty
-> Maybe (Map Text SectionalElementProperty)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure Map Text SectionalElementProperty
PropertyType "SectionalElements" Form
newValue, Maybe (Map Text (Value Text))
Maybe (Map Text FieldConfigProperty)
Maybe (Value Text)
Maybe FormCTAProperty
Maybe FormDataTypeConfigProperty
Maybe FormStyleProperty
()
haddock_workaround_ :: ()
appId :: Maybe (Value Text)
cta :: Maybe FormCTAProperty
dataType :: Maybe FormDataTypeConfigProperty
environmentName :: Maybe (Value Text)
fields :: Maybe (Map Text FieldConfigProperty)
formActionType :: Maybe (Value Text)
labelDecorator :: Maybe (Value Text)
name :: Maybe (Value Text)
schemaVersion :: Maybe (Value Text)
style :: Maybe FormStyleProperty
tags :: Maybe (Map Text (Value Text))
haddock_workaround_ :: ()
appId :: Maybe (Value Text)
cta :: Maybe FormCTAProperty
dataType :: Maybe FormDataTypeConfigProperty
environmentName :: Maybe (Value Text)
fields :: Maybe (Map Text FieldConfigProperty)
formActionType :: Maybe (Value Text)
labelDecorator :: Maybe (Value Text)
name :: Maybe (Value Text)
schemaVersion :: Maybe (Value Text)
style :: Maybe FormStyleProperty
tags :: Maybe (Map Text (Value Text))
..}
instance Property "Style" Form where
  type PropertyType "Style" Form = FormStyleProperty
  set :: PropertyType "Style" Form -> Form -> Form
set PropertyType "Style" Form
newValue Form {Maybe (Map Text (Value Text))
Maybe (Map Text SectionalElementProperty)
Maybe (Map Text FieldConfigProperty)
Maybe (Value Text)
Maybe FormCTAProperty
Maybe FormDataTypeConfigProperty
Maybe FormStyleProperty
()
haddock_workaround_ :: Form -> ()
appId :: Form -> Maybe (Value Text)
cta :: Form -> Maybe FormCTAProperty
dataType :: Form -> Maybe FormDataTypeConfigProperty
environmentName :: Form -> Maybe (Value Text)
fields :: Form -> Maybe (Map Text FieldConfigProperty)
formActionType :: Form -> Maybe (Value Text)
labelDecorator :: Form -> Maybe (Value Text)
name :: Form -> Maybe (Value Text)
schemaVersion :: Form -> Maybe (Value Text)
sectionalElements :: Form -> Maybe (Map Text SectionalElementProperty)
style :: Form -> Maybe FormStyleProperty
tags :: Form -> Maybe (Map Text (Value Text))
haddock_workaround_ :: ()
appId :: Maybe (Value Text)
cta :: Maybe FormCTAProperty
dataType :: Maybe FormDataTypeConfigProperty
environmentName :: Maybe (Value Text)
fields :: Maybe (Map Text FieldConfigProperty)
formActionType :: Maybe (Value Text)
labelDecorator :: Maybe (Value Text)
name :: Maybe (Value Text)
schemaVersion :: Maybe (Value Text)
sectionalElements :: Maybe (Map Text SectionalElementProperty)
style :: Maybe FormStyleProperty
tags :: Maybe (Map Text (Value Text))
..} = Form {style :: Maybe FormStyleProperty
style = FormStyleProperty -> Maybe FormStyleProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Style" Form
FormStyleProperty
newValue, Maybe (Map Text (Value Text))
Maybe (Map Text SectionalElementProperty)
Maybe (Map Text FieldConfigProperty)
Maybe (Value Text)
Maybe FormCTAProperty
Maybe FormDataTypeConfigProperty
()
haddock_workaround_ :: ()
appId :: Maybe (Value Text)
cta :: Maybe FormCTAProperty
dataType :: Maybe FormDataTypeConfigProperty
environmentName :: Maybe (Value Text)
fields :: Maybe (Map Text FieldConfigProperty)
formActionType :: Maybe (Value Text)
labelDecorator :: Maybe (Value Text)
name :: Maybe (Value Text)
schemaVersion :: Maybe (Value Text)
sectionalElements :: Maybe (Map Text SectionalElementProperty)
tags :: Maybe (Map Text (Value Text))
haddock_workaround_ :: ()
appId :: Maybe (Value Text)
cta :: Maybe FormCTAProperty
dataType :: Maybe FormDataTypeConfigProperty
environmentName :: Maybe (Value Text)
fields :: Maybe (Map Text FieldConfigProperty)
formActionType :: Maybe (Value Text)
labelDecorator :: Maybe (Value Text)
name :: Maybe (Value Text)
schemaVersion :: Maybe (Value Text)
sectionalElements :: Maybe (Map Text SectionalElementProperty)
tags :: Maybe (Map Text (Value Text))
..}
instance Property "Tags" Form where
  type PropertyType "Tags" Form = Prelude.Map Prelude.Text (Value Prelude.Text)
  set :: PropertyType "Tags" Form -> Form -> Form
set PropertyType "Tags" Form
newValue Form {Maybe (Map Text (Value Text))
Maybe (Map Text SectionalElementProperty)
Maybe (Map Text FieldConfigProperty)
Maybe (Value Text)
Maybe FormCTAProperty
Maybe FormDataTypeConfigProperty
Maybe FormStyleProperty
()
haddock_workaround_ :: Form -> ()
appId :: Form -> Maybe (Value Text)
cta :: Form -> Maybe FormCTAProperty
dataType :: Form -> Maybe FormDataTypeConfigProperty
environmentName :: Form -> Maybe (Value Text)
fields :: Form -> Maybe (Map Text FieldConfigProperty)
formActionType :: Form -> Maybe (Value Text)
labelDecorator :: Form -> Maybe (Value Text)
name :: Form -> Maybe (Value Text)
schemaVersion :: Form -> Maybe (Value Text)
sectionalElements :: Form -> Maybe (Map Text SectionalElementProperty)
style :: Form -> Maybe FormStyleProperty
tags :: Form -> Maybe (Map Text (Value Text))
haddock_workaround_ :: ()
appId :: Maybe (Value Text)
cta :: Maybe FormCTAProperty
dataType :: Maybe FormDataTypeConfigProperty
environmentName :: Maybe (Value Text)
fields :: Maybe (Map Text FieldConfigProperty)
formActionType :: Maybe (Value Text)
labelDecorator :: Maybe (Value Text)
name :: Maybe (Value Text)
schemaVersion :: Maybe (Value Text)
sectionalElements :: Maybe (Map Text SectionalElementProperty)
style :: Maybe FormStyleProperty
tags :: Maybe (Map Text (Value Text))
..} = Form {tags :: Maybe (Map Text (Value Text))
tags = Map Text (Value Text) -> Maybe (Map Text (Value Text))
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure Map Text (Value Text)
PropertyType "Tags" Form
newValue, Maybe (Map Text SectionalElementProperty)
Maybe (Map Text FieldConfigProperty)
Maybe (Value Text)
Maybe FormCTAProperty
Maybe FormDataTypeConfigProperty
Maybe FormStyleProperty
()
haddock_workaround_ :: ()
appId :: Maybe (Value Text)
cta :: Maybe FormCTAProperty
dataType :: Maybe FormDataTypeConfigProperty
environmentName :: Maybe (Value Text)
fields :: Maybe (Map Text FieldConfigProperty)
formActionType :: Maybe (Value Text)
labelDecorator :: Maybe (Value Text)
name :: Maybe (Value Text)
schemaVersion :: Maybe (Value Text)
sectionalElements :: Maybe (Map Text SectionalElementProperty)
style :: Maybe FormStyleProperty
haddock_workaround_ :: ()
appId :: Maybe (Value Text)
cta :: Maybe FormCTAProperty
dataType :: Maybe FormDataTypeConfigProperty
environmentName :: Maybe (Value Text)
fields :: Maybe (Map Text FieldConfigProperty)
formActionType :: Maybe (Value Text)
labelDecorator :: Maybe (Value Text)
name :: Maybe (Value Text)
schemaVersion :: Maybe (Value Text)
sectionalElements :: Maybe (Map Text SectionalElementProperty)
style :: Maybe FormStyleProperty
..}