capnp-0.11.0.0: gen/tests/Capnp/Gen/Aircraft/Pure.hs

{-# LANGUAGE DataKinds #-}
{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE FlexibleContexts #-}
{-# LANGUAGE FlexibleInstances #-}
{-# LANGUAGE FunctionalDependencies #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE MultiParamTypeClasses #-}
{-# LANGUAGE TypeFamilies #-}
{-# LANGUAGE UndecidableInstances #-}
{-# OPTIONS_GHC -Wno-unused-imports #-}
{-# OPTIONS_GHC -Wno-dodgy-exports #-}
{-# OPTIONS_GHC -Wno-unused-matches #-}
{-# OPTIONS_GHC -Wno-orphans #-}
{-# OPTIONS_GHC -Wno-unticked-promoted-constructors #-}
{-# OPTIONS_GHC -Wno-name-shadowing #-}
module Capnp.Gen.Aircraft.Pure(Capnp.Gen.ById.X832bcc6686a26d56.Airport(..)
                              ,constDate
                              ,constList
                              ,Capnp.Gen.ById.X832bcc6686a26d56.constEnum
                              ,Zdate(..)
                              ,Zdata(..)
                              ,PlaneBase(..)
                              ,B737(..)
                              ,A320(..)
                              ,F16(..)
                              ,Regression(..)
                              ,Aircraft(..)
                              ,Z(..)
                              ,Z'grp(..)
                              ,Counter(..)
                              ,Bag(..)
                              ,Zserver(..)
                              ,Zjob(..)
                              ,VerEmpty(..)
                              ,VerOneData(..)
                              ,VerTwoData(..)
                              ,VerOnePtr(..)
                              ,VerTwoPtr(..)
                              ,VerTwoDataTwoPtr(..)
                              ,HoldsVerEmptyList(..)
                              ,HoldsVerOneDataList(..)
                              ,HoldsVerTwoDataList(..)
                              ,HoldsVerOnePtrList(..)
                              ,HoldsVerTwoPtrList(..)
                              ,HoldsVerTwoTwoList(..)
                              ,HoldsVerTwoTwoPlus(..)
                              ,VerTwoTwoPlus(..)
                              ,HoldsText(..)
                              ,WrapEmpty(..)
                              ,Wrap2x2(..)
                              ,Wrap2x2plus(..)
                              ,VoidUnion(..)
                              ,Nester1Capn(..)
                              ,RWTestCapn(..)
                              ,ListStructCapn(..)
                              ,Echo(..)
                              ,Echo'server_(..)
                              ,export_Echo
                              ,Echo'echo'params(..)
                              ,Echo'echo'results(..)
                              ,Hoth(..)
                              ,EchoBase(..)
                              ,EchoBases(..)
                              ,StackingRoot(..)
                              ,StackingA(..)
                              ,StackingB(..)
                              ,CallSequence(..)
                              ,CallSequence'server_(..)
                              ,export_CallSequence
                              ,CallSequence'getNumber'params(..)
                              ,CallSequence'getNumber'results(..)
                              ,CounterFactory(..)
                              ,CounterFactory'server_(..)
                              ,export_CounterFactory
                              ,CounterFactory'newCounter'params(..)
                              ,CounterFactory'newCounter'results(..)
                              ,CounterAcceptor(..)
                              ,CounterAcceptor'server_(..)
                              ,export_CounterAcceptor
                              ,CounterAcceptor'accept'params(..)
                              ,CounterAcceptor'accept'results(..)
                              ,Top(..)
                              ,Top'server_(..)
                              ,export_Top
                              ,Top'top'params(..)
                              ,Top'top'results(..)
                              ,Left(..)
                              ,Left'server_(..)
                              ,export_Left
                              ,Left'left'params(..)
                              ,Left'left'results(..)
                              ,Right(..)
                              ,Right'server_(..)
                              ,export_Right
                              ,Right'right'params(..)
                              ,Right'right'results(..)
                              ,Bottom(..)
                              ,Bottom'server_(..)
                              ,export_Bottom
                              ,Bottom'bottom'params(..)
                              ,Bottom'bottom'results(..)
                              ,Defaults(..)
                              ,BenchmarkA(..)) where
import qualified Capnp.GenHelpers.ReExports.Data.Vector as V
import qualified Capnp.GenHelpers.ReExports.Data.Text as T
import qualified Capnp.GenHelpers.ReExports.Data.ByteString as BS
import qualified Capnp.GenHelpers.ReExports.Data.Default as Default
import qualified GHC.Generics as Generics
import qualified Control.Monad.IO.Class as MonadIO
import qualified Capnp.Untyped.Pure as UntypedPure
import qualified Capnp.Untyped as Untyped
import qualified Capnp.Message as Message
import qualified Capnp.Classes as Classes
import qualified Capnp.Basics.Pure as BasicsPure
import qualified Capnp.GenHelpers.Pure as GenHelpersPure
import qualified Capnp.Rpc.Untyped as Rpc
import qualified Capnp.Rpc.Server as Server
import qualified Capnp.GenHelpers.Rpc as RpcHelpers
import qualified Capnp.GenHelpers.ReExports.Control.Concurrent.STM as STM
import qualified Capnp.GenHelpers.ReExports.Control.Monad.STM.Class as STM
import qualified Capnp.GenHelpers.ReExports.Supervisors as Supervisors
import qualified Capnp.Gen.ById.X832bcc6686a26d56
import qualified Prelude as Std_
import qualified Data.Word as Std_
import qualified Data.Int as Std_
import Prelude ((<$>), (<*>), (>>=))
constDate :: Zdate
constDate  = (GenHelpersPure.toPurePtrConst Capnp.Gen.ById.X832bcc6686a26d56.constDate)
constList :: (V.Vector Zdate)
constList  = (GenHelpersPure.toPurePtrConst Capnp.Gen.ById.X832bcc6686a26d56.constList)
data Zdate 
    = Zdate 
        {year :: Std_.Int16
        ,month :: Std_.Word8
        ,day :: Std_.Word8}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default Zdate) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const Zdate) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize Zdate) where
    type Cerial msg Zdate = (Capnp.Gen.ById.X832bcc6686a26d56.Zdate msg)
    decerialize raw = (Zdate <$> (Capnp.Gen.ById.X832bcc6686a26d56.get_Zdate'year raw)
                             <*> (Capnp.Gen.ById.X832bcc6686a26d56.get_Zdate'month raw)
                             <*> (Capnp.Gen.ById.X832bcc6686a26d56.get_Zdate'day raw))
instance (Classes.Marshal s Zdate) where
    marshalInto raw_ value_ = case value_ of
        Zdate{..} ->
            (do
                (Capnp.Gen.ById.X832bcc6686a26d56.set_Zdate'year raw_ year)
                (Capnp.Gen.ById.X832bcc6686a26d56.set_Zdate'month raw_ month)
                (Capnp.Gen.ById.X832bcc6686a26d56.set_Zdate'day raw_ day)
                (Std_.pure ())
                )
instance (Classes.Cerialize s Zdate)
instance (Classes.Cerialize s (V.Vector Zdate)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector Zdate))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector Zdate)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector Zdate))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Zdate)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Zdate))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Zdate)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data Zdata 
    = Zdata 
        {data_ :: BS.ByteString}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default Zdata) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const Zdata) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize Zdata) where
    type Cerial msg Zdata = (Capnp.Gen.ById.X832bcc6686a26d56.Zdata msg)
    decerialize raw = (Zdata <$> ((Capnp.Gen.ById.X832bcc6686a26d56.get_Zdata'data_ raw) >>= Classes.decerialize))
instance (Classes.Marshal s Zdata) where
    marshalInto raw_ value_ = case value_ of
        Zdata{..} ->
            (do
                ((Classes.cerialize (Untyped.message raw_) data_) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Zdata'data_ raw_))
                (Std_.pure ())
                )
instance (Classes.Cerialize s Zdata)
instance (Classes.Cerialize s (V.Vector Zdata)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector Zdata))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector Zdata)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector Zdata))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Zdata)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Zdata))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Zdata)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data PlaneBase 
    = PlaneBase 
        {name :: T.Text
        ,homes :: (V.Vector Capnp.Gen.ById.X832bcc6686a26d56.Airport)
        ,rating :: Std_.Int64
        ,canFly :: Std_.Bool
        ,capacity :: Std_.Int64
        ,maxSpeed :: Std_.Double}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default PlaneBase) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const PlaneBase) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize PlaneBase) where
    type Cerial msg PlaneBase = (Capnp.Gen.ById.X832bcc6686a26d56.PlaneBase msg)
    decerialize raw = (PlaneBase <$> ((Capnp.Gen.ById.X832bcc6686a26d56.get_PlaneBase'name raw) >>= Classes.decerialize)
                                 <*> ((Capnp.Gen.ById.X832bcc6686a26d56.get_PlaneBase'homes raw) >>= Classes.decerialize)
                                 <*> (Capnp.Gen.ById.X832bcc6686a26d56.get_PlaneBase'rating raw)
                                 <*> (Capnp.Gen.ById.X832bcc6686a26d56.get_PlaneBase'canFly raw)
                                 <*> (Capnp.Gen.ById.X832bcc6686a26d56.get_PlaneBase'capacity raw)
                                 <*> (Capnp.Gen.ById.X832bcc6686a26d56.get_PlaneBase'maxSpeed raw))
instance (Classes.Marshal s PlaneBase) where
    marshalInto raw_ value_ = case value_ of
        PlaneBase{..} ->
            (do
                ((Classes.cerialize (Untyped.message raw_) name) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_PlaneBase'name raw_))
                ((Classes.cerialize (Untyped.message raw_) homes) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_PlaneBase'homes raw_))
                (Capnp.Gen.ById.X832bcc6686a26d56.set_PlaneBase'rating raw_ rating)
                (Capnp.Gen.ById.X832bcc6686a26d56.set_PlaneBase'canFly raw_ canFly)
                (Capnp.Gen.ById.X832bcc6686a26d56.set_PlaneBase'capacity raw_ capacity)
                (Capnp.Gen.ById.X832bcc6686a26d56.set_PlaneBase'maxSpeed raw_ maxSpeed)
                (Std_.pure ())
                )
instance (Classes.Cerialize s PlaneBase)
instance (Classes.Cerialize s (V.Vector PlaneBase)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector PlaneBase))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector PlaneBase)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector PlaneBase))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector PlaneBase)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector PlaneBase))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector PlaneBase)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data B737 
    = B737 
        {base :: PlaneBase}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default B737) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const B737) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize B737) where
    type Cerial msg B737 = (Capnp.Gen.ById.X832bcc6686a26d56.B737 msg)
    decerialize raw = (B737 <$> ((Capnp.Gen.ById.X832bcc6686a26d56.get_B737'base raw) >>= Classes.decerialize))
instance (Classes.Marshal s B737) where
    marshalInto raw_ value_ = case value_ of
        B737{..} ->
            (do
                ((Classes.cerialize (Untyped.message raw_) base) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_B737'base raw_))
                (Std_.pure ())
                )
instance (Classes.Cerialize s B737)
instance (Classes.Cerialize s (V.Vector B737)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector B737))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector B737)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector B737))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector B737)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector B737))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector B737)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data A320 
    = A320 
        {base :: PlaneBase}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default A320) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const A320) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize A320) where
    type Cerial msg A320 = (Capnp.Gen.ById.X832bcc6686a26d56.A320 msg)
    decerialize raw = (A320 <$> ((Capnp.Gen.ById.X832bcc6686a26d56.get_A320'base raw) >>= Classes.decerialize))
instance (Classes.Marshal s A320) where
    marshalInto raw_ value_ = case value_ of
        A320{..} ->
            (do
                ((Classes.cerialize (Untyped.message raw_) base) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_A320'base raw_))
                (Std_.pure ())
                )
instance (Classes.Cerialize s A320)
instance (Classes.Cerialize s (V.Vector A320)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector A320))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector A320)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector A320))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector A320)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector A320))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector A320)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data F16 
    = F16 
        {base :: PlaneBase}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default F16) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const F16) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize F16) where
    type Cerial msg F16 = (Capnp.Gen.ById.X832bcc6686a26d56.F16 msg)
    decerialize raw = (F16 <$> ((Capnp.Gen.ById.X832bcc6686a26d56.get_F16'base raw) >>= Classes.decerialize))
instance (Classes.Marshal s F16) where
    marshalInto raw_ value_ = case value_ of
        F16{..} ->
            (do
                ((Classes.cerialize (Untyped.message raw_) base) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_F16'base raw_))
                (Std_.pure ())
                )
instance (Classes.Cerialize s F16)
instance (Classes.Cerialize s (V.Vector F16)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector F16))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector F16)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector F16))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector F16)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector F16))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector F16)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data Regression 
    = Regression 
        {base :: PlaneBase
        ,b0 :: Std_.Double
        ,beta :: (V.Vector Std_.Double)
        ,planes :: (V.Vector Aircraft)
        ,ymu :: Std_.Double
        ,ysd :: Std_.Double}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default Regression) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const Regression) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize Regression) where
    type Cerial msg Regression = (Capnp.Gen.ById.X832bcc6686a26d56.Regression msg)
    decerialize raw = (Regression <$> ((Capnp.Gen.ById.X832bcc6686a26d56.get_Regression'base raw) >>= Classes.decerialize)
                                  <*> (Capnp.Gen.ById.X832bcc6686a26d56.get_Regression'b0 raw)
                                  <*> ((Capnp.Gen.ById.X832bcc6686a26d56.get_Regression'beta raw) >>= Classes.decerialize)
                                  <*> ((Capnp.Gen.ById.X832bcc6686a26d56.get_Regression'planes raw) >>= Classes.decerialize)
                                  <*> (Capnp.Gen.ById.X832bcc6686a26d56.get_Regression'ymu raw)
                                  <*> (Capnp.Gen.ById.X832bcc6686a26d56.get_Regression'ysd raw))
instance (Classes.Marshal s Regression) where
    marshalInto raw_ value_ = case value_ of
        Regression{..} ->
            (do
                ((Classes.cerialize (Untyped.message raw_) base) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Regression'base raw_))
                (Capnp.Gen.ById.X832bcc6686a26d56.set_Regression'b0 raw_ b0)
                ((Classes.cerialize (Untyped.message raw_) beta) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Regression'beta raw_))
                ((Classes.cerialize (Untyped.message raw_) planes) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Regression'planes raw_))
                (Capnp.Gen.ById.X832bcc6686a26d56.set_Regression'ymu raw_ ymu)
                (Capnp.Gen.ById.X832bcc6686a26d56.set_Regression'ysd raw_ ysd)
                (Std_.pure ())
                )
instance (Classes.Cerialize s Regression)
instance (Classes.Cerialize s (V.Vector Regression)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector Regression))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector Regression)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector Regression))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Regression)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Regression))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Regression)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data Aircraft 
    = Aircraft'void 
    | Aircraft'b737 B737
    | Aircraft'a320 A320
    | Aircraft'f16 F16
    | Aircraft'unknown' Std_.Word16
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default Aircraft) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const Aircraft) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize Aircraft) where
    type Cerial msg Aircraft = (Capnp.Gen.ById.X832bcc6686a26d56.Aircraft msg)
    decerialize raw = (do
        raw <- (Capnp.Gen.ById.X832bcc6686a26d56.get_Aircraft' raw)
        case raw of
            (Capnp.Gen.ById.X832bcc6686a26d56.Aircraft'void) ->
                (Std_.pure Aircraft'void)
            (Capnp.Gen.ById.X832bcc6686a26d56.Aircraft'b737 raw) ->
                (Aircraft'b737 <$> (Classes.decerialize raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Aircraft'a320 raw) ->
                (Aircraft'a320 <$> (Classes.decerialize raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Aircraft'f16 raw) ->
                (Aircraft'f16 <$> (Classes.decerialize raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Aircraft'unknown' tag) ->
                (Std_.pure (Aircraft'unknown' tag))
        )
instance (Classes.Marshal s Aircraft) where
    marshalInto raw_ value_ = case value_ of
        (Aircraft'void) ->
            (Capnp.Gen.ById.X832bcc6686a26d56.set_Aircraft'void raw_)
        (Aircraft'b737 arg_) ->
            ((Classes.cerialize (Untyped.message raw_) arg_) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Aircraft'b737 raw_))
        (Aircraft'a320 arg_) ->
            ((Classes.cerialize (Untyped.message raw_) arg_) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Aircraft'a320 raw_))
        (Aircraft'f16 arg_) ->
            ((Classes.cerialize (Untyped.message raw_) arg_) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Aircraft'f16 raw_))
        (Aircraft'unknown' tag) ->
            (Capnp.Gen.ById.X832bcc6686a26d56.set_Aircraft'unknown' raw_ tag)
instance (Classes.Cerialize s Aircraft)
instance (Classes.Cerialize s (V.Vector Aircraft)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector Aircraft))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector Aircraft)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector Aircraft))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Aircraft)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Aircraft))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Aircraft)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data Z 
    = Z'void 
    | Z'zz Z
    | Z'f64 Std_.Double
    | Z'f32 Std_.Float
    | Z'i64 Std_.Int64
    | Z'i32 Std_.Int32
    | Z'i16 Std_.Int16
    | Z'i8 Std_.Int8
    | Z'u64 Std_.Word64
    | Z'u32 Std_.Word32
    | Z'u16 Std_.Word16
    | Z'u8 Std_.Word8
    | Z'bool Std_.Bool
    | Z'text T.Text
    | Z'blob BS.ByteString
    | Z'f64vec (V.Vector Std_.Double)
    | Z'f32vec (V.Vector Std_.Float)
    | Z'i64vec (V.Vector Std_.Int64)
    | Z'i32vec (V.Vector Std_.Int32)
    | Z'i16vec (V.Vector Std_.Int16)
    | Z'i8vec (V.Vector Std_.Int8)
    | Z'u64vec (V.Vector Std_.Word64)
    | Z'u32vec (V.Vector Std_.Word32)
    | Z'u16vec (V.Vector Std_.Word16)
    | Z'u8vec (V.Vector Std_.Word8)
    | Z'zvec (V.Vector Z)
    | Z'zvecvec (V.Vector (V.Vector Z))
    | Z'zdate Zdate
    | Z'zdata Zdata
    | Z'aircraftvec (V.Vector Aircraft)
    | Z'aircraft Aircraft
    | Z'regression Regression
    | Z'planebase PlaneBase
    | Z'airport Capnp.Gen.ById.X832bcc6686a26d56.Airport
    | Z'b737 B737
    | Z'a320 A320
    | Z'f16 F16
    | Z'zdatevec (V.Vector Zdate)
    | Z'zdatavec (V.Vector Zdata)
    | Z'boolvec (V.Vector Std_.Bool)
    | Z'datavec (V.Vector BS.ByteString)
    | Z'textvec (V.Vector T.Text)
    | Z'grp Z'grp
    | Z'echo Echo
    | Z'echoBases EchoBases
    | Z'unknown' Std_.Word16
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default Z) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const Z) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize Z) where
    type Cerial msg Z = (Capnp.Gen.ById.X832bcc6686a26d56.Z msg)
    decerialize raw = (do
        raw <- (Capnp.Gen.ById.X832bcc6686a26d56.get_Z' raw)
        case raw of
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'void) ->
                (Std_.pure Z'void)
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'zz raw) ->
                (Z'zz <$> (Classes.decerialize raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'f64 raw) ->
                (Std_.pure (Z'f64 raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'f32 raw) ->
                (Std_.pure (Z'f32 raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'i64 raw) ->
                (Std_.pure (Z'i64 raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'i32 raw) ->
                (Std_.pure (Z'i32 raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'i16 raw) ->
                (Std_.pure (Z'i16 raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'i8 raw) ->
                (Std_.pure (Z'i8 raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'u64 raw) ->
                (Std_.pure (Z'u64 raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'u32 raw) ->
                (Std_.pure (Z'u32 raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'u16 raw) ->
                (Std_.pure (Z'u16 raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'u8 raw) ->
                (Std_.pure (Z'u8 raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'bool raw) ->
                (Std_.pure (Z'bool raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'text raw) ->
                (Z'text <$> (Classes.decerialize raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'blob raw) ->
                (Z'blob <$> (Classes.decerialize raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'f64vec raw) ->
                (Z'f64vec <$> (Classes.decerialize raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'f32vec raw) ->
                (Z'f32vec <$> (Classes.decerialize raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'i64vec raw) ->
                (Z'i64vec <$> (Classes.decerialize raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'i32vec raw) ->
                (Z'i32vec <$> (Classes.decerialize raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'i16vec raw) ->
                (Z'i16vec <$> (Classes.decerialize raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'i8vec raw) ->
                (Z'i8vec <$> (Classes.decerialize raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'u64vec raw) ->
                (Z'u64vec <$> (Classes.decerialize raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'u32vec raw) ->
                (Z'u32vec <$> (Classes.decerialize raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'u16vec raw) ->
                (Z'u16vec <$> (Classes.decerialize raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'u8vec raw) ->
                (Z'u8vec <$> (Classes.decerialize raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'zvec raw) ->
                (Z'zvec <$> (Classes.decerialize raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'zvecvec raw) ->
                (Z'zvecvec <$> (Classes.decerialize raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'zdate raw) ->
                (Z'zdate <$> (Classes.decerialize raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'zdata raw) ->
                (Z'zdata <$> (Classes.decerialize raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'aircraftvec raw) ->
                (Z'aircraftvec <$> (Classes.decerialize raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'aircraft raw) ->
                (Z'aircraft <$> (Classes.decerialize raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'regression raw) ->
                (Z'regression <$> (Classes.decerialize raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'planebase raw) ->
                (Z'planebase <$> (Classes.decerialize raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'airport raw) ->
                (Std_.pure (Z'airport raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'b737 raw) ->
                (Z'b737 <$> (Classes.decerialize raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'a320 raw) ->
                (Z'a320 <$> (Classes.decerialize raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'f16 raw) ->
                (Z'f16 <$> (Classes.decerialize raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'zdatevec raw) ->
                (Z'zdatevec <$> (Classes.decerialize raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'zdatavec raw) ->
                (Z'zdatavec <$> (Classes.decerialize raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'boolvec raw) ->
                (Z'boolvec <$> (Classes.decerialize raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'datavec raw) ->
                (Z'datavec <$> (Classes.decerialize raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'textvec raw) ->
                (Z'textvec <$> (Classes.decerialize raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'grp raw) ->
                (Z'grp <$> (Classes.decerialize raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'echo raw) ->
                (Z'echo <$> (Classes.decerialize raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'echoBases raw) ->
                (Z'echoBases <$> (Classes.decerialize raw))
            (Capnp.Gen.ById.X832bcc6686a26d56.Z'unknown' tag) ->
                (Std_.pure (Z'unknown' tag))
        )
instance (Classes.Marshal s Z) where
    marshalInto raw_ value_ = case value_ of
        (Z'void) ->
            (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'void raw_)
        (Z'zz arg_) ->
            ((Classes.cerialize (Untyped.message raw_) arg_) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'zz raw_))
        (Z'f64 arg_) ->
            (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'f64 raw_ arg_)
        (Z'f32 arg_) ->
            (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'f32 raw_ arg_)
        (Z'i64 arg_) ->
            (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'i64 raw_ arg_)
        (Z'i32 arg_) ->
            (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'i32 raw_ arg_)
        (Z'i16 arg_) ->
            (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'i16 raw_ arg_)
        (Z'i8 arg_) ->
            (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'i8 raw_ arg_)
        (Z'u64 arg_) ->
            (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'u64 raw_ arg_)
        (Z'u32 arg_) ->
            (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'u32 raw_ arg_)
        (Z'u16 arg_) ->
            (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'u16 raw_ arg_)
        (Z'u8 arg_) ->
            (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'u8 raw_ arg_)
        (Z'bool arg_) ->
            (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'bool raw_ arg_)
        (Z'text arg_) ->
            ((Classes.cerialize (Untyped.message raw_) arg_) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'text raw_))
        (Z'blob arg_) ->
            ((Classes.cerialize (Untyped.message raw_) arg_) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'blob raw_))
        (Z'f64vec arg_) ->
            ((Classes.cerialize (Untyped.message raw_) arg_) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'f64vec raw_))
        (Z'f32vec arg_) ->
            ((Classes.cerialize (Untyped.message raw_) arg_) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'f32vec raw_))
        (Z'i64vec arg_) ->
            ((Classes.cerialize (Untyped.message raw_) arg_) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'i64vec raw_))
        (Z'i32vec arg_) ->
            ((Classes.cerialize (Untyped.message raw_) arg_) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'i32vec raw_))
        (Z'i16vec arg_) ->
            ((Classes.cerialize (Untyped.message raw_) arg_) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'i16vec raw_))
        (Z'i8vec arg_) ->
            ((Classes.cerialize (Untyped.message raw_) arg_) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'i8vec raw_))
        (Z'u64vec arg_) ->
            ((Classes.cerialize (Untyped.message raw_) arg_) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'u64vec raw_))
        (Z'u32vec arg_) ->
            ((Classes.cerialize (Untyped.message raw_) arg_) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'u32vec raw_))
        (Z'u16vec arg_) ->
            ((Classes.cerialize (Untyped.message raw_) arg_) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'u16vec raw_))
        (Z'u8vec arg_) ->
            ((Classes.cerialize (Untyped.message raw_) arg_) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'u8vec raw_))
        (Z'zvec arg_) ->
            ((Classes.cerialize (Untyped.message raw_) arg_) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'zvec raw_))
        (Z'zvecvec arg_) ->
            ((Classes.cerialize (Untyped.message raw_) arg_) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'zvecvec raw_))
        (Z'zdate arg_) ->
            ((Classes.cerialize (Untyped.message raw_) arg_) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'zdate raw_))
        (Z'zdata arg_) ->
            ((Classes.cerialize (Untyped.message raw_) arg_) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'zdata raw_))
        (Z'aircraftvec arg_) ->
            ((Classes.cerialize (Untyped.message raw_) arg_) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'aircraftvec raw_))
        (Z'aircraft arg_) ->
            ((Classes.cerialize (Untyped.message raw_) arg_) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'aircraft raw_))
        (Z'regression arg_) ->
            ((Classes.cerialize (Untyped.message raw_) arg_) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'regression raw_))
        (Z'planebase arg_) ->
            ((Classes.cerialize (Untyped.message raw_) arg_) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'planebase raw_))
        (Z'airport arg_) ->
            (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'airport raw_ arg_)
        (Z'b737 arg_) ->
            ((Classes.cerialize (Untyped.message raw_) arg_) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'b737 raw_))
        (Z'a320 arg_) ->
            ((Classes.cerialize (Untyped.message raw_) arg_) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'a320 raw_))
        (Z'f16 arg_) ->
            ((Classes.cerialize (Untyped.message raw_) arg_) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'f16 raw_))
        (Z'zdatevec arg_) ->
            ((Classes.cerialize (Untyped.message raw_) arg_) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'zdatevec raw_))
        (Z'zdatavec arg_) ->
            ((Classes.cerialize (Untyped.message raw_) arg_) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'zdatavec raw_))
        (Z'boolvec arg_) ->
            ((Classes.cerialize (Untyped.message raw_) arg_) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'boolvec raw_))
        (Z'datavec arg_) ->
            ((Classes.cerialize (Untyped.message raw_) arg_) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'datavec raw_))
        (Z'textvec arg_) ->
            ((Classes.cerialize (Untyped.message raw_) arg_) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'textvec raw_))
        (Z'grp arg_) ->
            (do
                raw_ <- (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'grp raw_)
                (Classes.marshalInto raw_ arg_)
                )
        (Z'echo arg_) ->
            ((Classes.cerialize (Untyped.message raw_) arg_) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'echo raw_))
        (Z'echoBases arg_) ->
            ((Classes.cerialize (Untyped.message raw_) arg_) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'echoBases raw_))
        (Z'unknown' tag) ->
            (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'unknown' raw_ tag)
instance (Classes.Cerialize s Z)
instance (Classes.Cerialize s (V.Vector Z)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector Z))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector Z)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector Z))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Z)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Z))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Z)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data Z'grp 
    = Z'grp' 
        {first :: Std_.Word64
        ,second :: Std_.Word64}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default Z'grp) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const Z'grp) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize Z'grp) where
    type Cerial msg Z'grp = (Capnp.Gen.ById.X832bcc6686a26d56.Z'grp msg)
    decerialize raw = (Z'grp' <$> (Capnp.Gen.ById.X832bcc6686a26d56.get_Z'grp'first raw)
                              <*> (Capnp.Gen.ById.X832bcc6686a26d56.get_Z'grp'second raw))
instance (Classes.Marshal s Z'grp) where
    marshalInto raw_ value_ = case value_ of
        Z'grp'{..} ->
            (do
                (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'grp'first raw_ first)
                (Capnp.Gen.ById.X832bcc6686a26d56.set_Z'grp'second raw_ second)
                (Std_.pure ())
                )
data Counter 
    = Counter 
        {size :: Std_.Int64
        ,words :: T.Text
        ,wordlist :: (V.Vector T.Text)}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default Counter) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const Counter) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize Counter) where
    type Cerial msg Counter = (Capnp.Gen.ById.X832bcc6686a26d56.Counter msg)
    decerialize raw = (Counter <$> (Capnp.Gen.ById.X832bcc6686a26d56.get_Counter'size raw)
                               <*> ((Capnp.Gen.ById.X832bcc6686a26d56.get_Counter'words raw) >>= Classes.decerialize)
                               <*> ((Capnp.Gen.ById.X832bcc6686a26d56.get_Counter'wordlist raw) >>= Classes.decerialize))
instance (Classes.Marshal s Counter) where
    marshalInto raw_ value_ = case value_ of
        Counter{..} ->
            (do
                (Capnp.Gen.ById.X832bcc6686a26d56.set_Counter'size raw_ size)
                ((Classes.cerialize (Untyped.message raw_) words) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Counter'words raw_))
                ((Classes.cerialize (Untyped.message raw_) wordlist) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Counter'wordlist raw_))
                (Std_.pure ())
                )
instance (Classes.Cerialize s Counter)
instance (Classes.Cerialize s (V.Vector Counter)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector Counter))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector Counter)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector Counter))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Counter)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Counter))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Counter)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data Bag 
    = Bag 
        {counter :: Counter}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default Bag) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const Bag) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize Bag) where
    type Cerial msg Bag = (Capnp.Gen.ById.X832bcc6686a26d56.Bag msg)
    decerialize raw = (Bag <$> ((Capnp.Gen.ById.X832bcc6686a26d56.get_Bag'counter raw) >>= Classes.decerialize))
instance (Classes.Marshal s Bag) where
    marshalInto raw_ value_ = case value_ of
        Bag{..} ->
            (do
                ((Classes.cerialize (Untyped.message raw_) counter) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Bag'counter raw_))
                (Std_.pure ())
                )
instance (Classes.Cerialize s Bag)
instance (Classes.Cerialize s (V.Vector Bag)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector Bag))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector Bag)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector Bag))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Bag)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Bag))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Bag)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data Zserver 
    = Zserver 
        {waitingjobs :: (V.Vector Zjob)}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default Zserver) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const Zserver) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize Zserver) where
    type Cerial msg Zserver = (Capnp.Gen.ById.X832bcc6686a26d56.Zserver msg)
    decerialize raw = (Zserver <$> ((Capnp.Gen.ById.X832bcc6686a26d56.get_Zserver'waitingjobs raw) >>= Classes.decerialize))
instance (Classes.Marshal s Zserver) where
    marshalInto raw_ value_ = case value_ of
        Zserver{..} ->
            (do
                ((Classes.cerialize (Untyped.message raw_) waitingjobs) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Zserver'waitingjobs raw_))
                (Std_.pure ())
                )
instance (Classes.Cerialize s Zserver)
instance (Classes.Cerialize s (V.Vector Zserver)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector Zserver))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector Zserver)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector Zserver))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Zserver)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Zserver))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Zserver)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data Zjob 
    = Zjob 
        {cmd :: T.Text
        ,args :: (V.Vector T.Text)}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default Zjob) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const Zjob) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize Zjob) where
    type Cerial msg Zjob = (Capnp.Gen.ById.X832bcc6686a26d56.Zjob msg)
    decerialize raw = (Zjob <$> ((Capnp.Gen.ById.X832bcc6686a26d56.get_Zjob'cmd raw) >>= Classes.decerialize)
                            <*> ((Capnp.Gen.ById.X832bcc6686a26d56.get_Zjob'args raw) >>= Classes.decerialize))
instance (Classes.Marshal s Zjob) where
    marshalInto raw_ value_ = case value_ of
        Zjob{..} ->
            (do
                ((Classes.cerialize (Untyped.message raw_) cmd) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Zjob'cmd raw_))
                ((Classes.cerialize (Untyped.message raw_) args) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Zjob'args raw_))
                (Std_.pure ())
                )
instance (Classes.Cerialize s Zjob)
instance (Classes.Cerialize s (V.Vector Zjob)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector Zjob))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector Zjob)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector Zjob))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Zjob)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Zjob))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Zjob)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data VerEmpty 
    = VerEmpty 
        {}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default VerEmpty) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const VerEmpty) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize VerEmpty) where
    type Cerial msg VerEmpty = (Capnp.Gen.ById.X832bcc6686a26d56.VerEmpty msg)
    decerialize raw = (Std_.pure VerEmpty)
instance (Classes.Marshal s VerEmpty) where
    marshalInto raw_ value_ = case value_ of
        (VerEmpty) ->
            (do
                (Std_.pure ())
                )
instance (Classes.Cerialize s VerEmpty)
instance (Classes.Cerialize s (V.Vector VerEmpty)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector VerEmpty))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector VerEmpty)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector VerEmpty))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector VerEmpty)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector VerEmpty))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector VerEmpty)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data VerOneData 
    = VerOneData 
        {val :: Std_.Int16}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default VerOneData) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const VerOneData) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize VerOneData) where
    type Cerial msg VerOneData = (Capnp.Gen.ById.X832bcc6686a26d56.VerOneData msg)
    decerialize raw = (VerOneData <$> (Capnp.Gen.ById.X832bcc6686a26d56.get_VerOneData'val raw))
instance (Classes.Marshal s VerOneData) where
    marshalInto raw_ value_ = case value_ of
        VerOneData{..} ->
            (do
                (Capnp.Gen.ById.X832bcc6686a26d56.set_VerOneData'val raw_ val)
                (Std_.pure ())
                )
instance (Classes.Cerialize s VerOneData)
instance (Classes.Cerialize s (V.Vector VerOneData)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector VerOneData))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector VerOneData)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector VerOneData))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector VerOneData)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector VerOneData))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector VerOneData)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data VerTwoData 
    = VerTwoData 
        {val :: Std_.Int16
        ,duo :: Std_.Int64}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default VerTwoData) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const VerTwoData) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize VerTwoData) where
    type Cerial msg VerTwoData = (Capnp.Gen.ById.X832bcc6686a26d56.VerTwoData msg)
    decerialize raw = (VerTwoData <$> (Capnp.Gen.ById.X832bcc6686a26d56.get_VerTwoData'val raw)
                                  <*> (Capnp.Gen.ById.X832bcc6686a26d56.get_VerTwoData'duo raw))
instance (Classes.Marshal s VerTwoData) where
    marshalInto raw_ value_ = case value_ of
        VerTwoData{..} ->
            (do
                (Capnp.Gen.ById.X832bcc6686a26d56.set_VerTwoData'val raw_ val)
                (Capnp.Gen.ById.X832bcc6686a26d56.set_VerTwoData'duo raw_ duo)
                (Std_.pure ())
                )
instance (Classes.Cerialize s VerTwoData)
instance (Classes.Cerialize s (V.Vector VerTwoData)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector VerTwoData))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector VerTwoData)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector VerTwoData))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector VerTwoData)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector VerTwoData))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector VerTwoData)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data VerOnePtr 
    = VerOnePtr 
        {ptr :: VerOneData}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default VerOnePtr) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const VerOnePtr) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize VerOnePtr) where
    type Cerial msg VerOnePtr = (Capnp.Gen.ById.X832bcc6686a26d56.VerOnePtr msg)
    decerialize raw = (VerOnePtr <$> ((Capnp.Gen.ById.X832bcc6686a26d56.get_VerOnePtr'ptr raw) >>= Classes.decerialize))
instance (Classes.Marshal s VerOnePtr) where
    marshalInto raw_ value_ = case value_ of
        VerOnePtr{..} ->
            (do
                ((Classes.cerialize (Untyped.message raw_) ptr) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_VerOnePtr'ptr raw_))
                (Std_.pure ())
                )
instance (Classes.Cerialize s VerOnePtr)
instance (Classes.Cerialize s (V.Vector VerOnePtr)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector VerOnePtr))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector VerOnePtr)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector VerOnePtr))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector VerOnePtr)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector VerOnePtr))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector VerOnePtr)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data VerTwoPtr 
    = VerTwoPtr 
        {ptr1 :: VerOneData
        ,ptr2 :: VerOneData}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default VerTwoPtr) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const VerTwoPtr) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize VerTwoPtr) where
    type Cerial msg VerTwoPtr = (Capnp.Gen.ById.X832bcc6686a26d56.VerTwoPtr msg)
    decerialize raw = (VerTwoPtr <$> ((Capnp.Gen.ById.X832bcc6686a26d56.get_VerTwoPtr'ptr1 raw) >>= Classes.decerialize)
                                 <*> ((Capnp.Gen.ById.X832bcc6686a26d56.get_VerTwoPtr'ptr2 raw) >>= Classes.decerialize))
instance (Classes.Marshal s VerTwoPtr) where
    marshalInto raw_ value_ = case value_ of
        VerTwoPtr{..} ->
            (do
                ((Classes.cerialize (Untyped.message raw_) ptr1) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_VerTwoPtr'ptr1 raw_))
                ((Classes.cerialize (Untyped.message raw_) ptr2) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_VerTwoPtr'ptr2 raw_))
                (Std_.pure ())
                )
instance (Classes.Cerialize s VerTwoPtr)
instance (Classes.Cerialize s (V.Vector VerTwoPtr)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector VerTwoPtr))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector VerTwoPtr)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector VerTwoPtr))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector VerTwoPtr)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector VerTwoPtr))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector VerTwoPtr)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data VerTwoDataTwoPtr 
    = VerTwoDataTwoPtr 
        {val :: Std_.Int16
        ,duo :: Std_.Int64
        ,ptr1 :: VerOneData
        ,ptr2 :: VerOneData}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default VerTwoDataTwoPtr) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const VerTwoDataTwoPtr) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize VerTwoDataTwoPtr) where
    type Cerial msg VerTwoDataTwoPtr = (Capnp.Gen.ById.X832bcc6686a26d56.VerTwoDataTwoPtr msg)
    decerialize raw = (VerTwoDataTwoPtr <$> (Capnp.Gen.ById.X832bcc6686a26d56.get_VerTwoDataTwoPtr'val raw)
                                        <*> (Capnp.Gen.ById.X832bcc6686a26d56.get_VerTwoDataTwoPtr'duo raw)
                                        <*> ((Capnp.Gen.ById.X832bcc6686a26d56.get_VerTwoDataTwoPtr'ptr1 raw) >>= Classes.decerialize)
                                        <*> ((Capnp.Gen.ById.X832bcc6686a26d56.get_VerTwoDataTwoPtr'ptr2 raw) >>= Classes.decerialize))
instance (Classes.Marshal s VerTwoDataTwoPtr) where
    marshalInto raw_ value_ = case value_ of
        VerTwoDataTwoPtr{..} ->
            (do
                (Capnp.Gen.ById.X832bcc6686a26d56.set_VerTwoDataTwoPtr'val raw_ val)
                (Capnp.Gen.ById.X832bcc6686a26d56.set_VerTwoDataTwoPtr'duo raw_ duo)
                ((Classes.cerialize (Untyped.message raw_) ptr1) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_VerTwoDataTwoPtr'ptr1 raw_))
                ((Classes.cerialize (Untyped.message raw_) ptr2) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_VerTwoDataTwoPtr'ptr2 raw_))
                (Std_.pure ())
                )
instance (Classes.Cerialize s VerTwoDataTwoPtr)
instance (Classes.Cerialize s (V.Vector VerTwoDataTwoPtr)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector VerTwoDataTwoPtr))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector VerTwoDataTwoPtr)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector VerTwoDataTwoPtr))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector VerTwoDataTwoPtr)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector VerTwoDataTwoPtr))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector VerTwoDataTwoPtr)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data HoldsVerEmptyList 
    = HoldsVerEmptyList 
        {mylist :: (V.Vector VerEmpty)}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default HoldsVerEmptyList) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const HoldsVerEmptyList) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize HoldsVerEmptyList) where
    type Cerial msg HoldsVerEmptyList = (Capnp.Gen.ById.X832bcc6686a26d56.HoldsVerEmptyList msg)
    decerialize raw = (HoldsVerEmptyList <$> ((Capnp.Gen.ById.X832bcc6686a26d56.get_HoldsVerEmptyList'mylist raw) >>= Classes.decerialize))
instance (Classes.Marshal s HoldsVerEmptyList) where
    marshalInto raw_ value_ = case value_ of
        HoldsVerEmptyList{..} ->
            (do
                ((Classes.cerialize (Untyped.message raw_) mylist) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_HoldsVerEmptyList'mylist raw_))
                (Std_.pure ())
                )
instance (Classes.Cerialize s HoldsVerEmptyList)
instance (Classes.Cerialize s (V.Vector HoldsVerEmptyList)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector HoldsVerEmptyList))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector HoldsVerEmptyList)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector HoldsVerEmptyList))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector HoldsVerEmptyList)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector HoldsVerEmptyList))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector HoldsVerEmptyList)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data HoldsVerOneDataList 
    = HoldsVerOneDataList 
        {mylist :: (V.Vector VerOneData)}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default HoldsVerOneDataList) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const HoldsVerOneDataList) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize HoldsVerOneDataList) where
    type Cerial msg HoldsVerOneDataList = (Capnp.Gen.ById.X832bcc6686a26d56.HoldsVerOneDataList msg)
    decerialize raw = (HoldsVerOneDataList <$> ((Capnp.Gen.ById.X832bcc6686a26d56.get_HoldsVerOneDataList'mylist raw) >>= Classes.decerialize))
instance (Classes.Marshal s HoldsVerOneDataList) where
    marshalInto raw_ value_ = case value_ of
        HoldsVerOneDataList{..} ->
            (do
                ((Classes.cerialize (Untyped.message raw_) mylist) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_HoldsVerOneDataList'mylist raw_))
                (Std_.pure ())
                )
instance (Classes.Cerialize s HoldsVerOneDataList)
instance (Classes.Cerialize s (V.Vector HoldsVerOneDataList)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector HoldsVerOneDataList))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector HoldsVerOneDataList)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector HoldsVerOneDataList))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector HoldsVerOneDataList)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector HoldsVerOneDataList))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector HoldsVerOneDataList)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data HoldsVerTwoDataList 
    = HoldsVerTwoDataList 
        {mylist :: (V.Vector VerTwoData)}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default HoldsVerTwoDataList) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const HoldsVerTwoDataList) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize HoldsVerTwoDataList) where
    type Cerial msg HoldsVerTwoDataList = (Capnp.Gen.ById.X832bcc6686a26d56.HoldsVerTwoDataList msg)
    decerialize raw = (HoldsVerTwoDataList <$> ((Capnp.Gen.ById.X832bcc6686a26d56.get_HoldsVerTwoDataList'mylist raw) >>= Classes.decerialize))
instance (Classes.Marshal s HoldsVerTwoDataList) where
    marshalInto raw_ value_ = case value_ of
        HoldsVerTwoDataList{..} ->
            (do
                ((Classes.cerialize (Untyped.message raw_) mylist) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_HoldsVerTwoDataList'mylist raw_))
                (Std_.pure ())
                )
instance (Classes.Cerialize s HoldsVerTwoDataList)
instance (Classes.Cerialize s (V.Vector HoldsVerTwoDataList)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector HoldsVerTwoDataList))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector HoldsVerTwoDataList)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector HoldsVerTwoDataList))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector HoldsVerTwoDataList)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector HoldsVerTwoDataList))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector HoldsVerTwoDataList)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data HoldsVerOnePtrList 
    = HoldsVerOnePtrList 
        {mylist :: (V.Vector VerOnePtr)}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default HoldsVerOnePtrList) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const HoldsVerOnePtrList) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize HoldsVerOnePtrList) where
    type Cerial msg HoldsVerOnePtrList = (Capnp.Gen.ById.X832bcc6686a26d56.HoldsVerOnePtrList msg)
    decerialize raw = (HoldsVerOnePtrList <$> ((Capnp.Gen.ById.X832bcc6686a26d56.get_HoldsVerOnePtrList'mylist raw) >>= Classes.decerialize))
instance (Classes.Marshal s HoldsVerOnePtrList) where
    marshalInto raw_ value_ = case value_ of
        HoldsVerOnePtrList{..} ->
            (do
                ((Classes.cerialize (Untyped.message raw_) mylist) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_HoldsVerOnePtrList'mylist raw_))
                (Std_.pure ())
                )
instance (Classes.Cerialize s HoldsVerOnePtrList)
instance (Classes.Cerialize s (V.Vector HoldsVerOnePtrList)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector HoldsVerOnePtrList))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector HoldsVerOnePtrList)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector HoldsVerOnePtrList))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector HoldsVerOnePtrList)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector HoldsVerOnePtrList))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector HoldsVerOnePtrList)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data HoldsVerTwoPtrList 
    = HoldsVerTwoPtrList 
        {mylist :: (V.Vector VerTwoPtr)}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default HoldsVerTwoPtrList) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const HoldsVerTwoPtrList) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize HoldsVerTwoPtrList) where
    type Cerial msg HoldsVerTwoPtrList = (Capnp.Gen.ById.X832bcc6686a26d56.HoldsVerTwoPtrList msg)
    decerialize raw = (HoldsVerTwoPtrList <$> ((Capnp.Gen.ById.X832bcc6686a26d56.get_HoldsVerTwoPtrList'mylist raw) >>= Classes.decerialize))
instance (Classes.Marshal s HoldsVerTwoPtrList) where
    marshalInto raw_ value_ = case value_ of
        HoldsVerTwoPtrList{..} ->
            (do
                ((Classes.cerialize (Untyped.message raw_) mylist) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_HoldsVerTwoPtrList'mylist raw_))
                (Std_.pure ())
                )
instance (Classes.Cerialize s HoldsVerTwoPtrList)
instance (Classes.Cerialize s (V.Vector HoldsVerTwoPtrList)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector HoldsVerTwoPtrList))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector HoldsVerTwoPtrList)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector HoldsVerTwoPtrList))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector HoldsVerTwoPtrList)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector HoldsVerTwoPtrList))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector HoldsVerTwoPtrList)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data HoldsVerTwoTwoList 
    = HoldsVerTwoTwoList 
        {mylist :: (V.Vector VerTwoDataTwoPtr)}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default HoldsVerTwoTwoList) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const HoldsVerTwoTwoList) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize HoldsVerTwoTwoList) where
    type Cerial msg HoldsVerTwoTwoList = (Capnp.Gen.ById.X832bcc6686a26d56.HoldsVerTwoTwoList msg)
    decerialize raw = (HoldsVerTwoTwoList <$> ((Capnp.Gen.ById.X832bcc6686a26d56.get_HoldsVerTwoTwoList'mylist raw) >>= Classes.decerialize))
instance (Classes.Marshal s HoldsVerTwoTwoList) where
    marshalInto raw_ value_ = case value_ of
        HoldsVerTwoTwoList{..} ->
            (do
                ((Classes.cerialize (Untyped.message raw_) mylist) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_HoldsVerTwoTwoList'mylist raw_))
                (Std_.pure ())
                )
instance (Classes.Cerialize s HoldsVerTwoTwoList)
instance (Classes.Cerialize s (V.Vector HoldsVerTwoTwoList)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector HoldsVerTwoTwoList))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector HoldsVerTwoTwoList)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector HoldsVerTwoTwoList))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector HoldsVerTwoTwoList)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector HoldsVerTwoTwoList))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector HoldsVerTwoTwoList)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data HoldsVerTwoTwoPlus 
    = HoldsVerTwoTwoPlus 
        {mylist :: (V.Vector VerTwoTwoPlus)}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default HoldsVerTwoTwoPlus) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const HoldsVerTwoTwoPlus) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize HoldsVerTwoTwoPlus) where
    type Cerial msg HoldsVerTwoTwoPlus = (Capnp.Gen.ById.X832bcc6686a26d56.HoldsVerTwoTwoPlus msg)
    decerialize raw = (HoldsVerTwoTwoPlus <$> ((Capnp.Gen.ById.X832bcc6686a26d56.get_HoldsVerTwoTwoPlus'mylist raw) >>= Classes.decerialize))
instance (Classes.Marshal s HoldsVerTwoTwoPlus) where
    marshalInto raw_ value_ = case value_ of
        HoldsVerTwoTwoPlus{..} ->
            (do
                ((Classes.cerialize (Untyped.message raw_) mylist) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_HoldsVerTwoTwoPlus'mylist raw_))
                (Std_.pure ())
                )
instance (Classes.Cerialize s HoldsVerTwoTwoPlus)
instance (Classes.Cerialize s (V.Vector HoldsVerTwoTwoPlus)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector HoldsVerTwoTwoPlus))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector HoldsVerTwoTwoPlus)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector HoldsVerTwoTwoPlus))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector HoldsVerTwoTwoPlus)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector HoldsVerTwoTwoPlus))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector HoldsVerTwoTwoPlus)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data VerTwoTwoPlus 
    = VerTwoTwoPlus 
        {val :: Std_.Int16
        ,duo :: Std_.Int64
        ,ptr1 :: VerTwoDataTwoPtr
        ,ptr2 :: VerTwoDataTwoPtr
        ,tre :: Std_.Int64
        ,lst3 :: (V.Vector Std_.Int64)}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default VerTwoTwoPlus) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const VerTwoTwoPlus) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize VerTwoTwoPlus) where
    type Cerial msg VerTwoTwoPlus = (Capnp.Gen.ById.X832bcc6686a26d56.VerTwoTwoPlus msg)
    decerialize raw = (VerTwoTwoPlus <$> (Capnp.Gen.ById.X832bcc6686a26d56.get_VerTwoTwoPlus'val raw)
                                     <*> (Capnp.Gen.ById.X832bcc6686a26d56.get_VerTwoTwoPlus'duo raw)
                                     <*> ((Capnp.Gen.ById.X832bcc6686a26d56.get_VerTwoTwoPlus'ptr1 raw) >>= Classes.decerialize)
                                     <*> ((Capnp.Gen.ById.X832bcc6686a26d56.get_VerTwoTwoPlus'ptr2 raw) >>= Classes.decerialize)
                                     <*> (Capnp.Gen.ById.X832bcc6686a26d56.get_VerTwoTwoPlus'tre raw)
                                     <*> ((Capnp.Gen.ById.X832bcc6686a26d56.get_VerTwoTwoPlus'lst3 raw) >>= Classes.decerialize))
instance (Classes.Marshal s VerTwoTwoPlus) where
    marshalInto raw_ value_ = case value_ of
        VerTwoTwoPlus{..} ->
            (do
                (Capnp.Gen.ById.X832bcc6686a26d56.set_VerTwoTwoPlus'val raw_ val)
                (Capnp.Gen.ById.X832bcc6686a26d56.set_VerTwoTwoPlus'duo raw_ duo)
                ((Classes.cerialize (Untyped.message raw_) ptr1) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_VerTwoTwoPlus'ptr1 raw_))
                ((Classes.cerialize (Untyped.message raw_) ptr2) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_VerTwoTwoPlus'ptr2 raw_))
                (Capnp.Gen.ById.X832bcc6686a26d56.set_VerTwoTwoPlus'tre raw_ tre)
                ((Classes.cerialize (Untyped.message raw_) lst3) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_VerTwoTwoPlus'lst3 raw_))
                (Std_.pure ())
                )
instance (Classes.Cerialize s VerTwoTwoPlus)
instance (Classes.Cerialize s (V.Vector VerTwoTwoPlus)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector VerTwoTwoPlus))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector VerTwoTwoPlus)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector VerTwoTwoPlus))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector VerTwoTwoPlus)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector VerTwoTwoPlus))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector VerTwoTwoPlus)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data HoldsText 
    = HoldsText 
        {txt :: T.Text
        ,lst :: (V.Vector T.Text)
        ,lstlst :: (V.Vector (V.Vector T.Text))}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default HoldsText) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const HoldsText) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize HoldsText) where
    type Cerial msg HoldsText = (Capnp.Gen.ById.X832bcc6686a26d56.HoldsText msg)
    decerialize raw = (HoldsText <$> ((Capnp.Gen.ById.X832bcc6686a26d56.get_HoldsText'txt raw) >>= Classes.decerialize)
                                 <*> ((Capnp.Gen.ById.X832bcc6686a26d56.get_HoldsText'lst raw) >>= Classes.decerialize)
                                 <*> ((Capnp.Gen.ById.X832bcc6686a26d56.get_HoldsText'lstlst raw) >>= Classes.decerialize))
instance (Classes.Marshal s HoldsText) where
    marshalInto raw_ value_ = case value_ of
        HoldsText{..} ->
            (do
                ((Classes.cerialize (Untyped.message raw_) txt) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_HoldsText'txt raw_))
                ((Classes.cerialize (Untyped.message raw_) lst) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_HoldsText'lst raw_))
                ((Classes.cerialize (Untyped.message raw_) lstlst) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_HoldsText'lstlst raw_))
                (Std_.pure ())
                )
instance (Classes.Cerialize s HoldsText)
instance (Classes.Cerialize s (V.Vector HoldsText)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector HoldsText))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector HoldsText)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector HoldsText))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector HoldsText)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector HoldsText))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector HoldsText)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data WrapEmpty 
    = WrapEmpty 
        {mightNotBeReallyEmpty :: VerEmpty}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default WrapEmpty) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const WrapEmpty) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize WrapEmpty) where
    type Cerial msg WrapEmpty = (Capnp.Gen.ById.X832bcc6686a26d56.WrapEmpty msg)
    decerialize raw = (WrapEmpty <$> ((Capnp.Gen.ById.X832bcc6686a26d56.get_WrapEmpty'mightNotBeReallyEmpty raw) >>= Classes.decerialize))
instance (Classes.Marshal s WrapEmpty) where
    marshalInto raw_ value_ = case value_ of
        WrapEmpty{..} ->
            (do
                ((Classes.cerialize (Untyped.message raw_) mightNotBeReallyEmpty) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_WrapEmpty'mightNotBeReallyEmpty raw_))
                (Std_.pure ())
                )
instance (Classes.Cerialize s WrapEmpty)
instance (Classes.Cerialize s (V.Vector WrapEmpty)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector WrapEmpty))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector WrapEmpty)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector WrapEmpty))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector WrapEmpty)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector WrapEmpty))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector WrapEmpty)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data Wrap2x2 
    = Wrap2x2 
        {mightNotBeReallyEmpty :: VerTwoDataTwoPtr}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default Wrap2x2) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const Wrap2x2) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize Wrap2x2) where
    type Cerial msg Wrap2x2 = (Capnp.Gen.ById.X832bcc6686a26d56.Wrap2x2 msg)
    decerialize raw = (Wrap2x2 <$> ((Capnp.Gen.ById.X832bcc6686a26d56.get_Wrap2x2'mightNotBeReallyEmpty raw) >>= Classes.decerialize))
instance (Classes.Marshal s Wrap2x2) where
    marshalInto raw_ value_ = case value_ of
        Wrap2x2{..} ->
            (do
                ((Classes.cerialize (Untyped.message raw_) mightNotBeReallyEmpty) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Wrap2x2'mightNotBeReallyEmpty raw_))
                (Std_.pure ())
                )
instance (Classes.Cerialize s Wrap2x2)
instance (Classes.Cerialize s (V.Vector Wrap2x2)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector Wrap2x2))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector Wrap2x2)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector Wrap2x2))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Wrap2x2)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Wrap2x2))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Wrap2x2)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data Wrap2x2plus 
    = Wrap2x2plus 
        {mightNotBeReallyEmpty :: VerTwoTwoPlus}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default Wrap2x2plus) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const Wrap2x2plus) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize Wrap2x2plus) where
    type Cerial msg Wrap2x2plus = (Capnp.Gen.ById.X832bcc6686a26d56.Wrap2x2plus msg)
    decerialize raw = (Wrap2x2plus <$> ((Capnp.Gen.ById.X832bcc6686a26d56.get_Wrap2x2plus'mightNotBeReallyEmpty raw) >>= Classes.decerialize))
instance (Classes.Marshal s Wrap2x2plus) where
    marshalInto raw_ value_ = case value_ of
        Wrap2x2plus{..} ->
            (do
                ((Classes.cerialize (Untyped.message raw_) mightNotBeReallyEmpty) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Wrap2x2plus'mightNotBeReallyEmpty raw_))
                (Std_.pure ())
                )
instance (Classes.Cerialize s Wrap2x2plus)
instance (Classes.Cerialize s (V.Vector Wrap2x2plus)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector Wrap2x2plus))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector Wrap2x2plus)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector Wrap2x2plus))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Wrap2x2plus)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Wrap2x2plus))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Wrap2x2plus)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data VoidUnion 
    = VoidUnion'a 
    | VoidUnion'b 
    | VoidUnion'unknown' Std_.Word16
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default VoidUnion) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const VoidUnion) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize VoidUnion) where
    type Cerial msg VoidUnion = (Capnp.Gen.ById.X832bcc6686a26d56.VoidUnion msg)
    decerialize raw = (do
        raw <- (Capnp.Gen.ById.X832bcc6686a26d56.get_VoidUnion' raw)
        case raw of
            (Capnp.Gen.ById.X832bcc6686a26d56.VoidUnion'a) ->
                (Std_.pure VoidUnion'a)
            (Capnp.Gen.ById.X832bcc6686a26d56.VoidUnion'b) ->
                (Std_.pure VoidUnion'b)
            (Capnp.Gen.ById.X832bcc6686a26d56.VoidUnion'unknown' tag) ->
                (Std_.pure (VoidUnion'unknown' tag))
        )
instance (Classes.Marshal s VoidUnion) where
    marshalInto raw_ value_ = case value_ of
        (VoidUnion'a) ->
            (Capnp.Gen.ById.X832bcc6686a26d56.set_VoidUnion'a raw_)
        (VoidUnion'b) ->
            (Capnp.Gen.ById.X832bcc6686a26d56.set_VoidUnion'b raw_)
        (VoidUnion'unknown' tag) ->
            (Capnp.Gen.ById.X832bcc6686a26d56.set_VoidUnion'unknown' raw_ tag)
instance (Classes.Cerialize s VoidUnion)
instance (Classes.Cerialize s (V.Vector VoidUnion)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector VoidUnion))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector VoidUnion)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector VoidUnion))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector VoidUnion)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector VoidUnion))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector VoidUnion)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data Nester1Capn 
    = Nester1Capn 
        {strs :: (V.Vector T.Text)}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default Nester1Capn) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const Nester1Capn) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize Nester1Capn) where
    type Cerial msg Nester1Capn = (Capnp.Gen.ById.X832bcc6686a26d56.Nester1Capn msg)
    decerialize raw = (Nester1Capn <$> ((Capnp.Gen.ById.X832bcc6686a26d56.get_Nester1Capn'strs raw) >>= Classes.decerialize))
instance (Classes.Marshal s Nester1Capn) where
    marshalInto raw_ value_ = case value_ of
        Nester1Capn{..} ->
            (do
                ((Classes.cerialize (Untyped.message raw_) strs) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Nester1Capn'strs raw_))
                (Std_.pure ())
                )
instance (Classes.Cerialize s Nester1Capn)
instance (Classes.Cerialize s (V.Vector Nester1Capn)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector Nester1Capn))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector Nester1Capn)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector Nester1Capn))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Nester1Capn)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Nester1Capn))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Nester1Capn)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data RWTestCapn 
    = RWTestCapn 
        {nestMatrix :: (V.Vector (V.Vector Nester1Capn))}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default RWTestCapn) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const RWTestCapn) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize RWTestCapn) where
    type Cerial msg RWTestCapn = (Capnp.Gen.ById.X832bcc6686a26d56.RWTestCapn msg)
    decerialize raw = (RWTestCapn <$> ((Capnp.Gen.ById.X832bcc6686a26d56.get_RWTestCapn'nestMatrix raw) >>= Classes.decerialize))
instance (Classes.Marshal s RWTestCapn) where
    marshalInto raw_ value_ = case value_ of
        RWTestCapn{..} ->
            (do
                ((Classes.cerialize (Untyped.message raw_) nestMatrix) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_RWTestCapn'nestMatrix raw_))
                (Std_.pure ())
                )
instance (Classes.Cerialize s RWTestCapn)
instance (Classes.Cerialize s (V.Vector RWTestCapn)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector RWTestCapn))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector RWTestCapn)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector RWTestCapn))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector RWTestCapn)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector RWTestCapn))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector RWTestCapn)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data ListStructCapn 
    = ListStructCapn 
        {vec :: (V.Vector Nester1Capn)}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default ListStructCapn) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const ListStructCapn) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize ListStructCapn) where
    type Cerial msg ListStructCapn = (Capnp.Gen.ById.X832bcc6686a26d56.ListStructCapn msg)
    decerialize raw = (ListStructCapn <$> ((Capnp.Gen.ById.X832bcc6686a26d56.get_ListStructCapn'vec raw) >>= Classes.decerialize))
instance (Classes.Marshal s ListStructCapn) where
    marshalInto raw_ value_ = case value_ of
        ListStructCapn{..} ->
            (do
                ((Classes.cerialize (Untyped.message raw_) vec) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_ListStructCapn'vec raw_))
                (Std_.pure ())
                )
instance (Classes.Cerialize s ListStructCapn)
instance (Classes.Cerialize s (V.Vector ListStructCapn)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector ListStructCapn))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector ListStructCapn)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector ListStructCapn))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector ListStructCapn)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector ListStructCapn))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector ListStructCapn)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
newtype Echo 
    = Echo Message.Client
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
class ((MonadIO.MonadIO m)
      ,(Server.Server m cap)) => (Echo'server_ m cap) where
    {-# MINIMAL echo'echo #-}
    echo'echo :: cap -> (Server.MethodHandler m Echo'echo'params Echo'echo'results)
    echo'echo _ = Server.methodUnimplemented
export_Echo :: ((STM.MonadSTM m)
               ,(Echo'server_ Std_.IO cap)) => Supervisors.Supervisor -> cap -> (m Echo)
export_Echo sup_ server_ = (STM.liftSTM (Echo <$> (Rpc.export sup_ Server.ServerOps{handleCast = (Server.unwrap server_)
                                                                                   ,handleStop = (Server.shutdown server_)
                                                                                   ,handleCall = (\interfaceId_ methodId_ -> case interfaceId_ of
                                                                                       10255578992688506164 ->
                                                                                           case methodId_ of
                                                                                               0 ->
                                                                                                   (Server.toUntypedHandler (echo'echo server_))
                                                                                               _ ->
                                                                                                   Server.methodUnimplemented
                                                                                       _ ->
                                                                                           Server.methodUnimplemented)})))
instance (Rpc.IsClient Echo) where
    fromClient  = Echo
    toClient (Echo client) = client
instance (Classes.FromPtr msg Echo) where
    fromPtr  = RpcHelpers.isClientFromPtr
instance (Classes.ToPtr s Echo) where
    toPtr  = RpcHelpers.isClientToPtr
instance (Classes.Decerialize Echo) where
    type Cerial msg Echo = (Capnp.Gen.ById.X832bcc6686a26d56.Echo msg)
    decerialize (Capnp.Gen.ById.X832bcc6686a26d56.Echo'newtype_ maybeCap) = case maybeCap of
        (Std_.Nothing) ->
            (Std_.pure (Echo Message.nullClient))
        (Std_.Just cap) ->
            (Echo <$> (Untyped.getClient cap))
instance (Classes.Cerialize s Echo) where
    cerialize msg (Echo client) = (Capnp.Gen.ById.X832bcc6686a26d56.Echo'newtype_ <$> (Std_.Just <$> (Untyped.appendCap msg client)))
instance (Server.Server Std_.IO Echo)
instance (Echo'server_ Std_.IO Echo) where
    echo'echo (Echo client) = (Rpc.clientMethodHandler 10255578992688506164 0 client)
data Echo'echo'params 
    = Echo'echo'params 
        {in_ :: T.Text}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default Echo'echo'params) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const Echo'echo'params) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize Echo'echo'params) where
    type Cerial msg Echo'echo'params = (Capnp.Gen.ById.X832bcc6686a26d56.Echo'echo'params msg)
    decerialize raw = (Echo'echo'params <$> ((Capnp.Gen.ById.X832bcc6686a26d56.get_Echo'echo'params'in_ raw) >>= Classes.decerialize))
instance (Classes.Marshal s Echo'echo'params) where
    marshalInto raw_ value_ = case value_ of
        Echo'echo'params{..} ->
            (do
                ((Classes.cerialize (Untyped.message raw_) in_) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Echo'echo'params'in_ raw_))
                (Std_.pure ())
                )
instance (Classes.Cerialize s Echo'echo'params)
instance (Classes.Cerialize s (V.Vector Echo'echo'params)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector Echo'echo'params))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector Echo'echo'params)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector Echo'echo'params))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Echo'echo'params)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Echo'echo'params))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Echo'echo'params)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data Echo'echo'results 
    = Echo'echo'results 
        {out :: T.Text}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default Echo'echo'results) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const Echo'echo'results) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize Echo'echo'results) where
    type Cerial msg Echo'echo'results = (Capnp.Gen.ById.X832bcc6686a26d56.Echo'echo'results msg)
    decerialize raw = (Echo'echo'results <$> ((Capnp.Gen.ById.X832bcc6686a26d56.get_Echo'echo'results'out raw) >>= Classes.decerialize))
instance (Classes.Marshal s Echo'echo'results) where
    marshalInto raw_ value_ = case value_ of
        Echo'echo'results{..} ->
            (do
                ((Classes.cerialize (Untyped.message raw_) out) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Echo'echo'results'out raw_))
                (Std_.pure ())
                )
instance (Classes.Cerialize s Echo'echo'results)
instance (Classes.Cerialize s (V.Vector Echo'echo'results)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector Echo'echo'results))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector Echo'echo'results)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector Echo'echo'results))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Echo'echo'results)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Echo'echo'results))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Echo'echo'results)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data Hoth 
    = Hoth 
        {base :: EchoBase}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default Hoth) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const Hoth) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize Hoth) where
    type Cerial msg Hoth = (Capnp.Gen.ById.X832bcc6686a26d56.Hoth msg)
    decerialize raw = (Hoth <$> ((Capnp.Gen.ById.X832bcc6686a26d56.get_Hoth'base raw) >>= Classes.decerialize))
instance (Classes.Marshal s Hoth) where
    marshalInto raw_ value_ = case value_ of
        Hoth{..} ->
            (do
                ((Classes.cerialize (Untyped.message raw_) base) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Hoth'base raw_))
                (Std_.pure ())
                )
instance (Classes.Cerialize s Hoth)
instance (Classes.Cerialize s (V.Vector Hoth)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector Hoth))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector Hoth)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector Hoth))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Hoth)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Hoth))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Hoth)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data EchoBase 
    = EchoBase 
        {echo :: Echo}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default EchoBase) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const EchoBase) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize EchoBase) where
    type Cerial msg EchoBase = (Capnp.Gen.ById.X832bcc6686a26d56.EchoBase msg)
    decerialize raw = (EchoBase <$> ((Capnp.Gen.ById.X832bcc6686a26d56.get_EchoBase'echo raw) >>= Classes.decerialize))
instance (Classes.Marshal s EchoBase) where
    marshalInto raw_ value_ = case value_ of
        EchoBase{..} ->
            (do
                ((Classes.cerialize (Untyped.message raw_) echo) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_EchoBase'echo raw_))
                (Std_.pure ())
                )
instance (Classes.Cerialize s EchoBase)
instance (Classes.Cerialize s (V.Vector EchoBase)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector EchoBase))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector EchoBase)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector EchoBase))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector EchoBase)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector EchoBase))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector EchoBase)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data EchoBases 
    = EchoBases 
        {bases :: (V.Vector EchoBase)}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default EchoBases) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const EchoBases) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize EchoBases) where
    type Cerial msg EchoBases = (Capnp.Gen.ById.X832bcc6686a26d56.EchoBases msg)
    decerialize raw = (EchoBases <$> ((Capnp.Gen.ById.X832bcc6686a26d56.get_EchoBases'bases raw) >>= Classes.decerialize))
instance (Classes.Marshal s EchoBases) where
    marshalInto raw_ value_ = case value_ of
        EchoBases{..} ->
            (do
                ((Classes.cerialize (Untyped.message raw_) bases) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_EchoBases'bases raw_))
                (Std_.pure ())
                )
instance (Classes.Cerialize s EchoBases)
instance (Classes.Cerialize s (V.Vector EchoBases)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector EchoBases))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector EchoBases)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector EchoBases))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector EchoBases)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector EchoBases))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector EchoBases)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data StackingRoot 
    = StackingRoot 
        {aWithDefault :: StackingA
        ,a :: StackingA}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default StackingRoot) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const StackingRoot) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize StackingRoot) where
    type Cerial msg StackingRoot = (Capnp.Gen.ById.X832bcc6686a26d56.StackingRoot msg)
    decerialize raw = (StackingRoot <$> ((Capnp.Gen.ById.X832bcc6686a26d56.get_StackingRoot'aWithDefault raw) >>= Classes.decerialize)
                                    <*> ((Capnp.Gen.ById.X832bcc6686a26d56.get_StackingRoot'a raw) >>= Classes.decerialize))
instance (Classes.Marshal s StackingRoot) where
    marshalInto raw_ value_ = case value_ of
        StackingRoot{..} ->
            (do
                ((Classes.cerialize (Untyped.message raw_) aWithDefault) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_StackingRoot'aWithDefault raw_))
                ((Classes.cerialize (Untyped.message raw_) a) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_StackingRoot'a raw_))
                (Std_.pure ())
                )
instance (Classes.Cerialize s StackingRoot)
instance (Classes.Cerialize s (V.Vector StackingRoot)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector StackingRoot))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector StackingRoot)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector StackingRoot))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector StackingRoot)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector StackingRoot))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector StackingRoot)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data StackingA 
    = StackingA 
        {num :: Std_.Int32
        ,b :: StackingB}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default StackingA) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const StackingA) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize StackingA) where
    type Cerial msg StackingA = (Capnp.Gen.ById.X832bcc6686a26d56.StackingA msg)
    decerialize raw = (StackingA <$> (Capnp.Gen.ById.X832bcc6686a26d56.get_StackingA'num raw)
                                 <*> ((Capnp.Gen.ById.X832bcc6686a26d56.get_StackingA'b raw) >>= Classes.decerialize))
instance (Classes.Marshal s StackingA) where
    marshalInto raw_ value_ = case value_ of
        StackingA{..} ->
            (do
                (Capnp.Gen.ById.X832bcc6686a26d56.set_StackingA'num raw_ num)
                ((Classes.cerialize (Untyped.message raw_) b) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_StackingA'b raw_))
                (Std_.pure ())
                )
instance (Classes.Cerialize s StackingA)
instance (Classes.Cerialize s (V.Vector StackingA)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector StackingA))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector StackingA)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector StackingA))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector StackingA)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector StackingA))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector StackingA)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data StackingB 
    = StackingB 
        {num :: Std_.Int32}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default StackingB) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const StackingB) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize StackingB) where
    type Cerial msg StackingB = (Capnp.Gen.ById.X832bcc6686a26d56.StackingB msg)
    decerialize raw = (StackingB <$> (Capnp.Gen.ById.X832bcc6686a26d56.get_StackingB'num raw))
instance (Classes.Marshal s StackingB) where
    marshalInto raw_ value_ = case value_ of
        StackingB{..} ->
            (do
                (Capnp.Gen.ById.X832bcc6686a26d56.set_StackingB'num raw_ num)
                (Std_.pure ())
                )
instance (Classes.Cerialize s StackingB)
instance (Classes.Cerialize s (V.Vector StackingB)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector StackingB))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector StackingB)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector StackingB))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector StackingB)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector StackingB))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector StackingB)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
newtype CallSequence 
    = CallSequence Message.Client
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
class ((MonadIO.MonadIO m)
      ,(Server.Server m cap)) => (CallSequence'server_ m cap) where
    {-# MINIMAL callSequence'getNumber #-}
    callSequence'getNumber :: cap -> (Server.MethodHandler m CallSequence'getNumber'params CallSequence'getNumber'results)
    callSequence'getNumber _ = Server.methodUnimplemented
export_CallSequence :: ((STM.MonadSTM m)
                       ,(CallSequence'server_ Std_.IO cap)) => Supervisors.Supervisor -> cap -> (m CallSequence)
export_CallSequence sup_ server_ = (STM.liftSTM (CallSequence <$> (Rpc.export sup_ Server.ServerOps{handleCast = (Server.unwrap server_)
                                                                                                   ,handleStop = (Server.shutdown server_)
                                                                                                   ,handleCall = (\interfaceId_ methodId_ -> case interfaceId_ of
                                                                                                       12371070827563042848 ->
                                                                                                           case methodId_ of
                                                                                                               0 ->
                                                                                                                   (Server.toUntypedHandler (callSequence'getNumber server_))
                                                                                                               _ ->
                                                                                                                   Server.methodUnimplemented
                                                                                                       _ ->
                                                                                                           Server.methodUnimplemented)})))
instance (Rpc.IsClient CallSequence) where
    fromClient  = CallSequence
    toClient (CallSequence client) = client
instance (Classes.FromPtr msg CallSequence) where
    fromPtr  = RpcHelpers.isClientFromPtr
instance (Classes.ToPtr s CallSequence) where
    toPtr  = RpcHelpers.isClientToPtr
instance (Classes.Decerialize CallSequence) where
    type Cerial msg CallSequence = (Capnp.Gen.ById.X832bcc6686a26d56.CallSequence msg)
    decerialize (Capnp.Gen.ById.X832bcc6686a26d56.CallSequence'newtype_ maybeCap) = case maybeCap of
        (Std_.Nothing) ->
            (Std_.pure (CallSequence Message.nullClient))
        (Std_.Just cap) ->
            (CallSequence <$> (Untyped.getClient cap))
instance (Classes.Cerialize s CallSequence) where
    cerialize msg (CallSequence client) = (Capnp.Gen.ById.X832bcc6686a26d56.CallSequence'newtype_ <$> (Std_.Just <$> (Untyped.appendCap msg client)))
instance (Server.Server Std_.IO CallSequence)
instance (CallSequence'server_ Std_.IO CallSequence) where
    callSequence'getNumber (CallSequence client) = (Rpc.clientMethodHandler 12371070827563042848 0 client)
data CallSequence'getNumber'params 
    = CallSequence'getNumber'params 
        {}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default CallSequence'getNumber'params) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const CallSequence'getNumber'params) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize CallSequence'getNumber'params) where
    type Cerial msg CallSequence'getNumber'params = (Capnp.Gen.ById.X832bcc6686a26d56.CallSequence'getNumber'params msg)
    decerialize raw = (Std_.pure CallSequence'getNumber'params)
instance (Classes.Marshal s CallSequence'getNumber'params) where
    marshalInto raw_ value_ = case value_ of
        (CallSequence'getNumber'params) ->
            (do
                (Std_.pure ())
                )
instance (Classes.Cerialize s CallSequence'getNumber'params)
instance (Classes.Cerialize s (V.Vector CallSequence'getNumber'params)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector CallSequence'getNumber'params))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector CallSequence'getNumber'params)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector CallSequence'getNumber'params))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector CallSequence'getNumber'params)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector CallSequence'getNumber'params))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector CallSequence'getNumber'params)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data CallSequence'getNumber'results 
    = CallSequence'getNumber'results 
        {n :: Std_.Word32}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default CallSequence'getNumber'results) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const CallSequence'getNumber'results) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize CallSequence'getNumber'results) where
    type Cerial msg CallSequence'getNumber'results = (Capnp.Gen.ById.X832bcc6686a26d56.CallSequence'getNumber'results msg)
    decerialize raw = (CallSequence'getNumber'results <$> (Capnp.Gen.ById.X832bcc6686a26d56.get_CallSequence'getNumber'results'n raw))
instance (Classes.Marshal s CallSequence'getNumber'results) where
    marshalInto raw_ value_ = case value_ of
        CallSequence'getNumber'results{..} ->
            (do
                (Capnp.Gen.ById.X832bcc6686a26d56.set_CallSequence'getNumber'results'n raw_ n)
                (Std_.pure ())
                )
instance (Classes.Cerialize s CallSequence'getNumber'results)
instance (Classes.Cerialize s (V.Vector CallSequence'getNumber'results)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector CallSequence'getNumber'results))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector CallSequence'getNumber'results)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector CallSequence'getNumber'results))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector CallSequence'getNumber'results)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector CallSequence'getNumber'results))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector CallSequence'getNumber'results)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
newtype CounterFactory 
    = CounterFactory Message.Client
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
class ((MonadIO.MonadIO m)
      ,(Server.Server m cap)) => (CounterFactory'server_ m cap) where
    {-# MINIMAL counterFactory'newCounter #-}
    counterFactory'newCounter :: cap -> (Server.MethodHandler m CounterFactory'newCounter'params CounterFactory'newCounter'results)
    counterFactory'newCounter _ = Server.methodUnimplemented
export_CounterFactory :: ((STM.MonadSTM m)
                         ,(CounterFactory'server_ Std_.IO cap)) => Supervisors.Supervisor -> cap -> (m CounterFactory)
export_CounterFactory sup_ server_ = (STM.liftSTM (CounterFactory <$> (Rpc.export sup_ Server.ServerOps{handleCast = (Server.unwrap server_)
                                                                                                       ,handleStop = (Server.shutdown server_)
                                                                                                       ,handleCall = (\interfaceId_ methodId_ -> case interfaceId_ of
                                                                                                           15610220054254702620 ->
                                                                                                               case methodId_ of
                                                                                                                   0 ->
                                                                                                                       (Server.toUntypedHandler (counterFactory'newCounter server_))
                                                                                                                   _ ->
                                                                                                                       Server.methodUnimplemented
                                                                                                           _ ->
                                                                                                               Server.methodUnimplemented)})))
instance (Rpc.IsClient CounterFactory) where
    fromClient  = CounterFactory
    toClient (CounterFactory client) = client
instance (Classes.FromPtr msg CounterFactory) where
    fromPtr  = RpcHelpers.isClientFromPtr
instance (Classes.ToPtr s CounterFactory) where
    toPtr  = RpcHelpers.isClientToPtr
instance (Classes.Decerialize CounterFactory) where
    type Cerial msg CounterFactory = (Capnp.Gen.ById.X832bcc6686a26d56.CounterFactory msg)
    decerialize (Capnp.Gen.ById.X832bcc6686a26d56.CounterFactory'newtype_ maybeCap) = case maybeCap of
        (Std_.Nothing) ->
            (Std_.pure (CounterFactory Message.nullClient))
        (Std_.Just cap) ->
            (CounterFactory <$> (Untyped.getClient cap))
instance (Classes.Cerialize s CounterFactory) where
    cerialize msg (CounterFactory client) = (Capnp.Gen.ById.X832bcc6686a26d56.CounterFactory'newtype_ <$> (Std_.Just <$> (Untyped.appendCap msg client)))
instance (Server.Server Std_.IO CounterFactory)
instance (CounterFactory'server_ Std_.IO CounterFactory) where
    counterFactory'newCounter (CounterFactory client) = (Rpc.clientMethodHandler 15610220054254702620 0 client)
data CounterFactory'newCounter'params 
    = CounterFactory'newCounter'params 
        {start :: Std_.Word32}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default CounterFactory'newCounter'params) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const CounterFactory'newCounter'params) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize CounterFactory'newCounter'params) where
    type Cerial msg CounterFactory'newCounter'params = (Capnp.Gen.ById.X832bcc6686a26d56.CounterFactory'newCounter'params msg)
    decerialize raw = (CounterFactory'newCounter'params <$> (Capnp.Gen.ById.X832bcc6686a26d56.get_CounterFactory'newCounter'params'start raw))
instance (Classes.Marshal s CounterFactory'newCounter'params) where
    marshalInto raw_ value_ = case value_ of
        CounterFactory'newCounter'params{..} ->
            (do
                (Capnp.Gen.ById.X832bcc6686a26d56.set_CounterFactory'newCounter'params'start raw_ start)
                (Std_.pure ())
                )
instance (Classes.Cerialize s CounterFactory'newCounter'params)
instance (Classes.Cerialize s (V.Vector CounterFactory'newCounter'params)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector CounterFactory'newCounter'params))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector CounterFactory'newCounter'params)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector CounterFactory'newCounter'params))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector CounterFactory'newCounter'params)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector CounterFactory'newCounter'params))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector CounterFactory'newCounter'params)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data CounterFactory'newCounter'results 
    = CounterFactory'newCounter'results 
        {counter :: CallSequence}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default CounterFactory'newCounter'results) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const CounterFactory'newCounter'results) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize CounterFactory'newCounter'results) where
    type Cerial msg CounterFactory'newCounter'results = (Capnp.Gen.ById.X832bcc6686a26d56.CounterFactory'newCounter'results msg)
    decerialize raw = (CounterFactory'newCounter'results <$> ((Capnp.Gen.ById.X832bcc6686a26d56.get_CounterFactory'newCounter'results'counter raw) >>= Classes.decerialize))
instance (Classes.Marshal s CounterFactory'newCounter'results) where
    marshalInto raw_ value_ = case value_ of
        CounterFactory'newCounter'results{..} ->
            (do
                ((Classes.cerialize (Untyped.message raw_) counter) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_CounterFactory'newCounter'results'counter raw_))
                (Std_.pure ())
                )
instance (Classes.Cerialize s CounterFactory'newCounter'results)
instance (Classes.Cerialize s (V.Vector CounterFactory'newCounter'results)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector CounterFactory'newCounter'results))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector CounterFactory'newCounter'results)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector CounterFactory'newCounter'results))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector CounterFactory'newCounter'results)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector CounterFactory'newCounter'results))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector CounterFactory'newCounter'results)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
newtype CounterAcceptor 
    = CounterAcceptor Message.Client
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
class ((MonadIO.MonadIO m)
      ,(Server.Server m cap)) => (CounterAcceptor'server_ m cap) where
    {-# MINIMAL counterAcceptor'accept #-}
    counterAcceptor'accept :: cap -> (Server.MethodHandler m CounterAcceptor'accept'params CounterAcceptor'accept'results)
    counterAcceptor'accept _ = Server.methodUnimplemented
export_CounterAcceptor :: ((STM.MonadSTM m)
                          ,(CounterAcceptor'server_ Std_.IO cap)) => Supervisors.Supervisor -> cap -> (m CounterAcceptor)
export_CounterAcceptor sup_ server_ = (STM.liftSTM (CounterAcceptor <$> (Rpc.export sup_ Server.ServerOps{handleCast = (Server.unwrap server_)
                                                                                                         ,handleStop = (Server.shutdown server_)
                                                                                                         ,handleCall = (\interfaceId_ methodId_ -> case interfaceId_ of
                                                                                                             14317498215560924065 ->
                                                                                                                 case methodId_ of
                                                                                                                     0 ->
                                                                                                                         (Server.toUntypedHandler (counterAcceptor'accept server_))
                                                                                                                     _ ->
                                                                                                                         Server.methodUnimplemented
                                                                                                             _ ->
                                                                                                                 Server.methodUnimplemented)})))
instance (Rpc.IsClient CounterAcceptor) where
    fromClient  = CounterAcceptor
    toClient (CounterAcceptor client) = client
instance (Classes.FromPtr msg CounterAcceptor) where
    fromPtr  = RpcHelpers.isClientFromPtr
instance (Classes.ToPtr s CounterAcceptor) where
    toPtr  = RpcHelpers.isClientToPtr
instance (Classes.Decerialize CounterAcceptor) where
    type Cerial msg CounterAcceptor = (Capnp.Gen.ById.X832bcc6686a26d56.CounterAcceptor msg)
    decerialize (Capnp.Gen.ById.X832bcc6686a26d56.CounterAcceptor'newtype_ maybeCap) = case maybeCap of
        (Std_.Nothing) ->
            (Std_.pure (CounterAcceptor Message.nullClient))
        (Std_.Just cap) ->
            (CounterAcceptor <$> (Untyped.getClient cap))
instance (Classes.Cerialize s CounterAcceptor) where
    cerialize msg (CounterAcceptor client) = (Capnp.Gen.ById.X832bcc6686a26d56.CounterAcceptor'newtype_ <$> (Std_.Just <$> (Untyped.appendCap msg client)))
instance (Server.Server Std_.IO CounterAcceptor)
instance (CounterAcceptor'server_ Std_.IO CounterAcceptor) where
    counterAcceptor'accept (CounterAcceptor client) = (Rpc.clientMethodHandler 14317498215560924065 0 client)
data CounterAcceptor'accept'params 
    = CounterAcceptor'accept'params 
        {counter :: CallSequence}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default CounterAcceptor'accept'params) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const CounterAcceptor'accept'params) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize CounterAcceptor'accept'params) where
    type Cerial msg CounterAcceptor'accept'params = (Capnp.Gen.ById.X832bcc6686a26d56.CounterAcceptor'accept'params msg)
    decerialize raw = (CounterAcceptor'accept'params <$> ((Capnp.Gen.ById.X832bcc6686a26d56.get_CounterAcceptor'accept'params'counter raw) >>= Classes.decerialize))
instance (Classes.Marshal s CounterAcceptor'accept'params) where
    marshalInto raw_ value_ = case value_ of
        CounterAcceptor'accept'params{..} ->
            (do
                ((Classes.cerialize (Untyped.message raw_) counter) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_CounterAcceptor'accept'params'counter raw_))
                (Std_.pure ())
                )
instance (Classes.Cerialize s CounterAcceptor'accept'params)
instance (Classes.Cerialize s (V.Vector CounterAcceptor'accept'params)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector CounterAcceptor'accept'params))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector CounterAcceptor'accept'params)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector CounterAcceptor'accept'params))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector CounterAcceptor'accept'params)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector CounterAcceptor'accept'params))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector CounterAcceptor'accept'params)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data CounterAcceptor'accept'results 
    = CounterAcceptor'accept'results 
        {}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default CounterAcceptor'accept'results) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const CounterAcceptor'accept'results) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize CounterAcceptor'accept'results) where
    type Cerial msg CounterAcceptor'accept'results = (Capnp.Gen.ById.X832bcc6686a26d56.CounterAcceptor'accept'results msg)
    decerialize raw = (Std_.pure CounterAcceptor'accept'results)
