{-# LANGUAGE DeriveFoldable #-}
{-# LANGUAGE DeriveFunctor #-}
{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DeriveTraversable #-}
{-# LANGUAGE DerivingStrategies #-}
{-# LANGUAGE GeneralizedNewtypeDeriving #-}
{-# LANGUAGE StandaloneDeriving #-}
{-# LANGUAGE StrictData #-}
module Data.Tuple.Strict.T18
( T18 (..),
)
where
import Control.DeepSeq (NFData, rnf)
import Data.Bifoldable
import Data.Bifunctor
import Data.Bitraversable
import Data.Functor.Classes (Eq1 (liftEq), Eq2 (liftEq2))
import Data.Hashable (Hashable, hash, hashWithSalt)
import Data.Hashable.Lifted
( Hashable1,
Hashable2,
defaultLiftHashWithSalt,
hashWithSalt1,
liftHashWithSalt,
liftHashWithSalt2,
)
import Data.Semigroup
import GHC.Generics (Generic)
data T18 a b c d e f g h i j k l m n o p q r
= T18 a b c d e f g h i j k l m n o p q r
deriving stock (T18 a b c d e f g h i j k l m n o p q r
forall a. a -> a -> Bounded a
forall a b c d e f g h i j k l m n o p q r.
(Bounded a, Bounded b, Bounded c, Bounded d, Bounded e, Bounded f,
Bounded g, Bounded h, Bounded i, Bounded j, Bounded k, Bounded l,
Bounded m, Bounded n, Bounded o, Bounded p, Bounded q,
Bounded r) =>
T18 a b c d e f g h i j k l m n o p q r
maxBound :: T18 a b c d e f g h i j k l m n o p q r
$cmaxBound :: forall a b c d e f g h i j k l m n o p q r.
(Bounded a, Bounded b, Bounded c, Bounded d, Bounded e, Bounded f,
Bounded g, Bounded h, Bounded i, Bounded j, Bounded k, Bounded l,
Bounded m, Bounded n, Bounded o, Bounded p, Bounded q,
Bounded r) =>
T18 a b c d e f g h i j k l m n o p q r
minBound :: T18 a b c d e f g h i j k l m n o p q r
$cminBound :: forall a b c d e f g h i j k l m n o p q r.
(Bounded a, Bounded b, Bounded c, Bounded d, Bounded e, Bounded f,
Bounded g, Bounded h, Bounded i, Bounded j, Bounded k, Bounded l,
Bounded m, Bounded n, Bounded o, Bounded p, Bounded q,
Bounded r) =>
T18 a b c d e f g h i j k l m n o p q r
Bounded, T18 a b c d e f g h i j k l m n o p q r
-> T18 a b c d e f g h i j k l m n o p q r -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
forall a b c d e f g h i j k l m n o p q r.
(Eq a, Eq b, Eq c, Eq d, Eq e, Eq f, Eq g, Eq h, Eq i, Eq j, Eq k,
Eq l, Eq m, Eq n, Eq o, Eq p, Eq q, Eq r) =>
T18 a b c d e f g h i j k l m n o p q r
-> T18 a b c d e f g h i j k l m n o p q r -> Bool
/= :: T18 a b c d e f g h i j k l m n o p q r
-> T18 a b c d e f g h i j k l m n o p q r -> Bool
$c/= :: forall a b c d e f g h i j k l m n o p q r.
(Eq a, Eq b, Eq c, Eq d, Eq e, Eq f, Eq g, Eq h, Eq i, Eq j, Eq k,
Eq l, Eq m, Eq n, Eq o, Eq p, Eq q, Eq r) =>
T18 a b c d e f g h i j k l m n o p q r
-> T18 a b c d e f g h i j k l m n o p q r -> Bool
== :: T18 a b c d e f g h i j k l m n o p q r
-> T18 a b c d e f g h i j k l m n o p q r -> Bool
$c== :: forall a b c d e f g h i j k l m n o p q r.
(Eq a, Eq b, Eq c, Eq d, Eq e, Eq f, Eq g, Eq h, Eq i, Eq j, Eq k,
Eq l, Eq m, Eq n, Eq o, Eq p, Eq q, Eq r) =>
T18 a b c d e f g h i j k l m n o p q r
-> T18 a b c d e f g h i j k l m n o p q r -> Bool
Eq, T18 a b c d e f g h i j k l m n o p q r
-> T18 a b c d e f g h i j k l m n o p q r -> Bool
T18 a b c d e f g h i j k l m n o p q r
-> T18 a b c d e f g h i j k l m n o p q r -> Ordering
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
forall {a} {b} {c} {d} {e} {f} {g} {h} {i} {j} {k} {l} {m} {n} {o}
{p} {q} {r}.
(Ord a, Ord b, Ord c, Ord d, Ord e, Ord f, Ord g, Ord h, Ord i,
Ord j, Ord k, Ord l, Ord m, Ord n, Ord o, Ord p, Ord q, Ord r) =>
Eq (T18 a b c d e f g h i j k l m n o p q r)
forall a b c d e f g h i j k l m n o p q r.
(Ord a, Ord b, Ord c, Ord d, Ord e, Ord f, Ord g, Ord h, Ord i,
Ord j, Ord k, Ord l, Ord m, Ord n, Ord o, Ord p, Ord q, Ord r) =>
T18 a b c d e f g h i j k l m n o p q r
-> T18 a b c d e f g h i j k l m n o p q r -> Bool
forall a b c d e f g h i j k l m n o p q r.
(Ord a, Ord b, Ord c, Ord d, Ord e, Ord f, Ord g, Ord h, Ord i,
Ord j, Ord k, Ord l, Ord m, Ord n, Ord o, Ord p, Ord q, Ord r) =>
T18 a b c d e f g h i j k l m n o p q r
-> T18 a b c d e f g h i j k l m n o p q r -> Ordering
forall a b c d e f g h i j k l m n o p q r.
(Ord a, Ord b, Ord c, Ord d, Ord e, Ord f, Ord g, Ord h, Ord i,
Ord j, Ord k, Ord l, Ord m, Ord n, Ord o, Ord p, Ord q, Ord r) =>
T18 a b c d e f g h i j k l m n o p q r
-> T18 a b c d e f g h i j k l m n o p q r
-> T18 a b c d e f g h i j k l m n o p q r
min :: T18 a b c d e f g h i j k l m n o p q r
-> T18 a b c d e f g h i j k l m n o p q r
-> T18 a b c d e f g h i j k l m n o p q r
$cmin :: forall a b c d e f g h i j k l m n o p q r.
(Ord a, Ord b, Ord c, Ord d, Ord e, Ord f, Ord g, Ord h, Ord i,
Ord j, Ord k, Ord l, Ord m, Ord n, Ord o, Ord p, Ord q, Ord r) =>
T18 a b c d e f g h i j k l m n o p q r
-> T18 a b c d e f g h i j k l m n o p q r
-> T18 a b c d e f g h i j k l m n o p q r
max :: T18 a b c d e f g h i j k l m n o p q r
-> T18 a b c d e f g h i j k l m n o p q r
-> T18 a b c d e f g h i j k l m n o p q r
$cmax :: forall a b c d e f g h i j k l m n o p q r.
(Ord a, Ord b, Ord c, Ord d, Ord e, Ord f, Ord g, Ord h, Ord i,
Ord j, Ord k, Ord l, Ord m, Ord n, Ord o, Ord p, Ord q, Ord r) =>
T18 a b c d e f g h i j k l m n o p q r
-> T18 a b c d e f g h i j k l m n o p q r
-> T18 a b c d e f g h i j k l m n o p q r
>= :: T18 a b c d e f g h i j k l m n o p q r
-> T18 a b c d e f g h i j k l m n o p q r -> Bool
$c>= :: forall a b c d e f g h i j k l m n o p q r.
(Ord a, Ord b, Ord c, Ord d, Ord e, Ord f, Ord g, Ord h, Ord i,
Ord j, Ord k, Ord l, Ord m, Ord n, Ord o, Ord p, Ord q, Ord r) =>
T18 a b c d e f g h i j k l m n o p q r
-> T18 a b c d e f g h i j k l m n o p q r -> Bool
> :: T18 a b c d e f g h i j k l m n o p q r
-> T18 a b c d e f g h i j k l m n o p q r -> Bool
$c> :: forall a b c d e f g h i j k l m n o p q r.
(Ord a, Ord b, Ord c, Ord d, Ord e, Ord f, Ord g, Ord h, Ord i,
Ord j, Ord k, Ord l, Ord m, Ord n, Ord o, Ord p, Ord q, Ord r) =>
T18 a b c d e f g h i j k l m n o p q r
-> T18 a b c d e f g h i j k l m n o p q r -> Bool
<= :: T18 a b c d e f g h i j k l m n o p q r
-> T18 a b c d e f g h i j k l m n o p q r -> Bool
$c<= :: forall a b c d e f g h i j k l m n o p q r.
(Ord a, Ord b, Ord c, Ord d, Ord e, Ord f, Ord g, Ord h, Ord i,
Ord j, Ord k, Ord l, Ord m, Ord n, Ord o, Ord p, Ord q, Ord r) =>
T18 a b c d e f g h i j k l m n o p q r
-> T18 a b c d e f g h i j k l m n o p q r -> Bool
< :: T18 a b c d e f g h i j k l m n o p q r
-> T18 a b c d e f g h i j k l m n o p q r -> Bool
$c< :: forall a b c d e f g h i j k l m n o p q r.
(Ord a, Ord b, Ord c, Ord d, Ord e, Ord f, Ord g, Ord h, Ord i,
Ord j, Ord k, Ord l, Ord m, Ord n, Ord o, Ord p, Ord q, Ord r) =>
T18 a b c d e f g h i j k l m n o p q r
-> T18 a b c d e f g h i j k l m n o p q r -> Bool
compare :: T18 a b c d e f g h i j k l m n o p q r
-> T18 a b c d e f g h i j k l m n o p q r -> Ordering
$ccompare :: forall a b c d e f g h i j k l m n o p q r.
(Ord a, Ord b, Ord c, Ord d, Ord e, Ord f, Ord g, Ord h, Ord i,
Ord j, Ord k, Ord l, Ord m, Ord n, Ord o, Ord p, Ord q, Ord r) =>
T18 a b c d e f g h i j k l m n o p q r
-> T18 a b c d e f g h i j k l m n o p q r -> Ordering
Ord, ReadPrec [T18 a b c d e f g h i j k l m n o p q r]
ReadPrec (T18 a b c d e f g h i j k l m n o p q r)
ReadS [T18 a b c d e f g h i j k l m n o p q r]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
forall a b c d e f g h i j k l m n o p q r.
(Read a, Read b, Read c, Read d, Read e, Read f, Read g, Read h,
Read i, Read j, Read k, Read l, Read m, Read n, Read o, Read p,
Read q, Read r) =>
ReadPrec [T18 a b c d e f g h i j k l m n o p q r]
forall a b c d e f g h i j k l m n o p q r.
(Read a, Read b, Read c, Read d, Read e, Read f, Read g, Read h,
Read i, Read j, Read k, Read l, Read m, Read n, Read o, Read p,
Read q, Read r) =>
ReadPrec (T18 a b c d e f g h i j k l m n o p q r)
forall a b c d e f g h i j k l m n o p q r.
(Read a, Read b, Read c, Read d, Read e, Read f, Read g, Read h,
Read i, Read j, Read k, Read l, Read m, Read n, Read o, Read p,
Read q, Read r) =>
Int -> ReadS (T18 a b c d e f g h i j k l m n o p q r)
forall a b c d e f g h i j k l m n o p q r.
(Read a, Read b, Read c, Read d, Read e, Read f, Read g, Read h,
Read i, Read j, Read k, Read l, Read m, Read n, Read o, Read p,
Read q, Read r) =>
ReadS [T18 a b c d e f g h i j k l m n o p q r]
readListPrec :: ReadPrec [T18 a b c d e f g h i j k l m n o p q r]
$creadListPrec :: forall a b c d e f g h i j k l m n o p q r.
(Read a, Read b, Read c, Read d, Read e, Read f, Read g, Read h,
Read i, Read j, Read k, Read l, Read m, Read n, Read o, Read p,
Read q, Read r) =>
ReadPrec [T18 a b c d e f g h i j k l m n o p q r]
readPrec :: ReadPrec (T18 a b c d e f g h i j k l m n o p q r)
$creadPrec :: forall a b c d e f g h i j k l m n o p q r.
(Read a, Read b, Read c, Read d, Read e, Read f, Read g, Read h,
Read i, Read j, Read k, Read l, Read m, Read n, Read o, Read p,
Read q, Read r) =>
ReadPrec (T18 a b c d e f g h i j k l m n o p q r)
readList :: ReadS [T18 a b c d e f g h i j k l m n o p q r]
$creadList :: forall a b c d e f g h i j k l m n o p q r.
(Read a, Read b, Read c, Read d, Read e, Read f, Read g, Read h,
Read i, Read j, Read k, Read l, Read m, Read n, Read o, Read p,
Read q, Read r) =>
ReadS [T18 a b c d e f g h i j k l m n o p q r]
readsPrec :: Int -> ReadS (T18 a b c d e f g h i j k l m n o p q r)
$creadsPrec :: forall a b c d e f g h i j k l m n o p q r.
(Read a, Read b, Read c, Read d, Read e, Read f, Read g, Read h,
Read i, Read j, Read k, Read l, Read m, Read n, Read o, Read p,
Read q, Read r) =>
Int -> ReadS (T18 a b c d e f g h i j k l m n o p q r)
Read, Int -> T18 a b c d e f g h i j k l m n o p q r -> ShowS
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
forall a b c d e f g h i j k l m n o p q r.
(Show a, Show b, Show c, Show d, Show e, Show f, Show g, Show h,
Show i, Show j, Show k, Show l, Show m, Show n, Show o, Show p,
Show q, Show r) =>
Int -> T18 a b c d e f g h i j k l m n o p q r -> ShowS
forall a b c d e f g h i j k l m n o p q r.
(Show a, Show b, Show c, Show d, Show e, Show f, Show g, Show h,
Show i, Show j, Show k, Show l, Show m, Show n, Show o, Show p,
Show q, Show r) =>
[T18 a b c d e f g h i j k l m n o p q r] -> ShowS
forall a b c d e f g h i j k l m n o p q r.
(Show a, Show b, Show c, Show d, Show e, Show f, Show g, Show h,
Show i, Show j, Show k, Show l, Show m, Show n, Show o, Show p,
Show q, Show r) =>
T18 a b c d e f g h i j k l m n o p q r -> String
showList :: [T18 a b c d e f g h i j k l m n o p q r] -> ShowS
$cshowList :: forall a b c d e f g h i j k l m n o p q r.
(Show a, Show b, Show c, Show d, Show e, Show f, Show g, Show h,
Show i, Show j, Show k, Show l, Show m, Show n, Show o, Show p,
Show q, Show r) =>
[T18 a b c d e f g h i j k l m n o p q r] -> ShowS
show :: T18 a b c d e f g h i j k l m n o p q r -> String
$cshow :: forall a b c d e f g h i j k l m n o p q r.
(Show a, Show b, Show c, Show d, Show e, Show f, Show g, Show h,
Show i, Show j, Show k, Show l, Show m, Show n, Show o, Show p,
Show q, Show r) =>
T18 a b c d e f g h i j k l m n o p q r -> String
showsPrec :: Int -> T18 a b c d e f g h i j k l m n o p q r -> ShowS
$cshowsPrec :: forall a b c d e f g h i j k l m n o p q r.
(Show a, Show b, Show c, Show d, Show e, Show f, Show g, Show h,
Show i, Show j, Show k, Show l, Show m, Show n, Show o, Show p,
Show q, Show r) =>
Int -> T18 a b c d e f g h i j k l m n o p q r -> ShowS
Show, forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
forall a b c d e f g h i j k l m n o p q r x.
Rep (T18 a b c d e f g h i j k l m n o p q r) x
-> T18 a b c d e f g h i j k l m n o p q r
forall a b c d e f g h i j k l m n o p q r x.
T18 a b c d e f g h i j k l m n o p q r
-> Rep (T18 a b c d e f g h i j k l m n o p q r) x
$cto :: forall a b c d e f g h i j k l m n o p q r x.
Rep (T18 a b c d e f g h i j k l m n o p q r) x
-> T18 a b c d e f g h i j k l m n o p q r
$cfrom :: forall a b c d e f g h i j k l m n o p q r x.
T18 a b c d e f g h i j k l m n o p q r
-> Rep (T18 a b c d e f g h i j k l m n o p q r) x
Generic)
deriving stock instance Foldable (T18 a b c d e f g h i j k l m n o p q)
deriving stock instance Functor (T18 a b c d e f g h i j k l m n o p q)
deriving stock instance Traversable (T18 a b c d e f g h i j k l m n o p q)
instance (Eq a, Eq b, Eq c, Eq d, Eq e, Eq f, Eq g, Eq h, Eq i, Eq j, Eq k, Eq l, Eq m, Eq n, Eq o, Eq p, Eq q) => Eq1 (T18 a b c d e f g h i j k l m n o p q) where
liftEq :: forall a b.
(a -> b -> Bool)
-> T18 a b c d e f g h i j k l m n o p q a
-> T18 a b c d e f g h i j k l m n o p q b
-> Bool
liftEq = forall (f :: * -> * -> *) a b c d.
Eq2 f =>
(a -> b -> Bool) -> (c -> d -> Bool) -> f a c -> f b d -> Bool
liftEq2 forall a. Eq a => a -> a -> Bool
(==)
instance (Eq a, Eq b, Eq c, Eq d, Eq e, Eq f, Eq g, Eq h, Eq i, Eq j, Eq k, Eq l, Eq m, Eq n, Eq o, Eq p) => Eq2 (T18 a b c d e f g h i j k l m n o p) where
liftEq2 :: forall a b c d.
(a -> b -> Bool)
-> (c -> d -> Bool)
-> T18 a b c d e f g h i j k l m n o p a c
-> T18 a b c d e f g h i j k l m n o p b d
-> Bool
liftEq2 a -> b -> Bool
e1 c -> d -> Bool
e2 (T18 a
a b
b c
c d
d e
e f
f g
g h
h i
i j
j k
k l
l m
m n
n o
o p
p a
q c
r) (T18 a
a' b
b' c
c' d
d' e
e' f
f' g
g' h
h' i
i' j
j' k
k' l
l' m
m' n
n' o
o' p
p' b
q' d
r') =
a
a forall a. Eq a => a -> a -> Bool
== a
a' Bool -> Bool -> Bool
&& b
b forall a. Eq a => a -> a -> Bool
== b
b' Bool -> Bool -> Bool
&& c
c forall a. Eq a => a -> a -> Bool
== c
c' Bool -> Bool -> Bool
&& d
d forall a. Eq a => a -> a -> Bool
== d
d' Bool -> Bool -> Bool
&& e
e forall a. Eq a => a -> a -> Bool
== e
e' Bool -> Bool -> Bool
&& f
f forall a. Eq a => a -> a -> Bool
== f
f' Bool -> Bool -> Bool
&& g
g forall a. Eq a => a -> a -> Bool
== g
g' Bool -> Bool -> Bool
&& h
h forall a. Eq a => a -> a -> Bool
== h
h' Bool -> Bool -> Bool
&& i
i forall a. Eq a => a -> a -> Bool
== i
i' Bool -> Bool -> Bool
&& j
j forall a. Eq a => a -> a -> Bool
== j
j' Bool -> Bool -> Bool
&& k
k forall a. Eq a => a -> a -> Bool
== k
k' Bool -> Bool -> Bool
&& l
l forall a. Eq a => a -> a -> Bool
== l
l' Bool -> Bool -> Bool
&& m
m forall a. Eq a => a -> a -> Bool
== m
m' Bool -> Bool -> Bool
&& n
n forall a. Eq a => a -> a -> Bool
== n
n' Bool -> Bool -> Bool
&& o
o forall a. Eq a => a -> a -> Bool
== o
o' Bool -> Bool -> Bool
&& p
p forall a. Eq a => a -> a -> Bool
== p
p' Bool -> Bool -> Bool
&& a -> b -> Bool
e1 a
q b
q' Bool -> Bool -> Bool
&& c -> d -> Bool
e2 c
r d
r'
instance
(Monoid a, Monoid b, Monoid c, Monoid d, Monoid e, Monoid f, Monoid g, Monoid h, Monoid i, Monoid j, Monoid k, Monoid l, Monoid m, Monoid n, Monoid o, Monoid p, Monoid q) =>
Applicative (T18 a b c d e f g h i j k l m n o p q)
where
pure :: forall a. a -> T18 a b c d e f g h i j k l m n o p q a
pure a
r = forall a b c d e f g h i j k l m n o p q r.
a
-> b
-> c
-> d
-> e
-> f
-> g
-> h
-> i
-> j
-> k
-> l
-> m
-> n
-> o
-> p
-> q
-> r
-> T18 a b c d e f g h i j k l m n o p q r
T18 forall a. Monoid a => a
mempty forall a. Monoid a => a
mempty forall a. Monoid a => a
mempty forall a. Monoid a => a
mempty forall a. Monoid a => a
mempty forall a. Monoid a => a
mempty forall a. Monoid a => a
mempty forall a. Monoid a => a
mempty forall a. Monoid a => a
mempty forall a. Monoid a => a
mempty forall a. Monoid a => a
mempty forall a. Monoid a => a
mempty forall a. Monoid a => a
mempty forall a. Monoid a => a
mempty forall a. Monoid a => a
mempty forall a. Monoid a => a
mempty forall a. Monoid a => a
mempty a
r
T18 a
a b
b c
c d
d e
e f
f g
g h
h i
i j
j k
k l
l m
m n
n o
o p
p q
q a -> b
r <*> :: forall a b.
T18 a b c d e f g h i j k l m n o p q (a -> b)
-> T18 a b c d e f g h i j k l m n o p q a
-> T18 a b c d e f g h i j k l m n o p q b
<*> T18 a
a' b
b' c
c' d
d' e
e' f
f' g
g' h
h' i
i' j
j' k
k' l
l' m
m' n
n' o
o' p
p' q
q' a
r' =
forall a b c d e f g h i j k l m n o p q r.
a
-> b
-> c
-> d
-> e
-> f
-> g
-> h
-> i
-> j
-> k
-> l
-> m
-> n
-> o
-> p
-> q
-> r
-> T18 a b c d e f g h i j k l m n o p q r
T18 (a
a forall a. Semigroup a => a -> a -> a
<> a
a') (b
b forall a. Semigroup a => a -> a -> a
<> b
b') (c
c forall a. Semigroup a => a -> a -> a
<> c
c') (d
d forall a. Semigroup a => a -> a -> a
<> d
d') (e
e forall a. Semigroup a => a -> a -> a
<> e
e') (f
f forall a. Semigroup a => a -> a -> a
<> f
f') (g
g forall a. Semigroup a => a -> a -> a
<> g
g') (h
h forall a. Semigroup a => a -> a -> a
<> h
h') (i
i forall a. Semigroup a => a -> a -> a
<> i
i') (j
j forall a. Semigroup a => a -> a -> a
<> j
j') (k
k forall a. Semigroup a => a -> a -> a
<> k
k') (l
l forall a. Semigroup a => a -> a -> a
<> l
l') (m
m forall a. Semigroup a => a -> a -> a
<> m
m') (n
n forall a. Semigroup a => a -> a -> a
<> n
n') (o
o forall a. Semigroup a => a -> a -> a
<> o
o') (p
p forall a. Semigroup a => a -> a -> a
<> p
p') (q
q forall a. Semigroup a => a -> a -> a
<> q
q') (a -> b
r a
r')
instance
(Monoid a, Monoid b, Monoid c, Monoid d, Monoid e, Monoid f, Monoid g, Monoid h, Monoid i, Monoid j, Monoid k, Monoid l, Monoid m, Monoid n, Monoid o, Monoid p, Monoid q) =>
Monad (T18 a b c d e f g h i j k l m n o p q)
where
return :: forall a. a -> T18 a b c d e f g h i j k l m n o p q a
return = forall (f :: * -> *) a. Applicative f => a -> f a
pure
T18 a
a b
b c
c d
d e
e f
f g
g h
h i
i j
j k
k l
l m
m n
n o
o p
p q
q a
r >>= :: forall a b.
T18 a b c d e f g h i j k l m n o p q a
-> (a -> T18 a b c d e f g h i j k l m n o p q b)
-> T18 a b c d e f g h i j k l m n o p q b
>>= a -> T18 a b c d e f g h i j k l m n o p q b
s = case a -> T18 a b c d e f g h i j k l m n o p q b
s a
r of
T18 a
a' b
b' c
c' d
d' e
e' f
f' g
g' h
h' i
i' j
j' k
k' l
l' m
m' n
n' o
o' p
p' q
q' b
r' ->
forall a b c d e f g h i j k l m n o p q r.
a
-> b
-> c
-> d
-> e
-> f
-> g
-> h
-> i
-> j
-> k
-> l
-> m
-> n
-> o
-> p
-> q
-> r
-> T18 a b c d e f g h i j k l m n o p q r
T18 (a
a forall a. Semigroup a => a -> a -> a
<> a
a') (b
b forall a. Semigroup a => a -> a -> a
<> b
b') (c
c forall a. Semigroup a => a -> a -> a
<> c
c') (d
d forall a. Semigroup a => a -> a -> a
<> d
d') (e
e forall a. Semigroup a => a -> a -> a
<> e
e') (f
f forall a. Semigroup a => a -> a -> a
<> f
f') (g
g forall a. Semigroup a => a -> a -> a
<> g
g') (h
h forall a. Semigroup a => a -> a -> a
<> h
h') (i
i forall a. Semigroup a => a -> a -> a
<> i
i') (j
j forall a. Semigroup a => a -> a -> a
<> j
j') (k
k forall a. Semigroup a => a -> a -> a
<> k
k') (l
l forall a. Semigroup a => a -> a -> a
<> l
l') (m
m forall a. Semigroup a => a -> a -> a
<> m
m') (n
n forall a. Semigroup a => a -> a -> a
<> n
n') (o
o forall a. Semigroup a => a -> a -> a
<> o
o') (p
p forall a. Semigroup a => a -> a -> a
<> p
p') (q
q forall a. Semigroup a => a -> a -> a
<> q
q') b
r'
instance (Hashable a, Hashable b, Hashable c, Hashable d, Hashable e, Hashable f, Hashable g, Hashable h, Hashable i, Hashable j, Hashable k, Hashable l, Hashable m, Hashable n, Hashable o, Hashable p, Hashable q, Hashable r) => Hashable (T18 a b c d e f g h i j k l m n o p q r) where
hash :: T18 a b c d e f g h i j k l m n o p q r -> Int
hash (T18 a
a b
b c
c d
d e
e f
f g
g h
h i
i j
j k
k l
l m
m n
n o
o p
p q
q r
r) = forall a. Hashable a => a -> Int
hash a
a forall a. Hashable a => Int -> a -> Int
`hashWithSalt` b
b forall a. Hashable a => Int -> a -> Int
`hashWithSalt` c
c forall a. Hashable a => Int -> a -> Int
`hashWithSalt` d
d forall a. Hashable a => Int -> a -> Int
`hashWithSalt` e
e forall a. Hashable a => Int -> a -> Int
`hashWithSalt` f
f forall a. Hashable a => Int -> a -> Int
`hashWithSalt` g
g forall a. Hashable a => Int -> a -> Int
`hashWithSalt` h
h forall a. Hashable a => Int -> a -> Int
`hashWithSalt` i
i forall a. Hashable a => Int -> a -> Int
`hashWithSalt` j
j forall a. Hashable a => Int -> a -> Int
`hashWithSalt` k
k forall a. Hashable a => Int -> a -> Int
`hashWithSalt` l
l forall a. Hashable a => Int -> a -> Int
`hashWithSalt` m
m forall a. Hashable a => Int -> a -> Int
`hashWithSalt` n
n forall a. Hashable a => Int -> a -> Int
`hashWithSalt` o
o forall a. Hashable a => Int -> a -> Int
`hashWithSalt` p
p forall a. Hashable a => Int -> a -> Int
`hashWithSalt` q
q forall a. Hashable a => Int -> a -> Int
`hashWithSalt` r
r
hashWithSalt :: Int -> T18 a b c d e f g h i j k l m n o p q r -> Int
hashWithSalt = forall (f :: * -> *) a.
(Hashable1 f, Hashable a) =>
Int -> f a -> Int
hashWithSalt1
instance (Hashable a, Hashable b, Hashable c, Hashable d, Hashable e, Hashable f, Hashable g, Hashable h, Hashable i, Hashable j, Hashable k, Hashable l, Hashable m, Hashable n, Hashable o, Hashable p, Hashable q) => Hashable1 (T18 a b c d e f g h i j k l m n o p q) where
liftHashWithSalt :: forall a.
(Int -> a -> Int)
-> Int -> T18 a b c d e f g h i j k l m n o p q a -> Int
liftHashWithSalt = forall (f :: * -> * -> *) a b.
(Hashable2 f, Hashable a) =>
(Int -> b -> Int) -> Int -> f a b -> Int
defaultLiftHashWithSalt
instance (Hashable a, Hashable b, Hashable c, Hashable d, Hashable e, Hashable f, Hashable g, Hashable h, Hashable i, Hashable j, Hashable k, Hashable l, Hashable m, Hashable n, Hashable o, Hashable p) => Hashable2 (T18 a b c d e f g h i j k l m n o p) where
liftHashWithSalt2 :: forall a b.
(Int -> a -> Int)
-> (Int -> b -> Int)
-> Int
-> T18 a b c d e f g h i j k l m n o p a b
-> Int
liftHashWithSalt2 Int -> a -> Int
h1 Int -> b -> Int
h2 Int
slt (T18 a
a b
b c
c d
d e
e f
f g
g h
h i
i j
j k
k l
l m
m n
n o
o p
p a
q b
r) =
(Int
slt forall a. Hashable a => Int -> a -> Int
`hashWithSalt` a
a forall a. Hashable a => Int -> a -> Int
`hashWithSalt` b
b forall a. Hashable a => Int -> a -> Int
`hashWithSalt` c
c forall a. Hashable a => Int -> a -> Int
`hashWithSalt` d
d forall a. Hashable a => Int -> a -> Int
`hashWithSalt` e
e forall a. Hashable a => Int -> a -> Int
`hashWithSalt` f
f forall a. Hashable a => Int -> a -> Int
`hashWithSalt` g
g forall a. Hashable a => Int -> a -> Int
`hashWithSalt` h
h forall a. Hashable a => Int -> a -> Int
`hashWithSalt` i
i forall a. Hashable a => Int -> a -> Int
`hashWithSalt` j
j forall a. Hashable a => Int -> a -> Int
`hashWithSalt` k
k forall a. Hashable a => Int -> a -> Int
`hashWithSalt` l
l forall a. Hashable a => Int -> a -> Int
`hashWithSalt` m
m forall a. Hashable a => Int -> a -> Int
`hashWithSalt` n
n forall a. Hashable a => Int -> a -> Int
`hashWithSalt` o
o forall a. Hashable a => Int -> a -> Int
`hashWithSalt` p
p) Int -> a -> Int
`h1` a
q Int -> b -> Int
`h2` b
r
instance (Monoid a, Monoid b, Monoid c, Monoid d, Monoid e, Monoid f, Monoid g, Monoid h, Monoid i, Monoid j, Monoid k, Monoid l, Monoid m, Monoid n, Monoid o, Monoid p, Monoid q, Monoid r) => Monoid (T18 a b c d e f g h i j k l m n o p q r) where
mempty :: T18 a b c d e f g h i j k l m n o p q r
mempty = forall a b c d e f g h i j k l m n o p q r.
a
-> b
-> c
-> d
-> e
-> f
-> g
-> h
-> i
-> j
-> k
-> l
-> m
-> n
-> o
-> p
-> q
-> r
-> T18 a b c d e f g h i j k l m n o p q r
T18 forall a. Monoid a => a
mempty forall a. Monoid a => a
mempty forall a. Monoid a => a
mempty forall a. Monoid a => a
mempty forall a. Monoid a => a
mempty forall a. Monoid a => a
mempty forall a. Monoid a => a
mempty forall a. Monoid a => a
mempty forall a. Monoid a => a
mempty forall a. Monoid a => a
mempty forall a. Monoid a => a
mempty forall a. Monoid a => a
mempty forall a. Monoid a => a
mempty forall a. Monoid a => a
mempty forall a. Monoid a => a
mempty forall a. Monoid a => a
mempty forall a. Monoid a => a
mempty forall a. Monoid a => a
mempty
instance (NFData a, NFData b, NFData c, NFData d, NFData e, NFData f, NFData g, NFData h, NFData i, NFData j, NFData k, NFData l, NFData m, NFData n, NFData o, NFData p, NFData q, NFData r) => NFData (T18 a b c d e f g h i j k l m n o p q r) where
rnf :: T18 a b c d e f g h i j k l m n o p q r -> ()
rnf (T18 a
a b
b c
c d
d e
e f
f g
g h
h i
i j
j k
k l
l m
m n
n o
o p
p q
q r
r) = forall a. NFData a => a -> ()
rnf a
a seq :: forall a b. a -> b -> b
`seq` forall a. NFData a => a -> ()
rnf b
b seq :: forall a b. a -> b -> b
`seq` forall a. NFData a => a -> ()
rnf c
c seq :: forall a b. a -> b -> b
`seq` forall a. NFData a => a -> ()
rnf d
d seq :: forall a b. a -> b -> b
`seq` forall a. NFData a => a -> ()
rnf e
e seq :: forall a b. a -> b -> b
`seq` forall a. NFData a => a -> ()
rnf f
f seq :: forall a b. a -> b -> b
`seq` forall a. NFData a => a -> ()
rnf g
g seq :: forall a b. a -> b -> b
`seq` forall a. NFData a => a -> ()
rnf h
h seq :: forall a b. a -> b -> b
`seq` forall a. NFData a => a -> ()
rnf i
i seq :: forall a b. a -> b -> b
`seq` forall a. NFData a => a -> ()
rnf j
j seq :: forall a b. a -> b -> b
`seq` forall a. NFData a => a -> ()
rnf k
k seq :: forall a b. a -> b -> b
`seq` forall a. NFData a => a -> ()
rnf l
l seq :: forall a b. a -> b -> b
`seq` forall a. NFData a => a -> ()
rnf m
m seq :: forall a b. a -> b -> b
`seq` forall a. NFData a => a -> ()
rnf n
n seq :: forall a b. a -> b -> b
`seq` forall a. NFData a => a -> ()
rnf o
o seq :: forall a b. a -> b -> b
`seq` forall a. NFData a => a -> ()
rnf p
p seq :: forall a b. a -> b -> b
`seq` forall a. NFData a => a -> ()
rnf q
q seq :: forall a b. a -> b -> b
`seq` forall a. NFData a => a -> ()
rnf r
r
instance (Semigroup a, Semigroup b, Semigroup c, Semigroup d, Semigroup e, Semigroup f, Semigroup g, Semigroup h, Semigroup i, Semigroup j, Semigroup k, Semigroup l, Semigroup m, Semigroup n, Semigroup o, Semigroup p, Semigroup q, Semigroup r) => Semigroup (T18 a b c d e f g h i j k l m n o p q r) where
T18 a
a1 b
b1 c
c1 d
d1 e
e1 f
f1 g
g1 h
h1 i
i1 j
j1 k
k1 l
l1 m
m1 n
n1 o
o1 p
p1 q
q1 r
r1 <> :: T18 a b c d e f g h i j k l m n o p q r
-> T18 a b c d e f g h i j k l m n o p q r
-> T18 a b c d e f g h i j k l m n o p q r
<> T18 a
a2 b
b2 c
c2 d
d2 e
e2 f
f2 g
g2 h
h2 i
i2 j
j2 k
k2 l
l2 m
m2 n
n2 o
o2 p
p2 q
q2 r
r2 = forall a b c d e f g h i j k l m n o p q r.
a
-> b
-> c
-> d
-> e
-> f
-> g
-> h
-> i
-> j
-> k
-> l
-> m
-> n
-> o
-> p
-> q
-> r
-> T18 a b c d e f g h i j k l m n o p q r
T18 (a
a1 forall a. Semigroup a => a -> a -> a
<> a
a2) (b
b1 forall a. Semigroup a => a -> a -> a
<> b
b2) (c
c1 forall a. Semigroup a => a -> a -> a
<> c
c2) (d
d1 forall a. Semigroup a => a -> a -> a
<> d
d2) (e
e1 forall a. Semigroup a => a -> a -> a
<> e
e2) (f
f1 forall a. Semigroup a => a -> a -> a
<> f
f2) (g
g1 forall a. Semigroup a => a -> a -> a
<> g
g2) (h
h1 forall a. Semigroup a => a -> a -> a
<> h
h2) (i
i1 forall a. Semigroup a => a -> a -> a
<> i
i2) (j
j1 forall a. Semigroup a => a -> a -> a
<> j
j2) (k
k1 forall a. Semigroup a => a -> a -> a
<> k
k2) (l
l1 forall a. Semigroup a => a -> a -> a
<> l
l2) (m
m1 forall a. Semigroup a => a -> a -> a
<> m
m2) (n
n1 forall a. Semigroup a => a -> a -> a
<> n
n2) (o
o1 forall a. Semigroup a => a -> a -> a
<> o
o2) (p
p1 forall a. Semigroup a => a -> a -> a
<> p
p2) (q
q1 forall a. Semigroup a => a -> a -> a
<> q
q2) (r
r1 forall a. Semigroup a => a -> a -> a
<> r
r2)
stimes :: forall b.
Integral b =>
b
-> T18 a b c d e f g h i j k l m n o p q r
-> T18 a b c d e f g h i j k l m n o p q r
stimes b
ii (T18 a
a b
b c
c d
d e
e f
f g
g h
h i
i j
j k
k l
l m
m n
n o
o p
p q
q r
r) = forall a b c d e f g h i j k l m n o p q r.
a
-> b
-> c
-> d
-> e
-> f
-> g
-> h
-> i
-> j
-> k
-> l
-> m
-> n
-> o
-> p
-> q
-> r
-> T18 a b c d e f g h i j k l m n o p q r
T18 (forall a b. (Semigroup a, Integral b) => b -> a -> a
stimes b
ii a
a) (forall a b. (Semigroup a, Integral b) => b -> a -> a
stimes b
ii b
b) (forall a b. (Semigroup a, Integral b) => b -> a -> a
stimes b
ii c
c) (forall a b. (Semigroup a, Integral b) => b -> a -> a
stimes b
ii d
d) (forall a b. (Semigroup a, Integral b) => b -> a -> a
stimes b
ii e
e) (forall a b. (Semigroup a, Integral b) => b -> a -> a
stimes b
ii f
f) (forall a b. (Semigroup a, Integral b) => b -> a -> a
stimes b
ii g
g) (forall a b. (Semigroup a, Integral b) => b -> a -> a
stimes b
ii h
h) (forall a b. (Semigroup a, Integral b) => b -> a -> a
stimes b
ii i
i) (forall a b. (Semigroup a, Integral b) => b -> a -> a
stimes b
ii j
j) (forall a b. (Semigroup a, Integral b) => b -> a -> a
stimes b
ii k
k) (forall a b. (Semigroup a, Integral b) => b -> a -> a
stimes b
ii l
l) (forall a b. (Semigroup a, Integral b) => b -> a -> a
stimes b
ii m
m) (forall a b. (Semigroup a, Integral b) => b -> a -> a
stimes b
ii n
n) (forall a b. (Semigroup a, Integral b) => b -> a -> a
stimes b
ii o
o) (forall a b. (Semigroup a, Integral b) => b -> a -> a
stimes b
ii p
p) (forall a b. (Semigroup a, Integral b) => b -> a -> a
stimes b
ii q
q) (forall a b. (Semigroup a, Integral b) => b -> a -> a
stimes b
ii r
r)
instance Bifunctor (T18 x y z w t u v p q r s i j k l m) where
bimap :: forall a b c d.
(a -> b)
-> (c -> d)
-> T18 x y z w t u v p q r s i j k l m a c
-> T18 x y z w t u v p q r s i j k l m b d
bimap a -> b
f c -> d
g (T18 x
x y
y z
z w
w t
t u
u v
v p
p q
q r
r s
s i
i j
j k
k l
l m
m a
a c
b) = forall a b c d e f g h i j k l m n o p q r.
a
-> b
-> c
-> d
-> e
-> f
-> g
-> h
-> i
-> j
-> k
-> l
-> m
-> n
-> o
-> p
-> q
-> r
-> T18 a b c d e f g h i j k l m n o p q r
T18 x
x y
y z
z w
w t
t u
u v
v p
p q
q r
r s
s i
i j
j k
k l
l m
m (a -> b
f a
a) (c -> d
g c
b)
instance Bifoldable (T18 x y z w t u v p q r s i j k l m) where
bifoldMap :: forall m a b.
Monoid m =>
(a -> m)
-> (b -> m) -> T18 x y z w t u v p q r s i j k l m a b -> m
bifoldMap a -> m
f b -> m
g (T18 x
_ y
_ z
_ w
_ t
_ u
_ v
_ p
_ q
_ r
_ s
_ i
_ j
_ k
_ l
_ m
_ a
a b
b) = a -> m
f a
a forall a. Semigroup a => a -> a -> a
<> b -> m
g b
b
instance Bitraversable (T18 x y z w t u v p q r s i j k l m) where
bitraverse :: forall (f :: * -> *) a c b d.
Applicative f =>
(a -> f c)
-> (b -> f d)
-> T18 x y z w t u v p q r s i j k l m a b
-> f (T18 x y z w t u v p q r s i j k l m c d)
bitraverse a -> f c
f b -> f d
g (T18 x
x y
y z
z w
w t
t u
u v
v p
p q
q r
r s
s i
i j
j k
k l
l m
m a
a b
b) = forall a b c d e f g h i j k l m n o p q r.
a
-> b
-> c
-> d
-> e
-> f
-> g
-> h
-> i
-> j
-> k
-> l
-> m
-> n
-> o
-> p
-> q
-> r
-> T18 a b c d e f g h i j k l m n o p q r
T18 x
x y
y z
z w
w t
t u
u v
v p
p q
q r
r s
s i
i j
j k
k l
l m
m forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> a -> f c
f a
a forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
<*> b -> f d
g b
b