Pure.hs

{-# 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 #-}
module Capnp.Gen.Generics.Pure(Maybe(..)
                              ,Either(..)
                              ,Pair(..)
                              ,Nested(..)
                              ,Nested'SomeStruct(..)
                              ,Nested'SomeInterface(..)
                              ,Nested'SomeInterface'server_(..)
                              ,export_Nested'SomeInterface
                              ,Nested'SomeInterface'method'params(..)
                              ,Nested'SomeInterface'method'results(..)
                              ,Specialized(..)
                              ,HasGroup(..)
                              ,HasGroup'theGroup(..)) 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.Xb6421fb8e478d144
import qualified Prelude as Std_
import qualified Data.Word as Std_
import qualified Data.Int as Std_
import Prelude ((<$>), (<*>), (>>=))
data Maybe t
    = Maybe'nothing 
    | Maybe'just t
    | Maybe'unknown' Std_.Word16
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))) => (Default.Default (Maybe t)) where
    def  = GenHelpersPure.defaultStruct
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))) => (Classes.FromStruct Message.ConstMsg (Maybe t)) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))) => (Classes.Decerialize (Maybe t)) where
    type Cerial msg (Maybe t) = (Capnp.Gen.ById.Xb6421fb8e478d144.Maybe (Classes.Cerial msg t) msg)
    decerialize raw = (do
        raw <- (Capnp.Gen.ById.Xb6421fb8e478d144.get_Maybe' raw)
        case raw of
            (Capnp.Gen.ById.Xb6421fb8e478d144.Maybe'nothing) ->
                (Std_.pure Maybe'nothing)
            (Capnp.Gen.ById.Xb6421fb8e478d144.Maybe'just raw) ->
                (Maybe'just <$> (Classes.decerialize raw))
            (Capnp.Gen.ById.Xb6421fb8e478d144.Maybe'unknown' tag) ->
                (Std_.pure (Maybe'unknown' tag))
        )
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Marshal s (Maybe t)) where
    marshalInto raw_ value_ = case value_ of
        (Maybe'nothing) ->
            (Capnp.Gen.ById.Xb6421fb8e478d144.set_Maybe'nothing raw_)
        (Maybe'just arg_) ->
            ((Classes.cerialize (Untyped.message raw_) arg_) >>= (Capnp.Gen.ById.Xb6421fb8e478d144.set_Maybe'just raw_))
        (Maybe'unknown' tag) ->
            (Capnp.Gen.ById.Xb6421fb8e478d144.set_Maybe'unknown' raw_ tag)
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (Maybe t))
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (Maybe t))) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (V.Vector (Maybe t)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (Maybe t))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (Maybe t)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (Maybe t))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (Maybe t)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (Maybe t))))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data Either a b
    = Either'left a
    | Either'right b
    | Either'unknown' Std_.Word16
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance ((Classes.Decerialize a)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg a))
         ,(Classes.Decerialize b)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg b))) => (Default.Default (Either a b)) where
    def  = GenHelpersPure.defaultStruct