instance (Classes.Marshal s CounterAcceptor'accept'results) where
    marshalInto raw_ value_ = case value_ of
        (CounterAcceptor'accept'results) ->
            (do
                (Std_.pure ())
                )
instance (Classes.Cerialize s CounterAcceptor'accept'results)
instance (Classes.Cerialize s (V.Vector CounterAcceptor'accept'results)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector CounterAcceptor'accept'results))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector CounterAcceptor'accept'results)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector CounterAcceptor'accept'results))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector CounterAcceptor'accept'results)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector CounterAcceptor'accept'results))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector CounterAcceptor'accept'results)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
newtype Top 
    = Top Message.Client
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
class ((MonadIO.MonadIO m)
      ,(Server.Server m cap)) => (Top'server_ m cap) where
    {-# MINIMAL top'top #-}
    top'top :: cap -> (Server.MethodHandler m Top'top'params Top'top'results)
    top'top _ = Server.methodUnimplemented
export_Top :: ((STM.MonadSTM m)
              ,(Top'server_ Std_.IO cap)) => Supervisors.Supervisor -> cap -> (m Top)
export_Top sup_ server_ = (STM.liftSTM (Top <$> (Rpc.export sup_ Server.ServerOps{handleCast = (Server.unwrap server_)
                                                                                 ,handleStop = (Server.shutdown server_)
                                                                                 ,handleCall = (\interfaceId_ methodId_ -> case interfaceId_ of
                                                                                     17861645508359101525 ->
                                                                                         case methodId_ of
                                                                                             0 ->
                                                                                                 (Server.toUntypedHandler (top'top server_))
                                                                                             _ ->
                                                                                                 Server.methodUnimplemented
                                                                                     _ ->
                                                                                         Server.methodUnimplemented)})))
instance (Rpc.IsClient Top) where
    fromClient  = Top
    toClient (Top client) = client
instance (Classes.FromPtr msg Top) where
    fromPtr  = RpcHelpers.isClientFromPtr
instance (Classes.ToPtr s Top) where
    toPtr  = RpcHelpers.isClientToPtr
instance (Classes.Decerialize Top) where
    type Cerial msg Top = (Capnp.Gen.ById.X832bcc6686a26d56.Top msg)
    decerialize (Capnp.Gen.ById.X832bcc6686a26d56.Top'newtype_ maybeCap) = case maybeCap of
        (Std_.Nothing) ->
            (Std_.pure (Top Message.nullClient))
        (Std_.Just cap) ->
            (Top <$> (Untyped.getClient cap))
instance (Classes.Cerialize s Top) where
    cerialize msg (Top client) = (Capnp.Gen.ById.X832bcc6686a26d56.Top'newtype_ <$> (Std_.Just <$> (Untyped.appendCap msg client)))
instance (Server.Server Std_.IO Top)
instance (Top'server_ Std_.IO Top) where
    top'top (Top client) = (Rpc.clientMethodHandler 17861645508359101525 0 client)
data Top'top'params 
    = Top'top'params 
        {}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default Top'top'params) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const Top'top'params) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize Top'top'params) where
    type Cerial msg Top'top'params = (Capnp.Gen.ById.X832bcc6686a26d56.Top'top'params msg)
    decerialize raw = (Std_.pure Top'top'params)
instance (Classes.Marshal s Top'top'params) where
    marshalInto raw_ value_ = case value_ of
        (Top'top'params) ->
            (do
                (Std_.pure ())
                )
instance (Classes.Cerialize s Top'top'params)
instance (Classes.Cerialize s (V.Vector Top'top'params)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector Top'top'params))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector Top'top'params)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector Top'top'params))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Top'top'params)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Top'top'params))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Top'top'params)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data Top'top'results 
    = Top'top'results 
        {}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default Top'top'results) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const Top'top'results) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize Top'top'results) where
    type Cerial msg Top'top'results = (Capnp.Gen.ById.X832bcc6686a26d56.Top'top'results msg)
    decerialize raw = (Std_.pure Top'top'results)
