module Network.Google.ResourceViews.Types.Sum where
import Network.Google.Prelude
data ZoneViewsListResourcesFormat
= None
| URL
| URLPort
deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
instance Hashable ZoneViewsListResourcesFormat
instance FromText ZoneViewsListResourcesFormat where
fromText = \case
"NONE" -> Just None
"URL" -> Just URL
"URL_PORT" -> Just URLPort
_ -> Nothing
instance ToText ZoneViewsListResourcesFormat where
toText = \case
None -> "NONE"
URL -> "URL"
URLPort -> "URL_PORT"
instance FromJSON ZoneViewsListResourcesFormat where
parseJSON = parseJSONText "ZoneViewsListResourcesFormat"
instance ToJSON ZoneViewsListResourcesFormat where
toJSON = toJSONText
data ZoneViewsListResourcesListState
= All
| Running
deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
instance Hashable ZoneViewsListResourcesListState
instance FromText ZoneViewsListResourcesListState where
fromText = \case
"ALL" -> Just All
"RUNNING" -> Just Running
_ -> Nothing
instance ToText ZoneViewsListResourcesListState where
toText = \case
All -> "ALL"
Running -> "RUNNING"
instance FromJSON ZoneViewsListResourcesListState where
parseJSON = parseJSONText "ZoneViewsListResourcesListState"
instance ToJSON ZoneViewsListResourcesListState where
toJSON = toJSONText