module Network.Google.BigQuery.Types.Sum where
import Network.Google.Prelude
data JobsListProjection
= Full
| Minimal
deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
instance Hashable JobsListProjection
instance FromText JobsListProjection where
fromText = \case
"full" -> Just Full
"minimal" -> Just Minimal
_ -> Nothing
instance ToText JobsListProjection where
toText = \case
Full -> "full"
Minimal -> "minimal"
instance FromJSON JobsListProjection where
parseJSON = parseJSONText "JobsListProjection"
instance ToJSON JobsListProjection where
toJSON = toJSONText
data JobsListStateFilter
= Done
| Pending
| Running
deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
instance Hashable JobsListStateFilter
instance FromText JobsListStateFilter where
fromText = \case
"done" -> Just Done
"pending" -> Just Pending
"running" -> Just Running
_ -> Nothing
instance ToText JobsListStateFilter where
toText = \case
Done -> "done"
Pending -> "pending"
Running -> "running"
instance FromJSON JobsListStateFilter where
parseJSON = parseJSONText "JobsListStateFilter"
instance ToJSON JobsListStateFilter where
toJSON = toJSONText