instance (Classes.Marshal s Top'top'results) where
    marshalInto raw_ value_ = case value_ of
        (Top'top'results) ->
            (do
                (Std_.pure ())
                )
instance (Classes.Cerialize s Top'top'results)
instance (Classes.Cerialize s (V.Vector Top'top'results)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector Top'top'results))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector Top'top'results)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector Top'top'results))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Top'top'results)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Top'top'results))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Top'top'results)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
newtype Left 
    = Left Message.Client
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
class ((MonadIO.MonadIO m)
      ,(Top'server_ m cap)) => (Left'server_ m cap) where
    {-# MINIMAL left'left #-}
    left'left :: cap -> (Server.MethodHandler m Left'left'params Left'left'results)
    left'left _ = Server.methodUnimplemented
export_Left :: ((STM.MonadSTM m)
               ,(Left'server_ Std_.IO cap)) => Supervisors.Supervisor -> cap -> (m Left)
export_Left sup_ server_ = (STM.liftSTM (Left <$> (Rpc.export sup_ Server.ServerOps{handleCast = (Server.unwrap server_)
                                                                                   ,handleStop = (Server.shutdown server_)
                                                                                   ,handleCall = (\interfaceId_ methodId_ -> case interfaceId_ of
                                                                                       17679152961798450446 ->
                                                                                           case methodId_ of
                                                                                               0 ->
                                                                                                   (Server.toUntypedHandler (left'left server_))
                                                                                               _ ->
                                                                                                   Server.methodUnimplemented
                                                                                       17861645508359101525 ->
                                                                                           case methodId_ of
                                                                                               0 ->
                                                                                                   (Server.toUntypedHandler (top'top server_))
                                                                                               _ ->
                                                                                                   Server.methodUnimplemented
                                                                                       _ ->
                                                                                           Server.methodUnimplemented)})))
instance (Rpc.IsClient Left) where
    fromClient  = Left
    toClient (Left client) = client
instance (Classes.FromPtr msg Left) where
    fromPtr  = RpcHelpers.isClientFromPtr
instance (Classes.ToPtr s Left) where
    toPtr  = RpcHelpers.isClientToPtr
instance (Classes.Decerialize Left) where
    type Cerial msg Left = (Capnp.Gen.ById.X832bcc6686a26d56.Left msg)
    decerialize (Capnp.Gen.ById.X832bcc6686a26d56.Left'newtype_ maybeCap) = case maybeCap of
        (Std_.Nothing) ->
            (Std_.pure (Left Message.nullClient))
        (Std_.Just cap) ->
            (Left <$> (Untyped.getClient cap))
instance (Classes.Cerialize s Left) where
    cerialize msg (Left client) = (Capnp.Gen.ById.X832bcc6686a26d56.Left'newtype_ <$> (Std_.Just <$> (Untyped.appendCap msg client)))
instance (Server.Server Std_.IO Left)
instance (Left'server_ Std_.IO Left) where
    left'left (Left client) = (Rpc.clientMethodHandler 17679152961798450446 0 client)
instance (Top'server_ Std_.IO Left) where
    top'top (Left client) = (Rpc.clientMethodHandler 17861645508359101525 0 client)
data Left'left'params 
    = Left'left'params 
        {}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default Left'left'params) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const Left'left'params) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize Left'left'params) where
    type Cerial msg Left'left'params = (Capnp.Gen.ById.X832bcc6686a26d56.Left'left'params msg)
    decerialize raw = (Std_.pure Left'left'params)
instance (Classes.Marshal s Left'left'params) where
    marshalInto raw_ value_ = case value_ of
        (Left'left'params) ->
            (do
                (Std_.pure ())
                )
instance (Classes.Cerialize s Left'left'params)
instance (Classes.Cerialize s (V.Vector Left'left'params)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector Left'left'params))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector Left'left'params)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector Left'left'params))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Left'left'params)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Left'left'params))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Left'left'params)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data Left'left'results 
    = Left'left'results 
        {}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default Left'left'results) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const Left'left'results) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize Left'left'results) where
    type Cerial msg Left'left'results = (Capnp.Gen.ById.X832bcc6686a26d56.Left'left'results msg)
    decerialize raw = (Std_.pure Left'left'results)
