{-# LANGUAGE TemplateHaskell #-} -- | module Strive.Types.Streams ( StreamDetailed (..), ) where import Data.Aeson (Value) import Data.Aeson.TH (deriveFromJSON) import Data.Text (Text) import Strive.Enums (Resolution, SeriesType) import Strive.Internal.TH (options) -- | data StreamDetailed = StreamDetailed { streamDetailed_data :: [Value], streamDetailed_originalSize :: Integer, streamDetailed_resolution :: Resolution, streamDetailed_seriesType :: SeriesType, streamDetailed_type :: Text } deriving (Show) $(deriveFromJSON options ''StreamDetailed)