module Stratosphere.SageMaker.ModelPackage.ExplainabilityProperty ( module Exports, ExplainabilityProperty(..), mkExplainabilityProperty ) where import qualified Data.Aeson as JSON import qualified Stratosphere.Prelude as Prelude import Stratosphere.Property import {-# SOURCE #-} Stratosphere.SageMaker.ModelPackage.MetricsSourceProperty as Exports import Stratosphere.ResourceProperties data ExplainabilityProperty = -- | See: ExplainabilityProperty {haddock_workaround_ :: (), -- | See: report :: (Prelude.Maybe MetricsSourceProperty)} deriving stock (Prelude.Eq, Prelude.Show) mkExplainabilityProperty :: ExplainabilityProperty mkExplainabilityProperty = ExplainabilityProperty {haddock_workaround_ = (), report = Prelude.Nothing} instance ToResourceProperties ExplainabilityProperty where toResourceProperties ExplainabilityProperty {..} = ResourceProperties {awsType = "AWS::SageMaker::ModelPackage.Explainability", supportsTags = Prelude.False, properties = Prelude.fromList (Prelude.catMaybes [(JSON..=) "Report" Prelude.<$> report])} instance JSON.ToJSON ExplainabilityProperty where toJSON ExplainabilityProperty {..} = JSON.object (Prelude.fromList (Prelude.catMaybes [(JSON..=) "Report" Prelude.<$> report])) instance Property "Report" ExplainabilityProperty where type PropertyType "Report" ExplainabilityProperty = MetricsSourceProperty set newValue ExplainabilityProperty {..} = ExplainabilityProperty {report = Prelude.pure newValue, ..}