instance (Classes.Marshal s Left'left'results) where
    marshalInto raw_ value_ = case value_ of
        (Left'left'results) ->
            (do
                (Std_.pure ())
                )
instance (Classes.Cerialize s Left'left'results)
instance (Classes.Cerialize s (V.Vector Left'left'results)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector Left'left'results))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector Left'left'results)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector Left'left'results))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Left'left'results)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Left'left'results))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Left'left'results)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
newtype Right 
    = Right Message.Client
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
class ((MonadIO.MonadIO m)
      ,(Top'server_ m cap)) => (Right'server_ m cap) where
    {-# MINIMAL right'right #-}
    right'right :: cap -> (Server.MethodHandler m Right'right'params Right'right'results)
    right'right _ = Server.methodUnimplemented
export_Right :: ((STM.MonadSTM m)
                ,(Right'server_ Std_.IO cap)) => Supervisors.Supervisor -> cap -> (m Right)
export_Right sup_ server_ = (STM.liftSTM (Right <$> (Rpc.export sup_ Server.ServerOps{handleCast = (Server.unwrap server_)
                                                                                     ,handleStop = (Server.shutdown server_)
                                                                                     ,handleCall = (\interfaceId_ methodId_ -> case interfaceId_ of
                                                                                         14712639595305348988 ->
                                                                                             case methodId_ of
                                                                                                 0 ->
                                                                                                     (Server.toUntypedHandler (right'right server_))
                                                                                                 _ ->
                                                                                                     Server.methodUnimplemented
                                                                                         17861645508359101525 ->
                                                                                             case methodId_ of
                                                                                                 0 ->
                                                                                                     (Server.toUntypedHandler (top'top server_))
                                                                                                 _ ->
                                                                                                     Server.methodUnimplemented
                                                                                         _ ->
                                                                                             Server.methodUnimplemented)})))
instance (Rpc.IsClient Right) where
    fromClient  = Right
    toClient (Right client) = client
instance (Classes.FromPtr msg Right) where
    fromPtr  = RpcHelpers.isClientFromPtr
instance (Classes.ToPtr s Right) where
    toPtr  = RpcHelpers.isClientToPtr
instance (Classes.Decerialize Right) where
    type Cerial msg Right = (Capnp.Gen.ById.X832bcc6686a26d56.Right msg)
    decerialize (Capnp.Gen.ById.X832bcc6686a26d56.Right'newtype_ maybeCap) = case maybeCap of
        (Std_.Nothing) ->
            (Std_.pure (Right Message.nullClient))
        (Std_.Just cap) ->
            (Right <$> (Untyped.getClient cap))
instance (Classes.Cerialize s Right) where
    cerialize msg (Right client) = (Capnp.Gen.ById.X832bcc6686a26d56.Right'newtype_ <$> (Std_.Just <$> (Untyped.appendCap msg client)))
instance (Server.Server Std_.IO Right)
instance (Right'server_ Std_.IO Right) where
    right'right (Right client) = (Rpc.clientMethodHandler 14712639595305348988 0 client)
instance (Top'server_ Std_.IO Right) where
    top'top (Right client) = (Rpc.clientMethodHandler 17861645508359101525 0 client)
data Right'right'params 
    = Right'right'params 
        {}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default Right'right'params) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const Right'right'params) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize Right'right'params) where
    type Cerial msg Right'right'params = (Capnp.Gen.ById.X832bcc6686a26d56.Right'right'params msg)
    decerialize raw = (Std_.pure Right'right'params)
instance (Classes.Marshal s Right'right'params) where
    marshalInto raw_ value_ = case value_ of
        (Right'right'params) ->
            (do
                (Std_.pure ())
                )
instance (Classes.Cerialize s Right'right'params)
instance (Classes.Cerialize s (V.Vector Right'right'params)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector Right'right'params))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector Right'right'params)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector Right'right'params))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Right'right'params)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Right'right'params))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Right'right'params)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data Right'right'results 
    = Right'right'results 
        {}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default Right'right'results) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const Right'right'results) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize Right'right'results) where
    type Cerial msg Right'right'results = (Capnp.Gen.ById.X832bcc6686a26d56.Right'right'results msg)
    decerialize raw = (Std_.pure Right'right'results)
