{-# OPTIONS_GHC -fno-warn-unused-binds -fno-warn-unused-imports #-}

module OryKratos.Types.Ui
  ( UiContainer (..),
    UiNode (..),
    UiNodeAnchorAttributes (..),
    UiNodeAttributes (..),
    UiNodeImageAttributes (..),
    UiNodeInputAttributes (..),
    UiNodeMeta (..),
    UiNodeScriptAttributes (..),
    UiNodeTextAttributes (..),
    UiText (..),
  )
where

import Data.Aeson (FromJSON (..), ToJSON (..), Value, genericParseJSON, genericToEncoding, genericToJSON)
import Data.Aeson.Types (Options (..), defaultOptions)
import qualified Data.Char as Char
import Data.Data (Data)
import Data.Function ((&))
import Data.List (stripPrefix)
import qualified Data.Map as Map
import Data.Maybe (fromMaybe)
import Data.Set (Set)
import Data.Swagger (ToSchema, declareNamedSchema)
import qualified Data.Swagger as Swagger
import Data.Text (Text)
import qualified Data.Text as T
import Data.Time
import Data.UUID (UUID)
import GHC.Generics (Generic)
import OryKratos.Types.Helper (customOptions, removeFieldLabelPrefix)

-- | Container represents a HTML Form. The container can work with both HTTP Form and JSON requests
data UiContainer = UiContainer
  { -- | Action should be used as the form action URL `<form action=\"{{ .Action }}\" method=\"post\">`.
    UiContainer -> Text
action :: Text,
    UiContainer -> Maybe [UiText]
messages :: Maybe [UiText],
    -- | Method is the form method (e.g. POST)
    UiContainer -> Text
method :: Text,
    UiContainer -> [UiNode]
nodes :: [UiNode]
  }
  deriving stock (Int -> UiContainer -> ShowS
[UiContainer] -> ShowS
UiContainer -> String
(Int -> UiContainer -> ShowS)
-> (UiContainer -> String)
-> ([UiContainer] -> ShowS)
-> Show UiContainer
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [UiContainer] -> ShowS
$cshowList :: [UiContainer] -> ShowS
show :: UiContainer -> String
$cshow :: UiContainer -> String
showsPrec :: Int -> UiContainer -> ShowS
$cshowsPrec :: Int -> UiContainer -> ShowS
Show, UiContainer -> UiContainer -> Bool
(UiContainer -> UiContainer -> Bool)
-> (UiContainer -> UiContainer -> Bool) -> Eq UiContainer
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: UiContainer -> UiContainer -> Bool
$c/= :: UiContainer -> UiContainer -> Bool
== :: UiContainer -> UiContainer -> Bool
$c== :: UiContainer -> UiContainer -> Bool
Eq, (forall x. UiContainer -> Rep UiContainer x)
-> (forall x. Rep UiContainer x -> UiContainer)
-> Generic UiContainer
forall x. Rep UiContainer x -> UiContainer
forall x. UiContainer -> Rep UiContainer x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep UiContainer x -> UiContainer
$cfrom :: forall x. UiContainer -> Rep UiContainer x
Generic, Typeable UiContainer
DataType
Constr
Typeable UiContainer
-> (forall (c :: * -> *).
    (forall d b. Data d => c (d -> b) -> d -> c b)
    -> (forall g. g -> c g) -> UiContainer -> c UiContainer)
-> (forall (c :: * -> *).
    (forall b r. Data b => c (b -> r) -> c r)
    -> (forall r. r -> c r) -> Constr -> c UiContainer)
-> (UiContainer -> Constr)
-> (UiContainer -> DataType)
-> (forall (t :: * -> *) (c :: * -> *).
    Typeable t =>
    (forall d. Data d => c (t d)) -> Maybe (c UiContainer))
-> (forall (t :: * -> * -> *) (c :: * -> *).
    Typeable t =>
    (forall d e. (Data d, Data e) => c (t d e))
    -> Maybe (c UiContainer))
-> ((forall b. Data b => b -> b) -> UiContainer -> UiContainer)
-> (forall r r'.
    (r -> r' -> r)
    -> r -> (forall d. Data d => d -> r') -> UiContainer -> r)
-> (forall r r'.
    (r' -> r -> r)
    -> r -> (forall d. Data d => d -> r') -> UiContainer -> r)
-> (forall u. (forall d. Data d => d -> u) -> UiContainer -> [u])
-> (forall u.
    Int -> (forall d. Data d => d -> u) -> UiContainer -> u)
-> (forall (m :: * -> *).
    Monad m =>
    (forall d. Data d => d -> m d) -> UiContainer -> m UiContainer)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d) -> UiContainer -> m UiContainer)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d) -> UiContainer -> m UiContainer)
-> Data UiContainer
UiContainer -> DataType
UiContainer -> Constr
(forall b. Data b => b -> b) -> UiContainer -> UiContainer
(forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g) -> UiContainer -> c UiContainer
(forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c UiContainer
forall a.
Typeable a
-> (forall (c :: * -> *).
    (forall d b. Data d => c (d -> b) -> d -> c b)
    -> (forall g. g -> c g) -> a -> c a)
-> (forall (c :: * -> *).
    (forall b r. Data b => c (b -> r) -> c r)
    -> (forall r. r -> c r) -> Constr -> c a)
-> (a -> Constr)
-> (a -> DataType)
-> (forall (t :: * -> *) (c :: * -> *).
    Typeable t =>
    (forall d. Data d => c (t d)) -> Maybe (c a))
-> (forall (t :: * -> * -> *) (c :: * -> *).
    Typeable t =>
    (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c a))
-> ((forall b. Data b => b -> b) -> a -> a)
-> (forall r r'.
    (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> a -> r)
-> (forall r r'.
    (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> a -> r)
-> (forall u. (forall d. Data d => d -> u) -> a -> [u])
-> (forall u. Int -> (forall d. Data d => d -> u) -> a -> u)
-> (forall (m :: * -> *).
    Monad m =>
    (forall d. Data d => d -> m d) -> a -> m a)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d) -> a -> m a)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d) -> a -> m a)
-> Data a
forall u. Int -> (forall d. Data d => d -> u) -> UiContainer -> u
forall u. (forall d. Data d => d -> u) -> UiContainer -> [u]
forall r r'.
(r -> r' -> r)
-> r -> (forall d. Data d => d -> r') -> UiContainer -> r
forall r r'.
(r' -> r -> r)
-> r -> (forall d. Data d => d -> r') -> UiContainer -> r
forall (m :: * -> *).
Monad m =>
(forall d. Data d => d -> m d) -> UiContainer -> m UiContainer
forall (m :: * -> *).
MonadPlus m =>
(forall d. Data d => d -> m d) -> UiContainer -> m UiContainer
forall (c :: * -> *).
(forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c UiContainer
forall (c :: * -> *).
(forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g) -> UiContainer -> c UiContainer
forall (t :: * -> *) (c :: * -> *).
Typeable t =>
(forall d. Data d => c (t d)) -> Maybe (c UiContainer)
forall (t :: * -> * -> *) (c :: * -> *).
Typeable t =>
(forall d e. (Data d, Data e) => c (t d e))
-> Maybe (c UiContainer)
$cUiContainer :: Constr
$tUiContainer :: DataType
gmapMo :: (forall d. Data d => d -> m d) -> UiContainer -> m UiContainer
$cgmapMo :: forall (m :: * -> *).
MonadPlus m =>
(forall d. Data d => d -> m d) -> UiContainer -> m UiContainer
gmapMp :: (forall d. Data d => d -> m d) -> UiContainer -> m UiContainer
$cgmapMp :: forall (m :: * -> *).
MonadPlus m =>
(forall d. Data d => d -> m d) -> UiContainer -> m UiContainer
gmapM :: (forall d. Data d => d -> m d) -> UiContainer -> m UiContainer
$cgmapM :: forall (m :: * -> *).
Monad m =>
(forall d. Data d => d -> m d) -> UiContainer -> m UiContainer
gmapQi :: Int -> (forall d. Data d => d -> u) -> UiContainer -> u
$cgmapQi :: forall u. Int -> (forall d. Data d => d -> u) -> UiContainer -> u
gmapQ :: (forall d. Data d => d -> u) -> UiContainer -> [u]
$cgmapQ :: forall u. (forall d. Data d => d -> u) -> UiContainer -> [u]
gmapQr :: (r' -> r -> r)
-> r -> (forall d. Data d => d -> r') -> UiContainer -> r
$cgmapQr :: forall r r'.
(r' -> r -> r)
-> r -> (forall d. Data d => d -> r') -> UiContainer -> r
gmapQl :: (r -> r' -> r)
-> r -> (forall d. Data d => d -> r') -> UiContainer -> r
$cgmapQl :: forall r r'.
(r -> r' -> r)
-> r -> (forall d. Data d => d -> r') -> UiContainer -> r
gmapT :: (forall b. Data b => b -> b) -> UiContainer -> UiContainer
$cgmapT :: (forall b. Data b => b -> b) -> UiContainer -> UiContainer
dataCast2 :: (forall d e. (Data d, Data e) => c (t d e))
-> Maybe (c UiContainer)
$cdataCast2 :: forall (t :: * -> * -> *) (c :: * -> *).
Typeable t =>
(forall d e. (Data d, Data e) => c (t d e))
-> Maybe (c UiContainer)
dataCast1 :: (forall d. Data d => c (t d)) -> Maybe (c UiContainer)
$cdataCast1 :: forall (t :: * -> *) (c :: * -> *).
Typeable t =>
(forall d. Data d => c (t d)) -> Maybe (c UiContainer)
dataTypeOf :: UiContainer -> DataType
$cdataTypeOf :: UiContainer -> DataType
toConstr :: UiContainer -> Constr
$ctoConstr :: UiContainer -> Constr
gunfold :: (forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c UiContainer
$cgunfold :: forall (c :: * -> *).
(forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c UiContainer
gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g) -> UiContainer -> c UiContainer
$cgfoldl :: forall (c :: * -> *).
(forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g) -> UiContainer -> c UiContainer
$cp1Data :: Typeable UiContainer
Data)

instance FromJSON UiContainer

instance ToJSON UiContainer where
  toEncoding :: UiContainer -> Encoding
toEncoding = Options -> UiContainer -> Encoding
forall a.
(Generic a, GToJSON' Encoding Zero (Rep a)) =>
Options -> a -> Encoding
genericToEncoding Options
defaultOptions

-- | Nodes are represented as HTML elements or their native UI equivalents. For example, a node can be an &#x60;&lt;img&gt;&#x60; tag, or an &#x60;&lt;input element&gt;&#x60; but also &#x60;some plain text&#x60;.
data UiNode = UiNode
  { UiNode -> UiNodeAttributes
attributes :: UiNodeAttributes,
    -- | Group specifies which group (e.g. password authenticator) this node belongs to.
    UiNode -> Text
group :: Text,
    UiNode -> [UiText]
messages :: [UiText],
    UiNode -> UiNodeMeta
meta :: UiNodeMeta,
    -- | The node's type
    UiNode -> Text
_type :: Text
  }
  deriving stock (Int -> UiNode -> ShowS
[UiNode] -> ShowS
UiNode -> String
(Int -> UiNode -> ShowS)
-> (UiNode -> String) -> ([UiNode] -> ShowS) -> Show UiNode
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [UiNode] -> ShowS
$cshowList :: [UiNode] -> ShowS
show :: UiNode -> String
$cshow :: UiNode -> String
showsPrec :: Int -> UiNode -> ShowS
$cshowsPrec :: Int -> UiNode -> ShowS
Show, UiNode -> UiNode -> Bool
(UiNode -> UiNode -> Bool)
-> (UiNode -> UiNode -> Bool) -> Eq UiNode
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: UiNode -> UiNode -> Bool
$c/= :: UiNode -> UiNode -> Bool
== :: UiNode -> UiNode -> Bool
$c== :: UiNode -> UiNode -> Bool
Eq, (forall x. UiNode -> Rep UiNode x)
-> (forall x. Rep UiNode x -> UiNode) -> Generic UiNode
forall x. Rep UiNode x -> UiNode
forall x. UiNode -> Rep UiNode x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep UiNode x -> UiNode
$cfrom :: forall x. UiNode -> Rep UiNode x
Generic, Typeable UiNode
DataType
Constr
Typeable UiNode
-> (forall (c :: * -> *).
    (forall d b. Data d => c (d -> b) -> d -> c b)
    -> (forall g. g -> c g) -> UiNode -> c UiNode)
-> (forall (c :: * -> *).
    (forall b r. Data b => c (b -> r) -> c r)
    -> (forall r. r -> c r) -> Constr -> c UiNode)
-> (UiNode -> Constr)
-> (UiNode -> DataType)
-> (forall (t :: * -> *) (c :: * -> *).
    Typeable t =>
    (forall d. Data d => c (t d)) -> Maybe (c UiNode))
-> (forall (t :: * -> * -> *) (c :: * -> *).
    Typeable t =>
    (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c UiNode))
-> ((forall b. Data b => b -> b) -> UiNode -> UiNode)
-> (forall r r'.
    (r -> r' -> r)
    -> r -> (forall d. Data d => d -> r') -> UiNode -> r)
-> (forall r r'.
    (r' -> r -> r)
    -> r -> (forall d. Data d => d -> r') -> UiNode -> r)
-> (forall u. (forall d. Data d => d -> u) -> UiNode -> [u])
-> (forall u. Int -> (forall d. Data d => d -> u) -> UiNode -> u)
-> (forall (m :: * -> *).
    Monad m =>
    (forall d. Data d => d -> m d) -> UiNode -> m UiNode)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d) -> UiNode -> m UiNode)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d) -> UiNode -> m UiNode)
-> Data UiNode
UiNode -> DataType
UiNode -> Constr
(forall b. Data b => b -> b) -> UiNode -> UiNode
(forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g) -> UiNode -> c UiNode
(forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c UiNode
forall a.
Typeable a
-> (forall (c :: * -> *).
    (forall d b. Data d => c (d -> b) -> d -> c b)
    -> (forall g. g -> c g) -> a -> c a)
-> (forall (c :: * -> *).
    (forall b r. Data b => c (b -> r) -> c r)
    -> (forall r. r -> c r) -> Constr -> c a)
-> (a -> Constr)
-> (a -> DataType)
-> (forall (t :: * -> *) (c :: * -> *).
    Typeable t =>
    (forall d. Data d => c (t d)) -> Maybe (c a))
-> (forall (t :: * -> * -> *) (c :: * -> *).
    Typeable t =>
    (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c a))
-> ((forall b. Data b => b -> b) -> a -> a)
-> (forall r r'.
    (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> a -> r)
-> (forall r r'.
    (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> a -> r)
-> (forall u. (forall d. Data d => d -> u) -> a -> [u])
-> (forall u. Int -> (forall d. Data d => d -> u) -> a -> u)
-> (forall (m :: * -> *).
    Monad m =>
    (forall d. Data d => d -> m d) -> a -> m a)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d) -> a -> m a)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d) -> a -> m a)
-> Data a
forall u. Int -> (forall d. Data d => d -> u) -> UiNode -> u
forall u. (forall d. Data d => d -> u) -> UiNode -> [u]
forall r r'.
(r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> UiNode -> r
forall r r'.
(r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> UiNode -> r
forall (m :: * -> *).
Monad m =>
(forall d. Data d => d -> m d) -> UiNode -> m UiNode
forall (m :: * -> *).
MonadPlus m =>
(forall d. Data d => d -> m d) -> UiNode -> m UiNode
forall (c :: * -> *).
(forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c UiNode
forall (c :: * -> *).
(forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g) -> UiNode -> c UiNode
forall (t :: * -> *) (c :: * -> *).
Typeable t =>
(forall d. Data d => c (t d)) -> Maybe (c UiNode)
forall (t :: * -> * -> *) (c :: * -> *).
Typeable t =>
(forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c UiNode)
$cUiNode :: Constr
$tUiNode :: DataType
gmapMo :: (forall d. Data d => d -> m d) -> UiNode -> m UiNode
$cgmapMo :: forall (m :: * -> *).
MonadPlus m =>
(forall d. Data d => d -> m d) -> UiNode -> m UiNode
gmapMp :: (forall d. Data d => d -> m d) -> UiNode -> m UiNode
$cgmapMp :: forall (m :: * -> *).
MonadPlus m =>
(forall d. Data d => d -> m d) -> UiNode -> m UiNode
gmapM :: (forall d. Data d => d -> m d) -> UiNode -> m UiNode
$cgmapM :: forall (m :: * -> *).
Monad m =>
(forall d. Data d => d -> m d) -> UiNode -> m UiNode
gmapQi :: Int -> (forall d. Data d => d -> u) -> UiNode -> u
$cgmapQi :: forall u. Int -> (forall d. Data d => d -> u) -> UiNode -> u
gmapQ :: (forall d. Data d => d -> u) -> UiNode -> [u]
$cgmapQ :: forall u. (forall d. Data d => d -> u) -> UiNode -> [u]
gmapQr :: (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> UiNode -> r
$cgmapQr :: forall r r'.
(r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> UiNode -> r
gmapQl :: (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> UiNode -> r
$cgmapQl :: forall r r'.
(r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> UiNode -> r
gmapT :: (forall b. Data b => b -> b) -> UiNode -> UiNode
$cgmapT :: (forall b. Data b => b -> b) -> UiNode -> UiNode
dataCast2 :: (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c UiNode)
$cdataCast2 :: forall (t :: * -> * -> *) (c :: * -> *).
Typeable t =>
(forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c UiNode)
dataCast1 :: (forall d. Data d => c (t d)) -> Maybe (c UiNode)
$cdataCast1 :: forall (t :: * -> *) (c :: * -> *).
Typeable t =>
(forall d. Data d => c (t d)) -> Maybe (c UiNode)
dataTypeOf :: UiNode -> DataType
$cdataTypeOf :: UiNode -> DataType
toConstr :: UiNode -> Constr
$ctoConstr :: UiNode -> Constr
gunfold :: (forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c UiNode
$cgunfold :: forall (c :: * -> *).
(forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c UiNode
gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g) -> UiNode -> c UiNode
$cgfoldl :: forall (c :: * -> *).
(forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g) -> UiNode -> c UiNode
$cp1Data :: Typeable UiNode
Data)

instance FromJSON UiNode where
  parseJSON :: Value -> Parser UiNode
parseJSON = Options -> Value -> Parser UiNode
forall a.
(Generic a, GFromJSON Zero (Rep a)) =>
Options -> Value -> Parser a
genericParseJSON Options
customOptions

instance ToJSON UiNode where
  toJSON :: UiNode -> Value
toJSON = Options -> UiNode -> Value
forall a.
(Generic a, GToJSON' Value Zero (Rep a)) =>
Options -> a -> Value
genericToJSON Options
customOptions
  toEncoding :: UiNode -> Encoding
toEncoding = Options -> UiNode -> Encoding
forall a.
(Generic a, GToJSON' Encoding Zero (Rep a)) =>
Options -> a -> Encoding
genericToEncoding Options
customOptions

data UiNodeAnchorAttributes = UiNodeAnchorAttributes
  { -- | The link's href (destination) URL.  format: uri
    UiNodeAnchorAttributes -> Text
href :: Text,
    -- | A unique identifier
    UiNodeAnchorAttributes -> Text
id :: Text,
    -- | NodeType represents this node's types. It is a mirror of `node.type` and is primarily used to allow compatibility with OpenAPI 3.0.  In this struct it technically always is \"a\".
    UiNodeAnchorAttributes -> Text
node_type :: Text,
    UiNodeAnchorAttributes -> UiText
title :: UiText
  }
  deriving stock (Int -> UiNodeAnchorAttributes -> ShowS
[UiNodeAnchorAttributes] -> ShowS
UiNodeAnchorAttributes -> String
(Int -> UiNodeAnchorAttributes -> ShowS)
-> (UiNodeAnchorAttributes -> String)
-> ([UiNodeAnchorAttributes] -> ShowS)
-> Show UiNodeAnchorAttributes
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [UiNodeAnchorAttributes] -> ShowS
$cshowList :: [UiNodeAnchorAttributes] -> ShowS
show :: UiNodeAnchorAttributes -> String
$cshow :: UiNodeAnchorAttributes -> String
showsPrec :: Int -> UiNodeAnchorAttributes -> ShowS
$cshowsPrec :: Int -> UiNodeAnchorAttributes -> ShowS
Show, UiNodeAnchorAttributes -> UiNodeAnchorAttributes -> Bool
(UiNodeAnchorAttributes -> UiNodeAnchorAttributes -> Bool)
-> (UiNodeAnchorAttributes -> UiNodeAnchorAttributes -> Bool)
-> Eq UiNodeAnchorAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: UiNodeAnchorAttributes -> UiNodeAnchorAttributes -> Bool
$c/= :: UiNodeAnchorAttributes -> UiNodeAnchorAttributes -> Bool
== :: UiNodeAnchorAttributes -> UiNodeAnchorAttributes -> Bool
$c== :: UiNodeAnchorAttributes -> UiNodeAnchorAttributes -> Bool
Eq, (forall x. UiNodeAnchorAttributes -> Rep UiNodeAnchorAttributes x)
-> (forall x.
    Rep UiNodeAnchorAttributes x -> UiNodeAnchorAttributes)
-> Generic UiNodeAnchorAttributes
forall x. Rep UiNodeAnchorAttributes x -> UiNodeAnchorAttributes
forall x. UiNodeAnchorAttributes -> Rep UiNodeAnchorAttributes x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep UiNodeAnchorAttributes x -> UiNodeAnchorAttributes
$cfrom :: forall x. UiNodeAnchorAttributes -> Rep UiNodeAnchorAttributes x
Generic, Typeable UiNodeAnchorAttributes
DataType
Constr
Typeable UiNodeAnchorAttributes
-> (forall (c :: * -> *).
    (forall d b. Data d => c (d -> b) -> d -> c b)
    -> (forall g. g -> c g)
    -> UiNodeAnchorAttributes
    -> c UiNodeAnchorAttributes)
-> (forall (c :: * -> *).
    (forall b r. Data b => c (b -> r) -> c r)
    -> (forall r. r -> c r) -> Constr -> c UiNodeAnchorAttributes)
-> (UiNodeAnchorAttributes -> Constr)
-> (UiNodeAnchorAttributes -> DataType)
-> (forall (t :: * -> *) (c :: * -> *).
    Typeable t =>
    (forall d. Data d => c (t d)) -> Maybe (c UiNodeAnchorAttributes))
-> (forall (t :: * -> * -> *) (c :: * -> *).
    Typeable t =>
    (forall d e. (Data d, Data e) => c (t d e))
    -> Maybe (c UiNodeAnchorAttributes))
-> ((forall b. Data b => b -> b)
    -> UiNodeAnchorAttributes -> UiNodeAnchorAttributes)
-> (forall r r'.
    (r -> r' -> r)
    -> r
    -> (forall d. Data d => d -> r')
    -> UiNodeAnchorAttributes
    -> r)
-> (forall r r'.
    (r' -> r -> r)
    -> r
    -> (forall d. Data d => d -> r')
    -> UiNodeAnchorAttributes
    -> r)
-> (forall u.
    (forall d. Data d => d -> u) -> UiNodeAnchorAttributes -> [u])
-> (forall u.
    Int -> (forall d. Data d => d -> u) -> UiNodeAnchorAttributes -> u)
-> (forall (m :: * -> *).
    Monad m =>
    (forall d. Data d => d -> m d)
    -> UiNodeAnchorAttributes -> m UiNodeAnchorAttributes)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d)
    -> UiNodeAnchorAttributes -> m UiNodeAnchorAttributes)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d)
    -> UiNodeAnchorAttributes -> m UiNodeAnchorAttributes)
-> Data UiNodeAnchorAttributes
UiNodeAnchorAttributes -> DataType
UiNodeAnchorAttributes -> Constr
(forall b. Data b => b -> b)
-> UiNodeAnchorAttributes -> UiNodeAnchorAttributes
(forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g)
-> UiNodeAnchorAttributes
-> c UiNodeAnchorAttributes
(forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c UiNodeAnchorAttributes
forall a.
Typeable a
-> (forall (c :: * -> *).
    (forall d b. Data d => c (d -> b) -> d -> c b)
    -> (forall g. g -> c g) -> a -> c a)
-> (forall (c :: * -> *).
    (forall b r. Data b => c (b -> r) -> c r)
    -> (forall r. r -> c r) -> Constr -> c a)
-> (a -> Constr)
-> (a -> DataType)
-> (forall (t :: * -> *) (c :: * -> *).
    Typeable t =>
    (forall d. Data d => c (t d)) -> Maybe (c a))
-> (forall (t :: * -> * -> *) (c :: * -> *).
    Typeable t =>
    (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c a))
-> ((forall b. Data b => b -> b) -> a -> a)
-> (forall r r'.
    (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> a -> r)
-> (forall r r'.
    (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> a -> r)
-> (forall u. (forall d. Data d => d -> u) -> a -> [u])
-> (forall u. Int -> (forall d. Data d => d -> u) -> a -> u)
-> (forall (m :: * -> *).
    Monad m =>
    (forall d. Data d => d -> m d) -> a -> m a)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d) -> a -> m a)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d) -> a -> m a)
-> Data a
forall u.
Int -> (forall d. Data d => d -> u) -> UiNodeAnchorAttributes -> u
forall u.
(forall d. Data d => d -> u) -> UiNodeAnchorAttributes -> [u]
forall r r'.
(r -> r' -> r)
-> r
-> (forall d. Data d => d -> r')
-> UiNodeAnchorAttributes
-> r
forall r r'.
(r' -> r -> r)
-> r
-> (forall d. Data d => d -> r')
-> UiNodeAnchorAttributes
-> r
forall (m :: * -> *).
Monad m =>
(forall d. Data d => d -> m d)
-> UiNodeAnchorAttributes -> m UiNodeAnchorAttributes
forall (m :: * -> *).
MonadPlus m =>
(forall d. Data d => d -> m d)
-> UiNodeAnchorAttributes -> m UiNodeAnchorAttributes
forall (c :: * -> *).
(forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c UiNodeAnchorAttributes
forall (c :: * -> *).
(forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g)
-> UiNodeAnchorAttributes
-> c UiNodeAnchorAttributes
forall (t :: * -> *) (c :: * -> *).
Typeable t =>
(forall d. Data d => c (t d)) -> Maybe (c UiNodeAnchorAttributes)
forall (t :: * -> * -> *) (c :: * -> *).
Typeable t =>
(forall d e. (Data d, Data e) => c (t d e))
-> Maybe (c UiNodeAnchorAttributes)
$cUiNodeAnchorAttributes :: Constr
$tUiNodeAnchorAttributes :: DataType
gmapMo :: (forall d. Data d => d -> m d)
-> UiNodeAnchorAttributes -> m UiNodeAnchorAttributes
$cgmapMo :: forall (m :: * -> *).
MonadPlus m =>
(forall d. Data d => d -> m d)
-> UiNodeAnchorAttributes -> m UiNodeAnchorAttributes
gmapMp :: (forall d. Data d => d -> m d)
-> UiNodeAnchorAttributes -> m UiNodeAnchorAttributes
$cgmapMp :: forall (m :: * -> *).
MonadPlus m =>
(forall d. Data d => d -> m d)
-> UiNodeAnchorAttributes -> m UiNodeAnchorAttributes
gmapM :: (forall d. Data d => d -> m d)
-> UiNodeAnchorAttributes -> m UiNodeAnchorAttributes
$cgmapM :: forall (m :: * -> *).
Monad m =>
(forall d. Data d => d -> m d)
-> UiNodeAnchorAttributes -> m UiNodeAnchorAttributes
gmapQi :: Int -> (forall d. Data d => d -> u) -> UiNodeAnchorAttributes -> u
$cgmapQi :: forall u.
Int -> (forall d. Data d => d -> u) -> UiNodeAnchorAttributes -> u
gmapQ :: (forall d. Data d => d -> u) -> UiNodeAnchorAttributes -> [u]
$cgmapQ :: forall u.
(forall d. Data d => d -> u) -> UiNodeAnchorAttributes -> [u]
gmapQr :: (r' -> r -> r)
-> r
-> (forall d. Data d => d -> r')
-> UiNodeAnchorAttributes
-> r
$cgmapQr :: forall r r'.
(r' -> r -> r)
-> r
-> (forall d. Data d => d -> r')
-> UiNodeAnchorAttributes
-> r
gmapQl :: (r -> r' -> r)
-> r
-> (forall d. Data d => d -> r')
-> UiNodeAnchorAttributes
-> r
$cgmapQl :: forall r r'.
(r -> r' -> r)
-> r
-> (forall d. Data d => d -> r')
-> UiNodeAnchorAttributes
-> r
gmapT :: (forall b. Data b => b -> b)
-> UiNodeAnchorAttributes -> UiNodeAnchorAttributes
$cgmapT :: (forall b. Data b => b -> b)
-> UiNodeAnchorAttributes -> UiNodeAnchorAttributes
dataCast2 :: (forall d e. (Data d, Data e) => c (t d e))
-> Maybe (c UiNodeAnchorAttributes)
$cdataCast2 :: forall (t :: * -> * -> *) (c :: * -> *).
Typeable t =>
(forall d e. (Data d, Data e) => c (t d e))
-> Maybe (c UiNodeAnchorAttributes)
dataCast1 :: (forall d. Data d => c (t d)) -> Maybe (c UiNodeAnchorAttributes)
$cdataCast1 :: forall (t :: * -> *) (c :: * -> *).
Typeable t =>
(forall d. Data d => c (t d)) -> Maybe (c UiNodeAnchorAttributes)
dataTypeOf :: UiNodeAnchorAttributes -> DataType
$cdataTypeOf :: UiNodeAnchorAttributes -> DataType
toConstr :: UiNodeAnchorAttributes -> Constr
$ctoConstr :: UiNodeAnchorAttributes -> Constr
gunfold :: (forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c UiNodeAnchorAttributes
$cgunfold :: forall (c :: * -> *).
(forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c UiNodeAnchorAttributes
gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g)
-> UiNodeAnchorAttributes
-> c UiNodeAnchorAttributes
$cgfoldl :: forall (c :: * -> *).
(forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g)
-> UiNodeAnchorAttributes
-> c UiNodeAnchorAttributes
$cp1Data :: Typeable UiNodeAnchorAttributes
Data)

instance FromJSON UiNodeAnchorAttributes

instance ToJSON UiNodeAnchorAttributes where
  toEncoding :: UiNodeAnchorAttributes -> Encoding
toEncoding = Options -> UiNodeAnchorAttributes -> Encoding
forall a.
(Generic a, GToJSON' Encoding Zero (Rep a)) =>
Options -> a -> Encoding
genericToEncoding Options
defaultOptions

data UiNodeAttributes = UiNodeAttributes
  { -- | Sets the input's disabled field to true or false.
    UiNodeAttributes -> Bool
disabled :: Bool,
    UiNodeAttributes -> Maybe UiText
label :: Maybe UiText,
    -- | The input's element name.
    UiNodeAttributes -> Text
name :: Text,
    -- | NodeType represents this node's types. It is a mirror of `node.type` and is primarily used to allow compatibility with OpenAPI 3.0. In this struct it technically always is \"script\".
    UiNodeAttributes -> Text
node_type :: Text,
    -- | OnClick may contain javascript which should be executed on click. This is primarily used for WebAuthn.
    UiNodeAttributes -> Maybe Text
onclick :: Maybe Text,
    -- | The input's pattern.
    UiNodeAttributes -> Maybe Text
_pattern :: Maybe Text,
    -- | Mark this input field as required.
    UiNodeAttributes -> Maybe Bool
required :: Maybe Bool,
    -- | The script MIME type
    UiNodeAttributes -> Text
_type :: Text,
    -- | The input's value.
    UiNodeAttributes -> Maybe Value
value :: Maybe Value,
    -- | A unique identifier
    UiNodeAttributes -> Text
id :: Text,
    UiNodeAttributes -> UiText
text :: UiText,
    -- | Height of the image
    UiNodeAttributes -> Integer
height :: Integer,
    -- | The script source
    UiNodeAttributes -> Text
src :: Text,
    -- | Width of the image
    UiNodeAttributes -> Integer
width :: Integer,
    -- | The link's href (destination) URL.  format: uri
    UiNodeAttributes -> Text
href :: Text,
    UiNodeAttributes -> UiText
title :: UiText,
    -- | The script async type
    UiNodeAttributes -> Bool
async :: Bool,
    -- | The script cross origin policy
    UiNodeAttributes -> Text
crossorigin :: Text,
    -- | The script's integrity hash
    UiNodeAttributes -> Text
integrity :: Text,
    -- | Nonce for CSP  A nonce you may want to use to improve your Content Security Policy. You do not have to use this value but if you want to improve your CSP policies you may use it. You can also choose to use your own nonce value!
    UiNodeAttributes -> Text
nonce :: Text,
    -- | The script referrer policy
    UiNodeAttributes -> Text
referrerpolicy :: Text
  }
  deriving stock (Int -> UiNodeAttributes -> ShowS
[UiNodeAttributes] -> ShowS
UiNodeAttributes -> String
(Int -> UiNodeAttributes -> ShowS)
-> (UiNodeAttributes -> String)
-> ([UiNodeAttributes] -> ShowS)
-> Show UiNodeAttributes
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [UiNodeAttributes] -> ShowS
$cshowList :: [UiNodeAttributes] -> ShowS
show :: UiNodeAttributes -> String
$cshow :: UiNodeAttributes -> String
showsPrec :: Int -> UiNodeAttributes -> ShowS
$cshowsPrec :: Int -> UiNodeAttributes -> ShowS
Show, UiNodeAttributes -> UiNodeAttributes -> Bool
(UiNodeAttributes -> UiNodeAttributes -> Bool)
-> (UiNodeAttributes -> UiNodeAttributes -> Bool)
-> Eq UiNodeAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: UiNodeAttributes -> UiNodeAttributes -> Bool
$c/= :: UiNodeAttributes -> UiNodeAttributes -> Bool
== :: UiNodeAttributes -> UiNodeAttributes -> Bool
$c== :: UiNodeAttributes -> UiNodeAttributes -> Bool
Eq, (forall x. UiNodeAttributes -> Rep UiNodeAttributes x)
-> (forall x. Rep UiNodeAttributes x -> UiNodeAttributes)
-> Generic UiNodeAttributes
forall x. Rep UiNodeAttributes x -> UiNodeAttributes
forall x. UiNodeAttributes -> Rep UiNodeAttributes x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep UiNodeAttributes x -> UiNodeAttributes
$cfrom :: forall x. UiNodeAttributes -> Rep UiNodeAttributes x
Generic, Typeable UiNodeAttributes
DataType
Constr
Typeable UiNodeAttributes
-> (forall (c :: * -> *).
    (forall d b. Data d => c (d -> b) -> d -> c b)
    -> (forall g. g -> c g) -> UiNodeAttributes -> c UiNodeAttributes)
-> (forall (c :: * -> *).
    (forall b r. Data b => c (b -> r) -> c r)
    -> (forall r. r -> c r) -> Constr -> c UiNodeAttributes)
-> (UiNodeAttributes -> Constr)
-> (UiNodeAttributes -> DataType)
-> (forall (t :: * -> *) (c :: * -> *).
    Typeable t =>
    (forall d. Data d => c (t d)) -> Maybe (c UiNodeAttributes))
-> (forall (t :: * -> * -> *) (c :: * -> *).
    Typeable t =>
    (forall d e. (Data d, Data e) => c (t d e))
    -> Maybe (c UiNodeAttributes))
-> ((forall b. Data b => b -> b)
    -> UiNodeAttributes -> UiNodeAttributes)
-> (forall r r'.
    (r -> r' -> r)
    -> r -> (forall d. Data d => d -> r') -> UiNodeAttributes -> r)
-> (forall r r'.
    (r' -> r -> r)
    -> r -> (forall d. Data d => d -> r') -> UiNodeAttributes -> r)
-> (forall u.
    (forall d. Data d => d -> u) -> UiNodeAttributes -> [u])
-> (forall u.
    Int -> (forall d. Data d => d -> u) -> UiNodeAttributes -> u)
-> (forall (m :: * -> *).
    Monad m =>
    (forall d. Data d => d -> m d)
    -> UiNodeAttributes -> m UiNodeAttributes)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d)
    -> UiNodeAttributes -> m UiNodeAttributes)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d)
    -> UiNodeAttributes -> m UiNodeAttributes)
-> Data UiNodeAttributes
UiNodeAttributes -> DataType
UiNodeAttributes -> Constr
(forall b. Data b => b -> b)
-> UiNodeAttributes -> UiNodeAttributes
(forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g) -> UiNodeAttributes -> c UiNodeAttributes
(forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c UiNodeAttributes
forall a.
Typeable a
-> (forall (c :: * -> *).
    (forall d b. Data d => c (d -> b) -> d -> c b)
    -> (forall g. g -> c g) -> a -> c a)
-> (forall (c :: * -> *).
    (forall b r. Data b => c (b -> r) -> c r)
    -> (forall r. r -> c r) -> Constr -> c a)
-> (a -> Constr)
-> (a -> DataType)
-> (forall (t :: * -> *) (c :: * -> *).
    Typeable t =>
    (forall d. Data d => c (t d)) -> Maybe (c a))
-> (forall (t :: * -> * -> *) (c :: * -> *).
    Typeable t =>
    (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c a))
-> ((forall b. Data b => b -> b) -> a -> a)
-> (forall r r'.
    (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> a -> r)
-> (forall r r'.
    (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> a -> r)
-> (forall u. (forall d. Data d => d -> u) -> a -> [u])
-> (forall u. Int -> (forall d. Data d => d -> u) -> a -> u)
-> (forall (m :: * -> *).
    Monad m =>
    (forall d. Data d => d -> m d) -> a -> m a)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d) -> a -> m a)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d) -> a -> m a)
-> Data a
forall u.
Int -> (forall d. Data d => d -> u) -> UiNodeAttributes -> u
forall u. (forall d. Data d => d -> u) -> UiNodeAttributes -> [u]
forall r r'.
(r -> r' -> r)
-> r -> (forall d. Data d => d -> r') -> UiNodeAttributes -> r
forall r r'.
(r' -> r -> r)
-> r -> (forall d. Data d => d -> r') -> UiNodeAttributes -> r
forall (m :: * -> *).
Monad m =>
(forall d. Data d => d -> m d)
-> UiNodeAttributes -> m UiNodeAttributes
forall (m :: * -> *).
MonadPlus m =>
(forall d. Data d => d -> m d)
-> UiNodeAttributes -> m UiNodeAttributes
forall (c :: * -> *).
(forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c UiNodeAttributes
forall (c :: * -> *).
(forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g) -> UiNodeAttributes -> c UiNodeAttributes
forall (t :: * -> *) (c :: * -> *).
Typeable t =>
(forall d. Data d => c (t d)) -> Maybe (c UiNodeAttributes)
forall (t :: * -> * -> *) (c :: * -> *).
Typeable t =>
(forall d e. (Data d, Data e) => c (t d e))
-> Maybe (c UiNodeAttributes)
$cUiNodeAttributes :: Constr
$tUiNodeAttributes :: DataType
gmapMo :: (forall d. Data d => d -> m d)
-> UiNodeAttributes -> m UiNodeAttributes
$cgmapMo :: forall (m :: * -> *).
MonadPlus m =>
(forall d. Data d => d -> m d)
-> UiNodeAttributes -> m UiNodeAttributes
gmapMp :: (forall d. Data d => d -> m d)
-> UiNodeAttributes -> m UiNodeAttributes
$cgmapMp :: forall (m :: * -> *).
MonadPlus m =>
(forall d. Data d => d -> m d)
-> UiNodeAttributes -> m UiNodeAttributes
gmapM :: (forall d. Data d => d -> m d)
-> UiNodeAttributes -> m UiNodeAttributes
$cgmapM :: forall (m :: * -> *).
Monad m =>
(forall d. Data d => d -> m d)
-> UiNodeAttributes -> m UiNodeAttributes
gmapQi :: Int -> (forall d. Data d => d -> u) -> UiNodeAttributes -> u
$cgmapQi :: forall u.
Int -> (forall d. Data d => d -> u) -> UiNodeAttributes -> u
gmapQ :: (forall d. Data d => d -> u) -> UiNodeAttributes -> [u]
$cgmapQ :: forall u. (forall d. Data d => d -> u) -> UiNodeAttributes -> [u]
gmapQr :: (r' -> r -> r)
-> r -> (forall d. Data d => d -> r') -> UiNodeAttributes -> r
$cgmapQr :: forall r r'.
(r' -> r -> r)
-> r -> (forall d. Data d => d -> r') -> UiNodeAttributes -> r
gmapQl :: (r -> r' -> r)
-> r -> (forall d. Data d => d -> r') -> UiNodeAttributes -> r
$cgmapQl :: forall r r'.
(r -> r' -> r)
-> r -> (forall d. Data d => d -> r') -> UiNodeAttributes -> r
gmapT :: (forall b. Data b => b -> b)
-> UiNodeAttributes -> UiNodeAttributes
$cgmapT :: (forall b. Data b => b -> b)
-> UiNodeAttributes -> UiNodeAttributes
dataCast2 :: (forall d e. (Data d, Data e) => c (t d e))
-> Maybe (c UiNodeAttributes)
$cdataCast2 :: forall (t :: * -> * -> *) (c :: * -> *).
Typeable t =>
(forall d e. (Data d, Data e) => c (t d e))
-> Maybe (c UiNodeAttributes)
dataCast1 :: (forall d. Data d => c (t d)) -> Maybe (c UiNodeAttributes)
$cdataCast1 :: forall (t :: * -> *) (c :: * -> *).
Typeable t =>
(forall d. Data d => c (t d)) -> Maybe (c UiNodeAttributes)
dataTypeOf :: UiNodeAttributes -> DataType
$cdataTypeOf :: UiNodeAttributes -> DataType
toConstr :: UiNodeAttributes -> Constr
$ctoConstr :: UiNodeAttributes -> Constr
gunfold :: (forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c UiNodeAttributes
$cgunfold :: forall (c :: * -> *).
(forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c UiNodeAttributes
gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g) -> UiNodeAttributes -> c UiNodeAttributes
$cgfoldl :: forall (c :: * -> *).
(forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g) -> UiNodeAttributes -> c UiNodeAttributes
$cp1Data :: Typeable UiNodeAttributes
Data)

instance FromJSON UiNodeAttributes where
  parseJSON :: Value -> Parser UiNodeAttributes
parseJSON = Options -> Value -> Parser UiNodeAttributes
forall a.
(Generic a, GFromJSON Zero (Rep a)) =>
Options -> Value -> Parser a
genericParseJSON Options
customOptions

instance ToJSON UiNodeAttributes where
  toJSON :: UiNodeAttributes -> Value
toJSON = Options -> UiNodeAttributes -> Value
forall a.
(Generic a, GToJSON' Value Zero (Rep a)) =>
Options -> a -> Value
genericToJSON Options
customOptions
  toEncoding :: UiNodeAttributes -> Encoding
toEncoding = Options -> UiNodeAttributes -> Encoding
forall a.
(Generic a, GToJSON' Encoding Zero (Rep a)) =>
Options -> a -> Encoding
genericToEncoding Options
customOptions

data UiNodeImageAttributes = UiNodeImageAttributes
  { -- | Height of the image
    UiNodeImageAttributes -> Integer
height :: Integer,
    -- | A unique identifier
    UiNodeImageAttributes -> Text
id :: Text,
    -- | NodeType represents this node's types. It is a mirror of `node.type` and is primarily used to allow compatibility with OpenAPI 3.0.  In this struct it technically always is \"img\".
    UiNodeImageAttributes -> Text
node_type :: Text,
    -- | The image's source URL.  format: uri
    UiNodeImageAttributes -> Text
src :: Text,
    -- | Width of the image
    UiNodeImageAttributes -> Integer
width :: Integer
  }
  deriving stock (Int -> UiNodeImageAttributes -> ShowS
[UiNodeImageAttributes] -> ShowS
UiNodeImageAttributes -> String
(Int -> UiNodeImageAttributes -> ShowS)
-> (UiNodeImageAttributes -> String)
-> ([UiNodeImageAttributes] -> ShowS)
-> Show UiNodeImageAttributes
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [UiNodeImageAttributes] -> ShowS
$cshowList :: [UiNodeImageAttributes] -> ShowS
show :: UiNodeImageAttributes -> String
$cshow :: UiNodeImageAttributes -> String
showsPrec :: Int -> UiNodeImageAttributes -> ShowS
$cshowsPrec :: Int -> UiNodeImageAttributes -> ShowS
Show, UiNodeImageAttributes -> UiNodeImageAttributes -> Bool
(UiNodeImageAttributes -> UiNodeImageAttributes -> Bool)
-> (UiNodeImageAttributes -> UiNodeImageAttributes -> Bool)
-> Eq UiNodeImageAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: UiNodeImageAttributes -> UiNodeImageAttributes -> Bool
$c/= :: UiNodeImageAttributes -> UiNodeImageAttributes -> Bool
== :: UiNodeImageAttributes -> UiNodeImageAttributes -> Bool
$c== :: UiNodeImageAttributes -> UiNodeImageAttributes -> Bool
Eq, (forall x. UiNodeImageAttributes -> Rep UiNodeImageAttributes x)
-> (forall x. Rep UiNodeImageAttributes x -> UiNodeImageAttributes)
-> Generic UiNodeImageAttributes
forall x. Rep UiNodeImageAttributes x -> UiNodeImageAttributes
forall x. UiNodeImageAttributes -> Rep UiNodeImageAttributes x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep UiNodeImageAttributes x -> UiNodeImageAttributes
$cfrom :: forall x. UiNodeImageAttributes -> Rep UiNodeImageAttributes x
Generic, Typeable UiNodeImageAttributes
DataType
Constr
Typeable UiNodeImageAttributes
-> (forall (c :: * -> *).
    (forall d b. Data d => c (d -> b) -> d -> c b)
    -> (forall g. g -> c g)
    -> UiNodeImageAttributes
    -> c UiNodeImageAttributes)
-> (forall (c :: * -> *).
    (forall b r. Data b => c (b -> r) -> c r)
    -> (forall r. r -> c r) -> Constr -> c UiNodeImageAttributes)
-> (UiNodeImageAttributes -> Constr)
-> (UiNodeImageAttributes -> DataType)
-> (forall (t :: * -> *) (c :: * -> *).
    Typeable t =>
    (forall d. Data d => c (t d)) -> Maybe (c UiNodeImageAttributes))
-> (forall (t :: * -> * -> *) (c :: * -> *).
    Typeable t =>
    (forall d e. (Data d, Data e) => c (t d e))
    -> Maybe (c UiNodeImageAttributes))
-> ((forall b. Data b => b -> b)
    -> UiNodeImageAttributes -> UiNodeImageAttributes)
-> (forall r r'.
    (r -> r' -> r)
    -> r
    -> (forall d. Data d => d -> r')
    -> UiNodeImageAttributes
    -> r)
-> (forall r r'.
    (r' -> r -> r)
    -> r
    -> (forall d. Data d => d -> r')
    -> UiNodeImageAttributes
    -> r)
-> (forall u.
    (forall d. Data d => d -> u) -> UiNodeImageAttributes -> [u])
-> (forall u.
    Int -> (forall d. Data d => d -> u) -> UiNodeImageAttributes -> u)
-> (forall (m :: * -> *).
    Monad m =>
    (forall d. Data d => d -> m d)
    -> UiNodeImageAttributes -> m UiNodeImageAttributes)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d)
    -> UiNodeImageAttributes -> m UiNodeImageAttributes)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d)
    -> UiNodeImageAttributes -> m UiNodeImageAttributes)
-> Data UiNodeImageAttributes
UiNodeImageAttributes -> DataType
UiNodeImageAttributes -> Constr
(forall b. Data b => b -> b)
-> UiNodeImageAttributes -> UiNodeImageAttributes
(forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g)
-> UiNodeImageAttributes
-> c UiNodeImageAttributes
(forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c UiNodeImageAttributes
forall a.
Typeable a
-> (forall (c :: * -> *).
    (forall d b. Data d => c (d -> b) -> d -> c b)
    -> (forall g. g -> c g) -> a -> c a)
-> (forall (c :: * -> *).
    (forall b r. Data b => c (b -> r) -> c r)
    -> (forall r. r -> c r) -> Constr -> c a)
-> (a -> Constr)
-> (a -> DataType)
-> (forall (t :: * -> *) (c :: * -> *).
    Typeable t =>
    (forall d. Data d => c (t d)) -> Maybe (c a))
-> (forall (t :: * -> * -> *) (c :: * -> *).
    Typeable t =>
    (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c a))
-> ((forall b. Data b => b -> b) -> a -> a)
-> (forall r r'.
    (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> a -> r)
-> (forall r r'.
    (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> a -> r)
-> (forall u. (forall d. Data d => d -> u) -> a -> [u])
-> (forall u. Int -> (forall d. Data d => d -> u) -> a -> u)
-> (forall (m :: * -> *).
    Monad m =>
    (forall d. Data d => d -> m d) -> a -> m a)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d) -> a -> m a)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d) -> a -> m a)
-> Data a
forall u.
Int -> (forall d. Data d => d -> u) -> UiNodeImageAttributes -> u
forall u.
(forall d. Data d => d -> u) -> UiNodeImageAttributes -> [u]
forall r r'.
(r -> r' -> r)
-> r -> (forall d. Data d => d -> r') -> UiNodeImageAttributes -> r
forall r r'.
(r' -> r -> r)
-> r -> (forall d. Data d => d -> r') -> UiNodeImageAttributes -> r
forall (m :: * -> *).
Monad m =>
(forall d. Data d => d -> m d)
-> UiNodeImageAttributes -> m UiNodeImageAttributes
forall (m :: * -> *).
MonadPlus m =>
(forall d. Data d => d -> m d)
-> UiNodeImageAttributes -> m UiNodeImageAttributes
forall (c :: * -> *).
(forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c UiNodeImageAttributes
forall (c :: * -> *).
(forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g)
-> UiNodeImageAttributes
-> c UiNodeImageAttributes
forall (t :: * -> *) (c :: * -> *).
Typeable t =>
(forall d. Data d => c (t d)) -> Maybe (c UiNodeImageAttributes)
forall (t :: * -> * -> *) (c :: * -> *).
Typeable t =>
(forall d e. (Data d, Data e) => c (t d e))
-> Maybe (c UiNodeImageAttributes)
$cUiNodeImageAttributes :: Constr
$tUiNodeImageAttributes :: DataType
gmapMo :: (forall d. Data d => d -> m d)
-> UiNodeImageAttributes -> m UiNodeImageAttributes
$cgmapMo :: forall (m :: * -> *).
MonadPlus m =>
(forall d. Data d => d -> m d)
-> UiNodeImageAttributes -> m UiNodeImageAttributes
gmapMp :: (forall d. Data d => d -> m d)
-> UiNodeImageAttributes -> m UiNodeImageAttributes
$cgmapMp :: forall (m :: * -> *).
MonadPlus m =>
(forall d. Data d => d -> m d)
-> UiNodeImageAttributes -> m UiNodeImageAttributes
gmapM :: (forall d. Data d => d -> m d)
-> UiNodeImageAttributes -> m UiNodeImageAttributes
$cgmapM :: forall (m :: * -> *).
Monad m =>
(forall d. Data d => d -> m d)
-> UiNodeImageAttributes -> m UiNodeImageAttributes
gmapQi :: Int -> (forall d. Data d => d -> u) -> UiNodeImageAttributes -> u
$cgmapQi :: forall u.
Int -> (forall d. Data d => d -> u) -> UiNodeImageAttributes -> u
gmapQ :: (forall d. Data d => d -> u) -> UiNodeImageAttributes -> [u]
$cgmapQ :: forall u.
(forall d. Data d => d -> u) -> UiNodeImageAttributes -> [u]
gmapQr :: (r' -> r -> r)
-> r -> (forall d. Data d => d -> r') -> UiNodeImageAttributes -> r
$cgmapQr :: forall r r'.
(r' -> r -> r)
-> r -> (forall d. Data d => d -> r') -> UiNodeImageAttributes -> r
gmapQl :: (r -> r' -> r)
-> r -> (forall d. Data d => d -> r') -> UiNodeImageAttributes -> r
$cgmapQl :: forall r r'.
(r -> r' -> r)
-> r -> (forall d. Data d => d -> r') -> UiNodeImageAttributes -> r
gmapT :: (forall b. Data b => b -> b)
-> UiNodeImageAttributes -> UiNodeImageAttributes
$cgmapT :: (forall b. Data b => b -> b)
-> UiNodeImageAttributes -> UiNodeImageAttributes
dataCast2 :: (forall d e. (Data d, Data e) => c (t d e))
-> Maybe (c UiNodeImageAttributes)
$cdataCast2 :: forall (t :: * -> * -> *) (c :: * -> *).
Typeable t =>
(forall d e. (Data d, Data e) => c (t d e))
-> Maybe (c UiNodeImageAttributes)
dataCast1 :: (forall d. Data d => c (t d)) -> Maybe (c UiNodeImageAttributes)
$cdataCast1 :: forall (t :: * -> *) (c :: * -> *).
Typeable t =>
(forall d. Data d => c (t d)) -> Maybe (c UiNodeImageAttributes)
dataTypeOf :: UiNodeImageAttributes -> DataType
$cdataTypeOf :: UiNodeImageAttributes -> DataType
toConstr :: UiNodeImageAttributes -> Constr
$ctoConstr :: UiNodeImageAttributes -> Constr
gunfold :: (forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c UiNodeImageAttributes
$cgunfold :: forall (c :: * -> *).
(forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c UiNodeImageAttributes
gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g)
-> UiNodeImageAttributes
-> c UiNodeImageAttributes
$cgfoldl :: forall (c :: * -> *).
(forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g)
-> UiNodeImageAttributes
-> c UiNodeImageAttributes
$cp1Data :: Typeable UiNodeImageAttributes
Data)

instance FromJSON UiNodeImageAttributes

instance ToJSON UiNodeImageAttributes where
  toEncoding :: UiNodeImageAttributes -> Encoding
toEncoding = Options -> UiNodeImageAttributes -> Encoding
forall a.
(Generic a, GToJSON' Encoding Zero (Rep a)) =>
Options -> a -> Encoding
genericToEncoding Options
defaultOptions

-- | InputAttributes represents the attributes of an input node
data UiNodeInputAttributes = UiNodeInputAttributes
  { -- | Sets the input's disabled field to true or false.
    UiNodeInputAttributes -> Bool
disabled :: Bool,
    UiNodeInputAttributes -> Maybe UiText
label :: Maybe UiText,
    -- | The input's element name.
    UiNodeInputAttributes -> Text
name :: Text,
    -- | NodeType represents this node's types. It is a mirror of `node.type` and is primarily used to allow compatibility with OpenAPI 3.0.  In this struct it technically always is \"input\".
    UiNodeInputAttributes -> Text
node_type :: Text,
    -- | OnClick may contain javascript which should be executed on click. This is primarily used for WebAuthn.
    UiNodeInputAttributes -> Maybe Text
onclick :: Maybe Text,
    -- | The input's pattern.
    UiNodeInputAttributes -> Maybe Text
_pattern :: Maybe Text,
    -- | Mark this input field as required.
    UiNodeInputAttributes -> Maybe Bool
required :: Maybe Bool,
    UiNodeInputAttributes -> Text
_type :: Text,
    -- | The input's value.
    UiNodeInputAttributes -> Maybe Value
value :: Maybe Value
  }
  deriving stock (Int -> UiNodeInputAttributes -> ShowS
[UiNodeInputAttributes] -> ShowS
UiNodeInputAttributes -> String
(Int -> UiNodeInputAttributes -> ShowS)
-> (UiNodeInputAttributes -> String)
-> ([UiNodeInputAttributes] -> ShowS)
-> Show UiNodeInputAttributes
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [UiNodeInputAttributes] -> ShowS
$cshowList :: [UiNodeInputAttributes] -> ShowS
show :: UiNodeInputAttributes -> String
$cshow :: UiNodeInputAttributes -> String
showsPrec :: Int -> UiNodeInputAttributes -> ShowS
$cshowsPrec :: Int -> UiNodeInputAttributes -> ShowS
Show, UiNodeInputAttributes -> UiNodeInputAttributes -> Bool
(UiNodeInputAttributes -> UiNodeInputAttributes -> Bool)
-> (UiNodeInputAttributes -> UiNodeInputAttributes -> Bool)
-> Eq UiNodeInputAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: UiNodeInputAttributes -> UiNodeInputAttributes -> Bool
$c/= :: UiNodeInputAttributes -> UiNodeInputAttributes -> Bool
== :: UiNodeInputAttributes -> UiNodeInputAttributes -> Bool
$c== :: UiNodeInputAttributes -> UiNodeInputAttributes -> Bool
Eq, (forall x. UiNodeInputAttributes -> Rep UiNodeInputAttributes x)
-> (forall x. Rep UiNodeInputAttributes x -> UiNodeInputAttributes)
-> Generic UiNodeInputAttributes
forall x. Rep UiNodeInputAttributes x -> UiNodeInputAttributes
forall x. UiNodeInputAttributes -> Rep UiNodeInputAttributes x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep UiNodeInputAttributes x -> UiNodeInputAttributes
$cfrom :: forall x. UiNodeInputAttributes -> Rep UiNodeInputAttributes x
Generic, Typeable UiNodeInputAttributes
DataType
Constr
Typeable UiNodeInputAttributes
-> (forall (c :: * -> *).
    (forall d b. Data d => c (d -> b) -> d -> c b)
    -> (forall g. g -> c g)
    -> UiNodeInputAttributes
    -> c UiNodeInputAttributes)
-> (forall (c :: * -> *).
    (forall b r. Data b => c (b -> r) -> c r)
    -> (forall r. r -> c r) -> Constr -> c UiNodeInputAttributes)
-> (UiNodeInputAttributes -> Constr)
-> (UiNodeInputAttributes -> DataType)
-> (forall (t :: * -> *) (c :: * -> *).
    Typeable t =>
    (forall d. Data d => c (t d)) -> Maybe (c UiNodeInputAttributes))
-> (forall (t :: * -> * -> *) (c :: * -> *).
    Typeable t =>
    (forall d e. (Data d, Data e) => c (t d e))
    -> Maybe (c UiNodeInputAttributes))
-> ((forall b. Data b => b -> b)
    -> UiNodeInputAttributes -> UiNodeInputAttributes)
-> (forall r r'.
    (r -> r' -> r)
    -> r
    -> (forall d. Data d => d -> r')
    -> UiNodeInputAttributes
    -> r)
-> (forall r r'.
    (r' -> r -> r)
    -> r
    -> (forall d. Data d => d -> r')
    -> UiNodeInputAttributes
    -> r)
-> (forall u.
    (forall d. Data d => d -> u) -> UiNodeInputAttributes -> [u])
-> (forall u.
    Int -> (forall d. Data d => d -> u) -> UiNodeInputAttributes -> u)
-> (forall (m :: * -> *).
    Monad m =>
    (forall d. Data d => d -> m d)
    -> UiNodeInputAttributes -> m UiNodeInputAttributes)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d)
    -> UiNodeInputAttributes -> m UiNodeInputAttributes)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d)
    -> UiNodeInputAttributes -> m UiNodeInputAttributes)
-> Data UiNodeInputAttributes
UiNodeInputAttributes -> DataType
UiNodeInputAttributes -> Constr
(forall b. Data b => b -> b)
-> UiNodeInputAttributes -> UiNodeInputAttributes
(forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g)
-> UiNodeInputAttributes
-> c UiNodeInputAttributes
(forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c UiNodeInputAttributes
forall a.
Typeable a
-> (forall (c :: * -> *).
    (forall d b. Data d => c (d -> b) -> d -> c b)
    -> (forall g. g -> c g) -> a -> c a)
-> (forall (c :: * -> *).
    (forall b r. Data b => c (b -> r) -> c r)
    -> (forall r. r -> c r) -> Constr -> c a)
-> (a -> Constr)
-> (a -> DataType)
-> (forall (t :: * -> *) (c :: * -> *).
    Typeable t =>
    (forall d. Data d => c (t d)) -> Maybe (c a))
-> (forall (t :: * -> * -> *) (c :: * -> *).
    Typeable t =>
    (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c a))
-> ((forall b. Data b => b -> b) -> a -> a)
-> (forall r r'.
    (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> a -> r)
-> (forall r r'.
    (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> a -> r)
-> (forall u. (forall d. Data d => d -> u) -> a -> [u])
-> (forall u. Int -> (forall d. Data d => d -> u) -> a -> u)
-> (forall (m :: * -> *).
    Monad m =>
    (forall d. Data d => d -> m d) -> a -> m a)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d) -> a -> m a)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d) -> a -> m a)
-> Data a
forall u.
Int -> (forall d. Data d => d -> u) -> UiNodeInputAttributes -> u
forall u.
(forall d. Data d => d -> u) -> UiNodeInputAttributes -> [u]
forall r r'.
(r -> r' -> r)
-> r -> (forall d. Data d => d -> r') -> UiNodeInputAttributes -> r
forall r r'.
(r' -> r -> r)
-> r -> (forall d. Data d => d -> r') -> UiNodeInputAttributes -> r
forall (m :: * -> *).
Monad m =>
(forall d. Data d => d -> m d)
-> UiNodeInputAttributes -> m UiNodeInputAttributes
forall (m :: * -> *).
MonadPlus m =>
(forall d. Data d => d -> m d)
-> UiNodeInputAttributes -> m UiNodeInputAttributes
forall (c :: * -> *).
(forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c UiNodeInputAttributes
forall (c :: * -> *).
(forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g)
-> UiNodeInputAttributes
-> c UiNodeInputAttributes
forall (t :: * -> *) (c :: * -> *).
Typeable t =>
(forall d. Data d => c (t d)) -> Maybe (c UiNodeInputAttributes)
forall (t :: * -> * -> *) (c :: * -> *).
Typeable t =>
(forall d e. (Data d, Data e) => c (t d e))
-> Maybe (c UiNodeInputAttributes)
$cUiNodeInputAttributes :: Constr
$tUiNodeInputAttributes :: DataType
gmapMo :: (forall d. Data d => d -> m d)
-> UiNodeInputAttributes -> m UiNodeInputAttributes
$cgmapMo :: forall (m :: * -> *).
MonadPlus m =>
(forall d. Data d => d -> m d)
-> UiNodeInputAttributes -> m UiNodeInputAttributes
gmapMp :: (forall d. Data d => d -> m d)
-> UiNodeInputAttributes -> m UiNodeInputAttributes
$cgmapMp :: forall (m :: * -> *).
MonadPlus m =>
(forall d. Data d => d -> m d)
-> UiNodeInputAttributes -> m UiNodeInputAttributes
gmapM :: (forall d. Data d => d -> m d)
-> UiNodeInputAttributes -> m UiNodeInputAttributes
$cgmapM :: forall (m :: * -> *).
Monad m =>
(forall d. Data d => d -> m d)
-> UiNodeInputAttributes -> m UiNodeInputAttributes
gmapQi :: Int -> (forall d. Data d => d -> u) -> UiNodeInputAttributes -> u
$cgmapQi :: forall u.
Int -> (forall d. Data d => d -> u) -> UiNodeInputAttributes -> u
gmapQ :: (forall d. Data d => d -> u) -> UiNodeInputAttributes -> [u]
$cgmapQ :: forall u.
(forall d. Data d => d -> u) -> UiNodeInputAttributes -> [u]
gmapQr :: (r' -> r -> r)
-> r -> (forall d. Data d => d -> r') -> UiNodeInputAttributes -> r
$cgmapQr :: forall r r'.
(r' -> r -> r)
-> r -> (forall d. Data d => d -> r') -> UiNodeInputAttributes -> r
gmapQl :: (r -> r' -> r)
-> r -> (forall d. Data d => d -> r') -> UiNodeInputAttributes -> r
$cgmapQl :: forall r r'.
(r -> r' -> r)
-> r -> (forall d. Data d => d -> r') -> UiNodeInputAttributes -> r
gmapT :: (forall b. Data b => b -> b)
-> UiNodeInputAttributes -> UiNodeInputAttributes
$cgmapT :: (forall b. Data b => b -> b)
-> UiNodeInputAttributes -> UiNodeInputAttributes
dataCast2 :: (forall d e. (Data d, Data e) => c (t d e))
-> Maybe (c UiNodeInputAttributes)
$cdataCast2 :: forall (t :: * -> * -> *) (c :: * -> *).
Typeable t =>
(forall d e. (Data d, Data e) => c (t d e))
-> Maybe (c UiNodeInputAttributes)
dataCast1 :: (forall d. Data d => c (t d)) -> Maybe (c UiNodeInputAttributes)
$cdataCast1 :: forall (t :: * -> *) (c :: * -> *).
Typeable t =>
(forall d. Data d => c (t d)) -> Maybe (c UiNodeInputAttributes)
dataTypeOf :: UiNodeInputAttributes -> DataType
$cdataTypeOf :: UiNodeInputAttributes -> DataType
toConstr :: UiNodeInputAttributes -> Constr
$ctoConstr :: UiNodeInputAttributes -> Constr
gunfold :: (forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c UiNodeInputAttributes
$cgunfold :: forall (c :: * -> *).
(forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c UiNodeInputAttributes
gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g)
-> UiNodeInputAttributes
-> c UiNodeInputAttributes
$cgfoldl :: forall (c :: * -> *).
(forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g)
-> UiNodeInputAttributes
-> c UiNodeInputAttributes
$cp1Data :: Typeable UiNodeInputAttributes
Data)

instance FromJSON UiNodeInputAttributes where
  parseJSON :: Value -> Parser UiNodeInputAttributes
parseJSON = Options -> Value -> Parser UiNodeInputAttributes
forall a.
(Generic a, GFromJSON Zero (Rep a)) =>
Options -> Value -> Parser a
genericParseJSON Options
customOptions

instance ToJSON UiNodeInputAttributes where
  toJSON :: UiNodeInputAttributes -> Value
toJSON = Options -> UiNodeInputAttributes -> Value
forall a.
(Generic a, GToJSON' Value Zero (Rep a)) =>
Options -> a -> Value
genericToJSON Options
customOptions
  toEncoding :: UiNodeInputAttributes -> Encoding
toEncoding = Options -> UiNodeInputAttributes -> Encoding
forall a.
(Generic a, GToJSON' Encoding Zero (Rep a)) =>
Options -> a -> Encoding
genericToEncoding Options
customOptions

-- | This might include a label and other information that can optionally be used to render UIs.
data UiNodeMeta = UiNodeMeta
  { UiNodeMeta -> Maybe UiText
label :: Maybe UiText
  }
  deriving stock (Int -> UiNodeMeta -> ShowS
[UiNodeMeta] -> ShowS
UiNodeMeta -> String
(Int -> UiNodeMeta -> ShowS)
-> (UiNodeMeta -> String)
-> ([UiNodeMeta] -> ShowS)
-> Show UiNodeMeta
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [UiNodeMeta] -> ShowS
$cshowList :: [UiNodeMeta] -> ShowS
show :: UiNodeMeta -> String
$cshow :: UiNodeMeta -> String
showsPrec :: Int -> UiNodeMeta -> ShowS
$cshowsPrec :: Int -> UiNodeMeta -> ShowS
Show, UiNodeMeta -> UiNodeMeta -> Bool
(UiNodeMeta -> UiNodeMeta -> Bool)
-> (UiNodeMeta -> UiNodeMeta -> Bool) -> Eq UiNodeMeta
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: UiNodeMeta -> UiNodeMeta -> Bool
$c/= :: UiNodeMeta -> UiNodeMeta -> Bool
== :: UiNodeMeta -> UiNodeMeta -> Bool
$c== :: UiNodeMeta -> UiNodeMeta -> Bool
Eq, (forall x. UiNodeMeta -> Rep UiNodeMeta x)
-> (forall x. Rep UiNodeMeta x -> UiNodeMeta) -> Generic UiNodeMeta
forall x. Rep UiNodeMeta x -> UiNodeMeta
forall x. UiNodeMeta -> Rep UiNodeMeta x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep UiNodeMeta x -> UiNodeMeta
$cfrom :: forall x. UiNodeMeta -> Rep UiNodeMeta x
Generic, Typeable UiNodeMeta
DataType
Constr
Typeable UiNodeMeta
-> (forall (c :: * -> *).
    (forall d b. Data d => c (d -> b) -> d -> c b)
    -> (forall g. g -> c g) -> UiNodeMeta -> c UiNodeMeta)
-> (forall (c :: * -> *).
    (forall b r. Data b => c (b -> r) -> c r)
    -> (forall r. r -> c r) -> Constr -> c UiNodeMeta)
-> (UiNodeMeta -> Constr)
-> (UiNodeMeta -> DataType)
-> (forall (t :: * -> *) (c :: * -> *).
    Typeable t =>
    (forall d. Data d => c (t d)) -> Maybe (c UiNodeMeta))
-> (forall (t :: * -> * -> *) (c :: * -> *).
    Typeable t =>
    (forall d e. (Data d, Data e) => c (t d e))
    -> Maybe (c UiNodeMeta))
-> ((forall b. Data b => b -> b) -> UiNodeMeta -> UiNodeMeta)
-> (forall r r'.
    (r -> r' -> r)
    -> r -> (forall d. Data d => d -> r') -> UiNodeMeta -> r)
-> (forall r r'.
    (r' -> r -> r)
    -> r -> (forall d. Data d => d -> r') -> UiNodeMeta -> r)
-> (forall u. (forall d. Data d => d -> u) -> UiNodeMeta -> [u])
-> (forall u.
    Int -> (forall d. Data d => d -> u) -> UiNodeMeta -> u)
-> (forall (m :: * -> *).
    Monad m =>
    (forall d. Data d => d -> m d) -> UiNodeMeta -> m UiNodeMeta)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d) -> UiNodeMeta -> m UiNodeMeta)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d) -> UiNodeMeta -> m UiNodeMeta)
-> Data UiNodeMeta
UiNodeMeta -> DataType
UiNodeMeta -> Constr
(forall b. Data b => b -> b) -> UiNodeMeta -> UiNodeMeta
(forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g) -> UiNodeMeta -> c UiNodeMeta
(forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c UiNodeMeta
forall a.
Typeable a
-> (forall (c :: * -> *).
    (forall d b. Data d => c (d -> b) -> d -> c b)
    -> (forall g. g -> c g) -> a -> c a)
-> (forall (c :: * -> *).
    (forall b r. Data b => c (b -> r) -> c r)
    -> (forall r. r -> c r) -> Constr -> c a)
-> (a -> Constr)
-> (a -> DataType)
-> (forall (t :: * -> *) (c :: * -> *).
    Typeable t =>
    (forall d. Data d => c (t d)) -> Maybe (c a))
-> (forall (t :: * -> * -> *) (c :: * -> *).
    Typeable t =>
    (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c a))
-> ((forall b. Data b => b -> b) -> a -> a)
-> (forall r r'.
    (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> a -> r)
-> (forall r r'.
    (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> a -> r)
-> (forall u. (forall d. Data d => d -> u) -> a -> [u])
-> (forall u. Int -> (forall d. Data d => d -> u) -> a -> u)
-> (forall (m :: * -> *).
    Monad m =>
    (forall d. Data d => d -> m d) -> a -> m a)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d) -> a -> m a)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d) -> a -> m a)
-> Data a
forall u. Int -> (forall d. Data d => d -> u) -> UiNodeMeta -> u
forall u. (forall d. Data d => d -> u) -> UiNodeMeta -> [u]
forall r r'.
(r -> r' -> r)
-> r -> (forall d. Data d => d -> r') -> UiNodeMeta -> r
forall r r'.
(r' -> r -> r)
-> r -> (forall d. Data d => d -> r') -> UiNodeMeta -> r
forall (m :: * -> *).
Monad m =>
(forall d. Data d => d -> m d) -> UiNodeMeta -> m UiNodeMeta
forall (m :: * -> *).
MonadPlus m =>
(forall d. Data d => d -> m d) -> UiNodeMeta -> m UiNodeMeta
forall (c :: * -> *).
(forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c UiNodeMeta
forall (c :: * -> *).
(forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g) -> UiNodeMeta -> c UiNodeMeta
forall (t :: * -> *) (c :: * -> *).
Typeable t =>
(forall d. Data d => c (t d)) -> Maybe (c UiNodeMeta)
forall (t :: * -> * -> *) (c :: * -> *).
Typeable t =>
(forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c UiNodeMeta)
$cUiNodeMeta :: Constr
$tUiNodeMeta :: DataType
gmapMo :: (forall d. Data d => d -> m d) -> UiNodeMeta -> m UiNodeMeta
$cgmapMo :: forall (m :: * -> *).
MonadPlus m =>
(forall d. Data d => d -> m d) -> UiNodeMeta -> m UiNodeMeta
gmapMp :: (forall d. Data d => d -> m d) -> UiNodeMeta -> m UiNodeMeta
$cgmapMp :: forall (m :: * -> *).
MonadPlus m =>
(forall d. Data d => d -> m d) -> UiNodeMeta -> m UiNodeMeta
gmapM :: (forall d. Data d => d -> m d) -> UiNodeMeta -> m UiNodeMeta
$cgmapM :: forall (m :: * -> *).
Monad m =>
(forall d. Data d => d -> m d) -> UiNodeMeta -> m UiNodeMeta
gmapQi :: Int -> (forall d. Data d => d -> u) -> UiNodeMeta -> u
$cgmapQi :: forall u. Int -> (forall d. Data d => d -> u) -> UiNodeMeta -> u
gmapQ :: (forall d. Data d => d -> u) -> UiNodeMeta -> [u]
$cgmapQ :: forall u. (forall d. Data d => d -> u) -> UiNodeMeta -> [u]
gmapQr :: (r' -> r -> r)
-> r -> (forall d. Data d => d -> r') -> UiNodeMeta -> r
$cgmapQr :: forall r r'.
(r' -> r -> r)
-> r -> (forall d. Data d => d -> r') -> UiNodeMeta -> r
gmapQl :: (r -> r' -> r)
-> r -> (forall d. Data d => d -> r') -> UiNodeMeta -> r
$cgmapQl :: forall r r'.
(r -> r' -> r)
-> r -> (forall d. Data d => d -> r') -> UiNodeMeta -> r
gmapT :: (forall b. Data b => b -> b) -> UiNodeMeta -> UiNodeMeta
$cgmapT :: (forall b. Data b => b -> b) -> UiNodeMeta -> UiNodeMeta
dataCast2 :: (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c UiNodeMeta)
$cdataCast2 :: forall (t :: * -> * -> *) (c :: * -> *).
Typeable t =>
(forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c UiNodeMeta)
dataCast1 :: (forall d. Data d => c (t d)) -> Maybe (c UiNodeMeta)
$cdataCast1 :: forall (t :: * -> *) (c :: * -> *).
Typeable t =>
(forall d. Data d => c (t d)) -> Maybe (c UiNodeMeta)
dataTypeOf :: UiNodeMeta -> DataType
$cdataTypeOf :: UiNodeMeta -> DataType
toConstr :: UiNodeMeta -> Constr
$ctoConstr :: UiNodeMeta -> Constr
gunfold :: (forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c UiNodeMeta
$cgunfold :: forall (c :: * -> *).
(forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c UiNodeMeta
gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g) -> UiNodeMeta -> c UiNodeMeta
$cgfoldl :: forall (c :: * -> *).
(forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g) -> UiNodeMeta -> c UiNodeMeta
$cp1Data :: Typeable UiNodeMeta
Data)

instance FromJSON UiNodeMeta

instance ToJSON UiNodeMeta where
  toEncoding :: UiNodeMeta -> Encoding
toEncoding = Options -> UiNodeMeta -> Encoding
forall a.
(Generic a, GToJSON' Encoding Zero (Rep a)) =>
Options -> a -> Encoding
genericToEncoding Options
defaultOptions

data UiNodeScriptAttributes = UiNodeScriptAttributes
  { -- | The script async type
    UiNodeScriptAttributes -> Bool
async :: Bool,
    -- | The script cross origin policy
    UiNodeScriptAttributes -> Text
crossorigin :: Text,
    -- | A unique identifier
    UiNodeScriptAttributes -> Text
id :: Text,
    -- | The script's integrity hash
    UiNodeScriptAttributes -> Text
integrity :: Text,
    -- | NodeType represents this node's types. It is a mirror of `node.type` and is primarily used to allow compatibility with OpenAPI 3.0. In this struct it technically always is \"script\".
    UiNodeScriptAttributes -> Text
node_type :: Text,
    -- | Nonce for CSP  A nonce you may want to use to improve your Content Security Policy. You do not have to use this value but if you want to improve your CSP policies you may use it. You can also choose to use your own nonce value!
    UiNodeScriptAttributes -> Text
nonce :: Text,
    -- | The script referrer policy
    UiNodeScriptAttributes -> Text
referrerpolicy :: Text,
    -- | The script source
    UiNodeScriptAttributes -> Text
src :: Text,
    -- | The script MIME type
    UiNodeScriptAttributes -> Text
_type :: Text
  }
  deriving stock (Int -> UiNodeScriptAttributes -> ShowS
[UiNodeScriptAttributes] -> ShowS
UiNodeScriptAttributes -> String
(Int -> UiNodeScriptAttributes -> ShowS)
-> (UiNodeScriptAttributes -> String)
-> ([UiNodeScriptAttributes] -> ShowS)
-> Show UiNodeScriptAttributes
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [UiNodeScriptAttributes] -> ShowS
$cshowList :: [UiNodeScriptAttributes] -> ShowS
show :: UiNodeScriptAttributes -> String
$cshow :: UiNodeScriptAttributes -> String
showsPrec :: Int -> UiNodeScriptAttributes -> ShowS
$cshowsPrec :: Int -> UiNodeScriptAttributes -> ShowS
Show, UiNodeScriptAttributes -> UiNodeScriptAttributes -> Bool
(UiNodeScriptAttributes -> UiNodeScriptAttributes -> Bool)
-> (UiNodeScriptAttributes -> UiNodeScriptAttributes -> Bool)
-> Eq UiNodeScriptAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: UiNodeScriptAttributes -> UiNodeScriptAttributes -> Bool
$c/= :: UiNodeScriptAttributes -> UiNodeScriptAttributes -> Bool
== :: UiNodeScriptAttributes -> UiNodeScriptAttributes -> Bool
$c== :: UiNodeScriptAttributes -> UiNodeScriptAttributes -> Bool
Eq, (forall x. UiNodeScriptAttributes -> Rep UiNodeScriptAttributes x)
-> (forall x.
    Rep UiNodeScriptAttributes x -> UiNodeScriptAttributes)
-> Generic UiNodeScriptAttributes
forall x. Rep UiNodeScriptAttributes x -> UiNodeScriptAttributes
forall x. UiNodeScriptAttributes -> Rep UiNodeScriptAttributes x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep UiNodeScriptAttributes x -> UiNodeScriptAttributes
$cfrom :: forall x. UiNodeScriptAttributes -> Rep UiNodeScriptAttributes x
Generic, Typeable UiNodeScriptAttributes
DataType
Constr
Typeable UiNodeScriptAttributes
-> (forall (c :: * -> *).
    (forall d b. Data d => c (d -> b) -> d -> c b)
    -> (forall g. g -> c g)
    -> UiNodeScriptAttributes
    -> c UiNodeScriptAttributes)
-> (forall (c :: * -> *).
    (forall b r. Data b => c (b -> r) -> c r)
    -> (forall r. r -> c r) -> Constr -> c UiNodeScriptAttributes)
-> (UiNodeScriptAttributes -> Constr)
-> (UiNodeScriptAttributes -> DataType)
-> (forall (t :: * -> *) (c :: * -> *).
    Typeable t =>
    (forall d. Data d => c (t d)) -> Maybe (c UiNodeScriptAttributes))
-> (forall (t :: * -> * -> *) (c :: * -> *).
    Typeable t =>
    (forall d e. (Data d, Data e) => c (t d e))
    -> Maybe (c UiNodeScriptAttributes))
-> ((forall b. Data b => b -> b)
    -> UiNodeScriptAttributes -> UiNodeScriptAttributes)
-> (forall r r'.
    (r -> r' -> r)
    -> r
    -> (forall d. Data d => d -> r')
    -> UiNodeScriptAttributes
    -> r)
-> (forall r r'.
    (r' -> r -> r)
    -> r
    -> (forall d. Data d => d -> r')
    -> UiNodeScriptAttributes
    -> r)
-> (forall u.
    (forall d. Data d => d -> u) -> UiNodeScriptAttributes -> [u])
-> (forall u.
    Int -> (forall d. Data d => d -> u) -> UiNodeScriptAttributes -> u)
-> (forall (m :: * -> *).
    Monad m =>
    (forall d. Data d => d -> m d)
    -> UiNodeScriptAttributes -> m UiNodeScriptAttributes)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d)
    -> UiNodeScriptAttributes -> m UiNodeScriptAttributes)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d)
    -> UiNodeScriptAttributes -> m UiNodeScriptAttributes)
-> Data UiNodeScriptAttributes
UiNodeScriptAttributes -> DataType
UiNodeScriptAttributes -> Constr
(forall b. Data b => b -> b)
-> UiNodeScriptAttributes -> UiNodeScriptAttributes
(forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g)
-> UiNodeScriptAttributes
-> c UiNodeScriptAttributes
(forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c UiNodeScriptAttributes
forall a.
Typeable a
-> (forall (c :: * -> *).
    (forall d b. Data d => c (d -> b) -> d -> c b)
    -> (forall g. g -> c g) -> a -> c a)
-> (forall (c :: * -> *).
    (forall b r. Data b => c (b -> r) -> c r)
    -> (forall r. r -> c r) -> Constr -> c a)
-> (a -> Constr)
-> (a -> DataType)
-> (forall (t :: * -> *) (c :: * -> *).
    Typeable t =>
    (forall d. Data d => c (t d)) -> Maybe (c a))
-> (forall (t :: * -> * -> *) (c :: * -> *).
    Typeable t =>
    (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c a))
-> ((forall b. Data b => b -> b) -> a -> a)
-> (forall r r'.
    (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> a -> r)
-> (forall r r'.
    (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> a -> r)
-> (forall u. (forall d. Data d => d -> u) -> a -> [u])
-> (forall u. Int -> (forall d. Data d => d -> u) -> a -> u)
-> (forall (m :: * -> *).
    Monad m =>
    (forall d. Data d => d -> m d) -> a -> m a)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d) -> a -> m a)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d) -> a -> m a)
-> Data a
forall u.
Int -> (forall d. Data d => d -> u) -> UiNodeScriptAttributes -> u
forall u.
(forall d. Data d => d -> u) -> UiNodeScriptAttributes -> [u]
forall r r'.
(r -> r' -> r)
-> r
-> (forall d. Data d => d -> r')
-> UiNodeScriptAttributes
-> r
forall r r'.
(r' -> r -> r)
-> r
-> (forall d. Data d => d -> r')
-> UiNodeScriptAttributes
-> r
forall (m :: * -> *).
Monad m =>
(forall d. Data d => d -> m d)
-> UiNodeScriptAttributes -> m UiNodeScriptAttributes
forall (m :: * -> *).
MonadPlus m =>
(forall d. Data d => d -> m d)
-> UiNodeScriptAttributes -> m UiNodeScriptAttributes
forall (c :: * -> *).
(forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c UiNodeScriptAttributes
forall (c :: * -> *).
(forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g)
-> UiNodeScriptAttributes
-> c UiNodeScriptAttributes
forall (t :: * -> *) (c :: * -> *).
Typeable t =>
(forall d. Data d => c (t d)) -> Maybe (c UiNodeScriptAttributes)
forall (t :: * -> * -> *) (c :: * -> *).
Typeable t =>
(forall d e. (Data d, Data e) => c (t d e))
-> Maybe (c UiNodeScriptAttributes)
$cUiNodeScriptAttributes :: Constr
$tUiNodeScriptAttributes :: DataType
gmapMo :: (forall d. Data d => d -> m d)
-> UiNodeScriptAttributes -> m UiNodeScriptAttributes
$cgmapMo :: forall (m :: * -> *).
MonadPlus m =>
(forall d. Data d => d -> m d)
-> UiNodeScriptAttributes -> m UiNodeScriptAttributes
gmapMp :: (forall d. Data d => d -> m d)
-> UiNodeScriptAttributes -> m UiNodeScriptAttributes
$cgmapMp :: forall (m :: * -> *).
MonadPlus m =>
(forall d. Data d => d -> m d)
-> UiNodeScriptAttributes -> m UiNodeScriptAttributes
gmapM :: (forall d. Data d => d -> m d)
-> UiNodeScriptAttributes -> m UiNodeScriptAttributes
$cgmapM :: forall (m :: * -> *).
Monad m =>
(forall d. Data d => d -> m d)
-> UiNodeScriptAttributes -> m UiNodeScriptAttributes
gmapQi :: Int -> (forall d. Data d => d -> u) -> UiNodeScriptAttributes -> u
$cgmapQi :: forall u.
Int -> (forall d. Data d => d -> u) -> UiNodeScriptAttributes -> u
gmapQ :: (forall d. Data d => d -> u) -> UiNodeScriptAttributes -> [u]
$cgmapQ :: forall u.
(forall d. Data d => d -> u) -> UiNodeScriptAttributes -> [u]
gmapQr :: (r' -> r -> r)
-> r
-> (forall d. Data d => d -> r')
-> UiNodeScriptAttributes
-> r
$cgmapQr :: forall r r'.
(r' -> r -> r)
-> r
-> (forall d. Data d => d -> r')
-> UiNodeScriptAttributes
-> r
gmapQl :: (r -> r' -> r)
-> r
-> (forall d. Data d => d -> r')
-> UiNodeScriptAttributes
-> r
$cgmapQl :: forall r r'.
(r -> r' -> r)
-> r
-> (forall d. Data d => d -> r')
-> UiNodeScriptAttributes
-> r
gmapT :: (forall b. Data b => b -> b)
-> UiNodeScriptAttributes -> UiNodeScriptAttributes
$cgmapT :: (forall b. Data b => b -> b)
-> UiNodeScriptAttributes -> UiNodeScriptAttributes
dataCast2 :: (forall d e. (Data d, Data e) => c (t d e))
-> Maybe (c UiNodeScriptAttributes)
$cdataCast2 :: forall (t :: * -> * -> *) (c :: * -> *).
Typeable t =>
(forall d e. (Data d, Data e) => c (t d e))
-> Maybe (c UiNodeScriptAttributes)
dataCast1 :: (forall d. Data d => c (t d)) -> Maybe (c UiNodeScriptAttributes)
$cdataCast1 :: forall (t :: * -> *) (c :: * -> *).
Typeable t =>
(forall d. Data d => c (t d)) -> Maybe (c UiNodeScriptAttributes)
dataTypeOf :: UiNodeScriptAttributes -> DataType
$cdataTypeOf :: UiNodeScriptAttributes -> DataType
toConstr :: UiNodeScriptAttributes -> Constr
$ctoConstr :: UiNodeScriptAttributes -> Constr
gunfold :: (forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c UiNodeScriptAttributes
$cgunfold :: forall (c :: * -> *).
(forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c UiNodeScriptAttributes
gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g)
-> UiNodeScriptAttributes
-> c UiNodeScriptAttributes
$cgfoldl :: forall (c :: * -> *).
(forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g)
-> UiNodeScriptAttributes
-> c UiNodeScriptAttributes
$cp1Data :: Typeable UiNodeScriptAttributes
Data)

instance FromJSON UiNodeScriptAttributes where
  parseJSON :: Value -> Parser UiNodeScriptAttributes
parseJSON = Options -> Value -> Parser UiNodeScriptAttributes
forall a.
(Generic a, GFromJSON Zero (Rep a)) =>
Options -> Value -> Parser a
genericParseJSON Options
customOptions

instance ToJSON UiNodeScriptAttributes where
  toJSON :: UiNodeScriptAttributes -> Value
toJSON = Options -> UiNodeScriptAttributes -> Value
forall a.
(Generic a, GToJSON' Value Zero (Rep a)) =>
Options -> a -> Value
genericToJSON Options
customOptions
  toEncoding :: UiNodeScriptAttributes -> Encoding
toEncoding = Options -> UiNodeScriptAttributes -> Encoding
forall a.
(Generic a, GToJSON' Encoding Zero (Rep a)) =>
Options -> a -> Encoding
genericToEncoding Options
customOptions

data UiNodeTextAttributes = UiNodeTextAttributes
  { -- | A unique identifier
    UiNodeTextAttributes -> Text
id :: Text,
    -- | NodeType represents this node's types. It is a mirror of `node.type` and is primarily used to allow compatibility with OpenAPI 3.0.  In this struct it technically always is \"text\".
    UiNodeTextAttributes -> Text
node_type :: Text,
    UiNodeTextAttributes -> UiText
text :: UiText
  }
  deriving stock (Int -> UiNodeTextAttributes -> ShowS
[UiNodeTextAttributes] -> ShowS
UiNodeTextAttributes -> String
(Int -> UiNodeTextAttributes -> ShowS)
-> (UiNodeTextAttributes -> String)
-> ([UiNodeTextAttributes] -> ShowS)
-> Show UiNodeTextAttributes
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [UiNodeTextAttributes] -> ShowS
$cshowList :: [UiNodeTextAttributes] -> ShowS
show :: UiNodeTextAttributes -> String
$cshow :: UiNodeTextAttributes -> String
showsPrec :: Int -> UiNodeTextAttributes -> ShowS
$cshowsPrec :: Int -> UiNodeTextAttributes -> ShowS
Show, UiNodeTextAttributes -> UiNodeTextAttributes -> Bool
(UiNodeTextAttributes -> UiNodeTextAttributes -> Bool)
-> (UiNodeTextAttributes -> UiNodeTextAttributes -> Bool)
-> Eq UiNodeTextAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: UiNodeTextAttributes -> UiNodeTextAttributes -> Bool
$c/= :: UiNodeTextAttributes -> UiNodeTextAttributes -> Bool
== :: UiNodeTextAttributes -> UiNodeTextAttributes -> Bool
$c== :: UiNodeTextAttributes -> UiNodeTextAttributes -> Bool
Eq, (forall x. UiNodeTextAttributes -> Rep UiNodeTextAttributes x)
-> (forall x. Rep UiNodeTextAttributes x -> UiNodeTextAttributes)
-> Generic UiNodeTextAttributes
forall x. Rep UiNodeTextAttributes x -> UiNodeTextAttributes
forall x. UiNodeTextAttributes -> Rep UiNodeTextAttributes x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep UiNodeTextAttributes x -> UiNodeTextAttributes
$cfrom :: forall x. UiNodeTextAttributes -> Rep UiNodeTextAttributes x
Generic, Typeable UiNodeTextAttributes
DataType
Constr
Typeable UiNodeTextAttributes
-> (forall (c :: * -> *).
    (forall d b. Data d => c (d -> b) -> d -> c b)
    -> (forall g. g -> c g)
    -> UiNodeTextAttributes
    -> c UiNodeTextAttributes)
-> (forall (c :: * -> *).
    (forall b r. Data b => c (b -> r) -> c r)
    -> (forall r. r -> c r) -> Constr -> c UiNodeTextAttributes)
-> (UiNodeTextAttributes -> Constr)
-> (UiNodeTextAttributes -> DataType)
-> (forall (t :: * -> *) (c :: * -> *).
    Typeable t =>
    (forall d. Data d => c (t d)) -> Maybe (c UiNodeTextAttributes))
-> (forall (t :: * -> * -> *) (c :: * -> *).
    Typeable t =>
    (forall d e. (Data d, Data e) => c (t d e))
    -> Maybe (c UiNodeTextAttributes))
-> ((forall b. Data b => b -> b)
    -> UiNodeTextAttributes -> UiNodeTextAttributes)
-> (forall r r'.
    (r -> r' -> r)
    -> r -> (forall d. Data d => d -> r') -> UiNodeTextAttributes -> r)
-> (forall r r'.
    (r' -> r -> r)
    -> r -> (forall d. Data d => d -> r') -> UiNodeTextAttributes -> r)
-> (forall u.
    (forall d. Data d => d -> u) -> UiNodeTextAttributes -> [u])
-> (forall u.
    Int -> (forall d. Data d => d -> u) -> UiNodeTextAttributes -> u)
-> (forall (m :: * -> *).
    Monad m =>
    (forall d. Data d => d -> m d)
    -> UiNodeTextAttributes -> m UiNodeTextAttributes)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d)
    -> UiNodeTextAttributes -> m UiNodeTextAttributes)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d)
    -> UiNodeTextAttributes -> m UiNodeTextAttributes)
-> Data UiNodeTextAttributes
UiNodeTextAttributes -> DataType
UiNodeTextAttributes -> Constr
(forall b. Data b => b -> b)
-> UiNodeTextAttributes -> UiNodeTextAttributes
(forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g)
-> UiNodeTextAttributes
-> c UiNodeTextAttributes
(forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c UiNodeTextAttributes
forall a.
Typeable a
-> (forall (c :: * -> *).
    (forall d b. Data d => c (d -> b) -> d -> c b)
    -> (forall g. g -> c g) -> a -> c a)
-> (forall (c :: * -> *).
    (forall b r. Data b => c (b -> r) -> c r)
    -> (forall r. r -> c r) -> Constr -> c a)
-> (a -> Constr)
-> (a -> DataType)
-> (forall (t :: * -> *) (c :: * -> *).
    Typeable t =>
    (forall d. Data d => c (t d)) -> Maybe (c a))
-> (forall (t :: * -> * -> *) (c :: * -> *).
    Typeable t =>
    (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c a))
-> ((forall b. Data b => b -> b) -> a -> a)
-> (forall r r'.
    (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> a -> r)
-> (forall r r'.
    (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> a -> r)
-> (forall u. (forall d. Data d => d -> u) -> a -> [u])
-> (forall u. Int -> (forall d. Data d => d -> u) -> a -> u)
-> (forall (m :: * -> *).
    Monad m =>
    (forall d. Data d => d -> m d) -> a -> m a)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d) -> a -> m a)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d) -> a -> m a)
-> Data a
forall u.
Int -> (forall d. Data d => d -> u) -> UiNodeTextAttributes -> u
forall u.
(forall d. Data d => d -> u) -> UiNodeTextAttributes -> [u]
forall r r'.
(r -> r' -> r)
-> r -> (forall d. Data d => d -> r') -> UiNodeTextAttributes -> r
forall r r'.
(r' -> r -> r)
-> r -> (forall d. Data d => d -> r') -> UiNodeTextAttributes -> r
forall (m :: * -> *).
Monad m =>
(forall d. Data d => d -> m d)
-> UiNodeTextAttributes -> m UiNodeTextAttributes
forall (m :: * -> *).
MonadPlus m =>
(forall d. Data d => d -> m d)
-> UiNodeTextAttributes -> m UiNodeTextAttributes
forall (c :: * -> *).
(forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c UiNodeTextAttributes
forall (c :: * -> *).
(forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g)
-> UiNodeTextAttributes
-> c UiNodeTextAttributes
forall (t :: * -> *) (c :: * -> *).
Typeable t =>
(forall d. Data d => c (t d)) -> Maybe (c UiNodeTextAttributes)
forall (t :: * -> * -> *) (c :: * -> *).
Typeable t =>
(forall d e. (Data d, Data e) => c (t d e))
-> Maybe (c UiNodeTextAttributes)
$cUiNodeTextAttributes :: Constr
$tUiNodeTextAttributes :: DataType
gmapMo :: (forall d. Data d => d -> m d)
-> UiNodeTextAttributes -> m UiNodeTextAttributes
$cgmapMo :: forall (m :: * -> *).
MonadPlus m =>
(forall d. Data d => d -> m d)
-> UiNodeTextAttributes -> m UiNodeTextAttributes
gmapMp :: (forall d. Data d => d -> m d)
-> UiNodeTextAttributes -> m UiNodeTextAttributes
$cgmapMp :: forall (m :: * -> *).
MonadPlus m =>
(forall d. Data d => d -> m d)
-> UiNodeTextAttributes -> m UiNodeTextAttributes
gmapM :: (forall d. Data d => d -> m d)
-> UiNodeTextAttributes -> m UiNodeTextAttributes
$cgmapM :: forall (m :: * -> *).
Monad m =>
(forall d. Data d => d -> m d)
-> UiNodeTextAttributes -> m UiNodeTextAttributes
gmapQi :: Int -> (forall d. Data d => d -> u) -> UiNodeTextAttributes -> u
$cgmapQi :: forall u.
Int -> (forall d. Data d => d -> u) -> UiNodeTextAttributes -> u
gmapQ :: (forall d. Data d => d -> u) -> UiNodeTextAttributes -> [u]
$cgmapQ :: forall u.
(forall d. Data d => d -> u) -> UiNodeTextAttributes -> [u]
gmapQr :: (r' -> r -> r)
-> r -> (forall d. Data d => d -> r') -> UiNodeTextAttributes -> r
$cgmapQr :: forall r r'.
(r' -> r -> r)
-> r -> (forall d. Data d => d -> r') -> UiNodeTextAttributes -> r
gmapQl :: (r -> r' -> r)
-> r -> (forall d. Data d => d -> r') -> UiNodeTextAttributes -> r
$cgmapQl :: forall r r'.
(r -> r' -> r)
-> r -> (forall d. Data d => d -> r') -> UiNodeTextAttributes -> r
gmapT :: (forall b. Data b => b -> b)
-> UiNodeTextAttributes -> UiNodeTextAttributes
$cgmapT :: (forall b. Data b => b -> b)
-> UiNodeTextAttributes -> UiNodeTextAttributes
dataCast2 :: (forall d e. (Data d, Data e) => c (t d e))
-> Maybe (c UiNodeTextAttributes)
$cdataCast2 :: forall (t :: * -> * -> *) (c :: * -> *).
Typeable t =>
(forall d e. (Data d, Data e) => c (t d e))
-> Maybe (c UiNodeTextAttributes)
dataCast1 :: (forall d. Data d => c (t d)) -> Maybe (c UiNodeTextAttributes)
$cdataCast1 :: forall (t :: * -> *) (c :: * -> *).
Typeable t =>
(forall d. Data d => c (t d)) -> Maybe (c UiNodeTextAttributes)
dataTypeOf :: UiNodeTextAttributes -> DataType
$cdataTypeOf :: UiNodeTextAttributes -> DataType
toConstr :: UiNodeTextAttributes -> Constr
$ctoConstr :: UiNodeTextAttributes -> Constr
gunfold :: (forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c UiNodeTextAttributes
$cgunfold :: forall (c :: * -> *).
(forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c UiNodeTextAttributes
gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g)
-> UiNodeTextAttributes
-> c UiNodeTextAttributes
$cgfoldl :: forall (c :: * -> *).
(forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g)
-> UiNodeTextAttributes
-> c UiNodeTextAttributes
$cp1Data :: Typeable UiNodeTextAttributes
Data)

instance FromJSON UiNodeTextAttributes

instance ToJSON UiNodeTextAttributes where
  toEncoding :: UiNodeTextAttributes -> Encoding
toEncoding = Options -> UiNodeTextAttributes -> Encoding
forall a.
(Generic a, GToJSON' Encoding Zero (Rep a)) =>
Options -> a -> Encoding
genericToEncoding Options
defaultOptions

data UiText = UiText
  { -- | The message's context. Useful when customizing messages.
    UiText -> Maybe Value
context :: Maybe Value,
    UiText -> Integer
id :: Integer,
    -- | The message text. Written in american english.
    UiText -> Text
text :: Text,
    UiText -> Text
_type :: Text
  }
  deriving stock (Int -> UiText -> ShowS
[UiText] -> ShowS
UiText -> String
(Int -> UiText -> ShowS)
-> (UiText -> String) -> ([UiText] -> ShowS) -> Show UiText
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [UiText] -> ShowS
$cshowList :: [UiText] -> ShowS
show :: UiText -> String
$cshow :: UiText -> String
showsPrec :: Int -> UiText -> ShowS
$cshowsPrec :: Int -> UiText -> ShowS
Show, UiText -> UiText -> Bool
(UiText -> UiText -> Bool)
-> (UiText -> UiText -> Bool) -> Eq UiText
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: UiText -> UiText -> Bool
$c/= :: UiText -> UiText -> Bool
== :: UiText -> UiText -> Bool
$c== :: UiText -> UiText -> Bool
Eq, (forall x. UiText -> Rep UiText x)
-> (forall x. Rep UiText x -> UiText) -> Generic UiText
forall x. Rep UiText x -> UiText
forall x. UiText -> Rep UiText x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep UiText x -> UiText
$cfrom :: forall x. UiText -> Rep UiText x
Generic, Typeable UiText
DataType
Constr
Typeable UiText
-> (forall (c :: * -> *).
    (forall d b. Data d => c (d -> b) -> d -> c b)
    -> (forall g. g -> c g) -> UiText -> c UiText)
-> (forall (c :: * -> *).
    (forall b r. Data b => c (b -> r) -> c r)
    -> (forall r. r -> c r) -> Constr -> c UiText)
-> (UiText -> Constr)
-> (UiText -> DataType)
-> (forall (t :: * -> *) (c :: * -> *).
    Typeable t =>
    (forall d. Data d => c (t d)) -> Maybe (c UiText))
-> (forall (t :: * -> * -> *) (c :: * -> *).
    Typeable t =>
    (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c UiText))
-> ((forall b. Data b => b -> b) -> UiText -> UiText)
-> (forall r r'.
    (r -> r' -> r)
    -> r -> (forall d. Data d => d -> r') -> UiText -> r)
-> (forall r r'.
    (r' -> r -> r)
    -> r -> (forall d. Data d => d -> r') -> UiText -> r)
-> (forall u. (forall d. Data d => d -> u) -> UiText -> [u])
-> (forall u. Int -> (forall d. Data d => d -> u) -> UiText -> u)
-> (forall (m :: * -> *).
    Monad m =>
    (forall d. Data d => d -> m d) -> UiText -> m UiText)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d) -> UiText -> m UiText)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d) -> UiText -> m UiText)
-> Data UiText
UiText -> DataType
UiText -> Constr
(forall b. Data b => b -> b) -> UiText -> UiText
(forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g) -> UiText -> c UiText
(forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c UiText
forall a.
Typeable a
-> (forall (c :: * -> *).
    (forall d b. Data d => c (d -> b) -> d -> c b)
    -> (forall g. g -> c g) -> a -> c a)
-> (forall (c :: * -> *).
    (forall b r. Data b => c (b -> r) -> c r)
    -> (forall r. r -> c r) -> Constr -> c a)
-> (a -> Constr)
-> (a -> DataType)
-> (forall (t :: * -> *) (c :: * -> *).
    Typeable t =>
    (forall d. Data d => c (t d)) -> Maybe (c a))
-> (forall (t :: * -> * -> *) (c :: * -> *).
    Typeable t =>
    (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c a))
-> ((forall b. Data b => b -> b) -> a -> a)
-> (forall r r'.
    (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> a -> r)
-> (forall r r'.
    (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> a -> r)
-> (forall u. (forall d. Data d => d -> u) -> a -> [u])
-> (forall u. Int -> (forall d. Data d => d -> u) -> a -> u)
-> (forall (m :: * -> *).
    Monad m =>
    (forall d. Data d => d -> m d) -> a -> m a)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d) -> a -> m a)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d) -> a -> m a)
-> Data a
forall u. Int -> (forall d. Data d => d -> u) -> UiText -> u
forall u. (forall d. Data d => d -> u) -> UiText -> [u]
forall r r'.
(r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> UiText -> r
forall r r'.
(r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> UiText -> r
forall (m :: * -> *).
Monad m =>
(forall d. Data d => d -> m d) -> UiText -> m UiText
forall (m :: * -> *).
MonadPlus m =>
(forall d. Data d => d -> m d) -> UiText -> m UiText
forall (c :: * -> *).
(forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c UiText
forall (c :: * -> *).
(forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g) -> UiText -> c UiText
forall (t :: * -> *) (c :: * -> *).
Typeable t =>
(forall d. Data d => c (t d)) -> Maybe (c UiText)
forall (t :: * -> * -> *) (c :: * -> *).
Typeable t =>
(forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c UiText)
$cUiText :: Constr
$tUiText :: DataType
gmapMo :: (forall d. Data d => d -> m d) -> UiText -> m UiText
$cgmapMo :: forall (m :: * -> *).
MonadPlus m =>
(forall d. Data d => d -> m d) -> UiText -> m UiText
gmapMp :: (forall d. Data d => d -> m d) -> UiText -> m UiText
$cgmapMp :: forall (m :: * -> *).
MonadPlus m =>
(forall d. Data d => d -> m d) -> UiText -> m UiText
gmapM :: (forall d. Data d => d -> m d) -> UiText -> m UiText
$cgmapM :: forall (m :: * -> *).
Monad m =>
(forall d. Data d => d -> m d) -> UiText -> m UiText
gmapQi :: Int -> (forall d. Data d => d -> u) -> UiText -> u
$cgmapQi :: forall u. Int -> (forall d. Data d => d -> u) -> UiText -> u
gmapQ :: (forall d. Data d => d -> u) -> UiText -> [u]
$cgmapQ :: forall u. (forall d. Data d => d -> u) -> UiText -> [u]
gmapQr :: (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> UiText -> r
$cgmapQr :: forall r r'.
(r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> UiText -> r
gmapQl :: (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> UiText -> r
$cgmapQl :: forall r r'.
(r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> UiText -> r
gmapT :: (forall b. Data b => b -> b) -> UiText -> UiText
$cgmapT :: (forall b. Data b => b -> b) -> UiText -> UiText
dataCast2 :: (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c UiText)
$cdataCast2 :: forall (t :: * -> * -> *) (c :: * -> *).
Typeable t =>
(forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c UiText)
dataCast1 :: (forall d. Data d => c (t d)) -> Maybe (c UiText)
$cdataCast1 :: forall (t :: * -> *) (c :: * -> *).
Typeable t =>
(forall d. Data d => c (t d)) -> Maybe (c UiText)
dataTypeOf :: UiText -> DataType
$cdataTypeOf :: UiText -> DataType
toConstr :: UiText -> Constr
$ctoConstr :: UiText -> Constr
gunfold :: (forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c UiText
$cgunfold :: forall (c :: * -> *).
(forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c UiText
gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g) -> UiText -> c UiText
$cgfoldl :: forall (c :: * -> *).
(forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g) -> UiText -> c UiText
$cp1Data :: Typeable UiText
Data)

instance FromJSON UiText where
  parseJSON :: Value -> Parser UiText
parseJSON = Options -> Value -> Parser UiText
forall a.
(Generic a, GFromJSON Zero (Rep a)) =>
Options -> Value -> Parser a
genericParseJSON Options
customOptions

instance ToJSON UiText where
  toJSON :: UiText -> Value
toJSON = Options -> UiText -> Value
forall a.
(Generic a, GToJSON' Value Zero (Rep a)) =>
Options -> a -> Value
genericToJSON Options
customOptions
  toEncoding :: UiText -> Encoding
toEncoding = Options -> UiText -> Encoding
forall a.
(Generic a, GToJSON' Encoding Zero (Rep a)) =>
Options -> a -> Encoding
genericToEncoding Options
customOptions