module Network.Google.Analytics.Types.Sum where
import Network.Google.Prelude
data DataGaGetSamplingLevel
= Default
| Faster
| HigherPrecision
deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
instance Hashable DataGaGetSamplingLevel
instance FromText DataGaGetSamplingLevel where
fromText = \case
"DEFAULT" -> Just Default
"FASTER" -> Just Faster
"HIGHER_PRECISION" -> Just HigherPrecision
_ -> Nothing
instance ToText DataGaGetSamplingLevel where
toText = \case
Default -> "DEFAULT"
Faster -> "FASTER"
HigherPrecision -> "HIGHER_PRECISION"
instance FromJSON DataGaGetSamplingLevel where
parseJSON = parseJSONText "DataGaGetSamplingLevel"
instance ToJSON DataGaGetSamplingLevel where
toJSON = toJSONText
data DataGaGetOutput
= DataTable
| JSON
deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
instance Hashable DataGaGetOutput
instance FromText DataGaGetOutput where
fromText = \case
"dataTable" -> Just DataTable
"json" -> Just JSON
_ -> Nothing
instance ToText DataGaGetOutput where
toText = \case
DataTable -> "dataTable"
JSON -> "json"
instance FromJSON DataGaGetOutput where
parseJSON = parseJSONText "DataGaGetOutput"
instance ToJSON DataGaGetOutput where
toJSON = toJSONText
data DataMcfGetSamplingLevel
= DMGSLDefault
| DMGSLFaster
| DMGSLHigherPrecision
deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
instance Hashable DataMcfGetSamplingLevel
instance FromText DataMcfGetSamplingLevel where
fromText = \case
"DEFAULT" -> Just DMGSLDefault
"FASTER" -> Just DMGSLFaster
"HIGHER_PRECISION" -> Just DMGSLHigherPrecision
_ -> Nothing
instance ToText DataMcfGetSamplingLevel where
toText = \case
DMGSLDefault -> "DEFAULT"
DMGSLFaster -> "FASTER"
DMGSLHigherPrecision -> "HIGHER_PRECISION"
instance FromJSON DataMcfGetSamplingLevel where
parseJSON = parseJSONText "DataMcfGetSamplingLevel"
instance ToJSON DataMcfGetSamplingLevel where
toJSON = toJSONText