{-# 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.ElasticTranscoder.Types.JobOutput where
import qualified Amazonka.Core as Core
import Amazonka.ElasticTranscoder.Types.Captions
import Amazonka.ElasticTranscoder.Types.Clip
import Amazonka.ElasticTranscoder.Types.Encryption
import Amazonka.ElasticTranscoder.Types.JobAlbumArt
import Amazonka.ElasticTranscoder.Types.JobWatermark
import qualified Amazonka.Lens as Lens
import qualified Amazonka.Prelude as Prelude
data JobOutput = JobOutput'
{
JobOutput -> Maybe Text
appliedColorSpaceConversion :: Prelude.Maybe Prelude.Text,
JobOutput -> Maybe Text
thumbnailPattern :: Prelude.Maybe Prelude.Text,
JobOutput -> Maybe Text
status :: Prelude.Maybe Prelude.Text,
JobOutput -> Maybe Int
height :: Prelude.Maybe Prelude.Int,
JobOutput -> Maybe Text
frameRate :: Prelude.Maybe Prelude.Text,
JobOutput -> Maybe Captions
captions :: Prelude.Maybe Captions,
JobOutput -> Maybe Text
presetId :: Prelude.Maybe Prelude.Text,
JobOutput -> Maybe [Clip]
composition :: Prelude.Maybe [Clip],
JobOutput -> Maybe JobAlbumArt
albumArt :: Prelude.Maybe JobAlbumArt,
JobOutput -> Maybe Integer
fileSize :: Prelude.Maybe Prelude.Integer,
JobOutput -> Maybe [JobWatermark]
watermarks :: Prelude.Maybe [JobWatermark],
JobOutput -> Maybe Int
width :: Prelude.Maybe Prelude.Int,
JobOutput -> Maybe Encryption
encryption :: Prelude.Maybe Encryption,
JobOutput -> Maybe Text
key :: Prelude.Maybe Prelude.Text,
JobOutput -> Maybe Text
statusDetail :: Prelude.Maybe Prelude.Text,
JobOutput -> Maybe Text
id :: Prelude.Maybe Prelude.Text,
JobOutput -> Maybe Text
segmentDuration :: Prelude.Maybe Prelude.Text,
JobOutput -> Maybe Integer
durationMillis :: Prelude.Maybe Prelude.Integer,
JobOutput -> Maybe Encryption
thumbnailEncryption :: Prelude.Maybe Encryption,
JobOutput -> Maybe Integer
duration :: Prelude.Maybe Prelude.Integer,
JobOutput -> Maybe Text
rotate :: Prelude.Maybe Prelude.Text
}
deriving (JobOutput -> JobOutput -> Bool
(JobOutput -> JobOutput -> Bool)
-> (JobOutput -> JobOutput -> Bool) -> Eq JobOutput
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: JobOutput -> JobOutput -> Bool
$c/= :: JobOutput -> JobOutput -> Bool
== :: JobOutput -> JobOutput -> Bool
$c== :: JobOutput -> JobOutput -> Bool
Prelude.Eq, ReadPrec [JobOutput]
ReadPrec JobOutput
Int -> ReadS JobOutput
ReadS [JobOutput]
(Int -> ReadS JobOutput)
-> ReadS [JobOutput]
-> ReadPrec JobOutput
-> ReadPrec [JobOutput]
-> Read JobOutput
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [JobOutput]
$creadListPrec :: ReadPrec [JobOutput]
readPrec :: ReadPrec JobOutput
$creadPrec :: ReadPrec JobOutput
readList :: ReadS [JobOutput]
$creadList :: ReadS [JobOutput]
readsPrec :: Int -> ReadS JobOutput
$creadsPrec :: Int -> ReadS JobOutput
Prelude.Read, Int -> JobOutput -> ShowS
[JobOutput] -> ShowS
JobOutput -> String
(Int -> JobOutput -> ShowS)
-> (JobOutput -> String)
-> ([JobOutput] -> ShowS)
-> Show JobOutput
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [JobOutput] -> ShowS
$cshowList :: [JobOutput] -> ShowS
show :: JobOutput -> String
$cshow :: JobOutput -> String
showsPrec :: Int -> JobOutput -> ShowS
$cshowsPrec :: Int -> JobOutput -> ShowS
Prelude.Show, (forall x. JobOutput -> Rep JobOutput x)
-> (forall x. Rep JobOutput x -> JobOutput) -> Generic JobOutput
forall x. Rep JobOutput x -> JobOutput
forall x. JobOutput -> Rep JobOutput x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep JobOutput x -> JobOutput
$cfrom :: forall x. JobOutput -> Rep JobOutput x
Prelude.Generic)
newJobOutput ::
JobOutput
newJobOutput :: JobOutput
newJobOutput =
JobOutput' :: Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Int
-> Maybe Text
-> Maybe Captions
-> Maybe Text
-> Maybe [Clip]
-> Maybe JobAlbumArt
-> Maybe Integer
-> Maybe [JobWatermark]
-> Maybe Int
-> Maybe Encryption
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Integer
-> Maybe Encryption
-> Maybe Integer
-> Maybe Text
-> JobOutput
JobOutput'
{ $sel:appliedColorSpaceConversion:JobOutput' :: Maybe Text
appliedColorSpaceConversion =
Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:thumbnailPattern:JobOutput' :: Maybe Text
thumbnailPattern = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:status:JobOutput' :: Maybe Text
status = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:height:JobOutput' :: Maybe Int
height = Maybe Int
forall a. Maybe a
Prelude.Nothing,
$sel:frameRate:JobOutput' :: Maybe Text
frameRate = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:captions:JobOutput' :: Maybe Captions
captions = Maybe Captions
forall a. Maybe a
Prelude.Nothing,
$sel:presetId:JobOutput' :: Maybe Text
presetId = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:composition:JobOutput' :: Maybe [Clip]
composition = Maybe [Clip]
forall a. Maybe a
Prelude.Nothing,
$sel:albumArt:JobOutput' :: Maybe JobAlbumArt
albumArt = Maybe JobAlbumArt
forall a. Maybe a
Prelude.Nothing,
$sel:fileSize:JobOutput' :: Maybe Integer
fileSize = Maybe Integer
forall a. Maybe a
Prelude.Nothing,
$sel:watermarks:JobOutput' :: Maybe [JobWatermark]
watermarks = Maybe [JobWatermark]
forall a. Maybe a
Prelude.Nothing,
$sel:width:JobOutput' :: Maybe Int
width = Maybe Int
forall a. Maybe a
Prelude.Nothing,
$sel:encryption:JobOutput' :: Maybe Encryption
encryption = Maybe Encryption
forall a. Maybe a
Prelude.Nothing,
$sel:key:JobOutput' :: Maybe Text
key = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:statusDetail:JobOutput' :: Maybe Text
statusDetail = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:id:JobOutput' :: Maybe Text
id = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:segmentDuration:JobOutput' :: Maybe Text
segmentDuration = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:durationMillis:JobOutput' :: Maybe Integer
durationMillis = Maybe Integer
forall a. Maybe a
Prelude.Nothing,
$sel:thumbnailEncryption:JobOutput' :: Maybe Encryption
thumbnailEncryption = Maybe Encryption
forall a. Maybe a
Prelude.Nothing,
$sel:duration:JobOutput' :: Maybe Integer
duration = Maybe Integer
forall a. Maybe a
Prelude.Nothing,
$sel:rotate:JobOutput' :: Maybe Text
rotate = Maybe Text
forall a. Maybe a
Prelude.Nothing
}
jobOutput_appliedColorSpaceConversion :: Lens.Lens' JobOutput (Prelude.Maybe Prelude.Text)
jobOutput_appliedColorSpaceConversion :: (Maybe Text -> f (Maybe Text)) -> JobOutput -> f JobOutput
jobOutput_appliedColorSpaceConversion = (JobOutput -> Maybe Text)
-> (JobOutput -> Maybe Text -> JobOutput)
-> Lens JobOutput JobOutput (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobOutput' {Maybe Text
appliedColorSpaceConversion :: Maybe Text
$sel:appliedColorSpaceConversion:JobOutput' :: JobOutput -> Maybe Text
appliedColorSpaceConversion} -> Maybe Text
appliedColorSpaceConversion) (\s :: JobOutput
s@JobOutput' {} Maybe Text
a -> JobOutput
s {$sel:appliedColorSpaceConversion:JobOutput' :: Maybe Text
appliedColorSpaceConversion = Maybe Text
a} :: JobOutput)
jobOutput_thumbnailPattern :: Lens.Lens' JobOutput (Prelude.Maybe Prelude.Text)
jobOutput_thumbnailPattern :: (Maybe Text -> f (Maybe Text)) -> JobOutput -> f JobOutput
jobOutput_thumbnailPattern = (JobOutput -> Maybe Text)
-> (JobOutput -> Maybe Text -> JobOutput)
-> Lens JobOutput JobOutput (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobOutput' {Maybe Text
thumbnailPattern :: Maybe Text
$sel:thumbnailPattern:JobOutput' :: JobOutput -> Maybe Text
thumbnailPattern} -> Maybe Text
thumbnailPattern) (\s :: JobOutput
s@JobOutput' {} Maybe Text
a -> JobOutput
s {$sel:thumbnailPattern:JobOutput' :: Maybe Text
thumbnailPattern = Maybe Text
a} :: JobOutput)
jobOutput_status :: Lens.Lens' JobOutput (Prelude.Maybe Prelude.Text)
jobOutput_status :: (Maybe Text -> f (Maybe Text)) -> JobOutput -> f JobOutput
jobOutput_status = (JobOutput -> Maybe Text)
-> (JobOutput -> Maybe Text -> JobOutput)
-> Lens JobOutput JobOutput (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobOutput' {Maybe Text
status :: Maybe Text
$sel:status:JobOutput' :: JobOutput -> Maybe Text
status} -> Maybe Text
status) (\s :: JobOutput
s@JobOutput' {} Maybe Text
a -> JobOutput
s {$sel:status:JobOutput' :: Maybe Text
status = Maybe Text
a} :: JobOutput)
jobOutput_height :: Lens.Lens' JobOutput (Prelude.Maybe Prelude.Int)
jobOutput_height :: (Maybe Int -> f (Maybe Int)) -> JobOutput -> f JobOutput
jobOutput_height = (JobOutput -> Maybe Int)
-> (JobOutput -> Maybe Int -> JobOutput)
-> Lens JobOutput JobOutput (Maybe Int) (Maybe Int)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobOutput' {Maybe Int
height :: Maybe Int
$sel:height:JobOutput' :: JobOutput -> Maybe Int
height} -> Maybe Int
height) (\s :: JobOutput
s@JobOutput' {} Maybe Int
a -> JobOutput
s {$sel:height:JobOutput' :: Maybe Int
height = Maybe Int
a} :: JobOutput)
jobOutput_frameRate :: Lens.Lens' JobOutput (Prelude.Maybe Prelude.Text)
jobOutput_frameRate :: (Maybe Text -> f (Maybe Text)) -> JobOutput -> f JobOutput
jobOutput_frameRate = (JobOutput -> Maybe Text)
-> (JobOutput -> Maybe Text -> JobOutput)
-> Lens JobOutput JobOutput (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobOutput' {Maybe Text
frameRate :: Maybe Text
$sel:frameRate:JobOutput' :: JobOutput -> Maybe Text
frameRate} -> Maybe Text
frameRate) (\s :: JobOutput
s@JobOutput' {} Maybe Text
a -> JobOutput
s {$sel:frameRate:JobOutput' :: Maybe Text
frameRate = Maybe Text
a} :: JobOutput)
jobOutput_captions :: Lens.Lens' JobOutput (Prelude.Maybe Captions)
jobOutput_captions :: (Maybe Captions -> f (Maybe Captions)) -> JobOutput -> f JobOutput
jobOutput_captions = (JobOutput -> Maybe Captions)
-> (JobOutput -> Maybe Captions -> JobOutput)
-> Lens JobOutput JobOutput (Maybe Captions) (Maybe Captions)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobOutput' {Maybe Captions
captions :: Maybe Captions
$sel:captions:JobOutput' :: JobOutput -> Maybe Captions
captions} -> Maybe Captions
captions) (\s :: JobOutput
s@JobOutput' {} Maybe Captions
a -> JobOutput
s {$sel:captions:JobOutput' :: Maybe Captions
captions = Maybe Captions
a} :: JobOutput)
jobOutput_presetId :: Lens.Lens' JobOutput (Prelude.Maybe Prelude.Text)
jobOutput_presetId :: (Maybe Text -> f (Maybe Text)) -> JobOutput -> f JobOutput
jobOutput_presetId = (JobOutput -> Maybe Text)
-> (JobOutput -> Maybe Text -> JobOutput)
-> Lens JobOutput JobOutput (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobOutput' {Maybe Text
presetId :: Maybe Text
$sel:presetId:JobOutput' :: JobOutput -> Maybe Text
presetId} -> Maybe Text
presetId) (\s :: JobOutput
s@JobOutput' {} Maybe Text
a -> JobOutput
s {$sel:presetId:JobOutput' :: Maybe Text
presetId = Maybe Text
a} :: JobOutput)
jobOutput_composition :: Lens.Lens' JobOutput (Prelude.Maybe [Clip])
jobOutput_composition :: (Maybe [Clip] -> f (Maybe [Clip])) -> JobOutput -> f JobOutput
jobOutput_composition = (JobOutput -> Maybe [Clip])
-> (JobOutput -> Maybe [Clip] -> JobOutput)
-> Lens JobOutput JobOutput (Maybe [Clip]) (Maybe [Clip])
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobOutput' {Maybe [Clip]
composition :: Maybe [Clip]
$sel:composition:JobOutput' :: JobOutput -> Maybe [Clip]
composition} -> Maybe [Clip]
composition) (\s :: JobOutput
s@JobOutput' {} Maybe [Clip]
a -> JobOutput
s {$sel:composition:JobOutput' :: Maybe [Clip]
composition = Maybe [Clip]
a} :: JobOutput) ((Maybe [Clip] -> f (Maybe [Clip])) -> JobOutput -> f JobOutput)
-> ((Maybe [Clip] -> f (Maybe [Clip]))
-> Maybe [Clip] -> f (Maybe [Clip]))
-> (Maybe [Clip] -> f (Maybe [Clip]))
-> JobOutput
-> f JobOutput
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. AnIso [Clip] [Clip] [Clip] [Clip]
-> Iso (Maybe [Clip]) (Maybe [Clip]) (Maybe [Clip]) (Maybe [Clip])
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 [Clip] [Clip] [Clip] [Clip]
forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
jobOutput_albumArt :: Lens.Lens' JobOutput (Prelude.Maybe JobAlbumArt)
jobOutput_albumArt :: (Maybe JobAlbumArt -> f (Maybe JobAlbumArt))
-> JobOutput -> f JobOutput
jobOutput_albumArt = (JobOutput -> Maybe JobAlbumArt)
-> (JobOutput -> Maybe JobAlbumArt -> JobOutput)
-> Lens JobOutput JobOutput (Maybe JobAlbumArt) (Maybe JobAlbumArt)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobOutput' {Maybe JobAlbumArt
albumArt :: Maybe JobAlbumArt
$sel:albumArt:JobOutput' :: JobOutput -> Maybe JobAlbumArt
albumArt} -> Maybe JobAlbumArt
albumArt) (\s :: JobOutput
s@JobOutput' {} Maybe JobAlbumArt
a -> JobOutput
s {$sel:albumArt:JobOutput' :: Maybe JobAlbumArt
albumArt = Maybe JobAlbumArt
a} :: JobOutput)
jobOutput_fileSize :: Lens.Lens' JobOutput (Prelude.Maybe Prelude.Integer)
jobOutput_fileSize :: (Maybe Integer -> f (Maybe Integer)) -> JobOutput -> f JobOutput
jobOutput_fileSize = (JobOutput -> Maybe Integer)
-> (JobOutput -> Maybe Integer -> JobOutput)
-> Lens JobOutput JobOutput (Maybe Integer) (Maybe Integer)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobOutput' {Maybe Integer
fileSize :: Maybe Integer
$sel:fileSize:JobOutput' :: JobOutput -> Maybe Integer
fileSize} -> Maybe Integer
fileSize) (\s :: JobOutput
s@JobOutput' {} Maybe Integer
a -> JobOutput
s {$sel:fileSize:JobOutput' :: Maybe Integer
fileSize = Maybe Integer
a} :: JobOutput)
jobOutput_watermarks :: Lens.Lens' JobOutput (Prelude.Maybe [JobWatermark])
jobOutput_watermarks :: (Maybe [JobWatermark] -> f (Maybe [JobWatermark]))
-> JobOutput -> f JobOutput
jobOutput_watermarks = (JobOutput -> Maybe [JobWatermark])
-> (JobOutput -> Maybe [JobWatermark] -> JobOutput)
-> Lens
JobOutput JobOutput (Maybe [JobWatermark]) (Maybe [JobWatermark])
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobOutput' {Maybe [JobWatermark]
watermarks :: Maybe [JobWatermark]
$sel:watermarks:JobOutput' :: JobOutput -> Maybe [JobWatermark]
watermarks} -> Maybe [JobWatermark]
watermarks) (\s :: JobOutput
s@JobOutput' {} Maybe [JobWatermark]
a -> JobOutput
s {$sel:watermarks:JobOutput' :: Maybe [JobWatermark]
watermarks = Maybe [JobWatermark]
a} :: JobOutput) ((Maybe [JobWatermark] -> f (Maybe [JobWatermark]))
-> JobOutput -> f JobOutput)
-> ((Maybe [JobWatermark] -> f (Maybe [JobWatermark]))
-> Maybe [JobWatermark] -> f (Maybe [JobWatermark]))
-> (Maybe [JobWatermark] -> f (Maybe [JobWatermark]))
-> JobOutput
-> f JobOutput
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. AnIso [JobWatermark] [JobWatermark] [JobWatermark] [JobWatermark]
-> Iso
(Maybe [JobWatermark])
(Maybe [JobWatermark])
(Maybe [JobWatermark])
(Maybe [JobWatermark])
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 [JobWatermark] [JobWatermark] [JobWatermark] [JobWatermark]
forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
jobOutput_width :: Lens.Lens' JobOutput (Prelude.Maybe Prelude.Int)
jobOutput_width :: (Maybe Int -> f (Maybe Int)) -> JobOutput -> f JobOutput
jobOutput_width = (JobOutput -> Maybe Int)
-> (JobOutput -> Maybe Int -> JobOutput)
-> Lens JobOutput JobOutput (Maybe Int) (Maybe Int)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobOutput' {Maybe Int
width :: Maybe Int
$sel:width:JobOutput' :: JobOutput -> Maybe Int
width} -> Maybe Int
width) (\s :: JobOutput
s@JobOutput' {} Maybe Int
a -> JobOutput
s {$sel:width:JobOutput' :: Maybe Int
width = Maybe Int
a} :: JobOutput)
jobOutput_encryption :: Lens.Lens' JobOutput (Prelude.Maybe Encryption)
jobOutput_encryption :: (Maybe Encryption -> f (Maybe Encryption))
-> JobOutput -> f JobOutput
jobOutput_encryption = (JobOutput -> Maybe Encryption)
-> (JobOutput -> Maybe Encryption -> JobOutput)
-> Lens JobOutput JobOutput (Maybe Encryption) (Maybe Encryption)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobOutput' {Maybe Encryption
encryption :: Maybe Encryption
$sel:encryption:JobOutput' :: JobOutput -> Maybe Encryption
encryption} -> Maybe Encryption
encryption) (\s :: JobOutput
s@JobOutput' {} Maybe Encryption
a -> JobOutput
s {$sel:encryption:JobOutput' :: Maybe Encryption
encryption = Maybe Encryption
a} :: JobOutput)
jobOutput_key :: Lens.Lens' JobOutput (Prelude.Maybe Prelude.Text)
jobOutput_key :: (Maybe Text -> f (Maybe Text)) -> JobOutput -> f JobOutput
jobOutput_key = (JobOutput -> Maybe Text)
-> (JobOutput -> Maybe Text -> JobOutput)
-> Lens JobOutput JobOutput (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobOutput' {Maybe Text
key :: Maybe Text
$sel:key:JobOutput' :: JobOutput -> Maybe Text
key} -> Maybe Text
key) (\s :: JobOutput
s@JobOutput' {} Maybe Text
a -> JobOutput
s {$sel:key:JobOutput' :: Maybe Text
key = Maybe Text
a} :: JobOutput)
jobOutput_statusDetail :: Lens.Lens' JobOutput (Prelude.Maybe Prelude.Text)
jobOutput_statusDetail :: (Maybe Text -> f (Maybe Text)) -> JobOutput -> f JobOutput
jobOutput_statusDetail = (JobOutput -> Maybe Text)
-> (JobOutput -> Maybe Text -> JobOutput)
-> Lens JobOutput JobOutput (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobOutput' {Maybe Text
statusDetail :: Maybe Text
$sel:statusDetail:JobOutput' :: JobOutput -> Maybe Text
statusDetail} -> Maybe Text
statusDetail) (\s :: JobOutput
s@JobOutput' {} Maybe Text
a -> JobOutput
s {$sel:statusDetail:JobOutput' :: Maybe Text
statusDetail = Maybe Text
a} :: JobOutput)
jobOutput_id :: Lens.Lens' JobOutput (Prelude.Maybe Prelude.Text)
jobOutput_id :: (Maybe Text -> f (Maybe Text)) -> JobOutput -> f JobOutput
jobOutput_id = (JobOutput -> Maybe Text)
-> (JobOutput -> Maybe Text -> JobOutput)
-> Lens JobOutput JobOutput (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobOutput' {Maybe Text
id :: Maybe Text
$sel:id:JobOutput' :: JobOutput -> Maybe Text
id} -> Maybe Text
id) (\s :: JobOutput
s@JobOutput' {} Maybe Text
a -> JobOutput
s {$sel:id:JobOutput' :: Maybe Text
id = Maybe Text
a} :: JobOutput)
jobOutput_segmentDuration :: Lens.Lens' JobOutput (Prelude.Maybe Prelude.Text)
jobOutput_segmentDuration :: (Maybe Text -> f (Maybe Text)) -> JobOutput -> f JobOutput
jobOutput_segmentDuration = (JobOutput -> Maybe Text)
-> (JobOutput -> Maybe Text -> JobOutput)
-> Lens JobOutput JobOutput (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobOutput' {Maybe Text
segmentDuration :: Maybe Text
$sel:segmentDuration:JobOutput' :: JobOutput -> Maybe Text
segmentDuration} -> Maybe Text
segmentDuration) (\s :: JobOutput
s@JobOutput' {} Maybe Text
a -> JobOutput
s {$sel:segmentDuration:JobOutput' :: Maybe Text
segmentDuration = Maybe Text
a} :: JobOutput)
jobOutput_durationMillis :: Lens.Lens' JobOutput (Prelude.Maybe Prelude.Integer)
jobOutput_durationMillis :: (Maybe Integer -> f (Maybe Integer)) -> JobOutput -> f JobOutput
jobOutput_durationMillis = (JobOutput -> Maybe Integer)
-> (JobOutput -> Maybe Integer -> JobOutput)
-> Lens JobOutput JobOutput (Maybe Integer) (Maybe Integer)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobOutput' {Maybe Integer
durationMillis :: Maybe Integer
$sel:durationMillis:JobOutput' :: JobOutput -> Maybe Integer
durationMillis} -> Maybe Integer
durationMillis) (\s :: JobOutput
s@JobOutput' {} Maybe Integer
a -> JobOutput
s {$sel:durationMillis:JobOutput' :: Maybe Integer
durationMillis = Maybe Integer
a} :: JobOutput)
jobOutput_thumbnailEncryption :: Lens.Lens' JobOutput (Prelude.Maybe Encryption)
jobOutput_thumbnailEncryption :: (Maybe Encryption -> f (Maybe Encryption))
-> JobOutput -> f JobOutput
jobOutput_thumbnailEncryption = (JobOutput -> Maybe Encryption)
-> (JobOutput -> Maybe Encryption -> JobOutput)
-> Lens JobOutput JobOutput (Maybe Encryption) (Maybe Encryption)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobOutput' {Maybe Encryption
thumbnailEncryption :: Maybe Encryption
$sel:thumbnailEncryption:JobOutput' :: JobOutput -> Maybe Encryption
thumbnailEncryption} -> Maybe Encryption
thumbnailEncryption) (\s :: JobOutput
s@JobOutput' {} Maybe Encryption
a -> JobOutput
s {$sel:thumbnailEncryption:JobOutput' :: Maybe Encryption
thumbnailEncryption = Maybe Encryption
a} :: JobOutput)
jobOutput_duration :: Lens.Lens' JobOutput (Prelude.Maybe Prelude.Integer)
jobOutput_duration :: (Maybe Integer -> f (Maybe Integer)) -> JobOutput -> f JobOutput
jobOutput_duration = (JobOutput -> Maybe Integer)
-> (JobOutput -> Maybe Integer -> JobOutput)
-> Lens JobOutput JobOutput (Maybe Integer) (Maybe Integer)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobOutput' {Maybe Integer
duration :: Maybe Integer
$sel:duration:JobOutput' :: JobOutput -> Maybe Integer
duration} -> Maybe Integer
duration) (\s :: JobOutput
s@JobOutput' {} Maybe Integer
a -> JobOutput
s {$sel:duration:JobOutput' :: Maybe Integer
duration = Maybe Integer
a} :: JobOutput)
jobOutput_rotate :: Lens.Lens' JobOutput (Prelude.Maybe Prelude.Text)
jobOutput_rotate :: (Maybe Text -> f (Maybe Text)) -> JobOutput -> f JobOutput
jobOutput_rotate = (JobOutput -> Maybe Text)
-> (JobOutput -> Maybe Text -> JobOutput)
-> Lens JobOutput JobOutput (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobOutput' {Maybe Text
rotate :: Maybe Text
$sel:rotate:JobOutput' :: JobOutput -> Maybe Text
rotate} -> Maybe Text
rotate) (\s :: JobOutput
s@JobOutput' {} Maybe Text
a -> JobOutput
s {$sel:rotate:JobOutput' :: Maybe Text
rotate = Maybe Text
a} :: JobOutput)
instance Core.FromJSON JobOutput where
parseJSON :: Value -> Parser JobOutput
parseJSON =
String -> (Object -> Parser JobOutput) -> Value -> Parser JobOutput
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Core.withObject
String
"JobOutput"
( \Object
x ->
Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Int
-> Maybe Text
-> Maybe Captions
-> Maybe Text
-> Maybe [Clip]
-> Maybe JobAlbumArt
-> Maybe Integer
-> Maybe [JobWatermark]
-> Maybe Int
-> Maybe Encryption
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Integer
-> Maybe Encryption
-> Maybe Integer
-> Maybe Text
-> JobOutput
JobOutput'
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Int
-> Maybe Text
-> Maybe Captions
-> Maybe Text
-> Maybe [Clip]
-> Maybe JobAlbumArt
-> Maybe Integer
-> Maybe [JobWatermark]
-> Maybe Int
-> Maybe Encryption
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Integer
-> Maybe Encryption
-> Maybe Integer
-> Maybe Text
-> JobOutput)
-> Parser (Maybe Text)
-> Parser
(Maybe Text
-> Maybe Text
-> Maybe Int
-> Maybe Text
-> Maybe Captions
-> Maybe Text
-> Maybe [Clip]
-> Maybe JobAlbumArt
-> Maybe Integer
-> Maybe [JobWatermark]
-> Maybe Int
-> Maybe Encryption
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Integer
-> Maybe Encryption
-> Maybe Integer
-> Maybe Text
-> JobOutput)
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
"AppliedColorSpaceConversion")
Parser
(Maybe Text
-> Maybe Text
-> Maybe Int
-> Maybe Text
-> Maybe Captions
-> Maybe Text
-> Maybe [Clip]
-> Maybe JobAlbumArt
-> Maybe Integer
-> Maybe [JobWatermark]
-> Maybe Int
-> Maybe Encryption
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Integer
-> Maybe Encryption
-> Maybe Integer
-> Maybe Text
-> JobOutput)
-> Parser (Maybe Text)
-> Parser
(Maybe Text
-> Maybe Int
-> Maybe Text
-> Maybe Captions
-> Maybe Text
-> Maybe [Clip]
-> Maybe JobAlbumArt
-> Maybe Integer
-> Maybe [JobWatermark]
-> Maybe Int
-> Maybe Encryption
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Integer
-> Maybe Encryption
-> Maybe Integer
-> Maybe Text
-> JobOutput)
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
"ThumbnailPattern")
Parser
(Maybe Text
-> Maybe Int
-> Maybe Text
-> Maybe Captions
-> Maybe Text
-> Maybe [Clip]
-> Maybe JobAlbumArt
-> Maybe Integer
-> Maybe [JobWatermark]
-> Maybe Int
-> Maybe Encryption
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Integer
-> Maybe Encryption
-> Maybe Integer
-> Maybe Text
-> JobOutput)
-> Parser (Maybe Text)
-> Parser
(Maybe Int
-> Maybe Text
-> Maybe Captions
-> Maybe Text
-> Maybe [Clip]
-> Maybe JobAlbumArt
-> Maybe Integer
-> Maybe [JobWatermark]
-> Maybe Int
-> Maybe Encryption
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Integer
-> Maybe Encryption
-> Maybe Integer
-> Maybe Text
-> JobOutput)
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
"Status")
Parser
(Maybe Int
-> Maybe Text
-> Maybe Captions
-> Maybe Text
-> Maybe [Clip]
-> Maybe JobAlbumArt
-> Maybe Integer
-> Maybe [JobWatermark]
-> Maybe Int
-> Maybe Encryption
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Integer
-> Maybe Encryption
-> Maybe Integer
-> Maybe Text
-> JobOutput)
-> Parser (Maybe Int)
-> Parser
(Maybe Text
-> Maybe Captions
-> Maybe Text
-> Maybe [Clip]
-> Maybe JobAlbumArt
-> Maybe Integer
-> Maybe [JobWatermark]
-> Maybe Int
-> Maybe Encryption
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Integer
-> Maybe Encryption
-> Maybe Integer
-> Maybe Text
-> JobOutput)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"Height")
Parser
(Maybe Text
-> Maybe Captions
-> Maybe Text
-> Maybe [Clip]
-> Maybe JobAlbumArt
-> Maybe Integer
-> Maybe [JobWatermark]
-> Maybe Int
-> Maybe Encryption
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Integer
-> Maybe Encryption
-> Maybe Integer
-> Maybe Text
-> JobOutput)
-> Parser (Maybe Text)
-> Parser
(Maybe Captions
-> Maybe Text
-> Maybe [Clip]
-> Maybe JobAlbumArt
-> Maybe Integer
-> Maybe [JobWatermark]
-> Maybe Int
-> Maybe Encryption
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Integer
-> Maybe Encryption
-> Maybe Integer
-> Maybe Text
-> JobOutput)
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
"FrameRate")
Parser
(Maybe Captions
-> Maybe Text
-> Maybe [Clip]
-> Maybe JobAlbumArt
-> Maybe Integer
-> Maybe [JobWatermark]
-> Maybe Int
-> Maybe Encryption
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Integer
-> Maybe Encryption
-> Maybe Integer
-> Maybe Text
-> JobOutput)
-> Parser (Maybe Captions)
-> Parser
(Maybe Text
-> Maybe [Clip]
-> Maybe JobAlbumArt
-> Maybe Integer
-> Maybe [JobWatermark]
-> Maybe Int
-> Maybe Encryption
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Integer
-> Maybe Encryption
-> Maybe Integer
-> Maybe Text
-> JobOutput)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Captions)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"Captions")
Parser
(Maybe Text
-> Maybe [Clip]
-> Maybe JobAlbumArt
-> Maybe Integer
-> Maybe [JobWatermark]
-> Maybe Int
-> Maybe Encryption
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Integer
-> Maybe Encryption
-> Maybe Integer
-> Maybe Text
-> JobOutput)
-> Parser (Maybe Text)
-> Parser
(Maybe [Clip]
-> Maybe JobAlbumArt
-> Maybe Integer
-> Maybe [JobWatermark]
-> Maybe Int
-> Maybe Encryption
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Integer
-> Maybe Encryption
-> Maybe Integer
-> Maybe Text
-> JobOutput)
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
"PresetId")
Parser
(Maybe [Clip]
-> Maybe JobAlbumArt
-> Maybe Integer
-> Maybe [JobWatermark]
-> Maybe Int
-> Maybe Encryption
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Integer
-> Maybe Encryption
-> Maybe Integer
-> Maybe Text
-> JobOutput)
-> Parser (Maybe [Clip])
-> Parser
(Maybe JobAlbumArt
-> Maybe Integer
-> Maybe [JobWatermark]
-> Maybe Int
-> Maybe Encryption
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Integer
-> Maybe Encryption
-> Maybe Integer
-> Maybe Text
-> JobOutput)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe (Maybe [Clip]))
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"Composition" Parser (Maybe (Maybe [Clip]))
-> Maybe [Clip] -> Parser (Maybe [Clip])
forall a. Parser (Maybe a) -> a -> Parser a
Core..!= Maybe [Clip]
forall a. Monoid a => a
Prelude.mempty)
Parser
(Maybe JobAlbumArt
-> Maybe Integer
-> Maybe [JobWatermark]
-> Maybe Int
-> Maybe Encryption
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Integer
-> Maybe Encryption
-> Maybe Integer
-> Maybe Text
-> JobOutput)
-> Parser (Maybe JobAlbumArt)
-> Parser
(Maybe Integer
-> Maybe [JobWatermark]
-> Maybe Int
-> Maybe Encryption
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Integer
-> Maybe Encryption
-> Maybe Integer
-> Maybe Text
-> JobOutput)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe JobAlbumArt)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"AlbumArt")
Parser
(Maybe Integer
-> Maybe [JobWatermark]
-> Maybe Int
-> Maybe Encryption
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Integer
-> Maybe Encryption
-> Maybe Integer
-> Maybe Text
-> JobOutput)
-> Parser (Maybe Integer)
-> Parser
(Maybe [JobWatermark]
-> Maybe Int
-> Maybe Encryption
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Integer
-> Maybe Encryption
-> Maybe Integer
-> Maybe Text
-> JobOutput)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Integer)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"FileSize")
Parser
(Maybe [JobWatermark]
-> Maybe Int
-> Maybe Encryption
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Integer
-> Maybe Encryption
-> Maybe Integer
-> Maybe Text
-> JobOutput)
-> Parser (Maybe [JobWatermark])
-> Parser
(Maybe Int
-> Maybe Encryption
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Integer
-> Maybe Encryption
-> Maybe Integer
-> Maybe Text
-> JobOutput)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe (Maybe [JobWatermark]))
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"Watermarks" Parser (Maybe (Maybe [JobWatermark]))
-> Maybe [JobWatermark] -> Parser (Maybe [JobWatermark])
forall a. Parser (Maybe a) -> a -> Parser a
Core..!= Maybe [JobWatermark]
forall a. Monoid a => a
Prelude.mempty)
Parser
(Maybe Int
-> Maybe Encryption
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Integer
-> Maybe Encryption
-> Maybe Integer
-> Maybe Text
-> JobOutput)
-> Parser (Maybe Int)
-> Parser
(Maybe Encryption
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Integer
-> Maybe Encryption
-> Maybe Integer
-> Maybe Text
-> JobOutput)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"Width")
Parser
(Maybe Encryption
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Integer
-> Maybe Encryption
-> Maybe Integer
-> Maybe Text
-> JobOutput)
-> Parser (Maybe Encryption)
-> Parser
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Integer
-> Maybe Encryption
-> Maybe Integer
-> Maybe Text
-> JobOutput)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Encryption)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"Encryption")
Parser
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Integer
-> Maybe Encryption
-> Maybe Integer
-> Maybe Text
-> JobOutput)
-> Parser (Maybe Text)
-> Parser
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Integer
-> Maybe Encryption
-> Maybe Integer
-> Maybe Text
-> JobOutput)
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
"Key")
Parser
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Integer
-> Maybe Encryption
-> Maybe Integer
-> Maybe Text
-> JobOutput)
-> Parser (Maybe Text)
-> Parser
(Maybe Text
-> Maybe Text
-> Maybe Integer
-> Maybe Encryption
-> Maybe Integer
-> Maybe Text
-> JobOutput)
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
"StatusDetail")
Parser
(Maybe Text
-> Maybe Text
-> Maybe Integer
-> Maybe Encryption
-> Maybe Integer
-> Maybe Text
-> JobOutput)
-> Parser (Maybe Text)
-> Parser
(Maybe Text
-> Maybe Integer
-> Maybe Encryption
-> Maybe Integer
-> Maybe Text
-> JobOutput)
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
"Id")
Parser
(Maybe Text
-> Maybe Integer
-> Maybe Encryption
-> Maybe Integer
-> Maybe Text
-> JobOutput)
-> Parser (Maybe Text)
-> Parser
(Maybe Integer
-> Maybe Encryption -> Maybe Integer -> Maybe Text -> JobOutput)
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
"SegmentDuration")
Parser
(Maybe Integer
-> Maybe Encryption -> Maybe Integer -> Maybe Text -> JobOutput)
-> Parser (Maybe Integer)
-> Parser
(Maybe Encryption -> Maybe Integer -> Maybe Text -> JobOutput)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Integer)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"DurationMillis")
Parser
(Maybe Encryption -> Maybe Integer -> Maybe Text -> JobOutput)
-> Parser (Maybe Encryption)
-> Parser (Maybe Integer -> Maybe Text -> JobOutput)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Encryption)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"ThumbnailEncryption")
Parser (Maybe Integer -> Maybe Text -> JobOutput)
-> Parser (Maybe Integer) -> Parser (Maybe Text -> JobOutput)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Integer)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"Duration")
Parser (Maybe Text -> JobOutput)
-> Parser (Maybe Text) -> Parser JobOutput
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
"Rotate")
)
instance Prelude.Hashable JobOutput
instance Prelude.NFData JobOutput