{-# LANGUAGE DeriveDataTypeable #-}
{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE LambdaCase #-}
{-# LANGUAGE OverloadedStrings #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
module Network.AWS.SageMaker.Types.Sum where
import Network.AWS.Prelude
data CompressionType
= CTGzip
| CTNone
deriving (Eq, Ord, Read, Show, Enum, Bounded, Data, Typeable, Generic)
instance FromText CompressionType where
parser = takeLowerText >>= \case
"gzip" -> pure CTGzip
"none" -> pure CTNone
e -> fromTextError $ "Failure parsing CompressionType from value: '" <> e
<> "'. Accepted values: gzip, none"
instance ToText CompressionType where
toText = \case
CTGzip -> "Gzip"
CTNone -> "None"
instance Hashable CompressionType
instance NFData CompressionType
instance ToByteString CompressionType
instance ToQuery CompressionType
instance ToHeader CompressionType
instance ToJSON CompressionType where
toJSON = toJSONText
instance FromJSON CompressionType where
parseJSON = parseJSONText "CompressionType"
data DirectInternetAccess
= Disabled
| Enabled
deriving (Eq, Ord, Read, Show, Enum, Bounded, Data, Typeable, Generic)
instance FromText DirectInternetAccess where
parser = takeLowerText >>= \case
"disabled" -> pure Disabled
"enabled" -> pure Enabled
e -> fromTextError $ "Failure parsing DirectInternetAccess from value: '" <> e
<> "'. Accepted values: disabled, enabled"
instance ToText DirectInternetAccess where
toText = \case
Disabled -> "Disabled"
Enabled -> "Enabled"
instance Hashable DirectInternetAccess
instance NFData DirectInternetAccess
instance ToByteString DirectInternetAccess
instance ToQuery DirectInternetAccess
instance ToHeader DirectInternetAccess
instance ToJSON DirectInternetAccess where
toJSON = toJSONText
instance FromJSON DirectInternetAccess where
parseJSON = parseJSONText "DirectInternetAccess"
data EndpointConfigSortKey
= CreationTime
| Name
deriving (Eq, Ord, Read, Show, Enum, Bounded, Data, Typeable, Generic)
instance FromText EndpointConfigSortKey where
parser = takeLowerText >>= \case
"creationtime" -> pure CreationTime
"name" -> pure Name
e -> fromTextError $ "Failure parsing EndpointConfigSortKey from value: '" <> e
<> "'. Accepted values: creationtime, name"
instance ToText EndpointConfigSortKey where
toText = \case
CreationTime -> "CreationTime"
Name -> "Name"
instance Hashable EndpointConfigSortKey
instance NFData EndpointConfigSortKey
instance ToByteString EndpointConfigSortKey
instance ToQuery EndpointConfigSortKey
instance ToHeader EndpointConfigSortKey
instance ToJSON EndpointConfigSortKey where
toJSON = toJSONText
data EndpointSortKey
= ESKCreationTime
| ESKName
| ESKStatus
deriving (Eq, Ord, Read, Show, Enum, Bounded, Data, Typeable, Generic)
instance FromText EndpointSortKey where
parser = takeLowerText >>= \case
"creationtime" -> pure ESKCreationTime
"name" -> pure ESKName
"status" -> pure ESKStatus
e -> fromTextError $ "Failure parsing EndpointSortKey from value: '" <> e
<> "'. Accepted values: creationtime, name, status"
instance ToText EndpointSortKey where
toText = \case
ESKCreationTime -> "CreationTime"
ESKName -> "Name"
ESKStatus -> "Status"
instance Hashable EndpointSortKey
instance NFData EndpointSortKey
instance ToByteString EndpointSortKey
instance ToQuery EndpointSortKey
instance ToHeader EndpointSortKey
instance ToJSON EndpointSortKey where
toJSON = toJSONText
data EndpointStatus
= Creating
| Deleting
| Failed
| InService
| OutOfService
| RollingBack
| Updating
deriving (Eq, Ord, Read, Show, Enum, Bounded, Data, Typeable, Generic)
instance FromText EndpointStatus where
parser = takeLowerText >>= \case
"creating" -> pure Creating
"deleting" -> pure Deleting
"failed" -> pure Failed
"inservice" -> pure InService
"outofservice" -> pure OutOfService
"rollingback" -> pure RollingBack
"updating" -> pure Updating
e -> fromTextError $ "Failure parsing EndpointStatus from value: '" <> e
<> "'. Accepted values: creating, deleting, failed, inservice, outofservice, rollingback, updating"
instance ToText EndpointStatus where
toText = \case
Creating -> "Creating"
Deleting -> "Deleting"
Failed -> "Failed"
InService -> "InService"
OutOfService -> "OutOfService"
RollingBack -> "RollingBack"
Updating -> "Updating"
instance Hashable EndpointStatus
instance NFData EndpointStatus
instance ToByteString EndpointStatus
instance ToQuery EndpointStatus
instance ToHeader EndpointStatus
instance ToJSON EndpointStatus where
toJSON = toJSONText
instance FromJSON EndpointStatus where
parseJSON = parseJSONText "EndpointStatus"
data InstanceType
= Ml_M4_10XLarge
| Ml_M4_16XLarge
| Ml_M4_2XLarge
| Ml_M4_4XLarge
| Ml_M4_XLarge
| Ml_P2_16XLarge
| Ml_P2_8XLarge
| Ml_P2_XLarge
| Ml_P3_16XLarge
| Ml_P3_2XLarge
| Ml_P3_8XLarge
| Ml_T2_2XLarge
| Ml_T2_Large
| Ml_T2_Medium
| Ml_T2_XLarge
deriving (Eq, Ord, Read, Show, Enum, Bounded, Data, Typeable, Generic)
instance FromText InstanceType where
parser = takeLowerText >>= \case
"ml.m4.10xlarge" -> pure Ml_M4_10XLarge
"ml.m4.16xlarge" -> pure Ml_M4_16XLarge
"ml.m4.2xlarge" -> pure Ml_M4_2XLarge
"ml.m4.4xlarge" -> pure Ml_M4_4XLarge
"ml.m4.xlarge" -> pure Ml_M4_XLarge
"ml.p2.16xlarge" -> pure Ml_P2_16XLarge
"ml.p2.8xlarge" -> pure Ml_P2_8XLarge
"ml.p2.xlarge" -> pure Ml_P2_XLarge
"ml.p3.16xlarge" -> pure Ml_P3_16XLarge
"ml.p3.2xlarge" -> pure Ml_P3_2XLarge
"ml.p3.8xlarge" -> pure Ml_P3_8XLarge
"ml.t2.2xlarge" -> pure Ml_T2_2XLarge
"ml.t2.large" -> pure Ml_T2_Large
"ml.t2.medium" -> pure Ml_T2_Medium
"ml.t2.xlarge" -> pure Ml_T2_XLarge
e -> fromTextError $ "Failure parsing InstanceType from value: '" <> e
<> "'. Accepted values: ml.m4.10xlarge, ml.m4.16xlarge, ml.m4.2xlarge, ml.m4.4xlarge, ml.m4.xlarge, ml.p2.16xlarge, ml.p2.8xlarge, ml.p2.xlarge, ml.p3.16xlarge, ml.p3.2xlarge, ml.p3.8xlarge, ml.t2.2xlarge, ml.t2.large, ml.t2.medium, ml.t2.xlarge"
instance ToText InstanceType where
toText = \case
Ml_M4_10XLarge -> "ml.m4.10xlarge"
Ml_M4_16XLarge -> "ml.m4.16xlarge"
Ml_M4_2XLarge -> "ml.m4.2xlarge"
Ml_M4_4XLarge -> "ml.m4.4xlarge"
Ml_M4_XLarge -> "ml.m4.xlarge"
Ml_P2_16XLarge -> "ml.p2.16xlarge"
Ml_P2_8XLarge -> "ml.p2.8xlarge"
Ml_P2_XLarge -> "ml.p2.xlarge"
Ml_P3_16XLarge -> "ml.p3.16xlarge"
Ml_P3_2XLarge -> "ml.p3.2xlarge"
Ml_P3_8XLarge -> "ml.p3.8xlarge"
Ml_T2_2XLarge -> "ml.t2.2xlarge"
Ml_T2_Large -> "ml.t2.large"
Ml_T2_Medium -> "ml.t2.medium"
Ml_T2_XLarge -> "ml.t2.xlarge"
instance Hashable InstanceType
instance NFData InstanceType
instance ToByteString InstanceType
instance ToQuery InstanceType
instance ToHeader InstanceType
instance ToJSON InstanceType where
toJSON = toJSONText
instance FromJSON InstanceType where
parseJSON = parseJSONText "InstanceType"
data ModelSortKey
= MSKCreationTime
| MSKName
deriving (Eq, Ord, Read, Show, Enum, Bounded, Data, Typeable, Generic)
instance FromText ModelSortKey where
parser = takeLowerText >>= \case
"creationtime" -> pure MSKCreationTime
"name" -> pure MSKName
e -> fromTextError $ "Failure parsing ModelSortKey from value: '" <> e
<> "'. Accepted values: creationtime, name"
instance ToText ModelSortKey where
toText = \case
MSKCreationTime -> "CreationTime"
MSKName -> "Name"
instance Hashable ModelSortKey
instance NFData ModelSortKey
instance ToByteString ModelSortKey
instance ToQuery ModelSortKey
instance ToHeader ModelSortKey
instance ToJSON ModelSortKey where
toJSON = toJSONText
data NotebookInstanceLifecycleConfigSortKey
= NILCSKCreationTime
| NILCSKLastModifiedTime
| NILCSKName
deriving (Eq, Ord, Read, Show, Enum, Bounded, Data, Typeable, Generic)
instance FromText NotebookInstanceLifecycleConfigSortKey where
parser = takeLowerText >>= \case
"creationtime" -> pure NILCSKCreationTime
"lastmodifiedtime" -> pure NILCSKLastModifiedTime
"name" -> pure NILCSKName
e -> fromTextError $ "Failure parsing NotebookInstanceLifecycleConfigSortKey from value: '" <> e
<> "'. Accepted values: creationtime, lastmodifiedtime, name"
instance ToText NotebookInstanceLifecycleConfigSortKey where
toText = \case
NILCSKCreationTime -> "CreationTime"
NILCSKLastModifiedTime -> "LastModifiedTime"
NILCSKName -> "Name"
instance Hashable NotebookInstanceLifecycleConfigSortKey
instance NFData NotebookInstanceLifecycleConfigSortKey
instance ToByteString NotebookInstanceLifecycleConfigSortKey
instance ToQuery NotebookInstanceLifecycleConfigSortKey
instance ToHeader NotebookInstanceLifecycleConfigSortKey
instance ToJSON NotebookInstanceLifecycleConfigSortKey where
toJSON = toJSONText
data NotebookInstanceLifecycleConfigSortOrder
= NILCSOAscending
| NILCSODescending
deriving (Eq, Ord, Read, Show, Enum, Bounded, Data, Typeable, Generic)
instance FromText NotebookInstanceLifecycleConfigSortOrder where
parser = takeLowerText >>= \case
"ascending" -> pure NILCSOAscending
"descending" -> pure NILCSODescending
e -> fromTextError $ "Failure parsing NotebookInstanceLifecycleConfigSortOrder from value: '" <> e
<> "'. Accepted values: ascending, descending"
instance ToText NotebookInstanceLifecycleConfigSortOrder where
toText = \case
NILCSOAscending -> "Ascending"
NILCSODescending -> "Descending"
instance Hashable NotebookInstanceLifecycleConfigSortOrder
instance NFData NotebookInstanceLifecycleConfigSortOrder
instance ToByteString NotebookInstanceLifecycleConfigSortOrder
instance ToQuery NotebookInstanceLifecycleConfigSortOrder
instance ToHeader NotebookInstanceLifecycleConfigSortOrder
instance ToJSON NotebookInstanceLifecycleConfigSortOrder where
toJSON = toJSONText
data NotebookInstanceSortKey
= NISKCreationTime
| NISKName
| NISKStatus
deriving (Eq, Ord, Read, Show, Enum, Bounded, Data, Typeable, Generic)
instance FromText NotebookInstanceSortKey where
parser = takeLowerText >>= \case
"creationtime" -> pure NISKCreationTime
"name" -> pure NISKName
"status" -> pure NISKStatus
e -> fromTextError $ "Failure parsing NotebookInstanceSortKey from value: '" <> e
<> "'. Accepted values: creationtime, name, status"
instance ToText NotebookInstanceSortKey where
toText = \case
NISKCreationTime -> "CreationTime"
NISKName -> "Name"
NISKStatus -> "Status"
instance Hashable NotebookInstanceSortKey
instance NFData NotebookInstanceSortKey
instance ToByteString NotebookInstanceSortKey
instance ToQuery NotebookInstanceSortKey
instance ToHeader NotebookInstanceSortKey
instance ToJSON NotebookInstanceSortKey where
toJSON = toJSONText
data NotebookInstanceSortOrder
= Ascending
| Descending
deriving (Eq, Ord, Read, Show, Enum, Bounded, Data, Typeable, Generic)
instance FromText NotebookInstanceSortOrder where
parser = takeLowerText >>= \case
"ascending" -> pure Ascending
"descending" -> pure Descending
e -> fromTextError $ "Failure parsing NotebookInstanceSortOrder from value: '" <> e
<> "'. Accepted values: ascending, descending"
instance ToText NotebookInstanceSortOrder where
toText = \case
Ascending -> "Ascending"
Descending -> "Descending"
instance Hashable NotebookInstanceSortOrder
instance NFData NotebookInstanceSortOrder
instance ToByteString NotebookInstanceSortOrder
instance ToQuery NotebookInstanceSortOrder
instance ToHeader NotebookInstanceSortOrder
instance ToJSON NotebookInstanceSortOrder where
toJSON = toJSONText
data NotebookInstanceStatus
= NISDeleting
| NISFailed
| NISInService
| NISPending
| NISStopped
| NISStopping
deriving (Eq, Ord, Read, Show, Enum, Bounded, Data, Typeable, Generic)
instance FromText NotebookInstanceStatus where
parser = takeLowerText >>= \case
"deleting" -> pure NISDeleting
"failed" -> pure NISFailed
"inservice" -> pure NISInService
"pending" -> pure NISPending
"stopped" -> pure NISStopped
"stopping" -> pure NISStopping
e -> fromTextError $ "Failure parsing NotebookInstanceStatus from value: '" <> e
<> "'. Accepted values: deleting, failed, inservice, pending, stopped, stopping"
instance ToText NotebookInstanceStatus where
toText = \case
NISDeleting -> "Deleting"
NISFailed -> "Failed"
NISInService -> "InService"
NISPending -> "Pending"
NISStopped -> "Stopped"
NISStopping -> "Stopping"
instance Hashable NotebookInstanceStatus
instance NFData NotebookInstanceStatus
instance ToByteString NotebookInstanceStatus
instance ToQuery NotebookInstanceStatus
instance ToHeader NotebookInstanceStatus
instance ToJSON NotebookInstanceStatus where
toJSON = toJSONText
instance FromJSON NotebookInstanceStatus where
parseJSON = parseJSONText "NotebookInstanceStatus"
data OrderKey
= OKAscending
| OKDescending
deriving (Eq, Ord, Read, Show, Enum, Bounded, Data, Typeable, Generic)
instance FromText OrderKey where
parser = takeLowerText >>= \case
"ascending" -> pure OKAscending
"descending" -> pure OKDescending
e -> fromTextError $ "Failure parsing OrderKey from value: '" <> e
<> "'. Accepted values: ascending, descending"
instance ToText OrderKey where
toText = \case
OKAscending -> "Ascending"
OKDescending -> "Descending"
instance Hashable OrderKey
instance NFData OrderKey
instance ToByteString OrderKey
instance ToQuery OrderKey
instance ToHeader OrderKey
instance ToJSON OrderKey where
toJSON = toJSONText
data ProductionVariantInstanceType
= PVITMl_C4_2XLarge
| PVITMl_C4_4XLarge
| PVITMl_C4_8XLarge
| PVITMl_C4_Large
| PVITMl_C4_XLarge
| PVITMl_C5_18XLarge
| PVITMl_C5_2XLarge
| PVITMl_C5_4XLarge
| PVITMl_C5_9XLarge
| PVITMl_C5_Large
| PVITMl_C5_XLarge
| PVITMl_M4_10XLarge
| PVITMl_M4_16XLarge
| PVITMl_M4_2XLarge
| PVITMl_M4_4XLarge
| PVITMl_M4_XLarge
| PVITMl_M5_12XLarge
| PVITMl_M5_24XLarge
| PVITMl_M5_2XLarge
| PVITMl_M5_4XLarge
| PVITMl_M5_Large
| PVITMl_M5_XLarge
| PVITMl_P2_16XLarge
| PVITMl_P2_8XLarge
| PVITMl_P2_XLarge
| PVITMl_P3_16XLarge
| PVITMl_P3_2XLarge
| PVITMl_P3_8XLarge
| PVITMl_T2_2XLarge
| PVITMl_T2_Large
| PVITMl_T2_Medium
| PVITMl_T2_XLarge
deriving (Eq, Ord, Read, Show, Enum, Bounded, Data, Typeable, Generic)
instance FromText ProductionVariantInstanceType where
parser = takeLowerText >>= \case
"ml.c4.2xlarge" -> pure PVITMl_C4_2XLarge
"ml.c4.4xlarge" -> pure PVITMl_C4_4XLarge
"ml.c4.8xlarge" -> pure PVITMl_C4_8XLarge
"ml.c4.large" -> pure PVITMl_C4_Large
"ml.c4.xlarge" -> pure PVITMl_C4_XLarge
"ml.c5.18xlarge" -> pure PVITMl_C5_18XLarge
"ml.c5.2xlarge" -> pure PVITMl_C5_2XLarge
"ml.c5.4xlarge" -> pure PVITMl_C5_4XLarge
"ml.c5.9xlarge" -> pure PVITMl_C5_9XLarge
"ml.c5.large" -> pure PVITMl_C5_Large
"ml.c5.xlarge" -> pure PVITMl_C5_XLarge
"ml.m4.10xlarge" -> pure PVITMl_M4_10XLarge
"ml.m4.16xlarge" -> pure PVITMl_M4_16XLarge
"ml.m4.2xlarge" -> pure PVITMl_M4_2XLarge
"ml.m4.4xlarge" -> pure PVITMl_M4_4XLarge
"ml.m4.xlarge" -> pure PVITMl_M4_XLarge
"ml.m5.12xlarge" -> pure PVITMl_M5_12XLarge
"ml.m5.24xlarge" -> pure PVITMl_M5_24XLarge
"ml.m5.2xlarge" -> pure PVITMl_M5_2XLarge
"ml.m5.4xlarge" -> pure PVITMl_M5_4XLarge
"ml.m5.large" -> pure PVITMl_M5_Large
"ml.m5.xlarge" -> pure PVITMl_M5_XLarge
"ml.p2.16xlarge" -> pure PVITMl_P2_16XLarge
"ml.p2.8xlarge" -> pure PVITMl_P2_8XLarge
"ml.p2.xlarge" -> pure PVITMl_P2_XLarge
"ml.p3.16xlarge" -> pure PVITMl_P3_16XLarge
"ml.p3.2xlarge" -> pure PVITMl_P3_2XLarge
"ml.p3.8xlarge" -> pure PVITMl_P3_8XLarge
"ml.t2.2xlarge" -> pure PVITMl_T2_2XLarge
"ml.t2.large" -> pure PVITMl_T2_Large
"ml.t2.medium" -> pure PVITMl_T2_Medium
"ml.t2.xlarge" -> pure PVITMl_T2_XLarge
e -> fromTextError $ "Failure parsing ProductionVariantInstanceType from value: '" <> e
<> "'. Accepted values: ml.c4.2xlarge, ml.c4.4xlarge, ml.c4.8xlarge, ml.c4.large, ml.c4.xlarge, ml.c5.18xlarge, ml.c5.2xlarge, ml.c5.4xlarge, ml.c5.9xlarge, ml.c5.large, ml.c5.xlarge, ml.m4.10xlarge, ml.m4.16xlarge, ml.m4.2xlarge, ml.m4.4xlarge, ml.m4.xlarge, ml.m5.12xlarge, ml.m5.24xlarge, ml.m5.2xlarge, ml.m5.4xlarge, ml.m5.large, ml.m5.xlarge, ml.p2.16xlarge, ml.p2.8xlarge, ml.p2.xlarge, ml.p3.16xlarge, ml.p3.2xlarge, ml.p3.8xlarge, ml.t2.2xlarge, ml.t2.large, ml.t2.medium, ml.t2.xlarge"
instance ToText ProductionVariantInstanceType where
toText = \case
PVITMl_C4_2XLarge -> "ml.c4.2xlarge"
PVITMl_C4_4XLarge -> "ml.c4.4xlarge"
PVITMl_C4_8XLarge -> "ml.c4.8xlarge"
PVITMl_C4_Large -> "ml.c4.large"
PVITMl_C4_XLarge -> "ml.c4.xlarge"
PVITMl_C5_18XLarge -> "ml.c5.18xlarge"
PVITMl_C5_2XLarge -> "ml.c5.2xlarge"
PVITMl_C5_4XLarge -> "ml.c5.4xlarge"
PVITMl_C5_9XLarge -> "ml.c5.9xlarge"
PVITMl_C5_Large -> "ml.c5.large"
PVITMl_C5_XLarge -> "ml.c5.xlarge"
PVITMl_M4_10XLarge -> "ml.m4.10xlarge"
PVITMl_M4_16XLarge -> "ml.m4.16xlarge"
PVITMl_M4_2XLarge -> "ml.m4.2xlarge"
PVITMl_M4_4XLarge -> "ml.m4.4xlarge"
PVITMl_M4_XLarge -> "ml.m4.xlarge"
PVITMl_M5_12XLarge -> "ml.m5.12xlarge"
PVITMl_M5_24XLarge -> "ml.m5.24xlarge"
PVITMl_M5_2XLarge -> "ml.m5.2xlarge"
PVITMl_M5_4XLarge -> "ml.m5.4xlarge"
PVITMl_M5_Large -> "ml.m5.large"
PVITMl_M5_XLarge -> "ml.m5.xlarge"
PVITMl_P2_16XLarge -> "ml.p2.16xlarge"
PVITMl_P2_8XLarge -> "ml.p2.8xlarge"
PVITMl_P2_XLarge -> "ml.p2.xlarge"
PVITMl_P3_16XLarge -> "ml.p3.16xlarge"
PVITMl_P3_2XLarge -> "ml.p3.2xlarge"
PVITMl_P3_8XLarge -> "ml.p3.8xlarge"
PVITMl_T2_2XLarge -> "ml.t2.2xlarge"
PVITMl_T2_Large -> "ml.t2.large"
PVITMl_T2_Medium -> "ml.t2.medium"
PVITMl_T2_XLarge -> "ml.t2.xlarge"
instance Hashable ProductionVariantInstanceType
instance NFData ProductionVariantInstanceType
instance ToByteString ProductionVariantInstanceType
instance ToQuery ProductionVariantInstanceType
instance ToHeader ProductionVariantInstanceType
instance ToJSON ProductionVariantInstanceType where
toJSON = toJSONText
instance FromJSON ProductionVariantInstanceType where
parseJSON = parseJSONText "ProductionVariantInstanceType"
data RecordWrapper
= None
| RecordIO
deriving (Eq, Ord, Read, Show, Enum, Bounded, Data, Typeable, Generic)
instance FromText RecordWrapper where
parser = takeLowerText >>= \case
"none" -> pure None
"recordio" -> pure RecordIO
e -> fromTextError $ "Failure parsing RecordWrapper from value: '" <> e
<> "'. Accepted values: none, recordio"
instance ToText RecordWrapper where
toText = \case
None -> "None"
RecordIO -> "RecordIO"
instance Hashable RecordWrapper
instance NFData RecordWrapper
instance ToByteString RecordWrapper
instance ToQuery RecordWrapper
instance ToHeader RecordWrapper
instance ToJSON RecordWrapper where
toJSON = toJSONText
instance FromJSON RecordWrapper where
parseJSON = parseJSONText "RecordWrapper"
data S3DataDistribution
= FullyReplicated
| ShardedByS3Key
deriving (Eq, Ord, Read, Show, Enum, Bounded, Data, Typeable, Generic)
instance FromText S3DataDistribution where
parser = takeLowerText >>= \case
"fullyreplicated" -> pure FullyReplicated
"shardedbys3key" -> pure ShardedByS3Key
e -> fromTextError $ "Failure parsing S3DataDistribution from value: '" <> e
<> "'. Accepted values: fullyreplicated, shardedbys3key"
instance ToText S3DataDistribution where
toText = \case
FullyReplicated -> "FullyReplicated"
ShardedByS3Key -> "ShardedByS3Key"
instance Hashable S3DataDistribution
instance NFData S3DataDistribution
instance ToByteString S3DataDistribution
instance ToQuery S3DataDistribution
instance ToHeader S3DataDistribution
instance ToJSON S3DataDistribution where
toJSON = toJSONText
instance FromJSON S3DataDistribution where
parseJSON = parseJSONText "S3DataDistribution"
data S3DataType
= ManifestFile
| S3Prefix
deriving (Eq, Ord, Read, Show, Enum, Bounded, Data, Typeable, Generic)
instance FromText S3DataType where
parser = takeLowerText >>= \case
"manifestfile" -> pure ManifestFile
"s3prefix" -> pure S3Prefix
e -> fromTextError $ "Failure parsing S3DataType from value: '" <> e
<> "'. Accepted values: manifestfile, s3prefix"
instance ToText S3DataType where
toText = \case
ManifestFile -> "ManifestFile"
S3Prefix -> "S3Prefix"
instance Hashable S3DataType
instance NFData S3DataType
instance ToByteString S3DataType
instance ToQuery S3DataType
instance ToHeader S3DataType
instance ToJSON S3DataType where
toJSON = toJSONText
instance FromJSON S3DataType where
parseJSON = parseJSONText "S3DataType"
data SecondaryStatus
= SSCompleted
| SSDownloading
| SSFailed
| SSMaxRuntimeExceeded
| SSStarting
| SSStopped
| SSStopping
| SSTraining
| SSUploading
deriving (Eq, Ord, Read, Show, Enum, Bounded, Data, Typeable, Generic)
instance FromText SecondaryStatus where
parser = takeLowerText >>= \case
"completed" -> pure SSCompleted
"downloading" -> pure SSDownloading
"failed" -> pure SSFailed
"maxruntimeexceeded" -> pure SSMaxRuntimeExceeded
"starting" -> pure SSStarting
"stopped" -> pure SSStopped
"stopping" -> pure SSStopping
"training" -> pure SSTraining
"uploading" -> pure SSUploading
e -> fromTextError $ "Failure parsing SecondaryStatus from value: '" <> e
<> "'. Accepted values: completed, downloading, failed, maxruntimeexceeded, starting, stopped, stopping, training, uploading"
instance ToText SecondaryStatus where
toText = \case
SSCompleted -> "Completed"
SSDownloading -> "Downloading"
SSFailed -> "Failed"
SSMaxRuntimeExceeded -> "MaxRuntimeExceeded"
SSStarting -> "Starting"
SSStopped -> "Stopped"
SSStopping -> "Stopping"
SSTraining -> "Training"
SSUploading -> "Uploading"
instance Hashable SecondaryStatus
instance NFData SecondaryStatus
instance ToByteString SecondaryStatus
instance ToQuery SecondaryStatus
instance ToHeader SecondaryStatus
instance FromJSON SecondaryStatus where
parseJSON = parseJSONText "SecondaryStatus"
data SortBy
= SBCreationTime
| SBName
| SBStatus
deriving (Eq, Ord, Read, Show, Enum, Bounded, Data, Typeable, Generic)
instance FromText SortBy where
parser = takeLowerText >>= \case
"creationtime" -> pure SBCreationTime
"name" -> pure SBName
"status" -> pure SBStatus
e -> fromTextError $ "Failure parsing SortBy from value: '" <> e
<> "'. Accepted values: creationtime, name, status"
instance ToText SortBy where
toText = \case
SBCreationTime -> "CreationTime"
SBName -> "Name"
SBStatus -> "Status"
instance Hashable SortBy
instance NFData SortBy
instance ToByteString SortBy
instance ToQuery SortBy
instance ToHeader SortBy
instance ToJSON SortBy where
toJSON = toJSONText
data SortOrder
= SOAscending
| SODescending
deriving (Eq, Ord, Read, Show, Enum, Bounded, Data, Typeable, Generic)
instance FromText SortOrder where
parser = takeLowerText >>= \case
"ascending" -> pure SOAscending
"descending" -> pure SODescending
e -> fromTextError $ "Failure parsing SortOrder from value: '" <> e
<> "'. Accepted values: ascending, descending"
instance ToText SortOrder where
toText = \case
SOAscending -> "Ascending"
SODescending -> "Descending"
instance Hashable SortOrder
instance NFData SortOrder
instance ToByteString SortOrder
instance ToQuery SortOrder
instance ToHeader SortOrder
instance ToJSON SortOrder where
toJSON = toJSONText
data TrainingInputMode
= File
| Pipe
deriving (Eq, Ord, Read, Show, Enum, Bounded, Data, Typeable, Generic)
instance FromText TrainingInputMode where
parser = takeLowerText >>= \case
"file" -> pure File
"pipe" -> pure Pipe
e -> fromTextError $ "Failure parsing TrainingInputMode from value: '" <> e
<> "'. Accepted values: file, pipe"
instance ToText TrainingInputMode where
toText = \case
File -> "File"
Pipe -> "Pipe"
instance Hashable TrainingInputMode
instance NFData TrainingInputMode
instance ToByteString TrainingInputMode
instance ToQuery TrainingInputMode
instance ToHeader TrainingInputMode
instance ToJSON TrainingInputMode where
toJSON = toJSONText
instance FromJSON TrainingInputMode where
parseJSON = parseJSONText "TrainingInputMode"
data TrainingInstanceType
= TITMl_C4_2XLarge
| TITMl_C4_4XLarge
| TITMl_C4_8XLarge
| TITMl_C4_XLarge
| TITMl_C5_18XLarge
| TITMl_C5_2XLarge
| TITMl_C5_4XLarge
| TITMl_C5_9XLarge
| TITMl_C5_XLarge
| TITMl_M4_10XLarge
| TITMl_M4_16XLarge
| TITMl_M4_2XLarge
| TITMl_M4_4XLarge
| TITMl_M4_XLarge
| TITMl_M5_12XLarge
| TITMl_M5_24XLarge
| TITMl_M5_2XLarge
| TITMl_M5_4XLarge
| TITMl_M5_Large
| TITMl_M5_XLarge
| TITMl_P2_16XLarge
| TITMl_P2_8XLarge
| TITMl_P2_XLarge
| TITMl_P3_16XLarge
| TITMl_P3_2XLarge
| TITMl_P3_8XLarge
deriving (Eq, Ord, Read, Show, Enum, Bounded, Data, Typeable, Generic)
instance FromText TrainingInstanceType where
parser = takeLowerText >>= \case
"ml.c4.2xlarge" -> pure TITMl_C4_2XLarge
"ml.c4.4xlarge" -> pure TITMl_C4_4XLarge
"ml.c4.8xlarge" -> pure TITMl_C4_8XLarge
"ml.c4.xlarge" -> pure TITMl_C4_XLarge
"ml.c5.18xlarge" -> pure TITMl_C5_18XLarge
"ml.c5.2xlarge" -> pure TITMl_C5_2XLarge
"ml.c5.4xlarge" -> pure TITMl_C5_4XLarge
"ml.c5.9xlarge" -> pure TITMl_C5_9XLarge
"ml.c5.xlarge" -> pure TITMl_C5_XLarge
"ml.m4.10xlarge" -> pure TITMl_M4_10XLarge
"ml.m4.16xlarge" -> pure TITMl_M4_16XLarge
"ml.m4.2xlarge" -> pure TITMl_M4_2XLarge
"ml.m4.4xlarge" -> pure TITMl_M4_4XLarge
"ml.m4.xlarge" -> pure TITMl_M4_XLarge
"ml.m5.12xlarge" -> pure TITMl_M5_12XLarge
"ml.m5.24xlarge" -> pure TITMl_M5_24XLarge
"ml.m5.2xlarge" -> pure TITMl_M5_2XLarge
"ml.m5.4xlarge" -> pure TITMl_M5_4XLarge
"ml.m5.large" -> pure TITMl_M5_Large
"ml.m5.xlarge" -> pure TITMl_M5_XLarge
"ml.p2.16xlarge" -> pure TITMl_P2_16XLarge
"ml.p2.8xlarge" -> pure TITMl_P2_8XLarge
"ml.p2.xlarge" -> pure TITMl_P2_XLarge
"ml.p3.16xlarge" -> pure TITMl_P3_16XLarge
"ml.p3.2xlarge" -> pure TITMl_P3_2XLarge
"ml.p3.8xlarge" -> pure TITMl_P3_8XLarge
e -> fromTextError $ "Failure parsing TrainingInstanceType from value: '" <> e
<> "'. Accepted values: ml.c4.2xlarge, ml.c4.4xlarge, ml.c4.8xlarge, ml.c4.xlarge, ml.c5.18xlarge, ml.c5.2xlarge, ml.c5.4xlarge, ml.c5.9xlarge, ml.c5.xlarge, ml.m4.10xlarge, ml.m4.16xlarge, ml.m4.2xlarge, ml.m4.4xlarge, ml.m4.xlarge, ml.m5.12xlarge, ml.m5.24xlarge, ml.m5.2xlarge, ml.m5.4xlarge, ml.m5.large, ml.m5.xlarge, ml.p2.16xlarge, ml.p2.8xlarge, ml.p2.xlarge, ml.p3.16xlarge, ml.p3.2xlarge, ml.p3.8xlarge"
instance ToText TrainingInstanceType where
toText = \case
TITMl_C4_2XLarge -> "ml.c4.2xlarge"
TITMl_C4_4XLarge -> "ml.c4.4xlarge"
TITMl_C4_8XLarge -> "ml.c4.8xlarge"
TITMl_C4_XLarge -> "ml.c4.xlarge"
TITMl_C5_18XLarge -> "ml.c5.18xlarge"
TITMl_C5_2XLarge -> "ml.c5.2xlarge"
TITMl_C5_4XLarge -> "ml.c5.4xlarge"
TITMl_C5_9XLarge -> "ml.c5.9xlarge"
TITMl_C5_XLarge -> "ml.c5.xlarge"
TITMl_M4_10XLarge -> "ml.m4.10xlarge"
TITMl_M4_16XLarge -> "ml.m4.16xlarge"
TITMl_M4_2XLarge -> "ml.m4.2xlarge"
TITMl_M4_4XLarge -> "ml.m4.4xlarge"
TITMl_M4_XLarge -> "ml.m4.xlarge"
TITMl_M5_12XLarge -> "ml.m5.12xlarge"
TITMl_M5_24XLarge -> "ml.m5.24xlarge"
TITMl_M5_2XLarge -> "ml.m5.2xlarge"
TITMl_M5_4XLarge -> "ml.m5.4xlarge"
TITMl_M5_Large -> "ml.m5.large"
TITMl_M5_XLarge -> "ml.m5.xlarge"
TITMl_P2_16XLarge -> "ml.p2.16xlarge"
TITMl_P2_8XLarge -> "ml.p2.8xlarge"
TITMl_P2_XLarge -> "ml.p2.xlarge"
TITMl_P3_16XLarge -> "ml.p3.16xlarge"
TITMl_P3_2XLarge -> "ml.p3.2xlarge"
TITMl_P3_8XLarge -> "ml.p3.8xlarge"
instance Hashable TrainingInstanceType
instance NFData TrainingInstanceType
instance ToByteString TrainingInstanceType
instance ToQuery TrainingInstanceType
instance ToHeader TrainingInstanceType
instance ToJSON TrainingInstanceType where
toJSON = toJSONText
instance FromJSON TrainingInstanceType where
parseJSON = parseJSONText "TrainingInstanceType"
data TrainingJobStatus
= TJSCompleted
| TJSFailed
| TJSInProgress
| TJSStopped
| TJSStopping
deriving (Eq, Ord, Read, Show, Enum, Bounded, Data, Typeable, Generic)
instance FromText TrainingJobStatus where
parser = takeLowerText >>= \case
"completed" -> pure TJSCompleted
"failed" -> pure TJSFailed
"inprogress" -> pure TJSInProgress
"stopped" -> pure TJSStopped
"stopping" -> pure TJSStopping
e -> fromTextError $ "Failure parsing TrainingJobStatus from value: '" <> e
<> "'. Accepted values: completed, failed, inprogress, stopped, stopping"
instance ToText TrainingJobStatus where
toText = \case
TJSCompleted -> "Completed"
TJSFailed -> "Failed"
TJSInProgress -> "InProgress"
TJSStopped -> "Stopped"
TJSStopping -> "Stopping"
instance Hashable TrainingJobStatus
instance NFData TrainingJobStatus
instance ToByteString TrainingJobStatus
instance ToQuery TrainingJobStatus
instance ToHeader TrainingJobStatus
instance ToJSON TrainingJobStatus where
toJSON = toJSONText
instance FromJSON TrainingJobStatus where
parseJSON = parseJSONText "TrainingJobStatus"