{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
module Honeycomb.Types 
  ( DatasetName(..)
  ) where
import Lens.Micro (Lens', lens)
import Data.ByteString.Char8 (ByteString)
import Data.Text (Text)
import Data.Word
import Data.String (IsString)

newtype DatasetName = DatasetName { DatasetName -> Text
fromDatasetName :: Text }
  deriving (Int -> DatasetName -> ShowS
[DatasetName] -> ShowS
DatasetName -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DatasetName] -> ShowS
$cshowList :: [DatasetName] -> ShowS
show :: DatasetName -> String
$cshow :: DatasetName -> String
showsPrec :: Int -> DatasetName -> ShowS
$cshowsPrec :: Int -> DatasetName -> ShowS
Show, DatasetName -> DatasetName -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DatasetName -> DatasetName -> Bool
$c/= :: DatasetName -> DatasetName -> Bool
== :: DatasetName -> DatasetName -> Bool
$c== :: DatasetName -> DatasetName -> Bool
Eq, Eq DatasetName
DatasetName -> DatasetName -> Bool
DatasetName -> DatasetName -> Ordering
DatasetName -> DatasetName -> DatasetName
forall a.
Eq a
-> (a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
min :: DatasetName -> DatasetName -> DatasetName
$cmin :: DatasetName -> DatasetName -> DatasetName
max :: DatasetName -> DatasetName -> DatasetName
$cmax :: DatasetName -> DatasetName -> DatasetName
>= :: DatasetName -> DatasetName -> Bool
$c>= :: DatasetName -> DatasetName -> Bool
> :: DatasetName -> DatasetName -> Bool
$c> :: DatasetName -> DatasetName -> Bool
<= :: DatasetName -> DatasetName -> Bool
$c<= :: DatasetName -> DatasetName -> Bool
< :: DatasetName -> DatasetName -> Bool
$c< :: DatasetName -> DatasetName -> Bool
compare :: DatasetName -> DatasetName -> Ordering
$ccompare :: DatasetName -> DatasetName -> Ordering
Ord, String -> DatasetName
forall a. (String -> a) -> IsString a
fromString :: String -> DatasetName
$cfromString :: String -> DatasetName
IsString)