instance ((Classes.Decerialize a)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg a))
         ,(Classes.Decerialize b)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg b))) => (Classes.FromStruct Message.ConstMsg (Either a b)) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance ((Classes.Decerialize a)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg a))
         ,(Classes.Decerialize b)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg b))) => (Classes.Decerialize (Either a b)) where
    type Cerial msg (Either a b) = (Capnp.Gen.ById.Xb6421fb8e478d144.Either (Classes.Cerial msg a) (Classes.Cerial msg b) msg)
    decerialize raw = (do
        raw <- (Capnp.Gen.ById.Xb6421fb8e478d144.get_Either' raw)
        case raw of
            (Capnp.Gen.ById.Xb6421fb8e478d144.Either'left raw) ->
                (Either'left <$> (Classes.decerialize raw))
            (Capnp.Gen.ById.Xb6421fb8e478d144.Either'right raw) ->
                (Either'right <$> (Classes.decerialize raw))
            (Capnp.Gen.ById.Xb6421fb8e478d144.Either'unknown' tag) ->
                (Std_.pure (Either'unknown' tag))
        )
instance ((Classes.Decerialize a)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg a))
         ,(Classes.Decerialize b)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg b))
         ,(Classes.Cerialize s a)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) a))
         ,(Classes.Cerialize s b)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) b))) => (Classes.Marshal s (Either a b)) where
    marshalInto raw_ value_ = case value_ of
        (Either'left arg_) ->
            ((Classes.cerialize (Untyped.message raw_) arg_) >>= (Capnp.Gen.ById.Xb6421fb8e478d144.set_Either'left raw_))
        (Either'right arg_) ->
            ((Classes.cerialize (Untyped.message raw_) arg_) >>= (Capnp.Gen.ById.Xb6421fb8e478d144.set_Either'right raw_))
        (Either'unknown' tag) ->
            (Capnp.Gen.ById.Xb6421fb8e478d144.set_Either'unknown' raw_ tag)
instance ((Classes.Decerialize a)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg a))
         ,(Classes.Decerialize b)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg b))
         ,(Classes.Cerialize s a)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) a))
         ,(Classes.Cerialize s b)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) b))) => (Classes.Cerialize s (Either a b))
instance ((Classes.Decerialize a)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg a))
         ,(Classes.Decerialize b)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg b))
         ,(Classes.Cerialize s a)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) a))
         ,(Classes.Cerialize s b)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) b))) => (Classes.Cerialize s (V.Vector (Either a b))) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance ((Classes.Decerialize a)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg a))
         ,(Classes.Decerialize b)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg b))
         ,(Classes.Cerialize s a)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) a))
         ,(Classes.Cerialize s b)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) b))) => (Classes.Cerialize s (V.Vector (V.Vector (Either a b)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize a)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg a))
         ,(Classes.Decerialize b)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg b))
         ,(Classes.Cerialize s a)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) a))
         ,(Classes.Cerialize s b)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) b))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (Either a b))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize a)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg a))
         ,(Classes.Decerialize b)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg b))
         ,(Classes.Cerialize s a)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) a))
         ,(Classes.Cerialize s b)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) b))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (Either a b)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize a)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg a))
         ,(Classes.Decerialize b)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg b))
         ,(Classes.Cerialize s a)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) a))
         ,(Classes.Cerialize s b)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) b))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (Either a b))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize a)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg a))
         ,(Classes.Decerialize b)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg b))
         ,(Classes.Cerialize s a)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) a))
         ,(Classes.Cerialize s b)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) b))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (Either a b)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize a)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg a))
         ,(Classes.Decerialize b)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg b))
         ,(Classes.Cerialize s a)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) a))
         ,(Classes.Cerialize s b)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) b))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (Either a b))))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data Pair a b
    = Pair 
        {fst :: a,snd :: b}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance ((Classes.Decerialize a)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg a))
         ,(Classes.Decerialize b)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg b))) => (Default.Default (Pair a b)) where
    def  = GenHelpersPure.defaultStruct
