blob: e0bcec291cc0a56f87ac2580794e7839936b57e0 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
{-# LANGUAGE DeriveGeneric #-}
module T9630 where
import T9630a
import GHC.Generics
import Control.Applicative
data T = T () () () ()
()()()()()()()
()()()()()()()()()()()()()()()()
()()()()()()()()()()()()()()()()
()()()()()()()()()()()()()()()()
()()()()()()()()()()()()()()()()
()()()()()()()()()()()()()()()()
()()()()()()()()()()()()()()()()
()()()()()()()()()()()()()()()()
()()()()()()()()()()()()()()()()
deriving Generic
instance Serialize T where
get = to <$> gGet
put = gPut . from
|