instance (Classes.Marshal s Right'right'results) where
    marshalInto raw_ value_ = case value_ of
        (Right'right'results) ->
            (do
                (Std_.pure ())
                )
instance (Classes.Cerialize s Right'right'results)
instance (Classes.Cerialize s (V.Vector Right'right'results)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector Right'right'results))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector Right'right'results)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector Right'right'results))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Right'right'results)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Right'right'results))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Right'right'results)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
newtype Bottom 
    = Bottom Message.Client
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
class ((MonadIO.MonadIO m)
      ,(Left'server_ m cap)
      ,(Right'server_ m cap)) => (Bottom'server_ m cap) where
    {-# MINIMAL bottom'bottom #-}
    bottom'bottom :: cap -> (Server.MethodHandler m Bottom'bottom'params Bottom'bottom'results)
    bottom'bottom _ = Server.methodUnimplemented
export_Bottom :: ((STM.MonadSTM m)
                 ,(Bottom'server_ Std_.IO cap)) => Supervisors.Supervisor -> cap -> (m Bottom)
export_Bottom sup_ server_ = (STM.liftSTM (Bottom <$> (Rpc.export sup_ Server.ServerOps{handleCast = (Server.unwrap server_)
                                                                                       ,handleStop = (Server.shutdown server_)
                                                                                       ,handleCall = (\interfaceId_ methodId_ -> case interfaceId_ of
                                                                                           18402872613340521775 ->
                                                                                               case methodId_ of
                                                                                                   0 ->
                                                                                                       (Server.toUntypedHandler (bottom'bottom server_))
                                                                                                   _ ->
                                                                                                       Server.methodUnimplemented
                                                                                           17679152961798450446 ->
                                                                                               case methodId_ of
                                                                                                   0 ->
                                                                                                       (Server.toUntypedHandler (left'left server_))
                                                                                                   _ ->
                                                                                                       Server.methodUnimplemented
                                                                                           17861645508359101525 ->
                                                                                               case methodId_ of
                                                                                                   0 ->
                                                                                                       (Server.toUntypedHandler (top'top server_))
                                                                                                   _ ->
                                                                                                       Server.methodUnimplemented
                                                                                           14712639595305348988 ->
                                                                                               case methodId_ of
                                                                                                   0 ->
                                                                                                       (Server.toUntypedHandler (right'right server_))
                                                                                                   _ ->
                                                                                                       Server.methodUnimplemented
                                                                                           _ ->
                                                                                               Server.methodUnimplemented)})))
instance (Rpc.IsClient Bottom) where
    fromClient  = Bottom
    toClient (Bottom client) = client
instance (Classes.FromPtr msg Bottom) where
    fromPtr  = RpcHelpers.isClientFromPtr
instance (Classes.ToPtr s Bottom) where
    toPtr  = RpcHelpers.isClientToPtr
instance (Classes.Decerialize Bottom) where
    type Cerial msg Bottom = (Capnp.Gen.ById.X832bcc6686a26d56.Bottom msg)
    decerialize (Capnp.Gen.ById.X832bcc6686a26d56.Bottom'newtype_ maybeCap) = case maybeCap of
        (Std_.Nothing) ->
            (Std_.pure (Bottom Message.nullClient))
        (Std_.Just cap) ->
            (Bottom <$> (Untyped.getClient cap))
instance (Classes.Cerialize s Bottom) where
    cerialize msg (Bottom client) = (Capnp.Gen.ById.X832bcc6686a26d56.Bottom'newtype_ <$> (Std_.Just <$> (Untyped.appendCap msg client)))
instance (Server.Server Std_.IO Bottom)
instance (Bottom'server_ Std_.IO Bottom) where
    bottom'bottom (Bottom client) = (Rpc.clientMethodHandler 18402872613340521775 0 client)
instance (Left'server_ Std_.IO Bottom) where
    left'left (Bottom client) = (Rpc.clientMethodHandler 17679152961798450446 0 client)
instance (Top'server_ Std_.IO Bottom) where
    top'top (Bottom client) = (Rpc.clientMethodHandler 17861645508359101525 0 client)
instance (Right'server_ Std_.IO Bottom) where
    right'right (Bottom client) = (Rpc.clientMethodHandler 14712639595305348988 0 client)
data Bottom'bottom'params 
    = Bottom'bottom'params 
        {}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default Bottom'bottom'params) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const Bottom'bottom'params) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize Bottom'bottom'params) where
    type Cerial msg Bottom'bottom'params = (Capnp.Gen.ById.X832bcc6686a26d56.Bottom'bottom'params msg)
    decerialize raw = (Std_.pure Bottom'bottom'params)
instance (Classes.Marshal s Bottom'bottom'params) where
    marshalInto raw_ value_ = case value_ of
        (Bottom'bottom'params) ->
            (do
                (Std_.pure ())
                )
instance (Classes.Cerialize s Bottom'bottom'params)
instance (Classes.Cerialize s (V.Vector Bottom'bottom'params)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector Bottom'bottom'params))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector Bottom'bottom'params)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector Bottom'bottom'params))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Bottom'bottom'params)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Bottom'bottom'params))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Bottom'bottom'params)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data Bottom'bottom'results 
    = Bottom'bottom'results 
        {}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default Bottom'bottom'results) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const Bottom'bottom'results) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize Bottom'bottom'results) where
    type Cerial msg Bottom'bottom'results = (Capnp.Gen.ById.X832bcc6686a26d56.Bottom'bottom'results msg)
    decerialize raw = (Std_.pure Bottom'bottom'results)
instance (Classes.Marshal s Bottom'bottom'results) where
    marshalInto raw_ value_ = case value_ of
        (Bottom'bottom'results) ->
            (do
                (Std_.pure ())
                )
instance (Classes.Cerialize s Bottom'bottom'results)
instance (Classes.Cerialize s (V.Vector Bottom'bottom'results)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector Bottom'bottom'results))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector Bottom'bottom'results)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector Bottom'bottom'results))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Bottom'bottom'results)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Bottom'bottom'results))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Bottom'bottom'results)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data Defaults 
    = Defaults 
        {text :: T.Text
        ,data_ :: BS.ByteString
        ,float :: Std_.Float
        ,int :: Std_.Int32
        ,uint :: Std_.Word32}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default Defaults) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const Defaults) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize Defaults) where
    type Cerial msg Defaults = (Capnp.Gen.ById.X832bcc6686a26d56.Defaults msg)
    decerialize raw = (Defaults <$> ((Capnp.Gen.ById.X832bcc6686a26d56.get_Defaults'text raw) >>= Classes.decerialize)
                                <*> ((Capnp.Gen.ById.X832bcc6686a26d56.get_Defaults'data_ raw) >>= Classes.decerialize)
                                <*> (Capnp.Gen.ById.X832bcc6686a26d56.get_Defaults'float raw)
                                <*> (Capnp.Gen.ById.X832bcc6686a26d56.get_Defaults'int raw)
                                <*> (Capnp.Gen.ById.X832bcc6686a26d56.get_Defaults'uint raw))
instance (Classes.Marshal s Defaults) where
    marshalInto raw_ value_ = case value_ of
        Defaults{..} ->
            (do
                ((Classes.cerialize (Untyped.message raw_) text) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Defaults'text raw_))
                ((Classes.cerialize (Untyped.message raw_) data_) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_Defaults'data_ raw_))
                (Capnp.Gen.ById.X832bcc6686a26d56.set_Defaults'float raw_ float)
                (Capnp.Gen.ById.X832bcc6686a26d56.set_Defaults'int raw_ int)
                (Capnp.Gen.ById.X832bcc6686a26d56.set_Defaults'uint raw_ uint)
                (Std_.pure ())
                )
instance (Classes.Cerialize s Defaults)
instance (Classes.Cerialize s (V.Vector Defaults)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector Defaults))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector Defaults)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector Defaults))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Defaults)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Defaults))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Defaults)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data BenchmarkA 
    = BenchmarkA 
        {name :: T.Text
        ,birthDay :: Std_.Int64
        ,phone :: T.Text
        ,siblings :: Std_.Int32
        ,spouse :: Std_.Bool
        ,money :: Std_.Double}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance (Default.Default BenchmarkA) where
    def  = GenHelpersPure.defaultStruct
instance (Classes.FromStruct Message.Const BenchmarkA) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance (Classes.Decerialize BenchmarkA) where
    type Cerial msg BenchmarkA = (Capnp.Gen.ById.X832bcc6686a26d56.BenchmarkA msg)
    decerialize raw = (BenchmarkA <$> ((Capnp.Gen.ById.X832bcc6686a26d56.get_BenchmarkA'name raw) >>= Classes.decerialize)
                                  <*> (Capnp.Gen.ById.X832bcc6686a26d56.get_BenchmarkA'birthDay raw)
                                  <*> ((Capnp.Gen.ById.X832bcc6686a26d56.get_BenchmarkA'phone raw) >>= Classes.decerialize)
                                  <*> (Capnp.Gen.ById.X832bcc6686a26d56.get_BenchmarkA'siblings raw)
                                  <*> (Capnp.Gen.ById.X832bcc6686a26d56.get_BenchmarkA'spouse raw)
                                  <*> (Capnp.Gen.ById.X832bcc6686a26d56.get_BenchmarkA'money raw))
instance (Classes.Marshal s BenchmarkA) where
    marshalInto raw_ value_ = case value_ of
        BenchmarkA{..} ->
            (do
                ((Classes.cerialize (Untyped.message raw_) name) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_BenchmarkA'name raw_))
                (Capnp.Gen.ById.X832bcc6686a26d56.set_BenchmarkA'birthDay raw_ birthDay)
                ((Classes.cerialize (Untyped.message raw_) phone) >>= (Capnp.Gen.ById.X832bcc6686a26d56.set_BenchmarkA'phone raw_))
                (Capnp.Gen.ById.X832bcc6686a26d56.set_BenchmarkA'siblings raw_ siblings)
                (Capnp.Gen.ById.X832bcc6686a26d56.set_BenchmarkA'spouse raw_ spouse)
                (Capnp.Gen.ById.X832bcc6686a26d56.set_BenchmarkA'money raw_ money)
                (Std_.pure ())
                )
instance (Classes.Cerialize s BenchmarkA)
instance (Classes.Cerialize s (V.Vector BenchmarkA)) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance (Classes.Cerialize s (V.Vector (V.Vector BenchmarkA))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector BenchmarkA)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector BenchmarkA))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector BenchmarkA)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector BenchmarkA))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector BenchmarkA)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance (Classes.Decerialize Capnp.Gen.ById.X832bcc6686a26d56.Airport) where
    type Cerial msg Capnp.Gen.ById.X832bcc6686a26d56.Airport = Capnp.Gen.ById.X832bcc6686a26d56.Airport
    decerialize  = Std_.pure
instance (Classes.Cerialize s Capnp.Gen.ById.X832bcc6686a26d56.Airport) where
    cerialize _ = Std_.pure
instance (Classes.Cerialize s (V.Vector Capnp.Gen.ById.X832bcc6686a26d56.Airport)) where
    cerialize  = Classes.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector Capnp.Gen.ById.X832bcc6686a26d56.Airport))) where
    cerialize  = Classes.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector Capnp.Gen.ById.X832bcc6686a26d56.Airport)))) where
    cerialize  = Classes.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector Capnp.Gen.ById.X832bcc6686a26d56.Airport))))) where
    cerialize  = Classes.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Capnp.Gen.ById.X832bcc6686a26d56.Airport)))))) where
    cerialize  = Classes.cerializeBasicVec
instance (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector Capnp.Gen.ById.X832bcc6686a26d56.Airport))))))) where
    cerialize  = Classes.cerializeBasicVec