instance ((Classes.Decerialize a)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg a))
         ,(Classes.Decerialize b)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg b))) => (Classes.FromStruct Message.ConstMsg (Pair a b)) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance ((Classes.Decerialize a)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg a))
         ,(Classes.Decerialize b)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg b))) => (Classes.Decerialize (Pair a b)) where
    type Cerial msg (Pair a b) = (Capnp.Gen.ById.Xb6421fb8e478d144.Pair (Classes.Cerial msg a) (Classes.Cerial msg b) msg)
    decerialize raw = (Pair <$> ((Capnp.Gen.ById.Xb6421fb8e478d144.get_Pair'fst raw) >>= Classes.decerialize)
                            <*> ((Capnp.Gen.ById.Xb6421fb8e478d144.get_Pair'snd raw) >>= Classes.decerialize))
instance ((Classes.Decerialize a)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg a))
         ,(Classes.Decerialize b)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg b))
         ,(Classes.Cerialize s a)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) a))
         ,(Classes.Cerialize s b)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) b))) => (Classes.Marshal s (Pair a b)) where
    marshalInto raw_ value_ = case value_ of
        Pair{..} ->
            (do
                ((Classes.cerialize (Untyped.message raw_) fst) >>= (Capnp.Gen.ById.Xb6421fb8e478d144.set_Pair'fst raw_))
                ((Classes.cerialize (Untyped.message raw_) snd) >>= (Capnp.Gen.ById.Xb6421fb8e478d144.set_Pair'snd raw_))
                (Std_.pure ())
                )
instance ((Classes.Decerialize a)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg a))
         ,(Classes.Decerialize b)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg b))
         ,(Classes.Cerialize s a)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) a))
         ,(Classes.Cerialize s b)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) b))) => (Classes.Cerialize s (Pair a b))
