module Network.Google.MachineLearning.Types.Sum where
import Network.Google.Prelude
data GoogleCloudMlV1beta1__JobState
= StateUnspecified
| Queued
| Preparing
| Running
| Succeeded
| Failed
| Cancelling
| Cancelled
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable GoogleCloudMlV1beta1__JobState
instance FromHttpApiData GoogleCloudMlV1beta1__JobState where
parseQueryParam = \case
"STATE_UNSPECIFIED" -> Right StateUnspecified
"QUEUED" -> Right Queued
"PREPARING" -> Right Preparing
"RUNNING" -> Right Running
"SUCCEEDED" -> Right Succeeded
"FAILED" -> Right Failed
"CANCELLING" -> Right Cancelling
"CANCELLED" -> Right Cancelled
x -> Left ("Unable to parse GoogleCloudMlV1beta1__JobState from: " <> x)
instance ToHttpApiData GoogleCloudMlV1beta1__JobState where
toQueryParam = \case
StateUnspecified -> "STATE_UNSPECIFIED"
Queued -> "QUEUED"
Preparing -> "PREPARING"
Running -> "RUNNING"
Succeeded -> "SUCCEEDED"
Failed -> "FAILED"
Cancelling -> "CANCELLING"
Cancelled -> "CANCELLED"
instance FromJSON GoogleCloudMlV1beta1__JobState where
parseJSON = parseJSONText "GoogleCloudMlV1beta1__JobState"
instance ToJSON GoogleCloudMlV1beta1__JobState where
toJSON = toJSONText
data GoogleCloudMlV1beta1__OperationMetadataOperationType
= OperationTypeUnspecified
| CreateVersion
| DeleteVersion
| DeleteModel
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable GoogleCloudMlV1beta1__OperationMetadataOperationType
instance FromHttpApiData GoogleCloudMlV1beta1__OperationMetadataOperationType where
parseQueryParam = \case
"OPERATION_TYPE_UNSPECIFIED" -> Right OperationTypeUnspecified
"CREATE_VERSION" -> Right CreateVersion
"DELETE_VERSION" -> Right DeleteVersion
"DELETE_MODEL" -> Right DeleteModel
x -> Left ("Unable to parse GoogleCloudMlV1beta1__OperationMetadataOperationType from: " <> x)
instance ToHttpApiData GoogleCloudMlV1beta1__OperationMetadataOperationType where
toQueryParam = \case
OperationTypeUnspecified -> "OPERATION_TYPE_UNSPECIFIED"
CreateVersion -> "CREATE_VERSION"
DeleteVersion -> "DELETE_VERSION"
DeleteModel -> "DELETE_MODEL"
instance FromJSON GoogleCloudMlV1beta1__OperationMetadataOperationType where
parseJSON = parseJSONText "GoogleCloudMlV1beta1__OperationMetadataOperationType"
instance ToJSON GoogleCloudMlV1beta1__OperationMetadataOperationType where
toJSON = toJSONText
data GoogleCloudMlV1beta1__ParameterSpecType
= ParameterTypeUnspecified
| Double
| Integer
| Categorical
| Discrete
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable GoogleCloudMlV1beta1__ParameterSpecType
instance FromHttpApiData GoogleCloudMlV1beta1__ParameterSpecType where
parseQueryParam = \case
"PARAMETER_TYPE_UNSPECIFIED" -> Right ParameterTypeUnspecified
"DOUBLE" -> Right Double
"INTEGER" -> Right Integer
"CATEGORICAL" -> Right Categorical
"DISCRETE" -> Right Discrete
x -> Left ("Unable to parse GoogleCloudMlV1beta1__ParameterSpecType from: " <> x)
instance ToHttpApiData GoogleCloudMlV1beta1__ParameterSpecType where
toQueryParam = \case
ParameterTypeUnspecified -> "PARAMETER_TYPE_UNSPECIFIED"
Double -> "DOUBLE"
Integer -> "INTEGER"
Categorical -> "CATEGORICAL"
Discrete -> "DISCRETE"
instance FromJSON GoogleCloudMlV1beta1__ParameterSpecType where
parseJSON = parseJSONText "GoogleCloudMlV1beta1__ParameterSpecType"
instance ToJSON GoogleCloudMlV1beta1__ParameterSpecType where
toJSON = toJSONText
data Xgafv
= X1
| X2
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable Xgafv
instance FromHttpApiData Xgafv where
parseQueryParam = \case
"1" -> Right X1
"2" -> Right X2
x -> Left ("Unable to parse Xgafv from: " <> x)
instance ToHttpApiData Xgafv where
toQueryParam = \case
X1 -> "1"
X2 -> "2"
instance FromJSON Xgafv where
parseJSON = parseJSONText "Xgafv"
instance ToJSON Xgafv where
toJSON = toJSONText
data GoogleCloudMlV1beta1__HyperparameterSpecGoal
= GoalTypeUnspecified
| Maximize
| Minimize
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable GoogleCloudMlV1beta1__HyperparameterSpecGoal
instance FromHttpApiData GoogleCloudMlV1beta1__HyperparameterSpecGoal where
parseQueryParam = \case
"GOAL_TYPE_UNSPECIFIED" -> Right GoalTypeUnspecified
"MAXIMIZE" -> Right Maximize
"MINIMIZE" -> Right Minimize
x -> Left ("Unable to parse GoogleCloudMlV1beta1__HyperparameterSpecGoal from: " <> x)
instance ToHttpApiData GoogleCloudMlV1beta1__HyperparameterSpecGoal where
toQueryParam = \case
GoalTypeUnspecified -> "GOAL_TYPE_UNSPECIFIED"
Maximize -> "MAXIMIZE"
Minimize -> "MINIMIZE"
instance FromJSON GoogleCloudMlV1beta1__HyperparameterSpecGoal where
parseJSON = parseJSONText "GoogleCloudMlV1beta1__HyperparameterSpecGoal"
instance ToJSON GoogleCloudMlV1beta1__HyperparameterSpecGoal where
toJSON = toJSONText
data GoogleCloudMlV1beta1__PredictionInputDataFormat
= DataFormatUnspecified
| Text
| TfRecord
| TfRecordGzip
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable GoogleCloudMlV1beta1__PredictionInputDataFormat
instance FromHttpApiData GoogleCloudMlV1beta1__PredictionInputDataFormat where
parseQueryParam = \case
"DATA_FORMAT_UNSPECIFIED" -> Right DataFormatUnspecified
"TEXT" -> Right Text
"TF_RECORD" -> Right TfRecord
"TF_RECORD_GZIP" -> Right TfRecordGzip
x -> Left ("Unable to parse GoogleCloudMlV1beta1__PredictionInputDataFormat from: " <> x)
instance ToHttpApiData GoogleCloudMlV1beta1__PredictionInputDataFormat where
toQueryParam = \case
DataFormatUnspecified -> "DATA_FORMAT_UNSPECIFIED"
Text -> "TEXT"
TfRecord -> "TF_RECORD"
TfRecordGzip -> "TF_RECORD_GZIP"
instance FromJSON GoogleCloudMlV1beta1__PredictionInputDataFormat where
parseJSON = parseJSONText "GoogleCloudMlV1beta1__PredictionInputDataFormat"
instance ToJSON GoogleCloudMlV1beta1__PredictionInputDataFormat where
toJSON = toJSONText
data GoogleCloudMlV1beta1__ParameterSpecScaleType
= None
| UnitLinearScale
| UnitLogScale
| UnitReverseLogScale
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable GoogleCloudMlV1beta1__ParameterSpecScaleType
instance FromHttpApiData GoogleCloudMlV1beta1__ParameterSpecScaleType where
parseQueryParam = \case
"NONE" -> Right None
"UNIT_LINEAR_SCALE" -> Right UnitLinearScale
"UNIT_LOG_SCALE" -> Right UnitLogScale
"UNIT_REVERSE_LOG_SCALE" -> Right UnitReverseLogScale
x -> Left ("Unable to parse GoogleCloudMlV1beta1__ParameterSpecScaleType from: " <> x)
instance ToHttpApiData GoogleCloudMlV1beta1__ParameterSpecScaleType where
toQueryParam = \case
None -> "NONE"
UnitLinearScale -> "UNIT_LINEAR_SCALE"
UnitLogScale -> "UNIT_LOG_SCALE"
UnitReverseLogScale -> "UNIT_REVERSE_LOG_SCALE"
instance FromJSON GoogleCloudMlV1beta1__ParameterSpecScaleType where
parseJSON = parseJSONText "GoogleCloudMlV1beta1__ParameterSpecScaleType"
instance ToJSON GoogleCloudMlV1beta1__ParameterSpecScaleType where
toJSON = toJSONText
data GoogleCloudMlV1beta1__TrainingInputScaleTier
= Basic
| Standard1
| Premium1
| Custom
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable GoogleCloudMlV1beta1__TrainingInputScaleTier
instance FromHttpApiData GoogleCloudMlV1beta1__TrainingInputScaleTier where
parseQueryParam = \case
"BASIC" -> Right Basic
"STANDARD_1" -> Right Standard1
"PREMIUM_1" -> Right Premium1
"CUSTOM" -> Right Custom
x -> Left ("Unable to parse GoogleCloudMlV1beta1__TrainingInputScaleTier from: " <> x)
instance ToHttpApiData GoogleCloudMlV1beta1__TrainingInputScaleTier where
toQueryParam = \case
Basic -> "BASIC"
Standard1 -> "STANDARD_1"
Premium1 -> "PREMIUM_1"
Custom -> "CUSTOM"
instance FromJSON GoogleCloudMlV1beta1__TrainingInputScaleTier where
parseJSON = parseJSONText "GoogleCloudMlV1beta1__TrainingInputScaleTier"
instance ToJSON GoogleCloudMlV1beta1__TrainingInputScaleTier where
toJSON = toJSONText