{-# LANGUAGE DeriveFoldable #-}
{-# LANGUAGE DeriveFunctor #-}
{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DeriveTraversable #-}
{-# LANGUAGE DerivingStrategies #-}
{-# LANGUAGE GeneralizedNewtypeDeriving #-}
{-# LANGUAGE StandaloneDeriving #-}
{-# LANGUAGE StrictData #-}

module Data.Tuple.Strict.T14
  ( T14 (..),
  )
where

import Control.DeepSeq (NFData, rnf)
import Data.Biapplicative
import Data.Bifoldable
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 T14 a b c d e f g h i j k l m n
  = T14 a b c d e f g h i j k l m n
  deriving stock (T14 a b c d e f g h i j k l m n
T14 a b c d e f g h i j k l m n
-> T14 a b c d e f g h i j k l m n
-> Bounded (T14 a b c d e f g h i j k l m n)
forall a. a -> a -> Bounded a
forall a b c d e f g h i j k l m n.
(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) =>
T14 a b c d e f g h i j k l m n
maxBound :: T14 a b c d e f g h i j k l m n
$cmaxBound :: forall a b c d e f g h i j k l m n.
(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) =>
T14 a b c d e f g h i j k l m n
minBound :: T14 a b c d e f g h i j k l m n
$cminBound :: forall a b c d e f g h i j k l m n.
(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) =>
T14 a b c d e f g h i j k l m n
Bounded, T14 a b c d e f g h i j k l m n
-> T14 a b c d e f g h i j k l m n -> Bool
(T14 a b c d e f g h i j k l m n
 -> T14 a b c d e f g h i j k l m n -> Bool)
-> (T14 a b c d e f g h i j k l m n
    -> T14 a b c d e f g h i j k l m n -> Bool)
-> Eq (T14 a b c d e f g h i j k l m n)
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.
(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) =>
T14 a b c d e f g h i j k l m n
-> T14 a b c d e f g h i j k l m n -> Bool
/= :: T14 a b c d e f g h i j k l m n
-> T14 a b c d e f g h i j k l m n -> Bool
$c/= :: forall a b c d e f g h i j k l m n.
(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) =>
T14 a b c d e f g h i j k l m n
-> T14 a b c d e f g h i j k l m n -> Bool
== :: T14 a b c d e f g h i j k l m n
-> T14 a b c d e f g h i j k l m n -> Bool
$c== :: forall a b c d e f g h i j k l m n.
(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) =>
T14 a b c d e f g h i j k l m n
-> T14 a b c d e f g h i j k l m n -> Bool
Eq, Eq (T14 a b c d e f g h i j k l m n)
Eq (T14 a b c d e f g h i j k l m n)
-> (T14 a b c d e f g h i j k l m n
    -> T14 a b c d e f g h i j k l m n -> Ordering)
-> (T14 a b c d e f g h i j k l m n
    -> T14 a b c d e f g h i j k l m n -> Bool)
-> (T14 a b c d e f g h i j k l m n
    -> T14 a b c d e f g h i j k l m n -> Bool)
-> (T14 a b c d e f g h i j k l m n
    -> T14 a b c d e f g h i j k l m n -> Bool)
-> (T14 a b c d e f g h i j k l m n
    -> T14 a b c d e f g h i j k l m n -> Bool)
-> (T14 a b c d e f g h i j k l m n
    -> T14 a b c d e f g h i j k l m n
    -> T14 a b c d e f g h i j k l m n)
-> (T14 a b c d e f g h i j k l m n
    -> T14 a b c d e f g h i j k l m n
    -> T14 a b c d e f g h i j k l m n)
-> Ord (T14 a b c d e f g h i j k l m n)
T14 a b c d e f g h i j k l m n
-> T14 a b c d e f g h i j k l m n -> Bool
T14 a b c d e f g h i j k l m n
-> T14 a b c d e f g h i j k l m n -> Ordering
T14 a b c d e f g h i j k l m n
-> T14 a b c d e f g h i j k l m n
-> T14 a b c d e f g h i j k l m n
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.
(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) =>
Eq (T14 a b c d e f g h i j k l m n)
forall a b c d e f g h i j k l m n.
(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) =>
T14 a b c d e f g h i j k l m n
-> T14 a b c d e f g h i j k l m n -> Bool
forall a b c d e f g h i j k l m n.
(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) =>
T14 a b c d e f g h i j k l m n
-> T14 a b c d e f g h i j k l m n -> Ordering
forall a b c d e f g h i j k l m n.
(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) =>
T14 a b c d e f g h i j k l m n
-> T14 a b c d e f g h i j k l m n
-> T14 a b c d e f g h i j k l m n
min :: T14 a b c d e f g h i j k l m n
-> T14 a b c d e f g h i j k l m n
-> T14 a b c d e f g h i j k l m n
$cmin :: forall a b c d e f g h i j k l m n.
(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) =>
T14 a b c d e f g h i j k l m n
-> T14 a b c d e f g h i j k l m n
-> T14 a b c d e f g h i j k l m n
max :: T14 a b c d e f g h i j k l m n
-> T14 a b c d e f g h i j k l m n
-> T14 a b c d e f g h i j k l m n
$cmax :: forall a b c d e f g h i j k l m n.
(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) =>
T14 a b c d e f g h i j k l m n
-> T14 a b c d e f g h i j k l m n
-> T14 a b c d e f g h i j k l m n
>= :: T14 a b c d e f g h i j k l m n
-> T14 a b c d e f g h i j k l m n -> Bool
$c>= :: forall a b c d e f g h i j k l m n.
(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) =>
T14 a b c d e f g h i j k l m n
-> T14 a b c d e f g h i j k l m n -> Bool
> :: T14 a b c d e f g h i j k l m n
-> T14 a b c d e f g h i j k l m n -> Bool
$c> :: forall a b c d e f g h i j k l m n.
(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) =>
T14 a b c d e f g h i j k l m n
-> T14 a b c d e f g h i j k l m n -> Bool
<= :: T14 a b c d e f g h i j k l m n
-> T14 a b c d e f g h i j k l m n -> Bool
$c<= :: forall a b c d e f g h i j k l m n.
(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) =>
T14 a b c d e f g h i j k l m n
-> T14 a b c d e f g h i j k l m n -> Bool
< :: T14 a b c d e f g h i j k l m n
-> T14 a b c d e f g h i j k l m n -> Bool
$c< :: forall a b c d e f g h i j k l m n.
(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) =>
T14 a b c d e f g h i j k l m n
-> T14 a b c d e f g h i j k l m n -> Bool
compare :: T14 a b c d e f g h i j k l m n
-> T14 a b c d e f g h i j k l m n -> Ordering
$ccompare :: forall a b c d e f g h i j k l m n.
(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) =>
T14 a b c d e f g h i j k l m n
-> T14 a b c d e f g h i j k l m n -> Ordering
$cp1Ord :: forall a b c d e f g h i j k l m n.
(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) =>
Eq (T14 a b c d e f g h i j k l m n)
Ord, ReadPrec [T14 a b c d e f g h i j k l m n]
ReadPrec (T14 a b c d e f g h i j k l m n)
Int -> ReadS (T14 a b c d e f g h i j k l m n)
ReadS [T14 a b c d e f g h i j k l m n]
(Int -> ReadS (T14 a b c d e f g h i j k l m n))
-> ReadS [T14 a b c d e f g h i j k l m n]
-> ReadPrec (T14 a b c d e f g h i j k l m n)
-> ReadPrec [T14 a b c d e f g h i j k l m n]
-> Read (T14 a b c d e f g h i j k l m n)
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.
(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) =>
ReadPrec [T14 a b c d e f g h i j k l m n]
forall a b c d e f g h i j k l m n.
(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) =>
ReadPrec (T14 a b c d e f g h i j k l m n)
forall a b c d e f g h i j k l m n.
(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) =>
Int -> ReadS (T14 a b c d e f g h i j k l m n)
forall a b c d e f g h i j k l m n.
(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) =>
ReadS [T14 a b c d e f g h i j k l m n]
readListPrec :: ReadPrec [T14 a b c d e f g h i j k l m n]
$creadListPrec :: forall a b c d e f g h i j k l m n.
(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) =>
ReadPrec [T14 a b c d e f g h i j k l m n]
readPrec :: ReadPrec (T14 a b c d e f g h i j k l m n)
$creadPrec :: forall a b c d e f g h i j k l m n.
(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) =>
ReadPrec (T14 a b c d e f g h i j k l m n)
readList :: ReadS [T14 a b c d e f g h i j k l m n]
$creadList :: forall a b c d e f g h i j k l m n.
(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) =>
ReadS [T14 a b c d e f g h i j k l m n]
readsPrec :: Int -> ReadS (T14 a b c d e f g h i j k l m n)
$creadsPrec :: forall a b c d e f g h i j k l m n.
(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) =>
Int -> ReadS (T14 a b c d e f g h i j k l m n)
Read, Int -> T14 a b c d e f g h i j k l m n -> ShowS
[T14 a b c d e f g h i j k l m n] -> ShowS
T14 a b c d e f g h i j k l m n -> String
(Int -> T14 a b c d e f g h i j k l m n -> ShowS)
-> (T14 a b c d e f g h i j k l m n -> String)
-> ([T14 a b c d e f g h i j k l m n] -> ShowS)
-> Show (T14 a b c d e f g h i j k l m n)
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.
(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) =>
Int -> T14 a b c d e f g h i j k l m n -> ShowS
forall a b c d e f g h i j k l m n.
(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) =>
[T14 a b c d e f g h i j k l m n] -> ShowS
forall a b c d e f g h i j k l m n.
(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) =>
T14 a b c d e f g h i j k l m n -> String
showList :: [T14 a b c d e f g h i j k l m n] -> ShowS
$cshowList :: forall a b c d e f g h i j k l m n.
(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) =>
[T14 a b c d e f g h i j k l m n] -> ShowS
show :: T14 a b c d e f g h i j k l m n -> String
$cshow :: forall a b c d e f g h i j k l m n.
(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) =>
T14 a b c d e f g h i j k l m n -> String
showsPrec :: Int -> T14 a b c d e f g h i j k l m n -> ShowS
$cshowsPrec :: forall a b c d e f g h i j k l m n.
(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) =>
Int -> T14 a b c d e f g h i j k l m n -> ShowS
Show, (forall x.
 T14 a b c d e f g h i j k l m n
 -> Rep (T14 a b c d e f g h i j k l m n) x)
-> (forall x.
    Rep (T14 a b c d e f g h i j k l m n) x
    -> T14 a b c d e f g h i j k l m n)
-> Generic (T14 a b c d e f g h i j k l m n)
forall x.
Rep (T14 a b c d e f g h i j k l m n) x
-> T14 a b c d e f g h i j k l m n
forall x.
T14 a b c d e f g h i j k l m n
-> Rep (T14 a b c d e f g h i j k l m n) x
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 x.
Rep (T14 a b c d e f g h i j k l m n) x
-> T14 a b c d e f g h i j k l m n
forall a b c d e f g h i j k l m n x.
T14 a b c d e f g h i j k l m n
-> Rep (T14 a b c d e f g h i j k l m n) x
$cto :: forall a b c d e f g h i j k l m n x.
Rep (T14 a b c d e f g h i j k l m n) x
-> T14 a b c d e f g h i j k l m n
$cfrom :: forall a b c d e f g h i j k l m n x.
T14 a b c d e f g h i j k l m n
-> Rep (T14 a b c d e f g h i j k l m n) x
Generic)

-- | @since 0.1.3
deriving stock instance Foldable (T14 a b c d e f g h i j k l m)

-- | @since 0.1.3
deriving stock instance Functor (T14 a b c d e f g h i j k l m)

-- | @since 0.1.3
deriving stock instance Traversable (T14 a b c d e f g h i j k l m)

-- | @since 0.1.5
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) => Eq1 (T14 a b c d e f g h i j k l m) where
  liftEq :: (a -> b -> Bool)
-> T14 a b c d e f g h i j k l m a
-> T14 a b c d e f g h i j k l m b
-> Bool
liftEq = (m -> m -> Bool)
-> (a -> b -> Bool)
-> T14 a b c d e f g h i j k l m a
-> T14 a b c d e f g h i j k l m b
-> Bool
forall (f :: * -> * -> *) a b c d.
Eq2 f =>
(a -> b -> Bool) -> (c -> d -> Bool) -> f a c -> f b d -> Bool
liftEq2 m -> m -> Bool
forall a. Eq a => a -> a -> Bool
(==)

-- | @since 0.1.5
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) => Eq2 (T14 a b c d e f g h i j k l) where
  liftEq2 :: (a -> b -> Bool)
-> (c -> d -> Bool)
-> T14 a b c d e f g h i j k l a c
-> T14 a b c d e f g h i j k l b d
-> Bool
liftEq2 a -> b -> Bool
e1 c -> d -> Bool
e2 (T14 a
a b
b c
c d
d e
e f
f g
g h
h i
i j
j k
k l
l a
m c
n) (T14 a
a' b
b' c
c' d
d' e
e' f
f' g
g' h
h' i
i' j
j' k
k' l
l' b
m' d
n') =
    a
a a -> a -> Bool
forall a. Eq a => a -> a -> Bool
== a
a' Bool -> Bool -> Bool
&& b
b b -> b -> Bool
forall a. Eq a => a -> a -> Bool
== b
b' Bool -> Bool -> Bool
&& c
c c -> c -> Bool
forall a. Eq a => a -> a -> Bool
== c
c' Bool -> Bool -> Bool
&& d
d d -> d -> Bool
forall a. Eq a => a -> a -> Bool
== d
d' Bool -> Bool -> Bool
&& e
e e -> e -> Bool
forall a. Eq a => a -> a -> Bool
== e
e' Bool -> Bool -> Bool
&& f
f f -> f -> Bool
forall a. Eq a => a -> a -> Bool
== f
f' Bool -> Bool -> Bool
&& g
g g -> g -> Bool
forall a. Eq a => a -> a -> Bool
== g
g' Bool -> Bool -> Bool
&& h
h h -> h -> Bool
forall a. Eq a => a -> a -> Bool
== h
h' Bool -> Bool -> Bool
&& i
i i -> i -> Bool
forall a. Eq a => a -> a -> Bool
== i
i' Bool -> Bool -> Bool
&& j
j j -> j -> Bool
forall a. Eq a => a -> a -> Bool
== j
j' Bool -> Bool -> Bool
&& k
k k -> k -> Bool
forall a. Eq a => a -> a -> Bool
== k
k' Bool -> Bool -> Bool
&& l
l l -> l -> Bool
forall a. Eq a => a -> a -> Bool
== l
l' Bool -> Bool -> Bool
&& a -> b -> Bool
e1 a
m b
m' Bool -> Bool -> Bool
&& c -> d -> Bool
e2 c
n d
n'

-- | @since 0.1.3
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) =>
  Applicative (T14 a b c d e f g h i j k l m)
  where
  pure :: a -> T14 a b c d e f g h i j k l m a
pure a
n = a
-> b
-> c
-> d
-> e
-> f
-> g
-> h
-> i
-> j
-> k
-> l
-> m
-> a
-> T14 a b c d e f g h i j k l m a
forall a b c d e f g h i j k l m n.
a
-> b
-> c
-> d
-> e
-> f
-> g
-> h
-> i
-> j
-> k
-> l
-> m
-> n
-> T14 a b c d e f g h i j k l m n
T14 a
forall a. Monoid a => a
mempty b
forall a. Monoid a => a
mempty c
forall a. Monoid a => a
mempty d
forall a. Monoid a => a
mempty e
forall a. Monoid a => a
mempty f
forall a. Monoid a => a
mempty g
forall a. Monoid a => a
mempty h
forall a. Monoid a => a
mempty i
forall a. Monoid a => a
mempty j
forall a. Monoid a => a
mempty k
forall a. Monoid a => a
mempty l
forall a. Monoid a => a
mempty m
forall a. Monoid a => a
mempty a
n
  T14 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 a -> b
n <*> :: T14 a b c d e f g h i j k l m (a -> b)
-> T14 a b c d e f g h i j k l m a
-> T14 a b c d e f g h i j k l m b
<*> T14 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' a
n' =
    a
-> b
-> c
-> d
-> e
-> f
-> g
-> h
-> i
-> j
-> k
-> l
-> m
-> b
-> T14 a b c d e f g h i j k l m b
forall a b c d e f g h i j k l m n.
a
-> b
-> c
-> d
-> e
-> f
-> g
-> h
-> i
-> j
-> k
-> l
-> m
-> n
-> T14 a b c d e f g h i j k l m n
T14 (a
a a -> a -> a
forall a. Semigroup a => a -> a -> a
<> a
a') (b
b b -> b -> b
forall a. Semigroup a => a -> a -> a
<> b
b') (c
c c -> c -> c
forall a. Semigroup a => a -> a -> a
<> c
c') (d
d d -> d -> d
forall a. Semigroup a => a -> a -> a
<> d
d') (e
e e -> e -> e
forall a. Semigroup a => a -> a -> a
<> e
e') (f
f f -> f -> f
forall a. Semigroup a => a -> a -> a
<> f
f') (g
g g -> g -> g
forall a. Semigroup a => a -> a -> a
<> g
g') (h
h h -> h -> h
forall a. Semigroup a => a -> a -> a
<> h
h') (i
i i -> i -> i
forall a. Semigroup a => a -> a -> a
<> i
i') (j
j j -> j -> j
forall a. Semigroup a => a -> a -> a
<> j
j') (k
k k -> k -> k
forall a. Semigroup a => a -> a -> a
<> k
k') (l
l l -> l -> l
forall a. Semigroup a => a -> a -> a
<> l
l') (m
m m -> m -> m
forall a. Semigroup a => a -> a -> a
<> m
m') (a -> b
n a
n')

-- | @since 0.1.3
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) =>
  Monad (T14 a b c d e f g h i j k l m)
  where
  return :: a -> T14 a b c d e f g h i j k l m a
return = a -> T14 a b c d e f g h i j k l m a
forall (f :: * -> *) a. Applicative f => a -> f a
pure
  T14 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 a
n >>= :: T14 a b c d e f g h i j k l m a
-> (a -> T14 a b c d e f g h i j k l m b)
-> T14 a b c d e f g h i j k l m b
>>= a -> T14 a b c d e f g h i j k l m b
o = case a -> T14 a b c d e f g h i j k l m b
o a
n of
    T14 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' b
n' ->
      a
-> b
-> c
-> d
-> e
-> f
-> g
-> h
-> i
-> j
-> k
-> l
-> m
-> b
-> T14 a b c d e f g h i j k l m b
forall a b c d e f g h i j k l m n.
a
-> b
-> c
-> d
-> e
-> f
-> g
-> h
-> i
-> j
-> k
-> l
-> m
-> n
-> T14 a b c d e f g h i j k l m n
T14 (a
a a -> a -> a
forall a. Semigroup a => a -> a -> a
<> a
a') (b
b b -> b -> b
forall a. Semigroup a => a -> a -> a
<> b
b') (c
c c -> c -> c
forall a. Semigroup a => a -> a -> a
<> c
c') (d
d d -> d -> d
forall a. Semigroup a => a -> a -> a
<> d
d') (e
e e -> e -> e
forall a. Semigroup a => a -> a -> a
<> e
e') (f
f f -> f -> f
forall a. Semigroup a => a -> a -> a
<> f
f') (g
g g -> g -> g
forall a. Semigroup a => a -> a -> a
<> g
g') (h
h h -> h -> h
forall a. Semigroup a => a -> a -> a
<> h
h') (i
i i -> i -> i
forall a. Semigroup a => a -> a -> a
<> i
i') (j
j j -> j -> j
forall a. Semigroup a => a -> a -> a
<> j
j') (k
k k -> k -> k
forall a. Semigroup a => a -> a -> a
<> k
k') (l
l l -> l -> l
forall a. Semigroup a => a -> a -> a
<> l
l') (m
m m -> m -> m
forall a. Semigroup a => a -> a -> a
<> m
m') b
n'

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 (T14 a b c d e f g h i j k l m n) where
  hash :: T14 a b c d e f g h i j k l m n -> Int
hash (T14 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) = a -> Int
forall a. Hashable a => a -> Int
hash a
a Int -> b -> Int
forall a. Hashable a => Int -> a -> Int
`hashWithSalt` b
b Int -> c -> Int
forall a. Hashable a => Int -> a -> Int
`hashWithSalt` c
c Int -> d -> Int
forall a. Hashable a => Int -> a -> Int
`hashWithSalt` d
d Int -> e -> Int
forall a. Hashable a => Int -> a -> Int
`hashWithSalt` e
e Int -> f -> Int
forall a. Hashable a => Int -> a -> Int
`hashWithSalt` f
f Int -> g -> Int
forall a. Hashable a => Int -> a -> Int
`hashWithSalt` g
g Int -> h -> Int
forall a. Hashable a => Int -> a -> Int
`hashWithSalt` h
h Int -> i -> Int
forall a. Hashable a => Int -> a -> Int
`hashWithSalt` i
i Int -> j -> Int
forall a. Hashable a => Int -> a -> Int
`hashWithSalt` j
j Int -> k -> Int
forall a. Hashable a => Int -> a -> Int
`hashWithSalt` k
k Int -> l -> Int
forall a. Hashable a => Int -> a -> Int
`hashWithSalt` l
l Int -> m -> Int
forall a. Hashable a => Int -> a -> Int
`hashWithSalt` m
m Int -> n -> Int
forall a. Hashable a => Int -> a -> Int
`hashWithSalt` n
n
  hashWithSalt :: Int -> T14 a b c d e f g h i j k l m n -> Int
hashWithSalt = Int -> T14 a b c d e f g h i j k l m n -> Int
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) => Hashable1 (T14 a b c d e f g h i j k l m) where
  liftHashWithSalt :: (Int -> a -> Int) -> Int -> T14 a b c d e f g h i j k l m a -> Int
liftHashWithSalt = (Int -> a -> Int) -> Int -> T14 a b c d e f g h i j k l m a -> Int
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) => Hashable2 (T14 a b c d e f g h i j k l) where
  liftHashWithSalt2 :: (Int -> a -> Int)
-> (Int -> b -> Int)
-> Int
-> T14 a b c d e f g h i j k l a b
-> Int
liftHashWithSalt2 Int -> a -> Int
h1 Int -> b -> Int
h2 Int
slt (T14 a
a b
b c
c d
d e
e f
f g
g h
h i
i j
j k
k l
l a
m b
n) =
    (Int
slt Int -> a -> Int
forall a. Hashable a => Int -> a -> Int
`hashWithSalt` a
a Int -> b -> Int
forall a. Hashable a => Int -> a -> Int
`hashWithSalt` b
b Int -> c -> Int
forall a. Hashable a => Int -> a -> Int
`hashWithSalt` c
c Int -> d -> Int
forall a. Hashable a => Int -> a -> Int
`hashWithSalt` d
d Int -> e -> Int
forall a. Hashable a => Int -> a -> Int
`hashWithSalt` e
e Int -> f -> Int
forall a. Hashable a => Int -> a -> Int
`hashWithSalt` f
f Int -> g -> Int
forall a. Hashable a => Int -> a -> Int
`hashWithSalt` g
g Int -> h -> Int
forall a. Hashable a => Int -> a -> Int
`hashWithSalt` h
h Int -> i -> Int
forall a. Hashable a => Int -> a -> Int
`hashWithSalt` i
i Int -> j -> Int
forall a. Hashable a => Int -> a -> Int
`hashWithSalt` j
j Int -> k -> Int
forall a. Hashable a => Int -> a -> Int
`hashWithSalt` k
k Int -> l -> Int
forall a. Hashable a => Int -> a -> Int
`hashWithSalt` l
l) Int -> a -> Int
`h1` a
m Int -> b -> Int
`h2` b
n

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 (T14 a b c d e f g h i j k l m n) where
  mempty :: T14 a b c d e f g h i j k l m n
mempty = a
-> b
-> c
-> d
-> e
-> f
-> g
-> h
-> i
-> j
-> k
-> l
-> m
-> n
-> T14 a b c d e f g h i j k l m n
forall a b c d e f g h i j k l m n.
a
-> b
-> c
-> d
-> e
-> f
-> g
-> h
-> i
-> j
-> k
-> l
-> m
-> n
-> T14 a b c d e f g h i j k l m n
T14 a
forall a. Monoid a => a
mempty b
forall a. Monoid a => a
mempty c
forall a. Monoid a => a
mempty d
forall a. Monoid a => a
mempty e
forall a. Monoid a => a
mempty f
forall a. Monoid a => a
mempty g
forall a. Monoid a => a
mempty h
forall a. Monoid a => a
mempty i
forall a. Monoid a => a
mempty j
forall a. Monoid a => a
mempty k
forall a. Monoid a => a
mempty l
forall a. Monoid a => a
mempty m
forall a. Monoid a => a
mempty n
forall a. Monoid a => a
mempty

-- | @since 0.1.4
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 (T14 a b c d e f g h i j k l m n) where
  rnf :: T14 a b c d e f g h i j k l m n -> ()
rnf (T14 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) = a -> ()
forall a. NFData a => a -> ()
rnf a
a () -> () -> ()
`seq` b -> ()
forall a. NFData a => a -> ()
rnf b
b () -> () -> ()
`seq` c -> ()
forall a. NFData a => a -> ()
rnf c
c () -> () -> ()
`seq` d -> ()
forall a. NFData a => a -> ()
rnf d
d () -> () -> ()
`seq` e -> ()
forall a. NFData a => a -> ()
rnf e
e () -> () -> ()
`seq` f -> ()
forall a. NFData a => a -> ()
rnf f
f () -> () -> ()
`seq` g -> ()
forall a. NFData a => a -> ()
rnf g
g () -> () -> ()
`seq` h -> ()
forall a. NFData a => a -> ()
rnf h
h () -> () -> ()
`seq` i -> ()
forall a. NFData a => a -> ()
rnf i
i () -> () -> ()
`seq` j -> ()
forall a. NFData a => a -> ()
rnf j
j () -> () -> ()
`seq` k -> ()
forall a. NFData a => a -> ()
rnf k
k () -> () -> ()
`seq` l -> ()
forall a. NFData a => a -> ()
rnf l
l () -> () -> ()
`seq` m -> ()
forall a. NFData a => a -> ()
rnf m
m () -> () -> ()
`seq` n -> ()
forall a. NFData a => a -> ()
rnf n
n

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 (T14 a b c d e f g h i j k l m n) where
  T14 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 <> :: T14 a b c d e f g h i j k l m n
-> T14 a b c d e f g h i j k l m n
-> T14 a b c d e f g h i j k l m n
<> T14 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 = a
-> b
-> c
-> d
-> e
-> f
-> g
-> h
-> i
-> j
-> k
-> l
-> m
-> n
-> T14 a b c d e f g h i j k l m n
forall a b c d e f g h i j k l m n.
a
-> b
-> c
-> d
-> e
-> f
-> g
-> h
-> i
-> j
-> k
-> l
-> m
-> n
-> T14 a b c d e f g h i j k l m n
T14 (a
a1 a -> a -> a
forall a. Semigroup a => a -> a -> a
<> a
a2) (b
b1 b -> b -> b
forall a. Semigroup a => a -> a -> a
<> b
b2) (c
c1 c -> c -> c
forall a. Semigroup a => a -> a -> a
<> c
c2) (d
d1 d -> d -> d
forall a. Semigroup a => a -> a -> a
<> d
d2) (e
e1 e -> e -> e
forall a. Semigroup a => a -> a -> a
<> e
e2) (f
f1 f -> f -> f
forall a. Semigroup a => a -> a -> a
<> f
f2) (g
g1 g -> g -> g
forall a. Semigroup a => a -> a -> a
<> g
g2) (h
h1 h -> h -> h
forall a. Semigroup a => a -> a -> a
<> h
h2) (i
i1 i -> i -> i
forall a. Semigroup a => a -> a -> a
<> i
i2) (j
j1 j -> j -> j
forall a. Semigroup a => a -> a -> a
<> j
j2) (k
k1 k -> k -> k
forall a. Semigroup a => a -> a -> a
<> k
k2) (l
l1 l -> l -> l
forall a. Semigroup a => a -> a -> a
<> l
l2) (m
m1 m -> m -> m
forall a. Semigroup a => a -> a -> a
<> m
m2) (n
n1 n -> n -> n
forall a. Semigroup a => a -> a -> a
<> n
n2)
  stimes :: b
-> T14 a b c d e f g h i j k l m n
-> T14 a b c d e f g h i j k l m n
stimes b
ii (T14 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) = a
-> b
-> c
-> d
-> e
-> f
-> g
-> h
-> i
-> j
-> k
-> l
-> m
-> n
-> T14 a b c d e f g h i j k l m n
forall a b c d e f g h i j k l m n.
a
-> b
-> c
-> d
-> e
-> f
-> g
-> h
-> i
-> j
-> k
-> l
-> m
-> n
-> T14 a b c d e f g h i j k l m n
T14 (b -> a -> a
forall a b. (Semigroup a, Integral b) => b -> a -> a
stimes b
ii a
a) (b -> b -> b
forall a b. (Semigroup a, Integral b) => b -> a -> a
stimes b
ii b
b) (b -> c -> c
forall a b. (Semigroup a, Integral b) => b -> a -> a
stimes b
ii c
c) (b -> d -> d
forall a b. (Semigroup a, Integral b) => b -> a -> a
stimes b
ii d
d) (b -> e -> e
forall a b. (Semigroup a, Integral b) => b -> a -> a
stimes b
ii e
e) (b -> f -> f
forall a b. (Semigroup a, Integral b) => b -> a -> a
stimes b
ii f
f) (b -> g -> g
forall a b. (Semigroup a, Integral b) => b -> a -> a
stimes b
ii g
g) (b -> h -> h
forall a b. (Semigroup a, Integral b) => b -> a -> a
stimes b
ii h
h) (b -> i -> i
forall a b. (Semigroup a, Integral b) => b -> a -> a
stimes b
ii i
i) (b -> j -> j
forall a b. (Semigroup a, Integral b) => b -> a -> a
stimes b
ii j
j) (b -> k -> k
forall a b. (Semigroup a, Integral b) => b -> a -> a
stimes b
ii k
k) (b -> l -> l
forall a b. (Semigroup a, Integral b) => b -> a -> a
stimes b
ii l
l) (b -> m -> m
forall a b. (Semigroup a, Integral b) => b -> a -> a
stimes b
ii m
m) (b -> n -> n
forall a b. (Semigroup a, Integral b) => b -> a -> a
stimes b
ii n
n)

-- | @since 0.1.3
instance Bifunctor (T14 x y z w t u v p q r s i) where
  bimap :: (a -> b)
-> (c -> d)
-> T14 x y z w t u v p q r s i a c
-> T14 x y z w t u v p q r s i b d
bimap a -> b
f c -> d
g (T14 x
x y
y z
z w
w t
t u
u v
v p
p q
q r
r s
s i
i a
a c
b) = x
-> y
-> z
-> w
-> t
-> u
-> v
-> p
-> q
-> r
-> s
-> i
-> b
-> d
-> T14 x y z w t u v p q r s i b d
forall a b c d e f g h i j k l m n.
a
-> b
-> c
-> d
-> e
-> f
-> g
-> h
-> i
-> j
-> k
-> l
-> m
-> n
-> T14 a b c d e f g h i j k l m n
T14 x
x y
y z
z w
w t
t u
u v
v p
p q
q r
r s
s i
i (a -> b
f a
a) (c -> d
g c
b)

-- | @since 0.1.3
instance Bifoldable (T14 x y z w t u v p q r s i) where
  bifoldMap :: (a -> m) -> (b -> m) -> T14 x y z w t u v p q r s i a b -> m
bifoldMap a -> m
f b -> m
g (T14 x
_ y
_ z
_ w
_ t
_ u
_ v
_ p
_ q
_ r
_ s
_ i
_ a
a b
b) = a -> m
f a
a m -> m -> m
forall a. Semigroup a => a -> a -> a
<> b -> m
g b
b

-- | @since 0.1.3
instance Bitraversable (T14 x y z w t u v p q r s i) where
  bitraverse :: (a -> f c)
-> (b -> f d)
-> T14 x y z w t u v p q r s i a b
-> f (T14 x y z w t u v p q r s i c d)
bitraverse a -> f c
f b -> f d
g (T14 x
x y
y z
z w
w t
t u
u v
v p
p q
q r
r s
s i
i a
a b
b) = x
-> y
-> z
-> w
-> t
-> u
-> v
-> p
-> q
-> r
-> s
-> i
-> c
-> d
-> T14 x y z w t u v p q r s i c d
forall a b c d e f g h i j k l m n.
a
-> b
-> c
-> d
-> e
-> f
-> g
-> h
-> i
-> j
-> k
-> l
-> m
-> n
-> T14 a b c d e f g h i j k l m n
T14 x
x y
y z
z w
w t
t u
u v
v p
p q
q r
r s
s i
i (c -> d -> T14 x y z w t u v p q r s i c d)
-> f c -> f (d -> T14 x y z w t u v p q r s i c d)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> a -> f c
f a
a f (d -> T14 x y z w t u v p q r s i c d)
-> f d -> f (T14 x y z w t u v p q r s i c d)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
<*> b -> f d
g b
b