instance ((Classes.Decerialize a)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg a))
         ,(Classes.Decerialize b)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg b))
         ,(Classes.Cerialize s a)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) a))
         ,(Classes.Cerialize s b)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) b))) => (Classes.Cerialize s (V.Vector (Pair a b))) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance ((Classes.Decerialize a)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg a))
         ,(Classes.Decerialize b)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg b))
         ,(Classes.Cerialize s a)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) a))
         ,(Classes.Cerialize s b)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) b))) => (Classes.Cerialize s (V.Vector (V.Vector (Pair a b)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize a)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg a))
         ,(Classes.Decerialize b)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg b))
         ,(Classes.Cerialize s a)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) a))
         ,(Classes.Cerialize s b)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) b))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (Pair a b))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize a)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg a))
         ,(Classes.Decerialize b)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg b))
         ,(Classes.Cerialize s a)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) a))
         ,(Classes.Cerialize s b)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) b))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (Pair a b)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize a)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg a))
         ,(Classes.Decerialize b)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg b))
         ,(Classes.Cerialize s a)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) a))
         ,(Classes.Cerialize s b)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) b))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (Pair a b))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize a)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg a))
         ,(Classes.Decerialize b)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg b))
         ,(Classes.Cerialize s a)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) a))
         ,(Classes.Cerialize s b)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) b))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (Pair a b)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize a)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg a))
         ,(Classes.Decerialize b)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg b))
         ,(Classes.Cerialize s a)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) a))
         ,(Classes.Cerialize s b)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) b))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (Pair a b))))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data Nested t
    = Nested 
        {}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))) => (Default.Default (Nested t)) where
    def  = GenHelpersPure.defaultStruct
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))) => (Classes.FromStruct Message.ConstMsg (Nested t)) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))) => (Classes.Decerialize (Nested t)) where
    type Cerial msg (Nested t) = (Capnp.Gen.ById.Xb6421fb8e478d144.Nested (Classes.Cerial msg t) msg)
    decerialize raw = (Std_.pure Nested)
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Marshal s (Nested t)) where
    marshalInto raw_ value_ = case value_ of
        (Nested) ->
            (do
                (Std_.pure ())
                )
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (Nested t))
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (Nested t))) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (V.Vector (Nested t)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (Nested t))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (Nested t)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (Nested t))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (Nested t)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (Nested t))))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data Nested'SomeStruct t
    = Nested'SomeStruct 
        {value :: t}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))) => (Default.Default (Nested'SomeStruct t)) where
    def  = GenHelpersPure.defaultStruct
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))) => (Classes.FromStruct Message.ConstMsg (Nested'SomeStruct t)) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))) => (Classes.Decerialize (Nested'SomeStruct t)) where
    type Cerial msg (Nested'SomeStruct t) = (Capnp.Gen.ById.Xb6421fb8e478d144.Nested'SomeStruct (Classes.Cerial msg t) msg)
    decerialize raw = (Nested'SomeStruct <$> ((Capnp.Gen.ById.Xb6421fb8e478d144.get_Nested'SomeStruct'value raw) >>= Classes.decerialize))
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Marshal s (Nested'SomeStruct t)) where
    marshalInto raw_ value_ = case value_ of
        Nested'SomeStruct{..} ->
            (do
                ((Classes.cerialize (Untyped.message raw_) value) >>= (Capnp.Gen.ById.Xb6421fb8e478d144.set_Nested'SomeStruct'value raw_))
                (Std_.pure ())
                )
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (Nested'SomeStruct t))
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (Nested'SomeStruct t))) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (V.Vector (Nested'SomeStruct t)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (Nested'SomeStruct t))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (Nested'SomeStruct t)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (Nested'SomeStruct t))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (Nested'SomeStruct t)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (Nested'SomeStruct t))))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
newtype Nested'SomeInterface t
    = Nested'SomeInterface Message.Client
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
class ((MonadIO.MonadIO m)
      ,(Server.Server m cap)) => (Nested'SomeInterface'server_ m cap t) | cap -> t where
    {-# MINIMAL nested'SomeInterface'method #-}
    nested'SomeInterface'method :: cap -> (Server.MethodHandler m (Nested'SomeInterface'method'params t) (Nested'SomeInterface'method'results t))
    nested'SomeInterface'method _ = Server.methodUnimplemented
export_Nested'SomeInterface :: ((STM.MonadSTM m)
                               ,(Nested'SomeInterface'server_ Std_.IO cap t)) => Supervisors.Supervisor -> cap -> (m (Nested'SomeInterface t))
export_Nested'SomeInterface sup_ server_ = (STM.liftSTM (Nested'SomeInterface <$> (Rpc.export sup_ Server.ServerOps{handleCast = (Server.unwrap server_)
                                                                                                                   ,handleStop = (Server.shutdown server_)
                                                                                                                   ,handleCall = (\interfaceId_ methodId_ -> case interfaceId_ of
                                                                                                                       17400383877992806407 ->
                                                                                                                           case methodId_ of
                                                                                                                               0 ->
                                                                                                                                   (Server.toUntypedHandler (nested'SomeInterface'method server_))
                                                                                                                               _ ->
                                                                                                                                   Server.methodUnimplemented
                                                                                                                       _ ->
                                                                                                                           Server.methodUnimplemented)})))
instance (Rpc.IsClient (Nested'SomeInterface t)) where
    fromClient  = Nested'SomeInterface
    toClient (Nested'SomeInterface client) = client
instance (Classes.FromPtr msg (Nested'SomeInterface t)) where
    fromPtr  = RpcHelpers.isClientFromPtr
instance (Classes.ToPtr s (Nested'SomeInterface t)) where
    toPtr  = RpcHelpers.isClientToPtr
instance (Classes.Decerialize (Nested'SomeInterface t)) where
    type Cerial msg (Nested'SomeInterface t) = (Capnp.Gen.ById.Xb6421fb8e478d144.Nested'SomeInterface (Classes.Cerial msg t) msg)
    decerialize (Capnp.Gen.ById.Xb6421fb8e478d144.Nested'SomeInterface'newtype_ maybeCap) = case maybeCap of
        (Std_.Nothing) ->
            (Std_.pure (Nested'SomeInterface Message.nullClient))
        (Std_.Just cap) ->
            (Nested'SomeInterface <$> (Untyped.getClient cap))
instance (Classes.Cerialize s (Nested'SomeInterface t)) where
    cerialize msg (Nested'SomeInterface client) = (Capnp.Gen.ById.Xb6421fb8e478d144.Nested'SomeInterface'newtype_ <$> (Std_.Just <$> (Untyped.appendCap msg client)))
instance (Server.Server Std_.IO (Nested'SomeInterface t))
instance (Nested'SomeInterface'server_ Std_.IO (Nested'SomeInterface t) t) where
    nested'SomeInterface'method (Nested'SomeInterface client) = (Rpc.clientMethodHandler 17400383877992806407 0 client)
data Nested'SomeInterface'method'params t
    = Nested'SomeInterface'method'params 
        {arg :: t}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))) => (Default.Default (Nested'SomeInterface'method'params t)) where
    def  = GenHelpersPure.defaultStruct
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))) => (Classes.FromStruct Message.ConstMsg (Nested'SomeInterface'method'params t)) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))) => (Classes.Decerialize (Nested'SomeInterface'method'params t)) where
    type Cerial msg (Nested'SomeInterface'method'params t) = (Capnp.Gen.ById.Xb6421fb8e478d144.Nested'SomeInterface'method'params (Classes.Cerial msg t) msg)
    decerialize raw = (Nested'SomeInterface'method'params <$> ((Capnp.Gen.ById.Xb6421fb8e478d144.get_Nested'SomeInterface'method'params'arg raw) >>= Classes.decerialize))
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Marshal s (Nested'SomeInterface'method'params t)) where
    marshalInto raw_ value_ = case value_ of
        Nested'SomeInterface'method'params{..} ->
            (do
                ((Classes.cerialize (Untyped.message raw_) arg) >>= (Capnp.Gen.ById.Xb6421fb8e478d144.set_Nested'SomeInterface'method'params'arg raw_))
                (Std_.pure ())
                )
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (Nested'SomeInterface'method'params t))
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (Nested'SomeInterface'method'params t))) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (V.Vector (Nested'SomeInterface'method'params t)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (Nested'SomeInterface'method'params t))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (Nested'SomeInterface'method'params t)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (Nested'SomeInterface'method'params t))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (Nested'SomeInterface'method'params t)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (Nested'SomeInterface'method'params t))))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data Nested'SomeInterface'method'results t
    = Nested'SomeInterface'method'results 
        {result :: t}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))) => (Default.Default (Nested'SomeInterface'method'results t)) where
    def  = GenHelpersPure.defaultStruct
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))) => (Classes.FromStruct Message.ConstMsg (Nested'SomeInterface'method'results t)) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))) => (Classes.Decerialize (Nested'SomeInterface'method'results t)) where
    type Cerial msg (Nested'SomeInterface'method'results t) = (Capnp.Gen.ById.Xb6421fb8e478d144.Nested'SomeInterface'method'results (Classes.Cerial msg t) msg)
    decerialize raw = (Nested'SomeInterface'method'results <$> ((Capnp.Gen.ById.Xb6421fb8e478d144.get_Nested'SomeInterface'method'results'result raw) >>= Classes.decerialize))
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Marshal s (Nested'SomeInterface'method'results t)) where
    marshalInto raw_ value_ = case value_ of
        Nested'SomeInterface'method'results{..} ->
            (do
                ((Classes.cerialize (Untyped.message raw_) result) >>= (Capnp.Gen.ById.Xb6421fb8e478d144.set_Nested'SomeInterface'method'results'result raw_))
                (Std_.pure ())
                )
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (Nested'SomeInterface'method'results t))
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (Nested'SomeInterface'method'results t))) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (V.Vector (Nested'SomeInterface'method'results t)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (Nested'SomeInterface'method'results t))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (Nested'SomeInterface'method'results t)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (Nested'SomeInterface'method'results t))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (Nested'SomeInterface'method'results t)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (Nested'SomeInterface'method'results t))))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data Specialized t
    = Specialized 
        {either :: (Either T.Text t)
        ,nestedStruct :: (Nested'SomeStruct BS.ByteString)}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))) => (Default.Default (Specialized t)) where
    def  = GenHelpersPure.defaultStruct
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))) => (Classes.FromStruct Message.ConstMsg (Specialized t)) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))) => (Classes.Decerialize (Specialized t)) where
    type Cerial msg (Specialized t) = (Capnp.Gen.ById.Xb6421fb8e478d144.Specialized (Classes.Cerial msg t) msg)
    decerialize raw = (Specialized <$> ((Capnp.Gen.ById.Xb6421fb8e478d144.get_Specialized'either raw) >>= Classes.decerialize)
                                   <*> ((Capnp.Gen.ById.Xb6421fb8e478d144.get_Specialized'nestedStruct raw) >>= Classes.decerialize))
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Marshal s (Specialized t)) where
    marshalInto raw_ value_ = case value_ of
        Specialized{..} ->
            (do
                ((Classes.cerialize (Untyped.message raw_) either) >>= (Capnp.Gen.ById.Xb6421fb8e478d144.set_Specialized'either raw_))
                ((Classes.cerialize (Untyped.message raw_) nestedStruct) >>= (Capnp.Gen.ById.Xb6421fb8e478d144.set_Specialized'nestedStruct raw_))
                (Std_.pure ())
                )
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (Specialized t))
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (Specialized t))) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (V.Vector (Specialized t)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (Specialized t))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (Specialized t)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (Specialized t))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (Specialized t)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (Specialized t))))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data HasGroup t
    = HasGroup 
        {theGroup :: (HasGroup'theGroup t)}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))) => (Default.Default (HasGroup t)) where
    def  = GenHelpersPure.defaultStruct
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))) => (Classes.FromStruct Message.ConstMsg (HasGroup t)) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))) => (Classes.Decerialize (HasGroup t)) where
    type Cerial msg (HasGroup t) = (Capnp.Gen.ById.Xb6421fb8e478d144.HasGroup (Classes.Cerial msg t) msg)
    decerialize raw = (HasGroup <$> ((Capnp.Gen.ById.Xb6421fb8e478d144.get_HasGroup'theGroup raw) >>= Classes.decerialize))
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Marshal s (HasGroup t)) where
    marshalInto raw_ value_ = case value_ of
        HasGroup{..} ->
            (do
                (do
                    raw_ <- (Capnp.Gen.ById.Xb6421fb8e478d144.get_HasGroup'theGroup raw_)
                    (Classes.marshalInto raw_ theGroup)
                    )
                (Std_.pure ())
                )
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (HasGroup t))
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (HasGroup t))) where
    cerialize  = GenHelpersPure.cerializeCompositeVec
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (V.Vector (HasGroup t)))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (HasGroup t))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (HasGroup t)))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (HasGroup t))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (HasGroup t)))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Cerialize s (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (V.Vector (HasGroup t))))))))) where
    cerialize  = GenHelpersPure.cerializeBasicVec
data HasGroup'theGroup t
    = HasGroup'theGroup' 
        {value :: t}
    deriving(Std_.Show
            ,Std_.Eq
            ,Generics.Generic)
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))) => (Default.Default (HasGroup'theGroup t)) where
    def  = GenHelpersPure.defaultStruct
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))) => (Classes.FromStruct Message.ConstMsg (HasGroup'theGroup t)) where
    fromStruct struct = ((Classes.fromStruct struct) >>= Classes.decerialize)
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))) => (Classes.Decerialize (HasGroup'theGroup t)) where
    type Cerial msg (HasGroup'theGroup t) = (Capnp.Gen.ById.Xb6421fb8e478d144.HasGroup'theGroup (Classes.Cerial msg t) msg)
    decerialize raw = (HasGroup'theGroup' <$> ((Capnp.Gen.ById.Xb6421fb8e478d144.get_HasGroup'theGroup'value raw) >>= Classes.decerialize))
instance ((Classes.Decerialize t)
         ,(Classes.FromPtr Message.ConstMsg (Classes.Cerial Message.ConstMsg t))
         ,(Classes.Cerialize s t)
         ,(Classes.ToPtr s (Classes.Cerial (Message.MutMsg s) t))) => (Classes.Marshal s (HasGroup'theGroup t)) where
    marshalInto raw_ value_ = case value_ of
        HasGroup'theGroup'{..} ->
            (do
                ((Classes.cerialize (Untyped.message raw_) value) >>= (Capnp.Gen.ById.Xb6421fb8e478d144.set_HasGroup'theGroup'value raw_))
                (Std_.pure ())
                )