module Polysemy.Db.Data.DbPassword where

newtype DbPassword =
  DbPassword { DbPassword -> Text
unDbPassword :: Text }
  deriving stock (DbPassword -> DbPassword -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DbPassword -> DbPassword -> Bool
$c/= :: DbPassword -> DbPassword -> Bool
== :: DbPassword -> DbPassword -> Bool
$c== :: DbPassword -> DbPassword -> Bool
Eq, Int -> DbPassword -> ShowS
[DbPassword] -> ShowS
DbPassword -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DbPassword] -> ShowS
$cshowList :: [DbPassword] -> ShowS
show :: DbPassword -> String
$cshow :: DbPassword -> String
showsPrec :: Int -> DbPassword -> ShowS
$cshowsPrec :: Int -> DbPassword -> ShowS
Show, forall x. Rep DbPassword x -> DbPassword
forall x. DbPassword -> Rep DbPassword x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep DbPassword x -> DbPassword
$cfrom :: forall x. DbPassword -> Rep DbPassword x
Generic)
  deriving newtype (String -> DbPassword
forall a. (String -> a) -> IsString a
fromString :: String -> DbPassword
$cfromString :: String -> DbPassword
IsString, Eq DbPassword
DbPassword -> DbPassword -> Bool
DbPassword -> DbPassword -> Ordering
DbPassword -> DbPassword -> DbPassword
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 :: DbPassword -> DbPassword -> DbPassword
$cmin :: DbPassword -> DbPassword -> DbPassword
max :: DbPassword -> DbPassword -> DbPassword
$cmax :: DbPassword -> DbPassword -> DbPassword
>= :: DbPassword -> DbPassword -> Bool
$c>= :: DbPassword -> DbPassword -> Bool
> :: DbPassword -> DbPassword -> Bool
$c> :: DbPassword -> DbPassword -> Bool
<= :: DbPassword -> DbPassword -> Bool
$c<= :: DbPassword -> DbPassword -> Bool
< :: DbPassword -> DbPassword -> Bool
$c< :: DbPassword -> DbPassword -> Bool
compare :: DbPassword -> DbPassword -> Ordering
$ccompare :: DbPassword -> DbPassword -> Ordering
Ord)

json ''DbPassword