{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.Nimble.Types.StudioComponentSummary where
import qualified Amazonka.Core as Core
import qualified Amazonka.Lens as Lens
import Amazonka.Nimble.Types.StudioComponentSubtype
import Amazonka.Nimble.Types.StudioComponentType
import qualified Amazonka.Prelude as Prelude
data StudioComponentSummary = StudioComponentSummary'
{
StudioComponentSummary -> Maybe Text
studioComponentId :: Prelude.Maybe Prelude.Text,
StudioComponentSummary -> Maybe POSIX
createdAt :: Prelude.Maybe Core.POSIX,
StudioComponentSummary -> Maybe Text
createdBy :: Prelude.Maybe Prelude.Text,
StudioComponentSummary -> Maybe Text
updatedBy :: Prelude.Maybe Prelude.Text,
StudioComponentSummary -> Maybe StudioComponentSubtype
subtype :: Prelude.Maybe StudioComponentSubtype,
StudioComponentSummary -> Maybe Text
name :: Prelude.Maybe Prelude.Text,
StudioComponentSummary -> Maybe POSIX
updatedAt :: Prelude.Maybe Core.POSIX,
StudioComponentSummary -> Maybe StudioComponentType
type' :: Prelude.Maybe StudioComponentType,
StudioComponentSummary -> Maybe Text
description :: Prelude.Maybe Prelude.Text
}
deriving (StudioComponentSummary -> StudioComponentSummary -> Bool
(StudioComponentSummary -> StudioComponentSummary -> Bool)
-> (StudioComponentSummary -> StudioComponentSummary -> Bool)
-> Eq StudioComponentSummary
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: StudioComponentSummary -> StudioComponentSummary -> Bool
$c/= :: StudioComponentSummary -> StudioComponentSummary -> Bool
== :: StudioComponentSummary -> StudioComponentSummary -> Bool
$c== :: StudioComponentSummary -> StudioComponentSummary -> Bool
Prelude.Eq, ReadPrec [StudioComponentSummary]
ReadPrec StudioComponentSummary
Int -> ReadS StudioComponentSummary
ReadS [StudioComponentSummary]
(Int -> ReadS StudioComponentSummary)
-> ReadS [StudioComponentSummary]
-> ReadPrec StudioComponentSummary
-> ReadPrec [StudioComponentSummary]
-> Read StudioComponentSummary
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [StudioComponentSummary]
$creadListPrec :: ReadPrec [StudioComponentSummary]
readPrec :: ReadPrec StudioComponentSummary
$creadPrec :: ReadPrec StudioComponentSummary
readList :: ReadS [StudioComponentSummary]
$creadList :: ReadS [StudioComponentSummary]
readsPrec :: Int -> ReadS StudioComponentSummary
$creadsPrec :: Int -> ReadS StudioComponentSummary
Prelude.Read, Int -> StudioComponentSummary -> ShowS
[StudioComponentSummary] -> ShowS
StudioComponentSummary -> String
(Int -> StudioComponentSummary -> ShowS)
-> (StudioComponentSummary -> String)
-> ([StudioComponentSummary] -> ShowS)
-> Show StudioComponentSummary
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [StudioComponentSummary] -> ShowS
$cshowList :: [StudioComponentSummary] -> ShowS
show :: StudioComponentSummary -> String
$cshow :: StudioComponentSummary -> String
showsPrec :: Int -> StudioComponentSummary -> ShowS
$cshowsPrec :: Int -> StudioComponentSummary -> ShowS
Prelude.Show, (forall x. StudioComponentSummary -> Rep StudioComponentSummary x)
-> (forall x.
Rep StudioComponentSummary x -> StudioComponentSummary)
-> Generic StudioComponentSummary
forall x. Rep StudioComponentSummary x -> StudioComponentSummary
forall x. StudioComponentSummary -> Rep StudioComponentSummary x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep StudioComponentSummary x -> StudioComponentSummary
$cfrom :: forall x. StudioComponentSummary -> Rep StudioComponentSummary x
Prelude.Generic)
newStudioComponentSummary ::
StudioComponentSummary
newStudioComponentSummary :: StudioComponentSummary
newStudioComponentSummary =
StudioComponentSummary' :: Maybe Text
-> Maybe POSIX
-> Maybe Text
-> Maybe Text
-> Maybe StudioComponentSubtype
-> Maybe Text
-> Maybe POSIX
-> Maybe StudioComponentType
-> Maybe Text
-> StudioComponentSummary
StudioComponentSummary'
{ $sel:studioComponentId:StudioComponentSummary' :: Maybe Text
studioComponentId =
Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:createdAt:StudioComponentSummary' :: Maybe POSIX
createdAt = Maybe POSIX
forall a. Maybe a
Prelude.Nothing,
$sel:createdBy:StudioComponentSummary' :: Maybe Text
createdBy = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:updatedBy:StudioComponentSummary' :: Maybe Text
updatedBy = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:subtype:StudioComponentSummary' :: Maybe StudioComponentSubtype
subtype = Maybe StudioComponentSubtype
forall a. Maybe a
Prelude.Nothing,
$sel:name:StudioComponentSummary' :: Maybe Text
name = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:updatedAt:StudioComponentSummary' :: Maybe POSIX
updatedAt = Maybe POSIX
forall a. Maybe a
Prelude.Nothing,
$sel:type':StudioComponentSummary' :: Maybe StudioComponentType
type' = Maybe StudioComponentType
forall a. Maybe a
Prelude.Nothing,
$sel:description:StudioComponentSummary' :: Maybe Text
description = Maybe Text
forall a. Maybe a
Prelude.Nothing
}
studioComponentSummary_studioComponentId :: Lens.Lens' StudioComponentSummary (Prelude.Maybe Prelude.Text)
studioComponentSummary_studioComponentId :: (Maybe Text -> f (Maybe Text))
-> StudioComponentSummary -> f StudioComponentSummary
studioComponentSummary_studioComponentId = (StudioComponentSummary -> Maybe Text)
-> (StudioComponentSummary -> Maybe Text -> StudioComponentSummary)
-> Lens
StudioComponentSummary
StudioComponentSummary
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StudioComponentSummary' {Maybe Text
studioComponentId :: Maybe Text
$sel:studioComponentId:StudioComponentSummary' :: StudioComponentSummary -> Maybe Text
studioComponentId} -> Maybe Text
studioComponentId) (\s :: StudioComponentSummary
s@StudioComponentSummary' {} Maybe Text
a -> StudioComponentSummary
s {$sel:studioComponentId:StudioComponentSummary' :: Maybe Text
studioComponentId = Maybe Text
a} :: StudioComponentSummary)
studioComponentSummary_createdAt :: Lens.Lens' StudioComponentSummary (Prelude.Maybe Prelude.UTCTime)
studioComponentSummary_createdAt :: (Maybe UTCTime -> f (Maybe UTCTime))
-> StudioComponentSummary -> f StudioComponentSummary
studioComponentSummary_createdAt = (StudioComponentSummary -> Maybe POSIX)
-> (StudioComponentSummary
-> Maybe POSIX -> StudioComponentSummary)
-> Lens
StudioComponentSummary
StudioComponentSummary
(Maybe POSIX)
(Maybe POSIX)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StudioComponentSummary' {Maybe POSIX
createdAt :: Maybe POSIX
$sel:createdAt:StudioComponentSummary' :: StudioComponentSummary -> Maybe POSIX
createdAt} -> Maybe POSIX
createdAt) (\s :: StudioComponentSummary
s@StudioComponentSummary' {} Maybe POSIX
a -> StudioComponentSummary
s {$sel:createdAt:StudioComponentSummary' :: Maybe POSIX
createdAt = Maybe POSIX
a} :: StudioComponentSummary) ((Maybe POSIX -> f (Maybe POSIX))
-> StudioComponentSummary -> f StudioComponentSummary)
-> ((Maybe UTCTime -> f (Maybe UTCTime))
-> Maybe POSIX -> f (Maybe POSIX))
-> (Maybe UTCTime -> f (Maybe UTCTime))
-> StudioComponentSummary
-> f StudioComponentSummary
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. AnIso POSIX POSIX UTCTime UTCTime
-> Iso (Maybe POSIX) (Maybe POSIX) (Maybe UTCTime) (Maybe UTCTime)
forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping AnIso POSIX POSIX UTCTime UTCTime
forall (a :: Format). Iso' (Time a) UTCTime
Core._Time
studioComponentSummary_createdBy :: Lens.Lens' StudioComponentSummary (Prelude.Maybe Prelude.Text)
studioComponentSummary_createdBy :: (Maybe Text -> f (Maybe Text))
-> StudioComponentSummary -> f StudioComponentSummary
studioComponentSummary_createdBy = (StudioComponentSummary -> Maybe Text)
-> (StudioComponentSummary -> Maybe Text -> StudioComponentSummary)
-> Lens
StudioComponentSummary
StudioComponentSummary
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StudioComponentSummary' {Maybe Text
createdBy :: Maybe Text
$sel:createdBy:StudioComponentSummary' :: StudioComponentSummary -> Maybe Text
createdBy} -> Maybe Text
createdBy) (\s :: StudioComponentSummary
s@StudioComponentSummary' {} Maybe Text
a -> StudioComponentSummary
s {$sel:createdBy:StudioComponentSummary' :: Maybe Text
createdBy = Maybe Text
a} :: StudioComponentSummary)
studioComponentSummary_updatedBy :: Lens.Lens' StudioComponentSummary (Prelude.Maybe Prelude.Text)
studioComponentSummary_updatedBy :: (Maybe Text -> f (Maybe Text))
-> StudioComponentSummary -> f StudioComponentSummary
studioComponentSummary_updatedBy = (StudioComponentSummary -> Maybe Text)
-> (StudioComponentSummary -> Maybe Text -> StudioComponentSummary)
-> Lens
StudioComponentSummary
StudioComponentSummary
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StudioComponentSummary' {Maybe Text
updatedBy :: Maybe Text
$sel:updatedBy:StudioComponentSummary' :: StudioComponentSummary -> Maybe Text
updatedBy} -> Maybe Text
updatedBy) (\s :: StudioComponentSummary
s@StudioComponentSummary' {} Maybe Text
a -> StudioComponentSummary
s {$sel:updatedBy:StudioComponentSummary' :: Maybe Text
updatedBy = Maybe Text
a} :: StudioComponentSummary)
studioComponentSummary_subtype :: Lens.Lens' StudioComponentSummary (Prelude.Maybe StudioComponentSubtype)
studioComponentSummary_subtype :: (Maybe StudioComponentSubtype -> f (Maybe StudioComponentSubtype))
-> StudioComponentSummary -> f StudioComponentSummary
studioComponentSummary_subtype = (StudioComponentSummary -> Maybe StudioComponentSubtype)
-> (StudioComponentSummary
-> Maybe StudioComponentSubtype -> StudioComponentSummary)
-> Lens
StudioComponentSummary
StudioComponentSummary
(Maybe StudioComponentSubtype)
(Maybe StudioComponentSubtype)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StudioComponentSummary' {Maybe StudioComponentSubtype
subtype :: Maybe StudioComponentSubtype
$sel:subtype:StudioComponentSummary' :: StudioComponentSummary -> Maybe StudioComponentSubtype
subtype} -> Maybe StudioComponentSubtype
subtype) (\s :: StudioComponentSummary
s@StudioComponentSummary' {} Maybe StudioComponentSubtype
a -> StudioComponentSummary
s {$sel:subtype:StudioComponentSummary' :: Maybe StudioComponentSubtype
subtype = Maybe StudioComponentSubtype
a} :: StudioComponentSummary)
studioComponentSummary_name :: Lens.Lens' StudioComponentSummary (Prelude.Maybe Prelude.Text)
studioComponentSummary_name :: (Maybe Text -> f (Maybe Text))
-> StudioComponentSummary -> f StudioComponentSummary
studioComponentSummary_name = (StudioComponentSummary -> Maybe Text)
-> (StudioComponentSummary -> Maybe Text -> StudioComponentSummary)
-> Lens
StudioComponentSummary
StudioComponentSummary
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StudioComponentSummary' {Maybe Text
name :: Maybe Text
$sel:name:StudioComponentSummary' :: StudioComponentSummary -> Maybe Text
name} -> Maybe Text
name) (\s :: StudioComponentSummary
s@StudioComponentSummary' {} Maybe Text
a -> StudioComponentSummary
s {$sel:name:StudioComponentSummary' :: Maybe Text
name = Maybe Text
a} :: StudioComponentSummary)
studioComponentSummary_updatedAt :: Lens.Lens' StudioComponentSummary (Prelude.Maybe Prelude.UTCTime)
studioComponentSummary_updatedAt :: (Maybe UTCTime -> f (Maybe UTCTime))
-> StudioComponentSummary -> f StudioComponentSummary
studioComponentSummary_updatedAt = (StudioComponentSummary -> Maybe POSIX)
-> (StudioComponentSummary
-> Maybe POSIX -> StudioComponentSummary)
-> Lens
StudioComponentSummary
StudioComponentSummary
(Maybe POSIX)
(Maybe POSIX)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StudioComponentSummary' {Maybe POSIX
updatedAt :: Maybe POSIX
$sel:updatedAt:StudioComponentSummary' :: StudioComponentSummary -> Maybe POSIX
updatedAt} -> Maybe POSIX
updatedAt) (\s :: StudioComponentSummary
s@StudioComponentSummary' {} Maybe POSIX
a -> StudioComponentSummary
s {$sel:updatedAt:StudioComponentSummary' :: Maybe POSIX
updatedAt = Maybe POSIX
a} :: StudioComponentSummary) ((Maybe POSIX -> f (Maybe POSIX))
-> StudioComponentSummary -> f StudioComponentSummary)
-> ((Maybe UTCTime -> f (Maybe UTCTime))
-> Maybe POSIX -> f (Maybe POSIX))
-> (Maybe UTCTime -> f (Maybe UTCTime))
-> StudioComponentSummary
-> f StudioComponentSummary
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. AnIso POSIX POSIX UTCTime UTCTime
-> Iso (Maybe POSIX) (Maybe POSIX) (Maybe UTCTime) (Maybe UTCTime)
forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping AnIso POSIX POSIX UTCTime UTCTime
forall (a :: Format). Iso' (Time a) UTCTime
Core._Time
studioComponentSummary_type :: Lens.Lens' StudioComponentSummary (Prelude.Maybe StudioComponentType)
studioComponentSummary_type :: (Maybe StudioComponentType -> f (Maybe StudioComponentType))
-> StudioComponentSummary -> f StudioComponentSummary
studioComponentSummary_type = (StudioComponentSummary -> Maybe StudioComponentType)
-> (StudioComponentSummary
-> Maybe StudioComponentType -> StudioComponentSummary)
-> Lens
StudioComponentSummary
StudioComponentSummary
(Maybe StudioComponentType)
(Maybe StudioComponentType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StudioComponentSummary' {Maybe StudioComponentType
type' :: Maybe StudioComponentType
$sel:type':StudioComponentSummary' :: StudioComponentSummary -> Maybe StudioComponentType
type'} -> Maybe StudioComponentType
type') (\s :: StudioComponentSummary
s@StudioComponentSummary' {} Maybe StudioComponentType
a -> StudioComponentSummary
s {$sel:type':StudioComponentSummary' :: Maybe StudioComponentType
type' = Maybe StudioComponentType
a} :: StudioComponentSummary)
studioComponentSummary_description :: Lens.Lens' StudioComponentSummary (Prelude.Maybe Prelude.Text)
studioComponentSummary_description :: (Maybe Text -> f (Maybe Text))
-> StudioComponentSummary -> f StudioComponentSummary
studioComponentSummary_description = (StudioComponentSummary -> Maybe Text)
-> (StudioComponentSummary -> Maybe Text -> StudioComponentSummary)
-> Lens
StudioComponentSummary
StudioComponentSummary
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StudioComponentSummary' {Maybe Text
description :: Maybe Text
$sel:description:StudioComponentSummary' :: StudioComponentSummary -> Maybe Text
description} -> Maybe Text
description) (\s :: StudioComponentSummary
s@StudioComponentSummary' {} Maybe Text
a -> StudioComponentSummary
s {$sel:description:StudioComponentSummary' :: Maybe Text
description = Maybe Text
a} :: StudioComponentSummary)
instance Core.FromJSON StudioComponentSummary where
parseJSON :: Value -> Parser StudioComponentSummary
parseJSON =
String
-> (Object -> Parser StudioComponentSummary)
-> Value
-> Parser StudioComponentSummary
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Core.withObject
String
"StudioComponentSummary"
( \Object
x ->
Maybe Text
-> Maybe POSIX
-> Maybe Text
-> Maybe Text
-> Maybe StudioComponentSubtype
-> Maybe Text
-> Maybe POSIX
-> Maybe StudioComponentType
-> Maybe Text
-> StudioComponentSummary
StudioComponentSummary'
(Maybe Text
-> Maybe POSIX
-> Maybe Text
-> Maybe Text
-> Maybe StudioComponentSubtype
-> Maybe Text
-> Maybe POSIX
-> Maybe StudioComponentType
-> Maybe Text
-> StudioComponentSummary)
-> Parser (Maybe Text)
-> Parser
(Maybe POSIX
-> Maybe Text
-> Maybe Text
-> Maybe StudioComponentSubtype
-> Maybe Text
-> Maybe POSIX
-> Maybe StudioComponentType
-> Maybe Text
-> StudioComponentSummary)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"studioComponentId")
Parser
(Maybe POSIX
-> Maybe Text
-> Maybe Text
-> Maybe StudioComponentSubtype
-> Maybe Text
-> Maybe POSIX
-> Maybe StudioComponentType
-> Maybe Text
-> StudioComponentSummary)
-> Parser (Maybe POSIX)
-> Parser
(Maybe Text
-> Maybe Text
-> Maybe StudioComponentSubtype
-> Maybe Text
-> Maybe POSIX
-> Maybe StudioComponentType
-> Maybe Text
-> StudioComponentSummary)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe POSIX)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"createdAt")
Parser
(Maybe Text
-> Maybe Text
-> Maybe StudioComponentSubtype
-> Maybe Text
-> Maybe POSIX
-> Maybe StudioComponentType
-> Maybe Text
-> StudioComponentSummary)
-> Parser (Maybe Text)
-> Parser
(Maybe Text
-> Maybe StudioComponentSubtype
-> Maybe Text
-> Maybe POSIX
-> Maybe StudioComponentType
-> Maybe Text
-> StudioComponentSummary)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"createdBy")
Parser
(Maybe Text
-> Maybe StudioComponentSubtype
-> Maybe Text
-> Maybe POSIX
-> Maybe StudioComponentType
-> Maybe Text
-> StudioComponentSummary)
-> Parser (Maybe Text)
-> Parser
(Maybe StudioComponentSubtype
-> Maybe Text
-> Maybe POSIX
-> Maybe StudioComponentType
-> Maybe Text
-> StudioComponentSummary)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"updatedBy")
Parser
(Maybe StudioComponentSubtype
-> Maybe Text
-> Maybe POSIX
-> Maybe StudioComponentType
-> Maybe Text
-> StudioComponentSummary)
-> Parser (Maybe StudioComponentSubtype)
-> Parser
(Maybe Text
-> Maybe POSIX
-> Maybe StudioComponentType
-> Maybe Text
-> StudioComponentSummary)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe StudioComponentSubtype)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"subtype")
Parser
(Maybe Text
-> Maybe POSIX
-> Maybe StudioComponentType
-> Maybe Text
-> StudioComponentSummary)
-> Parser (Maybe Text)
-> Parser
(Maybe POSIX
-> Maybe StudioComponentType
-> Maybe Text
-> StudioComponentSummary)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"name")
Parser
(Maybe POSIX
-> Maybe StudioComponentType
-> Maybe Text
-> StudioComponentSummary)
-> Parser (Maybe POSIX)
-> Parser
(Maybe StudioComponentType -> Maybe Text -> StudioComponentSummary)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe POSIX)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"updatedAt")
Parser
(Maybe StudioComponentType -> Maybe Text -> StudioComponentSummary)
-> Parser (Maybe StudioComponentType)
-> Parser (Maybe Text -> StudioComponentSummary)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe StudioComponentType)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"type")
Parser (Maybe Text -> StudioComponentSummary)
-> Parser (Maybe Text) -> Parser StudioComponentSummary
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"description")
)
instance Prelude.Hashable StudioComponentSummary
instance Prelude.NFData StudioComponentSummary