{-# 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.SageMaker.Types.TrialComponent where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import qualified Amazonka.Prelude as Prelude
import Amazonka.SageMaker.Types.MetadataProperties
import Amazonka.SageMaker.Types.Parent
import Amazonka.SageMaker.Types.Tag
import Amazonka.SageMaker.Types.TrialComponentArtifact
import Amazonka.SageMaker.Types.TrialComponentMetricSummary
import Amazonka.SageMaker.Types.TrialComponentParameterValue
import Amazonka.SageMaker.Types.TrialComponentSource
import Amazonka.SageMaker.Types.TrialComponentSourceDetail
import Amazonka.SageMaker.Types.TrialComponentStatus
import Amazonka.SageMaker.Types.UserContext
data TrialComponent = TrialComponent'
{
TrialComponent -> Maybe UserContext
createdBy :: Prelude.Maybe UserContext,
TrialComponent -> Maybe POSIX
creationTime :: Prelude.Maybe Data.POSIX,
TrialComponent -> Maybe Text
displayName :: Prelude.Maybe Prelude.Text,
TrialComponent -> Maybe POSIX
endTime :: Prelude.Maybe Data.POSIX,
TrialComponent -> Maybe (HashMap Text TrialComponentArtifact)
inputArtifacts :: Prelude.Maybe (Prelude.HashMap Prelude.Text TrialComponentArtifact),
TrialComponent -> Maybe UserContext
lastModifiedBy :: Prelude.Maybe UserContext,
TrialComponent -> Maybe POSIX
lastModifiedTime :: Prelude.Maybe Data.POSIX,
TrialComponent -> Maybe Text
lineageGroupArn :: Prelude.Maybe Prelude.Text,
TrialComponent -> Maybe MetadataProperties
metadataProperties :: Prelude.Maybe MetadataProperties,
TrialComponent -> Maybe [TrialComponentMetricSummary]
metrics :: Prelude.Maybe [TrialComponentMetricSummary],
TrialComponent -> Maybe (HashMap Text TrialComponentArtifact)
outputArtifacts :: Prelude.Maybe (Prelude.HashMap Prelude.Text TrialComponentArtifact),
TrialComponent -> Maybe (HashMap Text TrialComponentParameterValue)
parameters :: Prelude.Maybe (Prelude.HashMap Prelude.Text TrialComponentParameterValue),
TrialComponent -> Maybe [Parent]
parents :: Prelude.Maybe [Parent],
TrialComponent -> Maybe Text
runName :: Prelude.Maybe Prelude.Text,
TrialComponent -> Maybe TrialComponentSource
source :: Prelude.Maybe TrialComponentSource,
TrialComponent -> Maybe TrialComponentSourceDetail
sourceDetail :: Prelude.Maybe TrialComponentSourceDetail,
TrialComponent -> Maybe POSIX
startTime :: Prelude.Maybe Data.POSIX,
TrialComponent -> Maybe TrialComponentStatus
status :: Prelude.Maybe TrialComponentStatus,
TrialComponent -> Maybe [Tag]
tags :: Prelude.Maybe [Tag],
TrialComponent -> Maybe Text
trialComponentArn :: Prelude.Maybe Prelude.Text,
TrialComponent -> Maybe Text
trialComponentName :: Prelude.Maybe Prelude.Text
}
deriving (TrialComponent -> TrialComponent -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: TrialComponent -> TrialComponent -> Bool
$c/= :: TrialComponent -> TrialComponent -> Bool
== :: TrialComponent -> TrialComponent -> Bool
$c== :: TrialComponent -> TrialComponent -> Bool
Prelude.Eq, ReadPrec [TrialComponent]
ReadPrec TrialComponent
Int -> ReadS TrialComponent
ReadS [TrialComponent]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [TrialComponent]
$creadListPrec :: ReadPrec [TrialComponent]
readPrec :: ReadPrec TrialComponent
$creadPrec :: ReadPrec TrialComponent
readList :: ReadS [TrialComponent]
$creadList :: ReadS [TrialComponent]
readsPrec :: Int -> ReadS TrialComponent
$creadsPrec :: Int -> ReadS TrialComponent
Prelude.Read, Int -> TrialComponent -> ShowS
[TrialComponent] -> ShowS
TrialComponent -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [TrialComponent] -> ShowS
$cshowList :: [TrialComponent] -> ShowS
show :: TrialComponent -> String
$cshow :: TrialComponent -> String
showsPrec :: Int -> TrialComponent -> ShowS
$cshowsPrec :: Int -> TrialComponent -> ShowS
Prelude.Show, forall x. Rep TrialComponent x -> TrialComponent
forall x. TrialComponent -> Rep TrialComponent x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep TrialComponent x -> TrialComponent
$cfrom :: forall x. TrialComponent -> Rep TrialComponent x
Prelude.Generic)
newTrialComponent ::
TrialComponent
newTrialComponent :: TrialComponent
newTrialComponent =
TrialComponent'
{ $sel:createdBy:TrialComponent' :: Maybe UserContext
createdBy = forall a. Maybe a
Prelude.Nothing,
$sel:creationTime:TrialComponent' :: Maybe POSIX
creationTime = forall a. Maybe a
Prelude.Nothing,
$sel:displayName:TrialComponent' :: Maybe Text
displayName = forall a. Maybe a
Prelude.Nothing,
$sel:endTime:TrialComponent' :: Maybe POSIX
endTime = forall a. Maybe a
Prelude.Nothing,
$sel:inputArtifacts:TrialComponent' :: Maybe (HashMap Text TrialComponentArtifact)
inputArtifacts = forall a. Maybe a
Prelude.Nothing,
$sel:lastModifiedBy:TrialComponent' :: Maybe UserContext
lastModifiedBy = forall a. Maybe a
Prelude.Nothing,
$sel:lastModifiedTime:TrialComponent' :: Maybe POSIX
lastModifiedTime = forall a. Maybe a
Prelude.Nothing,
$sel:lineageGroupArn:TrialComponent' :: Maybe Text
lineageGroupArn = forall a. Maybe a
Prelude.Nothing,
$sel:metadataProperties:TrialComponent' :: Maybe MetadataProperties
metadataProperties = forall a. Maybe a
Prelude.Nothing,
$sel:metrics:TrialComponent' :: Maybe [TrialComponentMetricSummary]
metrics = forall a. Maybe a
Prelude.Nothing,
$sel:outputArtifacts:TrialComponent' :: Maybe (HashMap Text TrialComponentArtifact)
outputArtifacts = forall a. Maybe a
Prelude.Nothing,
$sel:parameters:TrialComponent' :: Maybe (HashMap Text TrialComponentParameterValue)
parameters = forall a. Maybe a
Prelude.Nothing,
$sel:parents:TrialComponent' :: Maybe [Parent]
parents = forall a. Maybe a
Prelude.Nothing,
$sel:runName:TrialComponent' :: Maybe Text
runName = forall a. Maybe a
Prelude.Nothing,
$sel:source:TrialComponent' :: Maybe TrialComponentSource
source = forall a. Maybe a
Prelude.Nothing,
$sel:sourceDetail:TrialComponent' :: Maybe TrialComponentSourceDetail
sourceDetail = forall a. Maybe a
Prelude.Nothing,
$sel:startTime:TrialComponent' :: Maybe POSIX
startTime = forall a. Maybe a
Prelude.Nothing,
$sel:status:TrialComponent' :: Maybe TrialComponentStatus
status = forall a. Maybe a
Prelude.Nothing,
$sel:tags:TrialComponent' :: Maybe [Tag]
tags = forall a. Maybe a
Prelude.Nothing,
$sel:trialComponentArn:TrialComponent' :: Maybe Text
trialComponentArn = forall a. Maybe a
Prelude.Nothing,
$sel:trialComponentName:TrialComponent' :: Maybe Text
trialComponentName = forall a. Maybe a
Prelude.Nothing
}
trialComponent_createdBy :: Lens.Lens' TrialComponent (Prelude.Maybe UserContext)
trialComponent_createdBy :: Lens' TrialComponent (Maybe UserContext)
trialComponent_createdBy = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\TrialComponent' {Maybe UserContext
createdBy :: Maybe UserContext
$sel:createdBy:TrialComponent' :: TrialComponent -> Maybe UserContext
createdBy} -> Maybe UserContext
createdBy) (\s :: TrialComponent
s@TrialComponent' {} Maybe UserContext
a -> TrialComponent
s {$sel:createdBy:TrialComponent' :: Maybe UserContext
createdBy = Maybe UserContext
a} :: TrialComponent)
trialComponent_creationTime :: Lens.Lens' TrialComponent (Prelude.Maybe Prelude.UTCTime)
trialComponent_creationTime :: Lens' TrialComponent (Maybe UTCTime)
trialComponent_creationTime = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\TrialComponent' {Maybe POSIX
creationTime :: Maybe POSIX
$sel:creationTime:TrialComponent' :: TrialComponent -> Maybe POSIX
creationTime} -> Maybe POSIX
creationTime) (\s :: TrialComponent
s@TrialComponent' {} Maybe POSIX
a -> TrialComponent
s {$sel:creationTime:TrialComponent' :: Maybe POSIX
creationTime = Maybe POSIX
a} :: TrialComponent) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. 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 forall (a :: Format). Iso' (Time a) UTCTime
Data._Time
trialComponent_displayName :: Lens.Lens' TrialComponent (Prelude.Maybe Prelude.Text)
trialComponent_displayName :: Lens' TrialComponent (Maybe Text)
trialComponent_displayName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\TrialComponent' {Maybe Text
displayName :: Maybe Text
$sel:displayName:TrialComponent' :: TrialComponent -> Maybe Text
displayName} -> Maybe Text
displayName) (\s :: TrialComponent
s@TrialComponent' {} Maybe Text
a -> TrialComponent
s {$sel:displayName:TrialComponent' :: Maybe Text
displayName = Maybe Text
a} :: TrialComponent)
trialComponent_endTime :: Lens.Lens' TrialComponent (Prelude.Maybe Prelude.UTCTime)
trialComponent_endTime :: Lens' TrialComponent (Maybe UTCTime)
trialComponent_endTime = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\TrialComponent' {Maybe POSIX
endTime :: Maybe POSIX
$sel:endTime:TrialComponent' :: TrialComponent -> Maybe POSIX
endTime} -> Maybe POSIX
endTime) (\s :: TrialComponent
s@TrialComponent' {} Maybe POSIX
a -> TrialComponent
s {$sel:endTime:TrialComponent' :: Maybe POSIX
endTime = Maybe POSIX
a} :: TrialComponent) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. 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 forall (a :: Format). Iso' (Time a) UTCTime
Data._Time
trialComponent_inputArtifacts :: Lens.Lens' TrialComponent (Prelude.Maybe (Prelude.HashMap Prelude.Text TrialComponentArtifact))
trialComponent_inputArtifacts :: Lens' TrialComponent (Maybe (HashMap Text TrialComponentArtifact))
trialComponent_inputArtifacts = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\TrialComponent' {Maybe (HashMap Text TrialComponentArtifact)
inputArtifacts :: Maybe (HashMap Text TrialComponentArtifact)
$sel:inputArtifacts:TrialComponent' :: TrialComponent -> Maybe (HashMap Text TrialComponentArtifact)
inputArtifacts} -> Maybe (HashMap Text TrialComponentArtifact)
inputArtifacts) (\s :: TrialComponent
s@TrialComponent' {} Maybe (HashMap Text TrialComponentArtifact)
a -> TrialComponent
s {$sel:inputArtifacts:TrialComponent' :: Maybe (HashMap Text TrialComponentArtifact)
inputArtifacts = Maybe (HashMap Text TrialComponentArtifact)
a} :: TrialComponent) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. 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 forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
trialComponent_lastModifiedBy :: Lens.Lens' TrialComponent (Prelude.Maybe UserContext)
trialComponent_lastModifiedBy :: Lens' TrialComponent (Maybe UserContext)
trialComponent_lastModifiedBy = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\TrialComponent' {Maybe UserContext
lastModifiedBy :: Maybe UserContext
$sel:lastModifiedBy:TrialComponent' :: TrialComponent -> Maybe UserContext
lastModifiedBy} -> Maybe UserContext
lastModifiedBy) (\s :: TrialComponent
s@TrialComponent' {} Maybe UserContext
a -> TrialComponent
s {$sel:lastModifiedBy:TrialComponent' :: Maybe UserContext
lastModifiedBy = Maybe UserContext
a} :: TrialComponent)
trialComponent_lastModifiedTime :: Lens.Lens' TrialComponent (Prelude.Maybe Prelude.UTCTime)
trialComponent_lastModifiedTime :: Lens' TrialComponent (Maybe UTCTime)
trialComponent_lastModifiedTime = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\TrialComponent' {Maybe POSIX
lastModifiedTime :: Maybe POSIX
$sel:lastModifiedTime:TrialComponent' :: TrialComponent -> Maybe POSIX
lastModifiedTime} -> Maybe POSIX
lastModifiedTime) (\s :: TrialComponent
s@TrialComponent' {} Maybe POSIX
a -> TrialComponent
s {$sel:lastModifiedTime:TrialComponent' :: Maybe POSIX
lastModifiedTime = Maybe POSIX
a} :: TrialComponent) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. 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 forall (a :: Format). Iso' (Time a) UTCTime
Data._Time
trialComponent_lineageGroupArn :: Lens.Lens' TrialComponent (Prelude.Maybe Prelude.Text)
trialComponent_lineageGroupArn :: Lens' TrialComponent (Maybe Text)
trialComponent_lineageGroupArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\TrialComponent' {Maybe Text
lineageGroupArn :: Maybe Text
$sel:lineageGroupArn:TrialComponent' :: TrialComponent -> Maybe Text
lineageGroupArn} -> Maybe Text
lineageGroupArn) (\s :: TrialComponent
s@TrialComponent' {} Maybe Text
a -> TrialComponent
s {$sel:lineageGroupArn:TrialComponent' :: Maybe Text
lineageGroupArn = Maybe Text
a} :: TrialComponent)
trialComponent_metadataProperties :: Lens.Lens' TrialComponent (Prelude.Maybe MetadataProperties)
trialComponent_metadataProperties :: Lens' TrialComponent (Maybe MetadataProperties)
trialComponent_metadataProperties = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\TrialComponent' {Maybe MetadataProperties
metadataProperties :: Maybe MetadataProperties
$sel:metadataProperties:TrialComponent' :: TrialComponent -> Maybe MetadataProperties
metadataProperties} -> Maybe MetadataProperties
metadataProperties) (\s :: TrialComponent
s@TrialComponent' {} Maybe MetadataProperties
a -> TrialComponent
s {$sel:metadataProperties:TrialComponent' :: Maybe MetadataProperties
metadataProperties = Maybe MetadataProperties
a} :: TrialComponent)
trialComponent_metrics :: Lens.Lens' TrialComponent (Prelude.Maybe [TrialComponentMetricSummary])
trialComponent_metrics :: Lens' TrialComponent (Maybe [TrialComponentMetricSummary])
trialComponent_metrics = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\TrialComponent' {Maybe [TrialComponentMetricSummary]
metrics :: Maybe [TrialComponentMetricSummary]
$sel:metrics:TrialComponent' :: TrialComponent -> Maybe [TrialComponentMetricSummary]
metrics} -> Maybe [TrialComponentMetricSummary]
metrics) (\s :: TrialComponent
s@TrialComponent' {} Maybe [TrialComponentMetricSummary]
a -> TrialComponent
s {$sel:metrics:TrialComponent' :: Maybe [TrialComponentMetricSummary]
metrics = Maybe [TrialComponentMetricSummary]
a} :: TrialComponent) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. 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 forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
trialComponent_outputArtifacts :: Lens.Lens' TrialComponent (Prelude.Maybe (Prelude.HashMap Prelude.Text TrialComponentArtifact))
trialComponent_outputArtifacts :: Lens' TrialComponent (Maybe (HashMap Text TrialComponentArtifact))
trialComponent_outputArtifacts = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\TrialComponent' {Maybe (HashMap Text TrialComponentArtifact)
outputArtifacts :: Maybe (HashMap Text TrialComponentArtifact)
$sel:outputArtifacts:TrialComponent' :: TrialComponent -> Maybe (HashMap Text TrialComponentArtifact)
outputArtifacts} -> Maybe (HashMap Text TrialComponentArtifact)
outputArtifacts) (\s :: TrialComponent
s@TrialComponent' {} Maybe (HashMap Text TrialComponentArtifact)
a -> TrialComponent
s {$sel:outputArtifacts:TrialComponent' :: Maybe (HashMap Text TrialComponentArtifact)
outputArtifacts = Maybe (HashMap Text TrialComponentArtifact)
a} :: TrialComponent) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. 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 forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
trialComponent_parameters :: Lens.Lens' TrialComponent (Prelude.Maybe (Prelude.HashMap Prelude.Text TrialComponentParameterValue))
trialComponent_parameters :: Lens'
TrialComponent (Maybe (HashMap Text TrialComponentParameterValue))
trialComponent_parameters = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\TrialComponent' {Maybe (HashMap Text TrialComponentParameterValue)
parameters :: Maybe (HashMap Text TrialComponentParameterValue)
$sel:parameters:TrialComponent' :: TrialComponent -> Maybe (HashMap Text TrialComponentParameterValue)
parameters} -> Maybe (HashMap Text TrialComponentParameterValue)
parameters) (\s :: TrialComponent
s@TrialComponent' {} Maybe (HashMap Text TrialComponentParameterValue)
a -> TrialComponent
s {$sel:parameters:TrialComponent' :: Maybe (HashMap Text TrialComponentParameterValue)
parameters = Maybe (HashMap Text TrialComponentParameterValue)
a} :: TrialComponent) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. 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 forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
trialComponent_parents :: Lens.Lens' TrialComponent (Prelude.Maybe [Parent])
trialComponent_parents :: Lens' TrialComponent (Maybe [Parent])
trialComponent_parents = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\TrialComponent' {Maybe [Parent]
parents :: Maybe [Parent]
$sel:parents:TrialComponent' :: TrialComponent -> Maybe [Parent]
parents} -> Maybe [Parent]
parents) (\s :: TrialComponent
s@TrialComponent' {} Maybe [Parent]
a -> TrialComponent
s {$sel:parents:TrialComponent' :: Maybe [Parent]
parents = Maybe [Parent]
a} :: TrialComponent) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. 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 forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
trialComponent_runName :: Lens.Lens' TrialComponent (Prelude.Maybe Prelude.Text)
trialComponent_runName :: Lens' TrialComponent (Maybe Text)
trialComponent_runName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\TrialComponent' {Maybe Text
runName :: Maybe Text
$sel:runName:TrialComponent' :: TrialComponent -> Maybe Text
runName} -> Maybe Text
runName) (\s :: TrialComponent
s@TrialComponent' {} Maybe Text
a -> TrialComponent
s {$sel:runName:TrialComponent' :: Maybe Text
runName = Maybe Text
a} :: TrialComponent)
trialComponent_source :: Lens.Lens' TrialComponent (Prelude.Maybe TrialComponentSource)
trialComponent_source :: Lens' TrialComponent (Maybe TrialComponentSource)
trialComponent_source = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\TrialComponent' {Maybe TrialComponentSource
source :: Maybe TrialComponentSource
$sel:source:TrialComponent' :: TrialComponent -> Maybe TrialComponentSource
source} -> Maybe TrialComponentSource
source) (\s :: TrialComponent
s@TrialComponent' {} Maybe TrialComponentSource
a -> TrialComponent
s {$sel:source:TrialComponent' :: Maybe TrialComponentSource
source = Maybe TrialComponentSource
a} :: TrialComponent)
trialComponent_sourceDetail :: Lens.Lens' TrialComponent (Prelude.Maybe TrialComponentSourceDetail)
trialComponent_sourceDetail :: Lens' TrialComponent (Maybe TrialComponentSourceDetail)
trialComponent_sourceDetail = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\TrialComponent' {Maybe TrialComponentSourceDetail
sourceDetail :: Maybe TrialComponentSourceDetail
$sel:sourceDetail:TrialComponent' :: TrialComponent -> Maybe TrialComponentSourceDetail
sourceDetail} -> Maybe TrialComponentSourceDetail
sourceDetail) (\s :: TrialComponent
s@TrialComponent' {} Maybe TrialComponentSourceDetail
a -> TrialComponent
s {$sel:sourceDetail:TrialComponent' :: Maybe TrialComponentSourceDetail
sourceDetail = Maybe TrialComponentSourceDetail
a} :: TrialComponent)
trialComponent_startTime :: Lens.Lens' TrialComponent (Prelude.Maybe Prelude.UTCTime)
trialComponent_startTime :: Lens' TrialComponent (Maybe UTCTime)
trialComponent_startTime = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\TrialComponent' {Maybe POSIX
startTime :: Maybe POSIX
$sel:startTime:TrialComponent' :: TrialComponent -> Maybe POSIX
startTime} -> Maybe POSIX
startTime) (\s :: TrialComponent
s@TrialComponent' {} Maybe POSIX
a -> TrialComponent
s {$sel:startTime:TrialComponent' :: Maybe POSIX
startTime = Maybe POSIX
a} :: TrialComponent) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. 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 forall (a :: Format). Iso' (Time a) UTCTime
Data._Time
trialComponent_status :: Lens.Lens' TrialComponent (Prelude.Maybe TrialComponentStatus)
trialComponent_status :: Lens' TrialComponent (Maybe TrialComponentStatus)
trialComponent_status = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\TrialComponent' {Maybe TrialComponentStatus
status :: Maybe TrialComponentStatus
$sel:status:TrialComponent' :: TrialComponent -> Maybe TrialComponentStatus
status} -> Maybe TrialComponentStatus
status) (\s :: TrialComponent
s@TrialComponent' {} Maybe TrialComponentStatus
a -> TrialComponent
s {$sel:status:TrialComponent' :: Maybe TrialComponentStatus
status = Maybe TrialComponentStatus
a} :: TrialComponent)
trialComponent_tags :: Lens.Lens' TrialComponent (Prelude.Maybe [Tag])
trialComponent_tags :: Lens' TrialComponent (Maybe [Tag])
trialComponent_tags = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\TrialComponent' {Maybe [Tag]
tags :: Maybe [Tag]
$sel:tags:TrialComponent' :: TrialComponent -> Maybe [Tag]
tags} -> Maybe [Tag]
tags) (\s :: TrialComponent
s@TrialComponent' {} Maybe [Tag]
a -> TrialComponent
s {$sel:tags:TrialComponent' :: Maybe [Tag]
tags = Maybe [Tag]
a} :: TrialComponent) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. 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 forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
trialComponent_trialComponentArn :: Lens.Lens' TrialComponent (Prelude.Maybe Prelude.Text)
trialComponent_trialComponentArn :: Lens' TrialComponent (Maybe Text)
trialComponent_trialComponentArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\TrialComponent' {Maybe Text
trialComponentArn :: Maybe Text
$sel:trialComponentArn:TrialComponent' :: TrialComponent -> Maybe Text
trialComponentArn} -> Maybe Text
trialComponentArn) (\s :: TrialComponent
s@TrialComponent' {} Maybe Text
a -> TrialComponent
s {$sel:trialComponentArn:TrialComponent' :: Maybe Text
trialComponentArn = Maybe Text
a} :: TrialComponent)
trialComponent_trialComponentName :: Lens.Lens' TrialComponent (Prelude.Maybe Prelude.Text)
trialComponent_trialComponentName :: Lens' TrialComponent (Maybe Text)
trialComponent_trialComponentName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\TrialComponent' {Maybe Text
trialComponentName :: Maybe Text
$sel:trialComponentName:TrialComponent' :: TrialComponent -> Maybe Text
trialComponentName} -> Maybe Text
trialComponentName) (\s :: TrialComponent
s@TrialComponent' {} Maybe Text
a -> TrialComponent
s {$sel:trialComponentName:TrialComponent' :: Maybe Text
trialComponentName = Maybe Text
a} :: TrialComponent)
instance Data.FromJSON TrialComponent where
parseJSON :: Value -> Parser TrialComponent
parseJSON =
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Data.withObject
String
"TrialComponent"
( \Object
x ->
Maybe UserContext
-> Maybe POSIX
-> Maybe Text
-> Maybe POSIX
-> Maybe (HashMap Text TrialComponentArtifact)
-> Maybe UserContext
-> Maybe POSIX
-> Maybe Text
-> Maybe MetadataProperties
-> Maybe [TrialComponentMetricSummary]
-> Maybe (HashMap Text TrialComponentArtifact)
-> Maybe (HashMap Text TrialComponentParameterValue)
-> Maybe [Parent]
-> Maybe Text
-> Maybe TrialComponentSource
-> Maybe TrialComponentSourceDetail
-> Maybe POSIX
-> Maybe TrialComponentStatus
-> Maybe [Tag]
-> Maybe Text
-> Maybe Text
-> TrialComponent
TrialComponent'
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"CreatedBy")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"CreationTime")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"DisplayName")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"EndTime")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"InputArtifacts" forall a. Parser (Maybe a) -> a -> Parser a
Data..!= forall a. Monoid a => a
Prelude.mempty)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"LastModifiedBy")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"LastModifiedTime")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"LineageGroupArn")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"MetadataProperties")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"Metrics" forall a. Parser (Maybe a) -> a -> Parser a
Data..!= forall a. Monoid a => a
Prelude.mempty)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ( Object
x
forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"OutputArtifacts"
forall a. Parser (Maybe a) -> a -> Parser a
Data..!= forall a. Monoid a => a
Prelude.mempty
)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"Parameters" forall a. Parser (Maybe a) -> a -> Parser a
Data..!= forall a. Monoid a => a
Prelude.mempty)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"Parents" forall a. Parser (Maybe a) -> a -> Parser a
Data..!= forall a. Monoid a => a
Prelude.mempty)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"RunName")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"Source")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"SourceDetail")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"StartTime")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"Status")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"Tags" forall a. Parser (Maybe a) -> a -> Parser a
Data..!= forall a. Monoid a => a
Prelude.mempty)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"TrialComponentArn")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"TrialComponentName")
)
instance Prelude.Hashable TrialComponent where
hashWithSalt :: Int -> TrialComponent -> Int
hashWithSalt Int
_salt TrialComponent' {Maybe [Parent]
Maybe [Tag]
Maybe [TrialComponentMetricSummary]
Maybe Text
Maybe (HashMap Text TrialComponentArtifact)
Maybe (HashMap Text TrialComponentParameterValue)
Maybe POSIX
Maybe MetadataProperties
Maybe TrialComponentSource
Maybe TrialComponentStatus
Maybe UserContext
Maybe TrialComponentSourceDetail
trialComponentName :: Maybe Text
trialComponentArn :: Maybe Text
tags :: Maybe [Tag]
status :: Maybe TrialComponentStatus
startTime :: Maybe POSIX
sourceDetail :: Maybe TrialComponentSourceDetail
source :: Maybe TrialComponentSource
runName :: Maybe Text
parents :: Maybe [Parent]
parameters :: Maybe (HashMap Text TrialComponentParameterValue)
outputArtifacts :: Maybe (HashMap Text TrialComponentArtifact)
metrics :: Maybe [TrialComponentMetricSummary]
metadataProperties :: Maybe MetadataProperties
lineageGroupArn :: Maybe Text
lastModifiedTime :: Maybe POSIX
lastModifiedBy :: Maybe UserContext
inputArtifacts :: Maybe (HashMap Text TrialComponentArtifact)
endTime :: Maybe POSIX
displayName :: Maybe Text
creationTime :: Maybe POSIX
createdBy :: Maybe UserContext
$sel:trialComponentName:TrialComponent' :: TrialComponent -> Maybe Text
$sel:trialComponentArn:TrialComponent' :: TrialComponent -> Maybe Text
$sel:tags:TrialComponent' :: TrialComponent -> Maybe [Tag]
$sel:status:TrialComponent' :: TrialComponent -> Maybe TrialComponentStatus
$sel:startTime:TrialComponent' :: TrialComponent -> Maybe POSIX
$sel:sourceDetail:TrialComponent' :: TrialComponent -> Maybe TrialComponentSourceDetail
$sel:source:TrialComponent' :: TrialComponent -> Maybe TrialComponentSource
$sel:runName:TrialComponent' :: TrialComponent -> Maybe Text
$sel:parents:TrialComponent' :: TrialComponent -> Maybe [Parent]
$sel:parameters:TrialComponent' :: TrialComponent -> Maybe (HashMap Text TrialComponentParameterValue)
$sel:outputArtifacts:TrialComponent' :: TrialComponent -> Maybe (HashMap Text TrialComponentArtifact)
$sel:metrics:TrialComponent' :: TrialComponent -> Maybe [TrialComponentMetricSummary]
$sel:metadataProperties:TrialComponent' :: TrialComponent -> Maybe MetadataProperties
$sel:lineageGroupArn:TrialComponent' :: TrialComponent -> Maybe Text
$sel:lastModifiedTime:TrialComponent' :: TrialComponent -> Maybe POSIX
$sel:lastModifiedBy:TrialComponent' :: TrialComponent -> Maybe UserContext
$sel:inputArtifacts:TrialComponent' :: TrialComponent -> Maybe (HashMap Text TrialComponentArtifact)
$sel:endTime:TrialComponent' :: TrialComponent -> Maybe POSIX
$sel:displayName:TrialComponent' :: TrialComponent -> Maybe Text
$sel:creationTime:TrialComponent' :: TrialComponent -> Maybe POSIX
$sel:createdBy:TrialComponent' :: TrialComponent -> Maybe UserContext
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe UserContext
createdBy
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe POSIX
creationTime
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
displayName
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe POSIX
endTime
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe (HashMap Text TrialComponentArtifact)
inputArtifacts
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe UserContext
lastModifiedBy
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe POSIX
lastModifiedTime
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
lineageGroupArn
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe MetadataProperties
metadataProperties
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [TrialComponentMetricSummary]
metrics
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe (HashMap Text TrialComponentArtifact)
outputArtifacts
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe (HashMap Text TrialComponentParameterValue)
parameters
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [Parent]
parents
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
runName
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe TrialComponentSource
source
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe TrialComponentSourceDetail
sourceDetail
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe POSIX
startTime
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe TrialComponentStatus
status
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [Tag]
tags
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
trialComponentArn
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
trialComponentName
instance Prelude.NFData TrialComponent where
rnf :: TrialComponent -> ()
rnf TrialComponent' {Maybe [Parent]
Maybe [Tag]
Maybe [TrialComponentMetricSummary]
Maybe Text
Maybe (HashMap Text TrialComponentArtifact)
Maybe (HashMap Text TrialComponentParameterValue)
Maybe POSIX
Maybe MetadataProperties
Maybe TrialComponentSource
Maybe TrialComponentStatus
Maybe UserContext
Maybe TrialComponentSourceDetail
trialComponentName :: Maybe Text
trialComponentArn :: Maybe Text
tags :: Maybe [Tag]
status :: Maybe TrialComponentStatus
startTime :: Maybe POSIX
sourceDetail :: Maybe TrialComponentSourceDetail
source :: Maybe TrialComponentSource
runName :: Maybe Text
parents :: Maybe [Parent]
parameters :: Maybe (HashMap Text TrialComponentParameterValue)
outputArtifacts :: Maybe (HashMap Text TrialComponentArtifact)
metrics :: Maybe [TrialComponentMetricSummary]
metadataProperties :: Maybe MetadataProperties
lineageGroupArn :: Maybe Text
lastModifiedTime :: Maybe POSIX
lastModifiedBy :: Maybe UserContext
inputArtifacts :: Maybe (HashMap Text TrialComponentArtifact)
endTime :: Maybe POSIX
displayName :: Maybe Text
creationTime :: Maybe POSIX
createdBy :: Maybe UserContext
$sel:trialComponentName:TrialComponent' :: TrialComponent -> Maybe Text
$sel:trialComponentArn:TrialComponent' :: TrialComponent -> Maybe Text
$sel:tags:TrialComponent' :: TrialComponent -> Maybe [Tag]
$sel:status:TrialComponent' :: TrialComponent -> Maybe TrialComponentStatus
$sel:startTime:TrialComponent' :: TrialComponent -> Maybe POSIX
$sel:sourceDetail:TrialComponent' :: TrialComponent -> Maybe TrialComponentSourceDetail
$sel:source:TrialComponent' :: TrialComponent -> Maybe TrialComponentSource
$sel:runName:TrialComponent' :: TrialComponent -> Maybe Text
$sel:parents:TrialComponent' :: TrialComponent -> Maybe [Parent]
$sel:parameters:TrialComponent' :: TrialComponent -> Maybe (HashMap Text TrialComponentParameterValue)
$sel:outputArtifacts:TrialComponent' :: TrialComponent -> Maybe (HashMap Text TrialComponentArtifact)
$sel:metrics:TrialComponent' :: TrialComponent -> Maybe [TrialComponentMetricSummary]
$sel:metadataProperties:TrialComponent' :: TrialComponent -> Maybe MetadataProperties
$sel:lineageGroupArn:TrialComponent' :: TrialComponent -> Maybe Text
$sel:lastModifiedTime:TrialComponent' :: TrialComponent -> Maybe POSIX
$sel:lastModifiedBy:TrialComponent' :: TrialComponent -> Maybe UserContext
$sel:inputArtifacts:TrialComponent' :: TrialComponent -> Maybe (HashMap Text TrialComponentArtifact)
$sel:endTime:TrialComponent' :: TrialComponent -> Maybe POSIX
$sel:displayName:TrialComponent' :: TrialComponent -> Maybe Text
$sel:creationTime:TrialComponent' :: TrialComponent -> Maybe POSIX
$sel:createdBy:TrialComponent' :: TrialComponent -> Maybe UserContext
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe UserContext
createdBy
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe POSIX
creationTime
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
displayName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe POSIX
endTime
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe (HashMap Text TrialComponentArtifact)
inputArtifacts
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe UserContext
lastModifiedBy
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe POSIX
lastModifiedTime
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
lineageGroupArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe MetadataProperties
metadataProperties
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe [TrialComponentMetricSummary]
metrics
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe (HashMap Text TrialComponentArtifact)
outputArtifacts
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe (HashMap Text TrialComponentParameterValue)
parameters
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe [Parent]
parents
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
runName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe TrialComponentSource
source
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe TrialComponentSourceDetail
sourceDetail
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe POSIX
startTime
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe TrialComponentStatus
status
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe [Tag]
tags
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
trialComponentArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe Text
trialComponentName