-- THIS FILE WAS AUTO-GENERATED BY ./generate.sh
{-# LANGUAGE FlexibleInstances #-}
{-# LANGUAGE FunctionalDependencies #-}
{-# LANGUAGE MultiParamTypeClasses #-}
{-# LANGUAGE RankNTypes #-}
module Network.Riak.Protocol.Lens where
import Data.ByteString.Lazy (ByteString)
import Data.Sequence (Seq)
import GHC.Int (Int64)
import GHC.Word (Word32)
import qualified Network.Riak.Protocol.AuthRequest
import qualified Network.Riak.Protocol.BucketKeyPreflistItem
import qualified Network.Riak.Protocol.BucketProps
import qualified Network.Riak.Protocol.BucketProps.ReplMode
import qualified Network.Riak.Protocol.CommitHook
import qualified Network.Riak.Protocol.Content
import qualified Network.Riak.Protocol.CounterGetRequest
import qualified Network.Riak.Protocol.CounterGetResponse
import qualified Network.Riak.Protocol.CounterOp
import qualified Network.Riak.Protocol.CounterUpdateRequest
import qualified Network.Riak.Protocol.CounterUpdateResponse
import qualified Network.Riak.Protocol.CSBucketRequest
import qualified Network.Riak.Protocol.CSBucketResponse
import qualified Network.Riak.Protocol.DeleteRequest
import qualified Network.Riak.Protocol.DtFetchRequest
import qualified Network.Riak.Protocol.DtFetchResponse
import qualified Network.Riak.Protocol.DtFetchResponse.DataType
import qualified Network.Riak.Protocol.DtOp
import qualified Network.Riak.Protocol.DtUpdateRequest
import qualified Network.Riak.Protocol.DtUpdateResponse
import qualified Network.Riak.Protocol.DtValue
import qualified Network.Riak.Protocol.ErrorResponse
import qualified Network.Riak.Protocol.GetBucketKeyPreflistRequest
import qualified Network.Riak.Protocol.GetBucketKeyPreflistResponse
import qualified Network.Riak.Protocol.GetBucketRequest
import qualified Network.Riak.Protocol.GetBucketResponse
import qualified Network.Riak.Protocol.GetBucketTypeRequest
import qualified Network.Riak.Protocol.GetClientIDRequest
import qualified Network.Riak.Protocol.GetClientIDResponse
import qualified Network.Riak.Protocol.GetRequest
import qualified Network.Riak.Protocol.GetResponse
import qualified Network.Riak.Protocol.GetServerInfoRequest
import qualified Network.Riak.Protocol.IndexObject
import qualified Network.Riak.Protocol.IndexRequest
import qualified Network.Riak.Protocol.IndexRequest.IndexQueryType
import qualified Network.Riak.Protocol.IndexResponse
import qualified Network.Riak.Protocol.Link
import qualified Network.Riak.Protocol.ListBucketsRequest
import qualified Network.Riak.Protocol.ListBucketsResponse
import qualified Network.Riak.Protocol.ListKeysRequest
import qualified Network.Riak.Protocol.ListKeysResponse
import qualified Network.Riak.Protocol.MapEntry
import qualified Network.Riak.Protocol.MapField
import qualified Network.Riak.Protocol.MapField.MapFieldType
import qualified Network.Riak.Protocol.MapOp
import qualified Network.Riak.Protocol.MapReduce
import qualified Network.Riak.Protocol.MapReduceRequest
import qualified Network.Riak.Protocol.MapUpdate
import qualified Network.Riak.Protocol.MapUpdate.FlagOp
import qualified Network.Riak.Protocol.ModFun
import qualified Network.Riak.Protocol.Pair
import qualified Network.Riak.Protocol.PingRequest
import qualified Network.Riak.Protocol.PutRequest
import qualified Network.Riak.Protocol.PutResponse
import qualified Network.Riak.Protocol.ResetBucketRequest
import qualified Network.Riak.Protocol.SearchDoc
import qualified Network.Riak.Protocol.SearchQueryRequest
import qualified Network.Riak.Protocol.SearchQueryResponse
import qualified Network.Riak.Protocol.ServerInfo
import qualified Network.Riak.Protocol.SetBucketRequest
import qualified Network.Riak.Protocol.SetBucketTypeRequest
import qualified Network.Riak.Protocol.SetClientIDRequest
import qualified Network.Riak.Protocol.SetOp
import qualified Network.Riak.Protocol.YzIndex
import qualified Network.Riak.Protocol.YzIndexDeleteRequest
import qualified Network.Riak.Protocol.YzIndexGetRequest
import qualified Network.Riak.Protocol.YzIndexGetResponse
import qualified Network.Riak.Protocol.YzIndexPutRequest
import qualified Network.Riak.Protocol.YzSchema
import qualified Network.Riak.Protocol.YzSchemaGetRequest
import qualified Network.Riak.Protocol.YzSchemaGetResponse
import qualified Network.Riak.Protocol.YzSchemaPutRequest
type Lens' s a = forall f. Functor f => (a -> f a) -> s -> f s
class HasPassword s a | s -> a where
  password :: Lens' s a
instance HasPassword Network.Riak.Protocol.AuthRequest.AuthRequest ByteString where
  {-# INLINE password #-}
  password f_agC6 (Network.Riak.Protocol.AuthRequest.AuthRequest x_agC7 x_agC8)
    = fmap (\ y_agC9 -> Network.Riak.Protocol.AuthRequest.AuthRequest x_agC7 y_agC9) (f_agC6 x_agC8)
class HasUser s a | s -> a where
  user :: Lens' s a
instance HasUser Network.Riak.Protocol.AuthRequest.AuthRequest ByteString where
  {-# INLINE user #-}
  user f_agCa (Network.Riak.Protocol.AuthRequest.AuthRequest x_agCb x_agCc)
    = fmap (\ y_agCd -> Network.Riak.Protocol.AuthRequest.AuthRequest y_agCd x_agCc) (f_agCa x_agCb)
class HasNode s a | s -> a where
  node :: Lens' s a
instance HasNode Network.Riak.Protocol.BucketKeyPreflistItem.BucketKeyPreflistItem ByteString where
  {-# INLINE node #-}
  node f_agE6 (Network.Riak.Protocol.BucketKeyPreflistItem.BucketKeyPreflistItem x_agE7 x_agE8 x_agE9)
    = fmap (\ y_agEa -> Network.Riak.Protocol.BucketKeyPreflistItem.BucketKeyPreflistItem x_agE7 y_agEa x_agE9) (f_agE6 x_agE8)
class HasPartition s a | s -> a where
  partition :: Lens' s a
instance HasPartition Network.Riak.Protocol.BucketKeyPreflistItem.BucketKeyPreflistItem Int64 where
  {-# INLINE partition #-}
  partition f_agEb (Network.Riak.Protocol.BucketKeyPreflistItem.BucketKeyPreflistItem x_agEc x_agEd x_agEe)
    = fmap (\ y_agEf -> Network.Riak.Protocol.BucketKeyPreflistItem.BucketKeyPreflistItem y_agEf x_agEd x_agEe) (f_agEb x_agEc)
class HasPrimary s a | s -> a where
  primary :: Lens' s a
instance HasPrimary Network.Riak.Protocol.BucketKeyPreflistItem.BucketKeyPreflistItem Bool where
  {-# INLINE primary #-}
  primary f_agEg (Network.Riak.Protocol.BucketKeyPreflistItem.BucketKeyPreflistItem x_agEh x_agEi x_agEj)
    = fmap (\ y_agEk -> Network.Riak.Protocol.BucketKeyPreflistItem.BucketKeyPreflistItem x_agEh x_agEi y_agEk) (f_agEg x_agEj)
class HasAllowMult s a | s -> a where
  allow_mult :: Lens' s a
instance HasAllowMult Network.Riak.Protocol.BucketProps.BucketProps (Maybe Bool) where
  {-# INLINE allow_mult #-}
  allow_mult
    f_agGs
    (Network.Riak.Protocol.BucketProps.BucketProps x_agGt
                                                   x_agGu
                                                   x_agGv
                                                   x_agGw
                                                   x_agGx
                                                   x_agGy
                                                   x_agGz
                                                   x_agGA
                                                   x_agGB
                                                   x_agGC
                                                   x_agGD
                                                   x_agGE
                                                   x_agGF
                                                   x_agGG
                                                   x_agGH
                                                   x_agGI
                                                   x_agGJ
                                                   x_agGK
                                                   x_agGL
                                                   x_agGM
                                                   x_agGN
                                                   x_agGO
                                                   x_agGP
                                                   x_agGQ
                                                   x_agGR
                                                   x_agGS
                                                   x_agGT
                                                   x_agGU)
    = fmap
        (\ y_agGV
           -> Network.Riak.Protocol.BucketProps.BucketProps
                x_agGt
                y_agGV
                x_agGv
                x_agGw
                x_agGx
                x_agGy
                x_agGz
                x_agGA
                x_agGB
                x_agGC
                x_agGD
                x_agGE
                x_agGF
                x_agGG
                x_agGH
                x_agGI
                x_agGJ
                x_agGK
                x_agGL
                x_agGM
                x_agGN
                x_agGO
                x_agGP
                x_agGQ
                x_agGR
                x_agGS
                x_agGT
                x_agGU)
        (f_agGs x_agGu)
class HasBackend s a | s -> a where
  backend :: Lens' s a
instance HasBackend Network.Riak.Protocol.BucketProps.BucketProps (Maybe ByteString) where
  {-# INLINE backend #-}
  backend
    f_agGW
    (Network.Riak.Protocol.BucketProps.BucketProps x_agGX
                                                   x_agGY
                                                   x_agGZ
                                                   x_agH0
                                                   x_agH1
                                                   x_agH2
                                                   x_agH3
                                                   x_agH4
                                                   x_agH5
                                                   x_agH6
                                                   x_agH7
                                                   x_agH8
                                                   x_agH9
                                                   x_agHa
                                                   x_agHb
                                                   x_agHc
                                                   x_agHd
                                                   x_agHe
                                                   x_agHf
                                                   x_agHg
                                                   x_agHh
                                                   x_agHi
                                                   x_agHj
                                                   x_agHk
                                                   x_agHl
                                                   x_agHm
                                                   x_agHn
                                                   x_agHo)
    = fmap
        (\ y_agHp
           -> Network.Riak.Protocol.BucketProps.BucketProps
                x_agGX
                x_agGY
                x_agGZ
                x_agH0
                x_agH1
                x_agH2
                x_agH3
                x_agH4
                x_agH5
                x_agH6
                x_agH7
                x_agH8
                x_agH9
                x_agHa
                x_agHb
                x_agHc
                x_agHd
                x_agHe
                x_agHf
                x_agHg
                x_agHh
                y_agHp
                x_agHj
                x_agHk
                x_agHl
                x_agHm
                x_agHn
                x_agHo)
        (f_agGW x_agHi)
class HasBasicQuorum s a | s -> a where
  basic_quorum :: Lens' s a
instance HasBasicQuorum Network.Riak.Protocol.BucketProps.BucketProps (Maybe Bool) where
  {-# INLINE basic_quorum #-}
  basic_quorum
    f_agHq
    (Network.Riak.Protocol.BucketProps.BucketProps x_agHr
                                                   x_agHs
                                                   x_agHt
                                                   x_agHu
                                                   x_agHv
                                                   x_agHw
                                                   x_agHx
                                                   x_agHy
                                                   x_agHz
                                                   x_agHA
                                                   x_agHB
                                                   x_agHC
                                                   x_agHD
                                                   x_agHE
                                                   x_agHF
                                                   x_agHG
                                                   x_agHH
                                                   x_agHI
                                                   x_agHJ
                                                   x_agHK
                                                   x_agHL
                                                   x_agHM
                                                   x_agHN
                                                   x_agHO
                                                   x_agHP
                                                   x_agHQ
                                                   x_agHR
                                                   x_agHS)
    = fmap
        (\ y_agHT
           -> Network.Riak.Protocol.BucketProps.BucketProps
                x_agHr
                x_agHs
                x_agHt
                x_agHu
                x_agHv
                x_agHw
                x_agHx
                x_agHy
                x_agHz
                x_agHA
                x_agHB
                x_agHC
                x_agHD
                x_agHE
                x_agHF
                x_agHG
                x_agHH
                x_agHI
                x_agHJ
                y_agHT
                x_agHL
                x_agHM
                x_agHN
                x_agHO
                x_agHP
                x_agHQ
                x_agHR
                x_agHS)
        (f_agHq x_agHK)
class HasBigVclock s a | s -> a where
  big_vclock :: Lens' s a
instance HasBigVclock Network.Riak.Protocol.BucketProps.BucketProps (Maybe Word32) where
  {-# INLINE big_vclock #-}
  big_vclock
    f_agHU
    (Network.Riak.Protocol.BucketProps.BucketProps x_agHV
                                                   x_agHW
                                                   x_agHX
                                                   x_agHY
                                                   x_agHZ
                                                   x_agI0
                                                   x_agI1
                                                   x_agI2
                                                   x_agI3
                                                   x_agI4
                                                   x_agI5
                                                   x_agI6
                                                   x_agI7
                                                   x_agI8
                                                   x_agI9
                                                   x_agIa
                                                   x_agIb
                                                   x_agIc
                                                   x_agId
                                                   x_agIe
                                                   x_agIf
                                                   x_agIg
                                                   x_agIh
                                                   x_agIi
                                                   x_agIj
                                                   x_agIk
                                                   x_agIl
                                                   x_agIm)
    = fmap
        (\ y_agIn
           -> Network.Riak.Protocol.BucketProps.BucketProps
                x_agHV
                x_agHW
                x_agHX
                x_agHY
                x_agHZ
                x_agI0
                x_agI1
                x_agI2
                x_agI3
                x_agI4
                x_agI5
                y_agIn
                x_agI7
                x_agI8
                x_agI9
                x_agIa
                x_agIb
                x_agIc
                x_agId
                x_agIe
                x_agIf
                x_agIg
                x_agIh
                x_agIi
                x_agIj
                x_agIk
                x_agIl
                x_agIm)
        (f_agHU x_agI6)
class HasChashKeyfun s a | s -> a where
  chash_keyfun :: Lens' s a
instance HasChashKeyfun Network.Riak.Protocol.BucketProps.BucketProps (Maybe Network.Riak.Protocol.ModFun.ModFun) where
  {-# INLINE chash_keyfun #-}
  chash_keyfun
    f_agIo
    (Network.Riak.Protocol.BucketProps.BucketProps x_agIp
                                                   x_agIq
                                                   x_agIr
                                                   x_agIs
                                                   x_agIt
                                                   x_agIu
                                                   x_agIv
                                                   x_agIw
                                                   x_agIx
                                                   x_agIy
                                                   x_agIz
                                                   x_agIA
                                                   x_agIB
                                                   x_agIC
                                                   x_agID
                                                   x_agIE
                                                   x_agIF
                                                   x_agIG
                                                   x_agIH
                                                   x_agII
                                                   x_agIJ
                                                   x_agIK
                                                   x_agIL
                                                   x_agIM
                                                   x_agIN
                                                   x_agIO
                                                   x_agIP
                                                   x_agIQ)
    = fmap
        (\ y_agIR
           -> Network.Riak.Protocol.BucketProps.BucketProps
                x_agIp
                x_agIq
                x_agIr
                x_agIs
                x_agIt
                x_agIu
                x_agIv
                y_agIR
                x_agIx
                x_agIy
                x_agIz
                x_agIA
                x_agIB
                x_agIC
                x_agID
                x_agIE
                x_agIF
                x_agIG
                x_agIH
                x_agII
                x_agIJ
                x_agIK
                x_agIL
                x_agIM
                x_agIN
                x_agIO
                x_agIP
                x_agIQ)
        (f_agIo x_agIw)
class HasConsistent s a | s -> a where
  consistent :: Lens' s a
instance HasConsistent Network.Riak.Protocol.BucketProps.BucketProps (Maybe Bool) where
  {-# INLINE consistent #-}
  consistent
    f_agIS
    (Network.Riak.Protocol.BucketProps.BucketProps x_agIT
                                                   x_agIU
                                                   x_agIV
                                                   x_agIW
                                                   x_agIX
                                                   x_agIY
                                                   x_agIZ
                                                   x_agJ0
                                                   x_agJ1
                                                   x_agJ2
                                                   x_agJ3
                                                   x_agJ4
                                                   x_agJ5
                                                   x_agJ6
                                                   x_agJ7
                                                   x_agJ8
                                                   x_agJ9
                                                   x_agJa
                                                   x_agJb
                                                   x_agJc
                                                   x_agJd
                                                   x_agJe
                                                   x_agJf
                                                   x_agJg
                                                   x_agJh
                                                   x_agJi
                                                   x_agJj
                                                   x_agJk)
    = fmap
        (\ y_agJl
           -> Network.Riak.Protocol.BucketProps.BucketProps
                x_agIT
                x_agIU
                x_agIV
                x_agIW
                x_agIX
                x_agIY
                x_agIZ
                x_agJ0
                x_agJ1
                x_agJ2
                x_agJ3
                x_agJ4
                x_agJ5
                x_agJ6
                x_agJ7
                x_agJ8
                x_agJ9
                x_agJa
                x_agJb
                x_agJc
                x_agJd
                x_agJe
                x_agJf
                x_agJg
                x_agJh
                x_agJi
                y_agJl
                x_agJk)
        (f_agIS x_agJj)
class HasDatatype s a | s -> a where
  datatype :: Lens' s a
instance HasDatatype Network.Riak.Protocol.BucketProps.BucketProps (Maybe ByteString) where
  {-# INLINE datatype #-}
  datatype
    f_agJm
    (Network.Riak.Protocol.BucketProps.BucketProps x_agJn
                                                   x_agJo
                                                   x_agJp
                                                   x_agJq
                                                   x_agJr
                                                   x_agJs
                                                   x_agJt
                                                   x_agJu
                                                   x_agJv
                                                   x_agJw
                                                   x_agJx
                                                   x_agJy
                                                   x_agJz
                                                   x_agJA
                                                   x_agJB
                                                   x_agJC
                                                   x_agJD
                                                   x_agJE
                                                   x_agJF
                                                   x_agJG
                                                   x_agJH
                                                   x_agJI
                                                   x_agJJ
                                                   x_agJK
                                                   x_agJL
                                                   x_agJM
                                                   x_agJN
                                                   x_agJO)
    = fmap
        (\ y_agJP
           -> Network.Riak.Protocol.BucketProps.BucketProps
                x_agJn
                x_agJo
                x_agJp
                x_agJq
                x_agJr
                x_agJs
                x_agJt
                x_agJu
                x_agJv
                x_agJw
                x_agJx
                x_agJy
                x_agJz
                x_agJA
                x_agJB
                x_agJC
                x_agJD
                x_agJE
                x_agJF
                x_agJG
                x_agJH
                x_agJI
                x_agJJ
                x_agJK
                x_agJL
                y_agJP
                x_agJN
                x_agJO)
        (f_agJm x_agJM)
class HasDw s a | s -> a where
  dw :: Lens' s a
instance HasDw Network.Riak.Protocol.BucketProps.BucketProps (Maybe Word32) where
  {-# INLINE dw #-}
  dw
    f_agJQ
    (Network.Riak.Protocol.BucketProps.BucketProps x_agJR
                                                   x_agJS
                                                   x_agJT
                                                   x_agJU
                                                   x_agJV
                                                   x_agJW
                                                   x_agJX
                                                   x_agJY
                                                   x_agJZ
                                                   x_agK0
                                                   x_agK1
                                                   x_agK2
                                                   x_agK3
                                                   x_agK4
                                                   x_agK5
                                                   x_agK6
                                                   x_agK7
                                                   x_agK8
                                                   x_agK9
                                                   x_agKa
                                                   x_agKb
                                                   x_agKc
                                                   x_agKd
                                                   x_agKe
                                                   x_agKf
                                                   x_agKg
                                                   x_agKh
                                                   x_agKi)
    = fmap
        (\ y_agKj
           -> Network.Riak.Protocol.BucketProps.BucketProps
                x_agJR
                x_agJS
                x_agJT
                x_agJU
                x_agJV
                x_agJW
                x_agJX
                x_agJY
                x_agJZ
                x_agK0
                x_agK1
                x_agK2
                x_agK3
                x_agK4
                x_agK5
                x_agK6
                x_agK7
                y_agKj
                x_agK9
                x_agKa
                x_agKb
                x_agKc
                x_agKd
                x_agKe
                x_agKf
                x_agKg
                x_agKh
                x_agKi)
        (f_agJQ x_agK8)
class HasHasPostcommit s a | s -> a where
  has_postcommit :: Lens' s a
instance HasHasPostcommit Network.Riak.Protocol.BucketProps.BucketProps (Maybe Bool) where
  {-# INLINE has_postcommit #-}
  has_postcommit
    f_agKk
    (Network.Riak.Protocol.BucketProps.BucketProps x_agKl
                                                   x_agKm
                                                   x_agKn
                                                   x_agKo
                                                   x_agKp
                                                   x_agKq
                                                   x_agKr
                                                   x_agKs
                                                   x_agKt
                                                   x_agKu
                                                   x_agKv
                                                   x_agKw
                                                   x_agKx
                                                   x_agKy
                                                   x_agKz
                                                   x_agKA
                                                   x_agKB
                                                   x_agKC
                                                   x_agKD
                                                   x_agKE
                                                   x_agKF
                                                   x_agKG
                                                   x_agKH
                                                   x_agKI
                                                   x_agKJ
                                                   x_agKK
                                                   x_agKL
                                                   x_agKM)
    = fmap
        (\ y_agKN
           -> Network.Riak.Protocol.BucketProps.BucketProps
                x_agKl
                x_agKm
                x_agKn
                x_agKo
                x_agKp
                x_agKq
                y_agKN
                x_agKs
                x_agKt
                x_agKu
                x_agKv
                x_agKw
                x_agKx
                x_agKy
                x_agKz
                x_agKA
                x_agKB
                x_agKC
                x_agKD
                x_agKE
                x_agKF
                x_agKG
                x_agKH
                x_agKI
                x_agKJ
                x_agKK
                x_agKL
                x_agKM)
        (f_agKk x_agKr)
class HasHasPrecommit s a | s -> a where
  has_precommit :: Lens' s a
instance HasHasPrecommit Network.Riak.Protocol.BucketProps.BucketProps (Maybe Bool) where
  {-# INLINE has_precommit #-}
  has_precommit
    f_agKO
    (Network.Riak.Protocol.BucketProps.BucketProps x_agKP
                                                   x_agKQ
                                                   x_agKR
                                                   x_agKS
                                                   x_agKT
                                                   x_agKU
                                                   x_agKV
                                                   x_agKW
                                                   x_agKX
                                                   x_agKY
                                                   x_agKZ
                                                   x_agL0
                                                   x_agL1
                                                   x_agL2
                                                   x_agL3
                                                   x_agL4
                                                   x_agL5
                                                   x_agL6
                                                   x_agL7
                                                   x_agL8
                                                   x_agL9
                                                   x_agLa
                                                   x_agLb
                                                   x_agLc
                                                   x_agLd
                                                   x_agLe
                                                   x_agLf
                                                   x_agLg)
    = fmap
        (\ y_agLh
           -> Network.Riak.Protocol.BucketProps.BucketProps
                x_agKP
                x_agKQ
                x_agKR
                x_agKS
                y_agLh
                x_agKU
                x_agKV
                x_agKW
                x_agKX
                x_agKY
                x_agKZ
                x_agL0
                x_agL1
                x_agL2
                x_agL3
                x_agL4
                x_agL5
                x_agL6
                x_agL7
                x_agL8
                x_agL9
                x_agLa
                x_agLb
                x_agLc
                x_agLd
                x_agLe
                x_agLf
                x_agLg)
        (f_agKO x_agKT)
class HasLastWriteWins s a | s -> a where
  last_write_wins :: Lens' s a
instance HasLastWriteWins Network.Riak.Protocol.BucketProps.BucketProps (Maybe Bool) where
  {-# INLINE last_write_wins #-}
  last_write_wins
    f_agLi
    (Network.Riak.Protocol.BucketProps.BucketProps x_agLj
                                                   x_agLk
                                                   x_agLl
                                                   x_agLm
                                                   x_agLn
                                                   x_agLo
                                                   x_agLp
                                                   x_agLq
                                                   x_agLr
                                                   x_agLs
                                                   x_agLt
                                                   x_agLu
                                                   x_agLv
                                                   x_agLw
                                                   x_agLx
                                                   x_agLy
                                                   x_agLz
                                                   x_agLA
                                                   x_agLB
                                                   x_agLC
                                                   x_agLD
                                                   x_agLE
                                                   x_agLF
                                                   x_agLG
                                                   x_agLH
                                                   x_agLI
                                                   x_agLJ
                                                   x_agLK)
    = fmap
        (\ y_agLL
           -> Network.Riak.Protocol.BucketProps.BucketProps
                x_agLj
                x_agLk
                y_agLL
                x_agLm
                x_agLn
                x_agLo
                x_agLp
                x_agLq
                x_agLr
                x_agLs
                x_agLt
                x_agLu
                x_agLv
                x_agLw
                x_agLx
                x_agLy
                x_agLz
                x_agLA
                x_agLB
                x_agLC
                x_agLD
                x_agLE
                x_agLF
                x_agLG
                x_agLH
                x_agLI
                x_agLJ
                x_agLK)
        (f_agLi x_agLl)
class HasLinkfun s a | s -> a where
  linkfun :: Lens' s a
instance HasLinkfun Network.Riak.Protocol.BucketProps.BucketProps (Maybe Network.Riak.Protocol.ModFun.ModFun) where
  {-# INLINE linkfun #-}
  linkfun
    f_agLM
    (Network.Riak.Protocol.BucketProps.BucketProps x_agLN
                                                   x_agLO
                                                   x_agLP
                                                   x_agLQ
                                                   x_agLR
                                                   x_agLS
                                                   x_agLT
                                                   x_agLU
                                                   x_agLV
                                                   x_agLW
                                                   x_agLX
                                                   x_agLY
                                                   x_agLZ
                                                   x_agM0
                                                   x_agM1
                                                   x_agM2
                                                   x_agM3
                                                   x_agM4
                                                   x_agM5
                                                   x_agM6
                                                   x_agM7
                                                   x_agM8
                                                   x_agM9
                                                   x_agMa
                                                   x_agMb
                                                   x_agMc
                                                   x_agMd
                                                   x_agMe)
    = fmap
        (\ y_agMf
           -> Network.Riak.Protocol.BucketProps.BucketProps
                x_agLN
                x_agLO
                x_agLP
                x_agLQ
                x_agLR
                x_agLS
                x_agLT
                x_agLU
                y_agMf
                x_agLW
                x_agLX
                x_agLY
                x_agLZ
                x_agM0
                x_agM1
                x_agM2
                x_agM3
                x_agM4
                x_agM5
                x_agM6
                x_agM7
                x_agM8
                x_agM9
                x_agMa
                x_agMb
                x_agMc
                x_agMd
                x_agMe)
        (f_agLM x_agLV)
class HasNVal s a | s -> a where
  n_val :: Lens' s a
instance HasNVal Network.Riak.Protocol.BucketProps.BucketProps (Maybe Word32) where
  {-# INLINE n_val #-}
  n_val
    f_agMg
    (Network.Riak.Protocol.BucketProps.BucketProps x_agMh
                                                   x_agMi
                                                   x_agMj
                                                   x_agMk
                                                   x_agMl
                                                   x_agMm
                                                   x_agMn
                                                   x_agMo
                                                   x_agMp
                                                   x_agMq
                                                   x_agMr
                                                   x_agMs
                                                   x_agMt
                                                   x_agMu
                                                   x_agMv
                                                   x_agMw
                                                   x_agMx
                                                   x_agMy
                                                   x_agMz
                                                   x_agMA
                                                   x_agMB
                                                   x_agMC
                                                   x_agMD
                                                   x_agME
                                                   x_agMF
                                                   x_agMG
                                                   x_agMH
                                                   x_agMI)
    = fmap
        (\ y_agMJ
           -> Network.Riak.Protocol.BucketProps.BucketProps
                y_agMJ
                x_agMi
                x_agMj
                x_agMk
                x_agMl
                x_agMm
                x_agMn
                x_agMo
                x_agMp
                x_agMq
                x_agMr
                x_agMs
                x_agMt
                x_agMu
                x_agMv
                x_agMw
                x_agMx
                x_agMy
                x_agMz
                x_agMA
                x_agMB
                x_agMC
                x_agMD
                x_agME
                x_agMF
                x_agMG
                x_agMH
                x_agMI)
        (f_agMg x_agMh)
class HasNotfoundOk s a | s -> a where
  notfound_ok :: Lens' s a
instance HasNotfoundOk Network.Riak.Protocol.BucketProps.BucketProps (Maybe Bool) where
  {-# INLINE notfound_ok #-}
  notfound_ok
    f_agMK
    (Network.Riak.Protocol.BucketProps.BucketProps x_agML
                                                   x_agMM
                                                   x_agMN
                                                   x_agMO
                                                   x_agMP
                                                   x_agMQ
                                                   x_agMR
                                                   x_agMS
                                                   x_agMT
                                                   x_agMU
                                                   x_agMV
                                                   x_agMW
                                                   x_agMX
                                                   x_agMY
                                                   x_agMZ
                                                   x_agN0
                                                   x_agN1
                                                   x_agN2
                                                   x_agN3
                                                   x_agN4
                                                   x_agN5
                                                   x_agN6
                                                   x_agN7
                                                   x_agN8
                                                   x_agN9
                                                   x_agNa
                                                   x_agNb
                                                   x_agNc)
    = fmap
        (\ y_agNd
           -> Network.Riak.Protocol.BucketProps.BucketProps
                x_agML
                x_agMM
                x_agMN
                x_agMO
                x_agMP
                x_agMQ
                x_agMR
                x_agMS
                x_agMT
                x_agMU
                x_agMV
                x_agMW
                x_agMX
                x_agMY
                x_agMZ
                x_agN0
                x_agN1
                x_agN2
                x_agN3
                x_agN4
                y_agNd
                x_agN6
                x_agN7
                x_agN8
                x_agN9
                x_agNa
                x_agNb
                x_agNc)
        (f_agMK x_agN5)
class HasOldVclock s a | s -> a where
  old_vclock :: Lens' s a
instance HasOldVclock Network.Riak.Protocol.BucketProps.BucketProps (Maybe Word32) where
  {-# INLINE old_vclock #-}
  old_vclock
    f_agNe
    (Network.Riak.Protocol.BucketProps.BucketProps x_agNf
                                                   x_agNg
                                                   x_agNh
                                                   x_agNi
                                                   x_agNj
                                                   x_agNk
                                                   x_agNl
                                                   x_agNm
                                                   x_agNn
                                                   x_agNo
                                                   x_agNp
                                                   x_agNq
                                                   x_agNr
                                                   x_agNs
                                                   x_agNt
                                                   x_agNu
                                                   x_agNv
                                                   x_agNw
                                                   x_agNx
                                                   x_agNy
                                                   x_agNz
                                                   x_agNA
                                                   x_agNB
                                                   x_agNC
                                                   x_agND
                                                   x_agNE
                                                   x_agNF
                                                   x_agNG)
    = fmap
        (\ y_agNH
           -> Network.Riak.Protocol.BucketProps.BucketProps
                x_agNf
                x_agNg
                x_agNh
                x_agNi
                x_agNj
                x_agNk
                x_agNl
                x_agNm
                x_agNn
                y_agNH
                x_agNp
                x_agNq
                x_agNr
                x_agNs
                x_agNt
                x_agNu
                x_agNv
                x_agNw
                x_agNx
                x_agNy
                x_agNz
                x_agNA
                x_agNB
                x_agNC
                x_agND
                x_agNE
                x_agNF
                x_agNG)
        (f_agNe x_agNo)
class HasPostcommit s a | s -> a where
  postcommit :: Lens' s a
instance HasPostcommit Network.Riak.Protocol.BucketProps.BucketProps (Seq Network.Riak.Protocol.CommitHook.CommitHook) where
  {-# INLINE postcommit #-}
  postcommit
    f_agNI
    (Network.Riak.Protocol.BucketProps.BucketProps x_agNJ
                                                   x_agNK
                                                   x_agNL
                                                   x_agNM
                                                   x_agNN
                                                   x_agNO
                                                   x_agNP
                                                   x_agNQ
                                                   x_agNR
                                                   x_agNS
                                                   x_agNT
                                                   x_agNU
                                                   x_agNV
                                                   x_agNW
                                                   x_agNX
                                                   x_agNY
                                                   x_agNZ
                                                   x_agO0
                                                   x_agO1
                                                   x_agO2
                                                   x_agO3
                                                   x_agO4
                                                   x_agO5
                                                   x_agO6
                                                   x_agO7
                                                   x_agO8
                                                   x_agO9
                                                   x_agOa)
    = fmap
        (\ y_agOb
           -> Network.Riak.Protocol.BucketProps.BucketProps
                x_agNJ
                x_agNK
                x_agNL
                x_agNM
                x_agNN
                y_agOb
                x_agNP
                x_agNQ
                x_agNR
                x_agNS
                x_agNT
                x_agNU
                x_agNV
                x_agNW
                x_agNX
                x_agNY
                x_agNZ
                x_agO0
                x_agO1
                x_agO2
                x_agO3
                x_agO4
                x_agO5
                x_agO6
                x_agO7
                x_agO8
                x_agO9
                x_agOa)
        (f_agNI x_agNO)
class HasPr s a | s -> a where
  pr :: Lens' s a
instance HasPr Network.Riak.Protocol.BucketProps.BucketProps (Maybe Word32) where
  {-# INLINE pr #-}
  pr
    f_agOc
    (Network.Riak.Protocol.BucketProps.BucketProps x_agOd
                                                   x_agOe
                                                   x_agOf
                                                   x_agOg
                                                   x_agOh
                                                   x_agOi
                                                   x_agOj
                                                   x_agOk
                                                   x_agOl
                                                   x_agOm
                                                   x_agOn
                                                   x_agOo
                                                   x_agOp
                                                   x_agOq
                                                   x_agOr
                                                   x_agOs
                                                   x_agOt
                                                   x_agOu
                                                   x_agOv
                                                   x_agOw
                                                   x_agOx
                                                   x_agOy
                                                   x_agOz
                                                   x_agOA
                                                   x_agOB
                                                   x_agOC
                                                   x_agOD
                                                   x_agOE)
    = fmap
        (\ y_agOF
           -> Network.Riak.Protocol.BucketProps.BucketProps
                x_agOd
                x_agOe
                x_agOf
                x_agOg
                x_agOh
                x_agOi
                x_agOj
                x_agOk
                x_agOl
                x_agOm
                x_agOn
                x_agOo
                x_agOp
                y_agOF
                x_agOr
                x_agOs
                x_agOt
                x_agOu
                x_agOv
                x_agOw
                x_agOx
                x_agOy
                x_agOz
                x_agOA
                x_agOB
                x_agOC
                x_agOD
                x_agOE)
        (f_agOc x_agOq)
class HasPrecommit s a | s -> a where
  precommit :: Lens' s a
instance HasPrecommit Network.Riak.Protocol.BucketProps.BucketProps (Seq Network.Riak.Protocol.CommitHook.CommitHook) where
  {-# INLINE precommit #-}
  precommit
    f_agOG
    (Network.Riak.Protocol.BucketProps.BucketProps x_agOH
                                                   x_agOI
                                                   x_agOJ
                                                   x_agOK
                                                   x_agOL
                                                   x_agOM
                                                   x_agON
                                                   x_agOO
                                                   x_agOP
                                                   x_agOQ
                                                   x_agOR
                                                   x_agOS
                                                   x_agOT
                                                   x_agOU
                                                   x_agOV
                                                   x_agOW
                                                   x_agOX
                                                   x_agOY
                                                   x_agOZ
                                                   x_agP0
                                                   x_agP1
                                                   x_agP2
                                                   x_agP3
                                                   x_agP4
                                                   x_agP5
                                                   x_agP6
                                                   x_agP7
                                                   x_agP8)
    = fmap
        (\ y_agP9
           -> Network.Riak.Protocol.BucketProps.BucketProps
                x_agOH
                x_agOI
                x_agOJ
                y_agP9
                x_agOL
                x_agOM
                x_agON
                x_agOO
                x_agOP
                x_agOQ
                x_agOR
                x_agOS
                x_agOT
                x_agOU
                x_agOV
                x_agOW
                x_agOX
                x_agOY
                x_agOZ
                x_agP0
                x_agP1
                x_agP2
                x_agP3
                x_agP4
                x_agP5
                x_agP6
                x_agP7
                x_agP8)
        (f_agOG x_agOK)
class HasPw s a | s -> a where
  pw :: Lens' s a
instance HasPw Network.Riak.Protocol.BucketProps.BucketProps (Maybe Word32) where
  {-# INLINE pw #-}
  pw
    f_agPa
    (Network.Riak.Protocol.BucketProps.BucketProps x_agPb
                                                   x_agPc
                                                   x_agPd
                                                   x_agPe
                                                   x_agPf
                                                   x_agPg
                                                   x_agPh
                                                   x_agPi
                                                   x_agPj
                                                   x_agPk
                                                   x_agPl
                                                   x_agPm
                                                   x_agPn
                                                   x_agPo
                                                   x_agPp
                                                   x_agPq
                                                   x_agPr
                                                   x_agPs
                                                   x_agPt
                                                   x_agPu
                                                   x_agPv
                                                   x_agPw
                                                   x_agPx
                                                   x_agPy
                                                   x_agPz
                                                   x_agPA
                                                   x_agPB
                                                   x_agPC)
    = fmap
        (\ y_agPD
           -> Network.Riak.Protocol.BucketProps.BucketProps
                x_agPb
                x_agPc
                x_agPd
                x_agPe
                x_agPf
                x_agPg
                x_agPh
                x_agPi
                x_agPj
                x_agPk
                x_agPl
                x_agPm
                x_agPn
                x_agPo
                x_agPp
                x_agPq
                y_agPD
                x_agPs
                x_agPt
                x_agPu
                x_agPv
                x_agPw
                x_agPx
                x_agPy
                x_agPz
                x_agPA
                x_agPB
                x_agPC)
        (f_agPa x_agPr)
class HasR s a | s -> a where
  r :: Lens' s a
instance HasR Network.Riak.Protocol.BucketProps.BucketProps (Maybe Word32) where
  {-# INLINE r #-}
  r f_agPE
    (Network.Riak.Protocol.BucketProps.BucketProps x_agPF
                                                   x_agPG
                                                   x_agPH
                                                   x_agPI
                                                   x_agPJ
                                                   x_agPK
                                                   x_agPL
                                                   x_agPM
                                                   x_agPN
                                                   x_agPO
                                                   x_agPP
                                                   x_agPQ
                                                   x_agPR
                                                   x_agPS
                                                   x_agPT
                                                   x_agPU
                                                   x_agPV
                                                   x_agPW
                                                   x_agPX
                                                   x_agPY
                                                   x_agPZ
                                                   x_agQ0
                                                   x_agQ1
                                                   x_agQ2
                                                   x_agQ3
                                                   x_agQ4
                                                   x_agQ5
                                                   x_agQ6)
    = fmap
        (\ y_agQ7
           -> Network.Riak.Protocol.BucketProps.BucketProps
                x_agPF
                x_agPG
                x_agPH
                x_agPI
                x_agPJ
                x_agPK
                x_agPL
                x_agPM
                x_agPN
                x_agPO
                x_agPP
                x_agPQ
                x_agPR
                x_agPS
                y_agQ7
                x_agPU
                x_agPV
                x_agPW
                x_agPX
                x_agPY
                x_agPZ
                x_agQ0
                x_agQ1
                x_agQ2
                x_agQ3
                x_agQ4
                x_agQ5
                x_agQ6)
        (f_agPE x_agPT)
class HasRepl s a | s -> a where
  repl :: Lens' s a
instance HasRepl Network.Riak.Protocol.BucketProps.BucketProps (Maybe Network.Riak.Protocol.BucketProps.ReplMode.ReplMode) where
  {-# INLINE repl #-}
  repl
    f_agQ8
    (Network.Riak.Protocol.BucketProps.BucketProps x_agQ9
                                                   x_agQa
                                                   x_agQb
                                                   x_agQc
                                                   x_agQd
                                                   x_agQe
                                                   x_agQf
                                                   x_agQg
                                                   x_agQh
                                                   x_agQi
                                                   x_agQj
                                                   x_agQk
                                                   x_agQl
                                                   x_agQm
                                                   x_agQn
                                                   x_agQo
                                                   x_agQp
                                                   x_agQq
                                                   x_agQr
                                                   x_agQs
                                                   x_agQt
                                                   x_agQu
                                                   x_agQv
                                                   x_agQw
                                                   x_agQx
                                                   x_agQy
                                                   x_agQz
                                                   x_agQA)
    = fmap
        (\ y_agQB
           -> Network.Riak.Protocol.BucketProps.BucketProps
                x_agQ9
                x_agQa
                x_agQb
                x_agQc
                x_agQd
                x_agQe
                x_agQf
                x_agQg
                x_agQh
                x_agQi
                x_agQj
                x_agQk
                x_agQl
                x_agQm
                x_agQn
                x_agQo
                x_agQp
                x_agQq
                x_agQr
                x_agQs
                x_agQt
                x_agQu
                x_agQv
                y_agQB
                x_agQx
                x_agQy
                x_agQz
                x_agQA)
        (f_agQ8 x_agQw)
class HasRw s a | s -> a where
  rw :: Lens' s a
instance HasRw Network.Riak.Protocol.BucketProps.BucketProps (Maybe Word32) where
  {-# INLINE rw #-}
  rw
    f_agQC
    (Network.Riak.Protocol.BucketProps.BucketProps x_agQD
                                                   x_agQE
                                                   x_agQF
                                                   x_agQG
                                                   x_agQH
                                                   x_agQI
                                                   x_agQJ
                                                   x_agQK
                                                   x_agQL
                                                   x_agQM
                                                   x_agQN
                                                   x_agQO
                                                   x_agQP
                                                   x_agQQ
                                                   x_agQR
                                                   x_agQS
                                                   x_agQT
                                                   x_agQU
                                                   x_agQV
                                                   x_agQW
                                                   x_agQX
                                                   x_agQY
                                                   x_agQZ
                                                   x_agR0
                                                   x_agR1
                                                   x_agR2
                                                   x_agR3
                                                   x_agR4)
    = fmap
        (\ y_agR5
           -> Network.Riak.Protocol.BucketProps.BucketProps
                x_agQD
                x_agQE
                x_agQF
                x_agQG
                x_agQH
                x_agQI
                x_agQJ
                x_agQK
                x_agQL
                x_agQM
                x_agQN
                x_agQO
                x_agQP
                x_agQQ
                x_agQR
                x_agQS
                x_agQT
                x_agQU
                y_agR5
                x_agQW
                x_agQX
                x_agQY
                x_agQZ
                x_agR0
                x_agR1
                x_agR2
                x_agR3
                x_agR4)
        (f_agQC x_agQV)
class HasSearch s a | s -> a where
  search :: Lens' s a
instance HasSearch Network.Riak.Protocol.BucketProps.BucketProps (Maybe Bool) where
  {-# INLINE search #-}
  search
    f_agR6
    (Network.Riak.Protocol.BucketProps.BucketProps x_agR7
                                                   x_agR8
                                                   x_agR9
                                                   x_agRa
                                                   x_agRb
                                                   x_agRc
                                                   x_agRd
                                                   x_agRe
                                                   x_agRf
                                                   x_agRg
                                                   x_agRh
                                                   x_agRi
                                                   x_agRj
                                                   x_agRk
                                                   x_agRl
                                                   x_agRm
                                                   x_agRn
                                                   x_agRo
                                                   x_agRp
                                                   x_agRq
                                                   x_agRr
                                                   x_agRs
                                                   x_agRt
                                                   x_agRu
                                                   x_agRv
                                                   x_agRw
                                                   x_agRx
                                                   x_agRy)
    = fmap
        (\ y_agRz
           -> Network.Riak.Protocol.BucketProps.BucketProps
                x_agR7
                x_agR8
                x_agR9
                x_agRa
                x_agRb
                x_agRc
                x_agRd
                x_agRe
                x_agRf
                x_agRg
                x_agRh
                x_agRi
                x_agRj
                x_agRk
                x_agRl
                x_agRm
                x_agRn
                x_agRo
                x_agRp
                x_agRq
                x_agRr
                x_agRs
                y_agRz
                x_agRu
                x_agRv
                x_agRw
                x_agRx
                x_agRy)
        (f_agR6 x_agRt)
class HasSearchIndex s a | s -> a where
  search_index :: Lens' s a
instance HasSearchIndex Network.Riak.Protocol.BucketProps.BucketProps (Maybe ByteString) where
  {-# INLINE search_index #-}
  search_index
    f_agRA
    (Network.Riak.Protocol.BucketProps.BucketProps x_agRB
                                                   x_agRC
                                                   x_agRD
                                                   x_agRE
                                                   x_agRF
                                                   x_agRG
                                                   x_agRH
                                                   x_agRI
                                                   x_agRJ
                                                   x_agRK
                                                   x_agRL
                                                   x_agRM
                                                   x_agRN
                                                   x_agRO
                                                   x_agRP
                                                   x_agRQ
                                                   x_agRR
                                                   x_agRS
                                                   x_agRT
                                                   x_agRU
                                                   x_agRV
                                                   x_agRW
                                                   x_agRX
                                                   x_agRY
                                                   x_agRZ
                                                   x_agS0
                                                   x_agS1
                                                   x_agS2)
    = fmap
        (\ y_agS3
           -> Network.Riak.Protocol.BucketProps.BucketProps
                x_agRB
                x_agRC
                x_agRD
                x_agRE
                x_agRF
                x_agRG
                x_agRH
                x_agRI
                x_agRJ
                x_agRK
                x_agRL
                x_agRM
                x_agRN
                x_agRO
                x_agRP
                x_agRQ
                x_agRR
                x_agRS
                x_agRT
                x_agRU
                x_agRV
                x_agRW
                x_agRX
                x_agRY
                y_agS3
                x_agS0
                x_agS1
                x_agS2)
        (f_agRA x_agRZ)
class HasSmallVclock s a | s -> a where
  small_vclock :: Lens' s a
instance HasSmallVclock Network.Riak.Protocol.BucketProps.BucketProps (Maybe Word32) where
  {-# INLINE small_vclock #-}
  small_vclock
    f_agS4
    (Network.Riak.Protocol.BucketProps.BucketProps x_agS5
                                                   x_agS6
                                                   x_agS7
                                                   x_agS8
                                                   x_agS9
                                                   x_agSa
                                                   x_agSb
                                                   x_agSc
                                                   x_agSd
                                                   x_agSe
                                                   x_agSf
                                                   x_agSg
                                                   x_agSh
                                                   x_agSi
                                                   x_agSj
                                                   x_agSk
                                                   x_agSl
                                                   x_agSm
                                                   x_agSn
                                                   x_agSo
                                                   x_agSp
                                                   x_agSq
                                                   x_agSr
                                                   x_agSs
                                                   x_agSt
                                                   x_agSu
                                                   x_agSv
                                                   x_agSw)
    = fmap
        (\ y_agSx
           -> Network.Riak.Protocol.BucketProps.BucketProps
                x_agS5
                x_agS6
                x_agS7
                x_agS8
                x_agS9
                x_agSa
                x_agSb
                x_agSc
                x_agSd
                x_agSe
                x_agSf
                x_agSg
                y_agSx
                x_agSi
                x_agSj
                x_agSk
                x_agSl
                x_agSm
                x_agSn
                x_agSo
                x_agSp
                x_agSq
                x_agSr
                x_agSs
                x_agSt
                x_agSu
                x_agSv
                x_agSw)
        (f_agS4 x_agSh)
class HasW s a | s -> a where
  w :: Lens' s a
instance HasW Network.Riak.Protocol.BucketProps.BucketProps (Maybe Word32) where
  {-# INLINE w #-}
  w f_agSy
    (Network.Riak.Protocol.BucketProps.BucketProps x_agSz
                                                   x_agSA
                                                   x_agSB
                                                   x_agSC
                                                   x_agSD
                                                   x_agSE
                                                   x_agSF
                                                   x_agSG
                                                   x_agSH
                                                   x_agSI
                                                   x_agSJ
                                                   x_agSK
                                                   x_agSL
                                                   x_agSM
                                                   x_agSN
                                                   x_agSO
                                                   x_agSP
                                                   x_agSQ
                                                   x_agSR
                                                   x_agSS
                                                   x_agST
                                                   x_agSU
                                                   x_agSV
                                                   x_agSW
                                                   x_agSX
                                                   x_agSY
                                                   x_agSZ
                                                   x_agT0)
    = fmap
        (\ y_agT1
           -> Network.Riak.Protocol.BucketProps.BucketProps
                x_agSz
                x_agSA
                x_agSB
                x_agSC
                x_agSD
                x_agSE
                x_agSF
                x_agSG
                x_agSH
                x_agSI
                x_agSJ
                x_agSK
                x_agSL
                x_agSM
                x_agSN
                y_agT1
                x_agSP
                x_agSQ
                x_agSR
                x_agSS
                x_agST
                x_agSU
                x_agSV
                x_agSW
                x_agSX
                x_agSY
                x_agSZ
                x_agT0)
        (f_agSy x_agSO)
class HasWriteOnce s a | s -> a where
  write_once :: Lens' s a
instance HasWriteOnce Network.Riak.Protocol.BucketProps.BucketProps (Maybe Bool) where
  {-# INLINE write_once #-}
  write_once
    f_agT2
    (Network.Riak.Protocol.BucketProps.BucketProps x_agT3
                                                   x_agT4
                                                   x_agT5
                                                   x_agT6
                                                   x_agT7
                                                   x_agT8
                                                   x_agT9
                                                   x_agTa
                                                   x_agTb
                                                   x_agTc
                                                   x_agTd
                                                   x_agTe
                                                   x_agTf
                                                   x_agTg
                                                   x_agTh
                                                   x_agTi
                                                   x_agTj
                                                   x_agTk
                                                   x_agTl
                                                   x_agTm
                                                   x_agTn
                                                   x_agTo
                                                   x_agTp
                                                   x_agTq
                                                   x_agTr
                                                   x_agTs
                                                   x_agTt
                                                   x_agTu)
    = fmap
        (\ y_agTv
           -> Network.Riak.Protocol.BucketProps.BucketProps
                x_agT3
                x_agT4
                x_agT5
                x_agT6
                x_agT7
                x_agT8
                x_agT9
                x_agTa
                x_agTb
                x_agTc
                x_agTd
                x_agTe
                x_agTf
                x_agTg
                x_agTh
                x_agTi
                x_agTj
                x_agTk
                x_agTl
                x_agTm
                x_agTn
                x_agTo
                x_agTp
                x_agTq
                x_agTr
                x_agTs
                x_agTt
                y_agTv)
        (f_agT2 x_agTu)
class HasYoungVclock s a | s -> a where
  young_vclock :: Lens' s a
instance HasYoungVclock Network.Riak.Protocol.BucketProps.BucketProps (Maybe Word32) where
  {-# INLINE young_vclock #-}
  young_vclock
    f_agTw
    (Network.Riak.Protocol.BucketProps.BucketProps x_agTx
                                                   x_agTy
                                                   x_agTz
                                                   x_agTA
                                                   x_agTB
                                                   x_agTC
                                                   x_agTD
                                                   x_agTE
                                                   x_agTF
                                                   x_agTG
                                                   x_agTH
                                                   x_agTI
                                                   x_agTJ
                                                   x_agTK
                                                   x_agTL
                                                   x_agTM
                                                   x_agTN
                                                   x_agTO
                                                   x_agTP
                                                   x_agTQ
                                                   x_agTR
                                                   x_agTS
                                                   x_agTT
                                                   x_agTU
                                                   x_agTV
                                                   x_agTW
                                                   x_agTX
                                                   x_agTY)
    = fmap
        (\ y_agTZ
           -> Network.Riak.Protocol.BucketProps.BucketProps
                x_agTx
                x_agTy
                x_agTz
                x_agTA
                x_agTB
                x_agTC
                x_agTD
                x_agTE
                x_agTF
                x_agTG
                y_agTZ
                x_agTI
                x_agTJ
                x_agTK
                x_agTL
                x_agTM
                x_agTN
                x_agTO
                x_agTP
                x_agTQ
                x_agTR
                x_agTS
                x_agTT
                x_agTU
                x_agTV
                x_agTW
                x_agTX
                x_agTY)
        (f_agTw x_agTH)
class HasModfun s a | s -> a where
  modfun :: Lens' s a
instance HasModfun Network.Riak.Protocol.CommitHook.CommitHook (Maybe Network.Riak.Protocol.ModFun.ModFun) where
  {-# INLINE modfun #-}
  modfun f_ahcb (Network.Riak.Protocol.CommitHook.CommitHook x_ahcc x_ahcd)
    = fmap (\ y_ahce -> Network.Riak.Protocol.CommitHook.CommitHook y_ahce x_ahcd) (f_ahcb x_ahcc)
class HasName s a | s -> a where
  name :: Lens' s a
instance HasName Network.Riak.Protocol.CommitHook.CommitHook (Maybe ByteString) where
  {-# INLINE name #-}
  name f_ahcf (Network.Riak.Protocol.CommitHook.CommitHook x_ahcg x_ahch)
    = fmap (\ y_ahci -> Network.Riak.Protocol.CommitHook.CommitHook x_ahcg y_ahci) (f_ahcf x_ahch)
class HasCharset s a | s -> a where
  charset :: Lens' s a
instance HasCharset Network.Riak.Protocol.Content.Content (Maybe ByteString) where
  {-# INLINE charset #-}
  charset f_ahdI (Network.Riak.Protocol.Content.Content x_ahdJ x_ahdK x_ahdL x_ahdM x_ahdN x_ahdO x_ahdP x_ahdQ x_ahdR x_ahdS x_ahdT)
    = fmap
        (\ y_ahdU -> Network.Riak.Protocol.Content.Content x_ahdJ x_ahdK y_ahdU x_ahdM x_ahdN x_ahdO x_ahdP x_ahdQ x_ahdR x_ahdS x_ahdT)
        (f_ahdI x_ahdL)
class HasContentEncoding s a | s -> a where
  content_encoding :: Lens' s a
instance HasContentEncoding Network.Riak.Protocol.Content.Content (Maybe ByteString) where
  {-# INLINE content_encoding #-}
  content_encoding
    f_ahdV
    (Network.Riak.Protocol.Content.Content x_ahdW x_ahdX x_ahdY x_ahdZ x_ahe0 x_ahe1 x_ahe2 x_ahe3 x_ahe4 x_ahe5 x_ahe6)
    = fmap
        (\ y_ahe7 -> Network.Riak.Protocol.Content.Content x_ahdW x_ahdX x_ahdY y_ahe7 x_ahe0 x_ahe1 x_ahe2 x_ahe3 x_ahe4 x_ahe5 x_ahe6)
        (f_ahdV x_ahdZ)
class HasContentType s a | s -> a where
  content_type :: Lens' s a
instance HasContentType Network.Riak.Protocol.Content.Content (Maybe ByteString) where
  {-# INLINE content_type #-}
  content_type
    f_ahe8
    (Network.Riak.Protocol.Content.Content x_ahe9 x_ahea x_aheb x_ahec x_ahed x_ahee x_ahef x_aheg x_aheh x_ahei x_ahej)
    = fmap
        (\ y_ahek -> Network.Riak.Protocol.Content.Content x_ahe9 y_ahek x_aheb x_ahec x_ahed x_ahee x_ahef x_aheg x_aheh x_ahei x_ahej)
        (f_ahe8 x_ahea)
class HasDeleted s a | s -> a where
  deleted :: Lens' s a
instance HasDeleted Network.Riak.Protocol.Content.Content (Maybe Bool) where
  {-# INLINE deleted #-}
  deleted f_ahel (Network.Riak.Protocol.Content.Content x_ahem x_ahen x_aheo x_ahep x_aheq x_aher x_ahes x_ahet x_aheu x_ahev x_ahew)
    = fmap
        (\ y_ahex -> Network.Riak.Protocol.Content.Content x_ahem x_ahen x_aheo x_ahep x_aheq x_aher x_ahes x_ahet x_aheu x_ahev y_ahex)
        (f_ahel x_ahew)
class HasIndexes s a | s -> a where
  indexes :: Lens' s a
instance HasIndexes Network.Riak.Protocol.Content.Content (Seq Network.Riak.Protocol.Pair.Pair) where
  {-# INLINE indexes #-}
  indexes f_ahey (Network.Riak.Protocol.Content.Content x_ahez x_aheA x_aheB x_aheC x_aheD x_aheE x_aheF x_aheG x_aheH x_aheI x_aheJ)
    = fmap
        (\ y_aheK -> Network.Riak.Protocol.Content.Content x_ahez x_aheA x_aheB x_aheC x_aheD x_aheE x_aheF x_aheG x_aheH y_aheK x_aheJ)
        (f_ahey x_aheI)
class HasLastMod s a | s -> a where
  last_mod :: Lens' s a
instance HasLastMod Network.Riak.Protocol.Content.Content (Maybe Word32) where
  {-# INLINE last_mod #-}
  last_mod f_aheL (Network.Riak.Protocol.Content.Content x_aheM x_aheN x_aheO x_aheP x_aheQ x_aheR x_aheS x_aheT x_aheU x_aheV x_aheW)
    = fmap
        (\ y_aheX -> Network.Riak.Protocol.Content.Content x_aheM x_aheN x_aheO x_aheP x_aheQ x_aheR y_aheX x_aheT x_aheU x_aheV x_aheW)
        (f_aheL x_aheS)
class HasLastModUsecs s a | s -> a where
  last_mod_usecs :: Lens' s a
instance HasLastModUsecs Network.Riak.Protocol.Content.Content (Maybe Word32) where
  {-# INLINE last_mod_usecs #-}
  last_mod_usecs
    f_aheY
    (Network.Riak.Protocol.Content.Content x_aheZ x_ahf0 x_ahf1 x_ahf2 x_ahf3 x_ahf4 x_ahf5 x_ahf6 x_ahf7 x_ahf8 x_ahf9)
    = fmap
        (\ y_ahfa -> Network.Riak.Protocol.Content.Content x_aheZ x_ahf0 x_ahf1 x_ahf2 x_ahf3 x_ahf4 x_ahf5 y_ahfa x_ahf7 x_ahf8 x_ahf9)
        (f_aheY x_ahf6)
class HasLinks s a | s -> a where
  links :: Lens' s a
instance HasLinks Network.Riak.Protocol.Content.Content (Seq Network.Riak.Protocol.Link.Link) where
  {-# INLINE links #-}
  links f_ahfb (Network.Riak.Protocol.Content.Content x_ahfc x_ahfd x_ahfe x_ahff x_ahfg x_ahfh x_ahfi x_ahfj x_ahfk x_ahfl x_ahfm)
    = fmap
        (\ y_ahfn -> Network.Riak.Protocol.Content.Content x_ahfc x_ahfd x_ahfe x_ahff x_ahfg y_ahfn x_ahfi x_ahfj x_ahfk x_ahfl x_ahfm)
        (f_ahfb x_ahfh)
class HasUsermeta s a | s -> a where
  usermeta :: Lens' s a
instance HasUsermeta Network.Riak.Protocol.Content.Content (Seq Network.Riak.Protocol.Pair.Pair) where
  {-# INLINE usermeta #-}
  usermeta f_ahfo (Network.Riak.Protocol.Content.Content x_ahfp x_ahfq x_ahfr x_ahfs x_ahft x_ahfu x_ahfv x_ahfw x_ahfx x_ahfy x_ahfz)
    = fmap
        (\ y_ahfA -> Network.Riak.Protocol.Content.Content x_ahfp x_ahfq x_ahfr x_ahfs x_ahft x_ahfu x_ahfv x_ahfw y_ahfA x_ahfy x_ahfz)
        (f_ahfo x_ahfx)
class HasValue s a | s -> a where
  value :: Lens' s a
instance HasValue Network.Riak.Protocol.Content.Content ByteString where
  {-# INLINE value #-}
  value f_ahfB (Network.Riak.Protocol.Content.Content x_ahfC x_ahfD x_ahfE x_ahfF x_ahfG x_ahfH x_ahfI x_ahfJ x_ahfK x_ahfL x_ahfM)
    = fmap
        (\ y_ahfN -> Network.Riak.Protocol.Content.Content y_ahfN x_ahfD x_ahfE x_ahfF x_ahfG x_ahfH x_ahfI x_ahfJ x_ahfK x_ahfL x_ahfM)
        (f_ahfB x_ahfC)
class HasVtag s a | s -> a where
  vtag :: Lens' s a
instance HasVtag Network.Riak.Protocol.Content.Content (Maybe ByteString) where
  {-# INLINE vtag #-}
  vtag f_ahfO (Network.Riak.Protocol.Content.Content x_ahfP x_ahfQ x_ahfR x_ahfS x_ahfT x_ahfU x_ahfV x_ahfW x_ahfX x_ahfY x_ahfZ)
    = fmap
        (\ y_ahg0 -> Network.Riak.Protocol.Content.Content x_ahfP x_ahfQ x_ahfR x_ahfS y_ahg0 x_ahfU x_ahfV x_ahfW x_ahfX x_ahfY x_ahfZ)
        (f_ahfO x_ahfT)
instance HasBasicQuorum Network.Riak.Protocol.CounterGetRequest.CounterGetRequest (Maybe Bool) where
  {-# INLINE basic_quorum #-}
  basic_quorum f_ahne (Network.Riak.Protocol.CounterGetRequest.CounterGetRequest x_ahnf x_ahng x_ahnh x_ahni x_ahnj x_ahnk)
    = fmap
        (\ y_ahnl -> Network.Riak.Protocol.CounterGetRequest.CounterGetRequest x_ahnf x_ahng x_ahnh x_ahni y_ahnl x_ahnk) (f_ahne x_ahnj)
class HasBucket s a | s -> a where
  bucket :: Lens' s a
instance HasBucket Network.Riak.Protocol.CounterGetRequest.CounterGetRequest ByteString where
  {-# INLINE bucket #-}
  bucket f_ahnm (Network.Riak.Protocol.CounterGetRequest.CounterGetRequest x_ahnn x_ahno x_ahnp x_ahnq x_ahnr x_ahns)
    = fmap
        (\ y_ahnt -> Network.Riak.Protocol.CounterGetRequest.CounterGetRequest y_ahnt x_ahno x_ahnp x_ahnq x_ahnr x_ahns) (f_ahnm x_ahnn)
class HasKey s a | s -> a where
  key :: Lens' s a
instance HasKey Network.Riak.Protocol.CounterGetRequest.CounterGetRequest ByteString where
  {-# INLINE key #-}
  key f_ahnu (Network.Riak.Protocol.CounterGetRequest.CounterGetRequest x_ahnv x_ahnw x_ahnx x_ahny x_ahnz x_ahnA)
    = fmap
        (\ y_ahnB -> Network.Riak.Protocol.CounterGetRequest.CounterGetRequest x_ahnv y_ahnB x_ahnx x_ahny x_ahnz x_ahnA) (f_ahnu x_ahnw)
instance HasNotfoundOk Network.Riak.Protocol.CounterGetRequest.CounterGetRequest (Maybe Bool) where
  {-# INLINE notfound_ok #-}
  notfound_ok f_ahnC (Network.Riak.Protocol.CounterGetRequest.CounterGetRequest x_ahnD x_ahnE x_ahnF x_ahnG x_ahnH x_ahnI)
    = fmap
        (\ y_ahnJ -> Network.Riak.Protocol.CounterGetRequest.CounterGetRequest x_ahnD x_ahnE x_ahnF x_ahnG x_ahnH y_ahnJ) (f_ahnC x_ahnI)
instance HasPr Network.Riak.Protocol.CounterGetRequest.CounterGetRequest (Maybe Word32) where
  {-# INLINE pr #-}
  pr f_ahnK (Network.Riak.Protocol.CounterGetRequest.CounterGetRequest x_ahnL x_ahnM x_ahnN x_ahnO x_ahnP x_ahnQ)
    = fmap
        (\ y_ahnR -> Network.Riak.Protocol.CounterGetRequest.CounterGetRequest x_ahnL x_ahnM x_ahnN y_ahnR x_ahnP x_ahnQ) (f_ahnK x_ahnO)
instance HasR Network.Riak.Protocol.CounterGetRequest.CounterGetRequest (Maybe Word32) where
  {-# INLINE r #-}
  r f_ahnS (Network.Riak.Protocol.CounterGetRequest.CounterGetRequest x_ahnT x_ahnU x_ahnV x_ahnW x_ahnX x_ahnY)
    = fmap
        (\ y_ahnZ -> Network.Riak.Protocol.CounterGetRequest.CounterGetRequest x_ahnT x_ahnU y_ahnZ x_ahnW x_ahnX x_ahnY) (f_ahnS x_ahnV)
instance HasValue Network.Riak.Protocol.CounterGetResponse.CounterGetResponse (Maybe Int64) where
  {-# INLINE value #-}
  value f_ahqj (Network.Riak.Protocol.CounterGetResponse.CounterGetResponse x_ahqk)
    = fmap (\ y_ahql -> Network.Riak.Protocol.CounterGetResponse.CounterGetResponse y_ahql) (f_ahqj x_ahqk)
class HasIncrement s a | s -> a where
  increment :: Lens' s a
instance HasIncrement Network.Riak.Protocol.CounterOp.CounterOp (Maybe Int64) where
  {-# INLINE increment #-}
  increment f_ahqH (Network.Riak.Protocol.CounterOp.CounterOp x_ahqI)
    = fmap (\ y_ahqJ -> Network.Riak.Protocol.CounterOp.CounterOp y_ahqJ) (f_ahqH x_ahqI)
class HasAmount s a | s -> a where
  amount :: Lens' s a
instance HasAmount Network.Riak.Protocol.CounterUpdateRequest.CounterUpdateRequest Int64 where
  {-# INLINE amount #-}
  amount f_ahrv (Network.Riak.Protocol.CounterUpdateRequest.CounterUpdateRequest x_ahrw x_ahrx x_ahry x_ahrz x_ahrA x_ahrB x_ahrC)
    = fmap
        (\ y_ahrD -> Network.Riak.Protocol.CounterUpdateRequest.CounterUpdateRequest x_ahrw x_ahrx y_ahrD x_ahrz x_ahrA x_ahrB x_ahrC)
        (f_ahrv x_ahry)
instance HasBucket Network.Riak.Protocol.CounterUpdateRequest.CounterUpdateRequest ByteString where
  {-# INLINE bucket #-}
  bucket f_ahrE (Network.Riak.Protocol.CounterUpdateRequest.CounterUpdateRequest x_ahrF x_ahrG x_ahrH x_ahrI x_ahrJ x_ahrK x_ahrL)
    = fmap
        (\ y_ahrM -> Network.Riak.Protocol.CounterUpdateRequest.CounterUpdateRequest y_ahrM x_ahrG x_ahrH x_ahrI x_ahrJ x_ahrK x_ahrL)
        (f_ahrE x_ahrF)
instance HasDw Network.Riak.Protocol.CounterUpdateRequest.CounterUpdateRequest (Maybe Word32) where
  {-# INLINE dw #-}
  dw f_ahrN (Network.Riak.Protocol.CounterUpdateRequest.CounterUpdateRequest x_ahrO x_ahrP x_ahrQ x_ahrR x_ahrS x_ahrT x_ahrU)
    = fmap
        (\ y_ahrV -> Network.Riak.Protocol.CounterUpdateRequest.CounterUpdateRequest x_ahrO x_ahrP x_ahrQ x_ahrR y_ahrV x_ahrT x_ahrU)
        (f_ahrN x_ahrS)
instance HasKey Network.Riak.Protocol.CounterUpdateRequest.CounterUpdateRequest ByteString where
  {-# INLINE key #-}
  key f_ahrW (Network.Riak.Protocol.CounterUpdateRequest.CounterUpdateRequest x_ahrX x_ahrY x_ahrZ x_ahs0 x_ahs1 x_ahs2 x_ahs3)
    = fmap
        (\ y_ahs4 -> Network.Riak.Protocol.CounterUpdateRequest.CounterUpdateRequest x_ahrX y_ahs4 x_ahrZ x_ahs0 x_ahs1 x_ahs2 x_ahs3)
        (f_ahrW x_ahrY)
instance HasPw Network.Riak.Protocol.CounterUpdateRequest.CounterUpdateRequest (Maybe Word32) where
  {-# INLINE pw #-}
  pw f_ahs5 (Network.Riak.Protocol.CounterUpdateRequest.CounterUpdateRequest x_ahs6 x_ahs7 x_ahs8 x_ahs9 x_ahsa x_ahsb x_ahsc)
    = fmap
        (\ y_ahsd -> Network.Riak.Protocol.CounterUpdateRequest.CounterUpdateRequest x_ahs6 x_ahs7 x_ahs8 x_ahs9 x_ahsa y_ahsd x_ahsc)
        (f_ahs5 x_ahsb)
class HasReturnvalue s a | s -> a where
  returnvalue :: Lens' s a
instance HasReturnvalue Network.Riak.Protocol.CounterUpdateRequest.CounterUpdateRequest (Maybe Bool) where
  {-# INLINE returnvalue #-}
  returnvalue f_ahse (Network.Riak.Protocol.CounterUpdateRequest.CounterUpdateRequest x_ahsf x_ahsg x_ahsh x_ahsi x_ahsj x_ahsk x_ahsl)
    = fmap
        (\ y_ahsm -> Network.Riak.Protocol.CounterUpdateRequest.CounterUpdateRequest x_ahsf x_ahsg x_ahsh x_ahsi x_ahsj x_ahsk y_ahsm)
        (f_ahse x_ahsl)
instance HasW Network.Riak.Protocol.CounterUpdateRequest.CounterUpdateRequest (Maybe Word32) where
  {-# INLINE w #-}
  w f_ahsn (Network.Riak.Protocol.CounterUpdateRequest.CounterUpdateRequest x_ahso x_ahsp x_ahsq x_ahsr x_ahss x_ahst x_ahsu)
    = fmap
        (\ y_ahsv -> Network.Riak.Protocol.CounterUpdateRequest.CounterUpdateRequest x_ahso x_ahsp x_ahsq y_ahsv x_ahss x_ahst x_ahsu)
        (f_ahsn x_ahsr)
instance HasValue Network.Riak.Protocol.CounterUpdateResponse.CounterUpdateResponse (Maybe Int64) where
  {-# INLINE value #-}
  value f_ahv4 (Network.Riak.Protocol.CounterUpdateResponse.CounterUpdateResponse x_ahv5)
    = fmap (\ y_ahv6 -> Network.Riak.Protocol.CounterUpdateResponse.CounterUpdateResponse y_ahv6) (f_ahv4 x_ahv5)
instance HasBucket Network.Riak.Protocol.CSBucketRequest.CSBucketRequest ByteString where
  {-# INLINE bucket #-}
  bucket f_ahvs (Network.Riak.Protocol.CSBucketRequest.CSBucketRequest x_ahvt x_ahvu x_ahvv x_ahvw x_ahvx x_ahvy x_ahvz x_ahvA x_ahvB)
    = fmap
        (\ y_ahvC -> Network.Riak.Protocol.CSBucketRequest.CSBucketRequest y_ahvC x_ahvu x_ahvv x_ahvw x_ahvx x_ahvy x_ahvz x_ahvA x_ahvB)
        (f_ahvs x_ahvt)
class HasContinuation s a | s -> a where
  continuation :: Lens' s a
instance HasContinuation Network.Riak.Protocol.CSBucketRequest.CSBucketRequest (Maybe ByteString) where
  {-# INLINE continuation #-}
  continuation
    f_ahvD
    (Network.Riak.Protocol.CSBucketRequest.CSBucketRequest x_ahvE x_ahvF x_ahvG x_ahvH x_ahvI x_ahvJ x_ahvK x_ahvL x_ahvM)
    = fmap
        (\ y_ahvN -> Network.Riak.Protocol.CSBucketRequest.CSBucketRequest x_ahvE x_ahvF x_ahvG x_ahvH x_ahvI y_ahvN x_ahvK x_ahvL x_ahvM)
        (f_ahvD x_ahvJ)
class HasEndIncl s a | s -> a where
  end_incl :: Lens' s a
instance HasEndIncl Network.Riak.Protocol.CSBucketRequest.CSBucketRequest (Maybe Bool) where
  {-# INLINE end_incl #-}
  end_incl
    f_ahvO
    (Network.Riak.Protocol.CSBucketRequest.CSBucketRequest x_ahvP x_ahvQ x_ahvR x_ahvS x_ahvT x_ahvU x_ahvV x_ahvW x_ahvX)
    = fmap
        (\ y_ahvY -> Network.Riak.Protocol.CSBucketRequest.CSBucketRequest x_ahvP x_ahvQ x_ahvR x_ahvS y_ahvY x_ahvU x_ahvV x_ahvW x_ahvX)
        (f_ahvO x_ahvT)
class HasEndKey s a | s -> a where
  end_key :: Lens' s a
instance HasEndKey Network.Riak.Protocol.CSBucketRequest.CSBucketRequest (Maybe ByteString) where
  {-# INLINE end_key #-}
  end_key f_ahvZ (Network.Riak.Protocol.CSBucketRequest.CSBucketRequest x_ahw0 x_ahw1 x_ahw2 x_ahw3 x_ahw4 x_ahw5 x_ahw6 x_ahw7 x_ahw8)
    = fmap
        (\ y_ahw9 -> Network.Riak.Protocol.CSBucketRequest.CSBucketRequest x_ahw0 x_ahw1 y_ahw9 x_ahw3 x_ahw4 x_ahw5 x_ahw6 x_ahw7 x_ahw8)
        (f_ahvZ x_ahw2)
class HasMaxResults s a | s -> a where
  max_results :: Lens' s a
instance HasMaxResults Network.Riak.Protocol.CSBucketRequest.CSBucketRequest (Maybe Word32) where
  {-# INLINE max_results #-}
  max_results
    f_ahwa
    (Network.Riak.Protocol.CSBucketRequest.CSBucketRequest x_ahwb x_ahwc x_ahwd x_ahwe x_ahwf x_ahwg x_ahwh x_ahwi x_ahwj)
    = fmap
        (\ y_ahwk -> Network.Riak.Protocol.CSBucketRequest.CSBucketRequest x_ahwb x_ahwc x_ahwd x_ahwe x_ahwf x_ahwg y_ahwk x_ahwi x_ahwj)
        (f_ahwa x_ahwh)
class HasStartIncl s a | s -> a where
  start_incl :: Lens' s a
instance HasStartIncl Network.Riak.Protocol.CSBucketRequest.CSBucketRequest (Maybe Bool) where
  {-# INLINE start_incl #-}
  start_incl
    f_ahwl
    (Network.Riak.Protocol.CSBucketRequest.CSBucketRequest x_ahwm x_ahwn x_ahwo x_ahwp x_ahwq x_ahwr x_ahws x_ahwt x_ahwu)
    = fmap
        (\ y_ahwv -> Network.Riak.Protocol.CSBucketRequest.CSBucketRequest x_ahwm x_ahwn x_ahwo y_ahwv x_ahwq x_ahwr x_ahws x_ahwt x_ahwu)
        (f_ahwl x_ahwp)
class HasStartKey s a | s -> a where
  start_key :: Lens' s a
instance HasStartKey Network.Riak.Protocol.CSBucketRequest.CSBucketRequest ByteString where
  {-# INLINE start_key #-}
  start_key
    f_ahww
    (Network.Riak.Protocol.CSBucketRequest.CSBucketRequest x_ahwx x_ahwy x_ahwz x_ahwA x_ahwB x_ahwC x_ahwD x_ahwE x_ahwF)
    = fmap
        (\ y_ahwG -> Network.Riak.Protocol.CSBucketRequest.CSBucketRequest x_ahwx y_ahwG x_ahwz x_ahwA x_ahwB x_ahwC x_ahwD x_ahwE x_ahwF)
        (f_ahww x_ahwy)
class HasTimeout s a | s -> a where
  timeout :: Lens' s a
instance HasTimeout Network.Riak.Protocol.CSBucketRequest.CSBucketRequest (Maybe Word32) where
  {-# INLINE timeout #-}
  timeout f_ahwH (Network.Riak.Protocol.CSBucketRequest.CSBucketRequest x_ahwI x_ahwJ x_ahwK x_ahwL x_ahwM x_ahwN x_ahwO x_ahwP x_ahwQ)
    = fmap
        (\ y_ahwR -> Network.Riak.Protocol.CSBucketRequest.CSBucketRequest x_ahwI x_ahwJ x_ahwK x_ahwL x_ahwM x_ahwN x_ahwO y_ahwR x_ahwQ)
        (f_ahwH x_ahwP)
class HasType' s a | s -> a where
  type' :: Lens' s a
instance HasType' Network.Riak.Protocol.CSBucketRequest.CSBucketRequest (Maybe ByteString) where
  {-# INLINE type' #-}
  type' f_ahwS (Network.Riak.Protocol.CSBucketRequest.CSBucketRequest x_ahwT x_ahwU x_ahwV x_ahwW x_ahwX x_ahwY x_ahwZ x_ahx0 x_ahx1)
    = fmap
        (\ y_ahx2 -> Network.Riak.Protocol.CSBucketRequest.CSBucketRequest x_ahwT x_ahwU x_ahwV x_ahwW x_ahwX x_ahwY x_ahwZ x_ahx0 y_ahx2)
        (f_ahwS x_ahx1)
instance HasContinuation Network.Riak.Protocol.CSBucketResponse.CSBucketResponse (Maybe ByteString) where
  {-# INLINE continuation #-}
  continuation f_ahCy (Network.Riak.Protocol.CSBucketResponse.CSBucketResponse x_ahCz x_ahCA x_ahCB)
    = fmap (\ y_ahCC -> Network.Riak.Protocol.CSBucketResponse.CSBucketResponse x_ahCz y_ahCC x_ahCB) (f_ahCy x_ahCA)
class HasDone s a | s -> a where
  done :: Lens' s a
instance HasDone Network.Riak.Protocol.CSBucketResponse.CSBucketResponse (Maybe Bool) where
  {-# INLINE done #-}
  done f_ahCD (Network.Riak.Protocol.CSBucketResponse.CSBucketResponse x_ahCE x_ahCF x_ahCG)
    = fmap (\ y_ahCH -> Network.Riak.Protocol.CSBucketResponse.CSBucketResponse x_ahCE x_ahCF y_ahCH) (f_ahCD x_ahCG)
class HasObjects s a | s -> a where
  objects :: Lens' s a
instance HasObjects Network.Riak.Protocol.CSBucketResponse.CSBucketResponse (Seq Network.Riak.Protocol.IndexObject.IndexObject) where
  {-# INLINE objects #-}
  objects f_ahCI (Network.Riak.Protocol.CSBucketResponse.CSBucketResponse x_ahCJ x_ahCK x_ahCL)
    = fmap (\ y_ahCM -> Network.Riak.Protocol.CSBucketResponse.CSBucketResponse y_ahCM x_ahCK x_ahCL) (f_ahCI x_ahCJ)
instance HasBucket Network.Riak.Protocol.DeleteRequest.DeleteRequest ByteString where
  {-# INLINE bucket #-}
  bucket
    f_ahEq
    (Network.Riak.Protocol.DeleteRequest.DeleteRequest x_ahEr
                                                       x_ahEs
                                                       x_ahEt
                                                       x_ahEu
                                                       x_ahEv
                                                       x_ahEw
                                                       x_ahEx
                                                       x_ahEy
                                                       x_ahEz
                                                       x_ahEA
                                                       x_ahEB
                                                       x_ahEC
                                                       x_ahED)
    = fmap
        (\ y_ahEE
           -> Network.Riak.Protocol.DeleteRequest.DeleteRequest
                y_ahEE x_ahEs x_ahEt x_ahEu x_ahEv x_ahEw x_ahEx x_ahEy x_ahEz x_ahEA x_ahEB x_ahEC x_ahED)
        (f_ahEq x_ahEr)
instance HasDw Network.Riak.Protocol.DeleteRequest.DeleteRequest (Maybe Word32) where
  {-# INLINE dw #-}
  dw
    f_ahEF
    (Network.Riak.Protocol.DeleteRequest.DeleteRequest x_ahEG
                                                       x_ahEH
                                                       x_ahEI
                                                       x_ahEJ
                                                       x_ahEK
                                                       x_ahEL
                                                       x_ahEM
                                                       x_ahEN
                                                       x_ahEO
                                                       x_ahEP
                                                       x_ahEQ
                                                       x_ahER
                                                       x_ahES)
    = fmap
        (\ y_ahET
           -> Network.Riak.Protocol.DeleteRequest.DeleteRequest
                x_ahEG x_ahEH x_ahEI x_ahEJ x_ahEK x_ahEL x_ahEM x_ahEN y_ahET x_ahEP x_ahEQ x_ahER x_ahES)
        (f_ahEF x_ahEO)
instance HasKey Network.Riak.Protocol.DeleteRequest.DeleteRequest ByteString where
  {-# INLINE key #-}
  key
    f_ahEU
    (Network.Riak.Protocol.DeleteRequest.DeleteRequest x_ahEV
                                                       x_ahEW
                                                       x_ahEX
                                                       x_ahEY
                                                       x_ahEZ
                                                       x_ahF0
                                                       x_ahF1
                                                       x_ahF2
                                                       x_ahF3
                                                       x_ahF4
                                                       x_ahF5
                                                       x_ahF6
                                                       x_ahF7)
    = fmap
        (\ y_ahF8
           -> Network.Riak.Protocol.DeleteRequest.DeleteRequest
                x_ahEV y_ahF8 x_ahEX x_ahEY x_ahEZ x_ahF0 x_ahF1 x_ahF2 x_ahF3 x_ahF4 x_ahF5 x_ahF6 x_ahF7)
        (f_ahEU x_ahEW)
instance HasNVal Network.Riak.Protocol.DeleteRequest.DeleteRequest (Maybe Word32) where
  {-# INLINE n_val #-}
  n_val
    f_ahF9
    (Network.Riak.Protocol.DeleteRequest.DeleteRequest x_ahFa
                                                       x_ahFb
                                                       x_ahFc
                                                       x_ahFd
                                                       x_ahFe
                                                       x_ahFf
                                                       x_ahFg
                                                       x_ahFh
                                                       x_ahFi
                                                       x_ahFj
                                                       x_ahFk
                                                       x_ahFl
                                                       x_ahFm)
    = fmap
        (\ y_ahFn
           -> Network.Riak.Protocol.DeleteRequest.DeleteRequest
                x_ahFa x_ahFb x_ahFc x_ahFd x_ahFe x_ahFf x_ahFg x_ahFh x_ahFi x_ahFj x_ahFk y_ahFn x_ahFm)
        (f_ahF9 x_ahFl)
instance HasPr Network.Riak.Protocol.DeleteRequest.DeleteRequest (Maybe Word32) where
  {-# INLINE pr #-}
  pr
    f_ahFo
    (Network.Riak.Protocol.DeleteRequest.DeleteRequest x_ahFp
                                                       x_ahFq
                                                       x_ahFr
                                                       x_ahFs
                                                       x_ahFt
                                                       x_ahFu
                                                       x_ahFv
                                                       x_ahFw
                                                       x_ahFx
                                                       x_ahFy
                                                       x_ahFz
                                                       x_ahFA
                                                       x_ahFB)
    = fmap
        (\ y_ahFC
           -> Network.Riak.Protocol.DeleteRequest.DeleteRequest
                x_ahFp x_ahFq x_ahFr x_ahFs x_ahFt x_ahFu y_ahFC x_ahFw x_ahFx x_ahFy x_ahFz x_ahFA x_ahFB)
        (f_ahFo x_ahFv)
instance HasPw Network.Riak.Protocol.DeleteRequest.DeleteRequest (Maybe Word32) where
  {-# INLINE pw #-}
  pw
    f_ahFD
    (Network.Riak.Protocol.DeleteRequest.DeleteRequest x_ahFE
                                                       x_ahFF
                                                       x_ahFG
                                                       x_ahFH
                                                       x_ahFI
                                                       x_ahFJ
                                                       x_ahFK
                                                       x_ahFL
                                                       x_ahFM
                                                       x_ahFN
                                                       x_ahFO
                                                       x_ahFP
                                                       x_ahFQ)
    = fmap
        (\ y_ahFR
           -> Network.Riak.Protocol.DeleteRequest.DeleteRequest
                x_ahFE x_ahFF x_ahFG x_ahFH x_ahFI x_ahFJ x_ahFK y_ahFR x_ahFM x_ahFN x_ahFO x_ahFP x_ahFQ)
        (f_ahFD x_ahFL)
instance HasR Network.Riak.Protocol.DeleteRequest.DeleteRequest (Maybe Word32) where
  {-# INLINE r #-}
  r f_ahFS
    (Network.Riak.Protocol.DeleteRequest.DeleteRequest x_ahFT
                                                       x_ahFU
                                                       x_ahFV
                                                       x_ahFW
                                                       x_ahFX
                                                       x_ahFY
                                                       x_ahFZ
                                                       x_ahG0
                                                       x_ahG1
                                                       x_ahG2
                                                       x_ahG3
                                                       x_ahG4
                                                       x_ahG5)
    = fmap
        (\ y_ahG6
           -> Network.Riak.Protocol.DeleteRequest.DeleteRequest
                x_ahFT x_ahFU x_ahFV x_ahFW y_ahG6 x_ahFY x_ahFZ x_ahG0 x_ahG1 x_ahG2 x_ahG3 x_ahG4 x_ahG5)
        (f_ahFS x_ahFX)
instance HasRw Network.Riak.Protocol.DeleteRequest.DeleteRequest (Maybe Word32) where
  {-# INLINE rw #-}
  rw
    f_ahG7
    (Network.Riak.Protocol.DeleteRequest.DeleteRequest x_ahG8
                                                       x_ahG9
                                                       x_ahGa
                                                       x_ahGb
                                                       x_ahGc
                                                       x_ahGd
                                                       x_ahGe
                                                       x_ahGf
                                                       x_ahGg
                                                       x_ahGh
                                                       x_ahGi
                                                       x_ahGj
                                                       x_ahGk)
    = fmap
        (\ y_ahGl
           -> Network.Riak.Protocol.DeleteRequest.DeleteRequest
                x_ahG8 x_ahG9 y_ahGl x_ahGb x_ahGc x_ahGd x_ahGe x_ahGf x_ahGg x_ahGh x_ahGi x_ahGj x_ahGk)
        (f_ahG7 x_ahGa)
class HasSloppyQuorum s a | s -> a where
  sloppy_quorum :: Lens' s a
instance HasSloppyQuorum Network.Riak.Protocol.DeleteRequest.DeleteRequest (Maybe Bool) where
  {-# INLINE sloppy_quorum #-}
  sloppy_quorum
    f_ahGm
    (Network.Riak.Protocol.DeleteRequest.DeleteRequest x_ahGn
                                                       x_ahGo
                                                       x_ahGp
                                                       x_ahGq
                                                       x_ahGr
                                                       x_ahGs
                                                       x_ahGt
                                                       x_ahGu
                                                       x_ahGv
                                                       x_ahGw
                                                       x_ahGx
                                                       x_ahGy
                                                       x_ahGz)
    = fmap
        (\ y_ahGA
           -> Network.Riak.Protocol.DeleteRequest.DeleteRequest
                x_ahGn x_ahGo x_ahGp x_ahGq x_ahGr x_ahGs x_ahGt x_ahGu x_ahGv x_ahGw y_ahGA x_ahGy x_ahGz)
        (f_ahGm x_ahGx)
instance HasTimeout Network.Riak.Protocol.DeleteRequest.DeleteRequest (Maybe Word32) where
  {-# INLINE timeout #-}
  timeout
    f_ahGB
    (Network.Riak.Protocol.DeleteRequest.DeleteRequest x_ahGC
                                                       x_ahGD
                                                       x_ahGE
                                                       x_ahGF
                                                       x_ahGG
                                                       x_ahGH
                                                       x_ahGI
                                                       x_ahGJ
                                                       x_ahGK
                                                       x_ahGL
                                                       x_ahGM
                                                       x_ahGN
                                                       x_ahGO)
    = fmap
        (\ y_ahGP
           -> Network.Riak.Protocol.DeleteRequest.DeleteRequest
                x_ahGC x_ahGD x_ahGE x_ahGF x_ahGG x_ahGH x_ahGI x_ahGJ x_ahGK y_ahGP x_ahGM x_ahGN x_ahGO)
        (f_ahGB x_ahGL)
instance HasType' Network.Riak.Protocol.DeleteRequest.DeleteRequest (Maybe ByteString) where
  {-# INLINE type' #-}
  type'
    f_ahGQ
    (Network.Riak.Protocol.DeleteRequest.DeleteRequest x_ahGR
                                                       x_ahGS
                                                       x_ahGT
                                                       x_ahGU
                                                       x_ahGV
                                                       x_ahGW
                                                       x_ahGX
                                                       x_ahGY
                                                       x_ahGZ
                                                       x_ahH0
                                                       x_ahH1
                                                       x_ahH2
                                                       x_ahH3)
    = fmap
        (\ y_ahH4
           -> Network.Riak.Protocol.DeleteRequest.DeleteRequest
                x_ahGR x_ahGS x_ahGT x_ahGU x_ahGV x_ahGW x_ahGX x_ahGY x_ahGZ x_ahH0 x_ahH1 x_ahH2 y_ahH4)
        (f_ahGQ x_ahH3)
class HasVclock s a | s -> a where
  vclock :: Lens' s a
instance HasVclock Network.Riak.Protocol.DeleteRequest.DeleteRequest (Maybe ByteString) where
  {-# INLINE vclock #-}
  vclock
    f_ahH5
    (Network.Riak.Protocol.DeleteRequest.DeleteRequest x_ahH6
                                                       x_ahH7
                                                       x_ahH8
                                                       x_ahH9
                                                       x_ahHa
                                                       x_ahHb
                                                       x_ahHc
                                                       x_ahHd
                                                       x_ahHe
                                                       x_ahHf
                                                       x_ahHg
                                                       x_ahHh
                                                       x_ahHi)
    = fmap
        (\ y_ahHj
           -> Network.Riak.Protocol.DeleteRequest.DeleteRequest
                x_ahH6 x_ahH7 x_ahH8 y_ahHj x_ahHa x_ahHb x_ahHc x_ahHd x_ahHe x_ahHf x_ahHg x_ahHh x_ahHi)
        (f_ahH5 x_ahH9)
instance HasW Network.Riak.Protocol.DeleteRequest.DeleteRequest (Maybe Word32) where
  {-# INLINE w #-}
  w f_ahHk
    (Network.Riak.Protocol.DeleteRequest.DeleteRequest x_ahHl
                                                       x_ahHm
                                                       x_ahHn
                                                       x_ahHo
                                                       x_ahHp
                                                       x_ahHq
                                                       x_ahHr
                                                       x_ahHs
                                                       x_ahHt
                                                       x_ahHu
                                                       x_ahHv
                                                       x_ahHw
                                                       x_ahHx)
    = fmap
        (\ y_ahHy
           -> Network.Riak.Protocol.DeleteRequest.DeleteRequest
                x_ahHl x_ahHm x_ahHn x_ahHo x_ahHp y_ahHy x_ahHr x_ahHs x_ahHt x_ahHu x_ahHv x_ahHw x_ahHx)
        (f_ahHk x_ahHq)
instance HasBasicQuorum Network.Riak.Protocol.DtFetchRequest.DtFetchRequest (Maybe Bool) where
  {-# INLINE basic_quorum #-}
  basic_quorum
    f_ahLs
    (Network.Riak.Protocol.DtFetchRequest.DtFetchRequest x_ahLt x_ahLu x_ahLv x_ahLw x_ahLx x_ahLy x_ahLz x_ahLA x_ahLB x_ahLC x_ahLD)
    = fmap
        (\ y_ahLE
           -> Network.Riak.Protocol.DtFetchRequest.DtFetchRequest x_ahLt x_ahLu x_ahLv x_ahLw x_ahLx y_ahLE x_ahLz x_ahLA x_ahLB x_ahLC x_ahLD)
        (f_ahLs x_ahLy)
instance HasBucket Network.Riak.Protocol.DtFetchRequest.DtFetchRequest ByteString where
  {-# INLINE bucket #-}
  bucket
    f_ahLF
    (Network.Riak.Protocol.DtFetchRequest.DtFetchRequest x_ahLG x_ahLH x_ahLI x_ahLJ x_ahLK x_ahLL x_ahLM x_ahLN x_ahLO x_ahLP x_ahLQ)
    = fmap
        (\ y_ahLR
           -> Network.Riak.Protocol.DtFetchRequest.DtFetchRequest y_ahLR x_ahLH x_ahLI x_ahLJ x_ahLK x_ahLL x_ahLM x_ahLN x_ahLO x_ahLP x_ahLQ)
        (f_ahLF x_ahLG)
class HasIncludeContext s a | s -> a where
  include_context :: Lens' s a
instance HasIncludeContext Network.Riak.Protocol.DtFetchRequest.DtFetchRequest (Maybe Bool) where
  {-# INLINE include_context #-}
  include_context
    f_ahLS
    (Network.Riak.Protocol.DtFetchRequest.DtFetchRequest x_ahLT x_ahLU x_ahLV x_ahLW x_ahLX x_ahLY x_ahLZ x_ahM0 x_ahM1 x_ahM2 x_ahM3)
    = fmap
        (\ y_ahM4
           -> Network.Riak.Protocol.DtFetchRequest.DtFetchRequest x_ahLT x_ahLU x_ahLV x_ahLW x_ahLX x_ahLY x_ahLZ x_ahM0 x_ahM1 x_ahM2 y_ahM4)
        (f_ahLS x_ahM3)
instance HasKey Network.Riak.Protocol.DtFetchRequest.DtFetchRequest ByteString where
  {-# INLINE key #-}
  key
    f_ahM5
    (Network.Riak.Protocol.DtFetchRequest.DtFetchRequest x_ahM6 x_ahM7 x_ahM8 x_ahM9 x_ahMa x_ahMb x_ahMc x_ahMd x_ahMe x_ahMf x_ahMg)
    = fmap
        (\ y_ahMh
           -> Network.Riak.Protocol.DtFetchRequest.DtFetchRequest x_ahM6 y_ahMh x_ahM8 x_ahM9 x_ahMa x_ahMb x_ahMc x_ahMd x_ahMe x_ahMf x_ahMg)
        (f_ahM5 x_ahM7)
instance HasNVal Network.Riak.Protocol.DtFetchRequest.DtFetchRequest (Maybe Word32) where
  {-# INLINE n_val #-}
  n_val
    f_ahMi
    (Network.Riak.Protocol.DtFetchRequest.DtFetchRequest x_ahMj x_ahMk x_ahMl x_ahMm x_ahMn x_ahMo x_ahMp x_ahMq x_ahMr x_ahMs x_ahMt)
    = fmap
        (\ y_ahMu
           -> Network.Riak.Protocol.DtFetchRequest.DtFetchRequest x_ahMj x_ahMk x_ahMl x_ahMm x_ahMn x_ahMo x_ahMp x_ahMq x_ahMr y_ahMu x_ahMt)
        (f_ahMi x_ahMs)
instance HasNotfoundOk Network.Riak.Protocol.DtFetchRequest.DtFetchRequest (Maybe Bool) where
  {-# INLINE notfound_ok #-}
  notfound_ok
    f_ahMv
    (Network.Riak.Protocol.DtFetchRequest.DtFetchRequest x_ahMw x_ahMx x_ahMy x_ahMz x_ahMA x_ahMB x_ahMC x_ahMD x_ahME x_ahMF x_ahMG)
    = fmap
        (\ y_ahMH
           -> Network.Riak.Protocol.DtFetchRequest.DtFetchRequest x_ahMw x_ahMx x_ahMy x_ahMz x_ahMA x_ahMB y_ahMH x_ahMD x_ahME x_ahMF x_ahMG)
        (f_ahMv x_ahMC)
instance HasPr Network.Riak.Protocol.DtFetchRequest.DtFetchRequest (Maybe Word32) where
  {-# INLINE pr #-}
  pr
    f_ahMI
    (Network.Riak.Protocol.DtFetchRequest.DtFetchRequest x_ahMJ x_ahMK x_ahML x_ahMM x_ahMN x_ahMO x_ahMP x_ahMQ x_ahMR x_ahMS x_ahMT)
    = fmap
        (\ y_ahMU
           -> Network.Riak.Protocol.DtFetchRequest.DtFetchRequest x_ahMJ x_ahMK x_ahML x_ahMM y_ahMU x_ahMO x_ahMP x_ahMQ x_ahMR x_ahMS x_ahMT)
        (f_ahMI x_ahMN)
instance HasR Network.Riak.Protocol.DtFetchRequest.DtFetchRequest (Maybe Word32) where
  {-# INLINE r #-}
  r f_ahMV
    (Network.Riak.Protocol.DtFetchRequest.DtFetchRequest x_ahMW x_ahMX x_ahMY x_ahMZ x_ahN0 x_ahN1 x_ahN2 x_ahN3 x_ahN4 x_ahN5 x_ahN6)
    = fmap
        (\ y_ahN7
           -> Network.Riak.Protocol.DtFetchRequest.DtFetchRequest x_ahMW x_ahMX x_ahMY y_ahN7 x_ahN0 x_ahN1 x_ahN2 x_ahN3 x_ahN4 x_ahN5 x_ahN6)
        (f_ahMV x_ahMZ)
instance HasSloppyQuorum Network.Riak.Protocol.DtFetchRequest.DtFetchRequest (Maybe Bool) where
  {-# INLINE sloppy_quorum #-}
  sloppy_quorum
    f_ahN8
    (Network.Riak.Protocol.DtFetchRequest.DtFetchRequest x_ahN9 x_ahNa x_ahNb x_ahNc x_ahNd x_ahNe x_ahNf x_ahNg x_ahNh x_ahNi x_ahNj)
    = fmap
        (\ y_ahNk
           -> Network.Riak.Protocol.DtFetchRequest.DtFetchRequest x_ahN9 x_ahNa x_ahNb x_ahNc x_ahNd x_ahNe x_ahNf x_ahNg y_ahNk x_ahNi x_ahNj)
        (f_ahN8 x_ahNh)
instance HasTimeout Network.Riak.Protocol.DtFetchRequest.DtFetchRequest (Maybe Word32) where
  {-# INLINE timeout #-}
  timeout
    f_ahNl
    (Network.Riak.Protocol.DtFetchRequest.DtFetchRequest x_ahNm x_ahNn x_ahNo x_ahNp x_ahNq x_ahNr x_ahNs x_ahNt x_ahNu x_ahNv x_ahNw)
    = fmap
        (\ y_ahNx
           -> Network.Riak.Protocol.DtFetchRequest.DtFetchRequest x_ahNm x_ahNn x_ahNo x_ahNp x_ahNq x_ahNr x_ahNs y_ahNx x_ahNu x_ahNv x_ahNw)
        (f_ahNl x_ahNt)
instance HasType' Network.Riak.Protocol.DtFetchRequest.DtFetchRequest ByteString where
  {-# INLINE type' #-}
  type'
    f_ahNy
    (Network.Riak.Protocol.DtFetchRequest.DtFetchRequest x_ahNz x_ahNA x_ahNB x_ahNC x_ahND x_ahNE x_ahNF x_ahNG x_ahNH x_ahNI x_ahNJ)
    = fmap
        (\ y_ahNK
           -> Network.Riak.Protocol.DtFetchRequest.DtFetchRequest x_ahNz x_ahNA y_ahNK x_ahNC x_ahND x_ahNE x_ahNF x_ahNG x_ahNH x_ahNI x_ahNJ)
        (f_ahNy x_ahNB)
class HasContext s a | s -> a where
  context :: Lens' s a
instance HasContext Network.Riak.Protocol.DtFetchResponse.DtFetchResponse (Maybe ByteString) where
  {-# INLINE context #-}
  context f_ahQM (Network.Riak.Protocol.DtFetchResponse.DtFetchResponse x_ahQN x_ahQO x_ahQP)
    = fmap (\ y_ahQQ -> Network.Riak.Protocol.DtFetchResponse.DtFetchResponse y_ahQQ x_ahQO x_ahQP) (f_ahQM x_ahQN)
instance HasType' Network.Riak.Protocol.DtFetchResponse.DtFetchResponse Network.Riak.Protocol.DtFetchResponse.DataType.DataType where
  {-# INLINE type' #-}
  type' f_ahQR (Network.Riak.Protocol.DtFetchResponse.DtFetchResponse x_ahQS x_ahQT x_ahQU)
    = fmap (\ y_ahQV -> Network.Riak.Protocol.DtFetchResponse.DtFetchResponse x_ahQS y_ahQV x_ahQU) (f_ahQR x_ahQT)
instance HasValue Network.Riak.Protocol.DtFetchResponse.DtFetchResponse (Maybe Network.Riak.Protocol.DtValue.DtValue) where
  {-# INLINE value #-}
  value f_ahQW (Network.Riak.Protocol.DtFetchResponse.DtFetchResponse x_ahQX x_ahQY x_ahQZ)
    = fmap (\ y_ahR0 -> Network.Riak.Protocol.DtFetchResponse.DtFetchResponse x_ahQX x_ahQY y_ahR0) (f_ahQW x_ahQZ)
class HasCounterOp s a | s -> a where
  counter_op :: Lens' s a
instance HasCounterOp Network.Riak.Protocol.DtOp.DtOp (Maybe Network.Riak.Protocol.CounterOp.CounterOp) where
  {-# INLINE counter_op #-}
  counter_op f_ahSe (Network.Riak.Protocol.DtOp.DtOp x_ahSf x_ahSg x_ahSh)
    = fmap (\ y_ahSi -> Network.Riak.Protocol.DtOp.DtOp y_ahSi x_ahSg x_ahSh) (f_ahSe x_ahSf)
class HasMapOp s a | s -> a where
  map_op :: Lens' s a
instance HasMapOp Network.Riak.Protocol.DtOp.DtOp (Maybe Network.Riak.Protocol.MapOp.MapOp) where
  {-# INLINE map_op #-}
  map_op f_ahSj (Network.Riak.Protocol.DtOp.DtOp x_ahSk x_ahSl x_ahSm)
    = fmap (\ y_ahSn -> Network.Riak.Protocol.DtOp.DtOp x_ahSk x_ahSl y_ahSn) (f_ahSj x_ahSm)
class HasSetOp s a | s -> a where
  set_op :: Lens' s a
instance HasSetOp Network.Riak.Protocol.DtOp.DtOp (Maybe Network.Riak.Protocol.SetOp.SetOp) where
  {-# INLINE set_op #-}
  set_op f_ahSo (Network.Riak.Protocol.DtOp.DtOp x_ahSp x_ahSq x_ahSr)
    = fmap (\ y_ahSs -> Network.Riak.Protocol.DtOp.DtOp x_ahSp y_ahSs x_ahSr) (f_ahSo x_ahSq)
instance HasBucket Network.Riak.Protocol.DtUpdateRequest.DtUpdateRequest ByteString where
  {-# INLINE bucket #-}
  bucket
    f_ahUw
    (Network.Riak.Protocol.DtUpdateRequest.DtUpdateRequest x_ahUx
                                                           x_ahUy
                                                           x_ahUz
                                                           x_ahUA
                                                           x_ahUB
                                                           x_ahUC
                                                           x_ahUD
                                                           x_ahUE
                                                           x_ahUF
                                                           x_ahUG
                                                           x_ahUH
                                                           x_ahUI
                                                           x_ahUJ)
    = fmap
        (\ y_ahUK
           -> Network.Riak.Protocol.DtUpdateRequest.DtUpdateRequest
                y_ahUK x_ahUy x_ahUz x_ahUA x_ahUB x_ahUC x_ahUD x_ahUE x_ahUF x_ahUG x_ahUH x_ahUI x_ahUJ)
        (f_ahUw x_ahUx)
instance HasContext Network.Riak.Protocol.DtUpdateRequest.DtUpdateRequest (Maybe ByteString) where
  {-# INLINE context #-}
  context
    f_ahUL
    (Network.Riak.Protocol.DtUpdateRequest.DtUpdateRequest x_ahUM
                                                           x_ahUN
                                                           x_ahUO
                                                           x_ahUP
                                                           x_ahUQ
                                                           x_ahUR
                                                           x_ahUS
                                                           x_ahUT
                                                           x_ahUU
                                                           x_ahUV
                                                           x_ahUW
                                                           x_ahUX
                                                           x_ahUY)
    = fmap
        (\ y_ahUZ
           -> Network.Riak.Protocol.DtUpdateRequest.DtUpdateRequest
                x_ahUM x_ahUN x_ahUO y_ahUZ x_ahUQ x_ahUR x_ahUS x_ahUT x_ahUU x_ahUV x_ahUW x_ahUX x_ahUY)
        (f_ahUL x_ahUP)
instance HasDw Network.Riak.Protocol.DtUpdateRequest.DtUpdateRequest (Maybe Word32) where
  {-# INLINE dw #-}
  dw
    f_ahV0
    (Network.Riak.Protocol.DtUpdateRequest.DtUpdateRequest x_ahV1
                                                           x_ahV2
                                                           x_ahV3
                                                           x_ahV4
                                                           x_ahV5
                                                           x_ahV6
                                                           x_ahV7
                                                           x_ahV8
                                                           x_ahV9
                                                           x_ahVa
                                                           x_ahVb
                                                           x_ahVc
                                                           x_ahVd)
    = fmap
        (\ y_ahVe
           -> Network.Riak.Protocol.DtUpdateRequest.DtUpdateRequest
                x_ahV1 x_ahV2 x_ahV3 x_ahV4 x_ahV5 x_ahV6 y_ahVe x_ahV8 x_ahV9 x_ahVa x_ahVb x_ahVc x_ahVd)
        (f_ahV0 x_ahV7)
instance HasIncludeContext Network.Riak.Protocol.DtUpdateRequest.DtUpdateRequest (Maybe Bool) where
  {-# INLINE include_context #-}
  include_context
    f_ahVf
    (Network.Riak.Protocol.DtUpdateRequest.DtUpdateRequest x_ahVg
                                                           x_ahVh
                                                           x_ahVi
                                                           x_ahVj
                                                           x_ahVk
                                                           x_ahVl
                                                           x_ahVm
                                                           x_ahVn
                                                           x_ahVo
                                                           x_ahVp
                                                           x_ahVq
                                                           x_ahVr
                                                           x_ahVs)
    = fmap
        (\ y_ahVt
           -> Network.Riak.Protocol.DtUpdateRequest.DtUpdateRequest
                x_ahVg x_ahVh x_ahVi x_ahVj x_ahVk x_ahVl x_ahVm x_ahVn x_ahVo x_ahVp x_ahVq x_ahVr y_ahVt)
        (f_ahVf x_ahVs)
instance HasKey Network.Riak.Protocol.DtUpdateRequest.DtUpdateRequest (Maybe ByteString) where
  {-# INLINE key #-}
  key
    f_ahVu
    (Network.Riak.Protocol.DtUpdateRequest.DtUpdateRequest x_ahVv
                                                           x_ahVw
                                                           x_ahVx
                                                           x_ahVy
                                                           x_ahVz
                                                           x_ahVA
                                                           x_ahVB
                                                           x_ahVC
                                                           x_ahVD
                                                           x_ahVE
                                                           x_ahVF
                                                           x_ahVG
                                                           x_ahVH)
    = fmap
        (\ y_ahVI
           -> Network.Riak.Protocol.DtUpdateRequest.DtUpdateRequest
                x_ahVv y_ahVI x_ahVx x_ahVy x_ahVz x_ahVA x_ahVB x_ahVC x_ahVD x_ahVE x_ahVF x_ahVG x_ahVH)
        (f_ahVu x_ahVw)
instance HasNVal Network.Riak.Protocol.DtUpdateRequest.DtUpdateRequest (Maybe Word32) where
  {-# INLINE n_val #-}
  n_val
    f_ahVJ
    (Network.Riak.Protocol.DtUpdateRequest.DtUpdateRequest x_ahVK
                                                           x_ahVL
                                                           x_ahVM
                                                           x_ahVN
                                                           x_ahVO
                                                           x_ahVP
                                                           x_ahVQ
                                                           x_ahVR
                                                           x_ahVS
                                                           x_ahVT
                                                           x_ahVU
                                                           x_ahVV
                                                           x_ahVW)
    = fmap
        (\ y_ahVX
           -> Network.Riak.Protocol.DtUpdateRequest.DtUpdateRequest
                x_ahVK x_ahVL x_ahVM x_ahVN x_ahVO x_ahVP x_ahVQ x_ahVR x_ahVS x_ahVT x_ahVU y_ahVX x_ahVW)
        (f_ahVJ x_ahVV)
class HasOp s a | s -> a where
  op :: Lens' s a
instance HasOp Network.Riak.Protocol.DtUpdateRequest.DtUpdateRequest Network.Riak.Protocol.DtOp.DtOp where
  {-# INLINE op #-}
  op
    f_ahVY
    (Network.Riak.Protocol.DtUpdateRequest.DtUpdateRequest x_ahVZ
                                                           x_ahW0
                                                           x_ahW1
                                                           x_ahW2
                                                           x_ahW3
                                                           x_ahW4
                                                           x_ahW5
                                                           x_ahW6
                                                           x_ahW7
                                                           x_ahW8
                                                           x_ahW9
                                                           x_ahWa
                                                           x_ahWb)
    = fmap
        (\ y_ahWc
           -> Network.Riak.Protocol.DtUpdateRequest.DtUpdateRequest
                x_ahVZ x_ahW0 x_ahW1 x_ahW2 y_ahWc x_ahW4 x_ahW5 x_ahW6 x_ahW7 x_ahW8 x_ahW9 x_ahWa x_ahWb)
        (f_ahVY x_ahW3)
instance HasPw Network.Riak.Protocol.DtUpdateRequest.DtUpdateRequest (Maybe Word32) where
  {-# INLINE pw #-}
  pw
    f_ahWd
    (Network.Riak.Protocol.DtUpdateRequest.DtUpdateRequest x_ahWe
                                                           x_ahWf
                                                           x_ahWg
                                                           x_ahWh
                                                           x_ahWi
                                                           x_ahWj
                                                           x_ahWk
                                                           x_ahWl
                                                           x_ahWm
                                                           x_ahWn
                                                           x_ahWo
                                                           x_ahWp
                                                           x_ahWq)
    = fmap
        (\ y_ahWr
           -> Network.Riak.Protocol.DtUpdateRequest.DtUpdateRequest
                x_ahWe x_ahWf x_ahWg x_ahWh x_ahWi x_ahWj x_ahWk y_ahWr x_ahWm x_ahWn x_ahWo x_ahWp x_ahWq)
        (f_ahWd x_ahWl)
class HasReturnBody s a | s -> a where
  return_body :: Lens' s a
instance HasReturnBody Network.Riak.Protocol.DtUpdateRequest.DtUpdateRequest (Maybe Bool) where
  {-# INLINE return_body #-}
  return_body
    f_ahWs
    (Network.Riak.Protocol.DtUpdateRequest.DtUpdateRequest x_ahWt
                                                           x_ahWu
                                                           x_ahWv
                                                           x_ahWw
                                                           x_ahWx
                                                           x_ahWy
                                                           x_ahWz
                                                           x_ahWA
                                                           x_ahWB
                                                           x_ahWC
                                                           x_ahWD
                                                           x_ahWE
                                                           x_ahWF)
    = fmap
        (\ y_ahWG
           -> Network.Riak.Protocol.DtUpdateRequest.DtUpdateRequest
                x_ahWt x_ahWu x_ahWv x_ahWw x_ahWx x_ahWy x_ahWz x_ahWA y_ahWG x_ahWC x_ahWD x_ahWE x_ahWF)
        (f_ahWs x_ahWB)
instance HasSloppyQuorum Network.Riak.Protocol.DtUpdateRequest.DtUpdateRequest (Maybe Bool) where
  {-# INLINE sloppy_quorum #-}
  sloppy_quorum
    f_ahWH
    (Network.Riak.Protocol.DtUpdateRequest.DtUpdateRequest x_ahWI
                                                           x_ahWJ
                                                           x_ahWK
                                                           x_ahWL
                                                           x_ahWM
                                                           x_ahWN
                                                           x_ahWO
                                                           x_ahWP
                                                           x_ahWQ
                                                           x_ahWR
                                                           x_ahWS
                                                           x_ahWT
                                                           x_ahWU)
    = fmap
        (\ y_ahWV
           -> Network.Riak.Protocol.DtUpdateRequest.DtUpdateRequest
                x_ahWI x_ahWJ x_ahWK x_ahWL x_ahWM x_ahWN x_ahWO x_ahWP x_ahWQ x_ahWR y_ahWV x_ahWT x_ahWU)
        (f_ahWH x_ahWS)
instance HasTimeout Network.Riak.Protocol.DtUpdateRequest.DtUpdateRequest (Maybe Word32) where
  {-# INLINE timeout #-}
  timeout
    f_ahWW
    (Network.Riak.Protocol.DtUpdateRequest.DtUpdateRequest x_ahWX
                                                           x_ahWY
                                                           x_ahWZ
                                                           x_ahX0
                                                           x_ahX1
                                                           x_ahX2
                                                           x_ahX3
                                                           x_ahX4
                                                           x_ahX5
                                                           x_ahX6
                                                           x_ahX7
                                                           x_ahX8
                                                           x_ahX9)
    = fmap
        (\ y_ahXa
           -> Network.Riak.Protocol.DtUpdateRequest.DtUpdateRequest
                x_ahWX x_ahWY x_ahWZ x_ahX0 x_ahX1 x_ahX2 x_ahX3 x_ahX4 x_ahX5 y_ahXa x_ahX7 x_ahX8 x_ahX9)
        (f_ahWW x_ahX6)
instance HasType' Network.Riak.Protocol.DtUpdateRequest.DtUpdateRequest ByteString where
  {-# INLINE type' #-}
  type'
    f_ahXb
    (Network.Riak.Protocol.DtUpdateRequest.DtUpdateRequest x_ahXc
                                                           x_ahXd
                                                           x_ahXe
                                                           x_ahXf
                                                           x_ahXg
                                                           x_ahXh
                                                           x_ahXi
                                                           x_ahXj
                                                           x_ahXk
                                                           x_ahXl
                                                           x_ahXm
                                                           x_ahXn
                                                           x_ahXo)
    = fmap
        (\ y_ahXp
           -> Network.Riak.Protocol.DtUpdateRequest.DtUpdateRequest
                x_ahXc x_ahXd y_ahXp x_ahXf x_ahXg x_ahXh x_ahXi x_ahXj x_ahXk x_ahXl x_ahXm x_ahXn x_ahXo)
        (f_ahXb x_ahXe)
instance HasW Network.Riak.Protocol.DtUpdateRequest.DtUpdateRequest (Maybe Word32) where
  {-# INLINE w #-}
  w f_ahXq
    (Network.Riak.Protocol.DtUpdateRequest.DtUpdateRequest x_ahXr
                                                           x_ahXs
                                                           x_ahXt
                                                           x_ahXu
                                                           x_ahXv
                                                           x_ahXw
                                                           x_ahXx
                                                           x_ahXy
                                                           x_ahXz
                                                           x_ahXA
                                                           x_ahXB
                                                           x_ahXC
                                                           x_ahXD)
    = fmap
        (\ y_ahXE
           -> Network.Riak.Protocol.DtUpdateRequest.DtUpdateRequest
                x_ahXr x_ahXs x_ahXt x_ahXu x_ahXv y_ahXE x_ahXx x_ahXy x_ahXz x_ahXA x_ahXB x_ahXC x_ahXD)
        (f_ahXq x_ahXw)
instance HasContext Network.Riak.Protocol.DtUpdateResponse.DtUpdateResponse (Maybe ByteString) where
  {-# INLINE context #-}
  context f_ai1y (Network.Riak.Protocol.DtUpdateResponse.DtUpdateResponse x_ai1z x_ai1A x_ai1B x_ai1C x_ai1D)
    = fmap (\ y_ai1E -> Network.Riak.Protocol.DtUpdateResponse.DtUpdateResponse x_ai1z y_ai1E x_ai1B x_ai1C x_ai1D) (f_ai1y x_ai1A)
class HasCounterValue s a | s -> a where
  counter_value :: Lens' s a
instance HasCounterValue Network.Riak.Protocol.DtUpdateResponse.DtUpdateResponse (Maybe Int64) where
  {-# INLINE counter_value #-}
  counter_value f_ai1F (Network.Riak.Protocol.DtUpdateResponse.DtUpdateResponse x_ai1G x_ai1H x_ai1I x_ai1J x_ai1K)
    = fmap (\ y_ai1L -> Network.Riak.Protocol.DtUpdateResponse.DtUpdateResponse x_ai1G x_ai1H y_ai1L x_ai1J x_ai1K) (f_ai1F x_ai1I)
instance HasKey Network.Riak.Protocol.DtUpdateResponse.DtUpdateResponse (Maybe ByteString) where
  {-# INLINE key #-}
  key f_ai1M (Network.Riak.Protocol.DtUpdateResponse.DtUpdateResponse x_ai1N x_ai1O x_ai1P x_ai1Q x_ai1R)
    = fmap (\ y_ai1S -> Network.Riak.Protocol.DtUpdateResponse.DtUpdateResponse y_ai1S x_ai1O x_ai1P x_ai1Q x_ai1R) (f_ai1M x_ai1N)
class HasMapValue s a | s -> a where
  map_value :: Lens' s a
instance HasMapValue Network.Riak.Protocol.DtUpdateResponse.DtUpdateResponse (Seq Network.Riak.Protocol.MapEntry.MapEntry) where
  {-# INLINE map_value #-}
  map_value f_ai1T (Network.Riak.Protocol.DtUpdateResponse.DtUpdateResponse x_ai1U x_ai1V x_ai1W x_ai1X x_ai1Y)
    = fmap (\ y_ai1Z -> Network.Riak.Protocol.DtUpdateResponse.DtUpdateResponse x_ai1U x_ai1V x_ai1W x_ai1X y_ai1Z) (f_ai1T x_ai1Y)
class HasSetValue s a | s -> a where
  set_value :: Lens' s a
instance HasSetValue Network.Riak.Protocol.DtUpdateResponse.DtUpdateResponse (Seq ByteString) where
  {-# INLINE set_value #-}
  set_value f_ai20 (Network.Riak.Protocol.DtUpdateResponse.DtUpdateResponse x_ai21 x_ai22 x_ai23 x_ai24 x_ai25)
    = fmap (\ y_ai26 -> Network.Riak.Protocol.DtUpdateResponse.DtUpdateResponse x_ai21 x_ai22 x_ai23 y_ai26 x_ai25) (f_ai20 x_ai24)
instance HasCounterValue Network.Riak.Protocol.DtValue.DtValue (Maybe Int64) where
  {-# INLINE counter_value #-}
  counter_value f_ai4C (Network.Riak.Protocol.DtValue.DtValue x_ai4D x_ai4E x_ai4F)
    = fmap (\ y_ai4G -> Network.Riak.Protocol.DtValue.DtValue y_ai4G x_ai4E x_ai4F) (f_ai4C x_ai4D)
instance HasMapValue Network.Riak.Protocol.DtValue.DtValue (Seq Network.Riak.Protocol.MapEntry.MapEntry) where
  {-# INLINE map_value #-}
  map_value f_ai4H (Network.Riak.Protocol.DtValue.DtValue x_ai4I x_ai4J x_ai4K)
    = fmap (\ y_ai4L -> Network.Riak.Protocol.DtValue.DtValue x_ai4I x_ai4J y_ai4L) (f_ai4H x_ai4K)
instance HasSetValue Network.Riak.Protocol.DtValue.DtValue (Seq ByteString) where
  {-# INLINE set_value #-}
  set_value f_ai4M (Network.Riak.Protocol.DtValue.DtValue x_ai4N x_ai4O x_ai4P)
    = fmap (\ y_ai4Q -> Network.Riak.Protocol.DtValue.DtValue x_ai4N y_ai4Q x_ai4P) (f_ai4M x_ai4O)
class HasErrcode s a | s -> a where
  errcode :: Lens' s a
instance HasErrcode Network.Riak.Protocol.ErrorResponse.ErrorResponse Word32 where
  {-# INLINE errcode #-}
  errcode f_ai5E (Network.Riak.Protocol.ErrorResponse.ErrorResponse x_ai5F x_ai5G)
    = fmap (\ y_ai5H -> Network.Riak.Protocol.ErrorResponse.ErrorResponse x_ai5F y_ai5H) (f_ai5E x_ai5G)
class HasErrmsg s a | s -> a where
  errmsg :: Lens' s a
instance HasErrmsg Network.Riak.Protocol.ErrorResponse.ErrorResponse ByteString where
  {-# INLINE errmsg #-}
  errmsg f_ai5I (Network.Riak.Protocol.ErrorResponse.ErrorResponse x_ai5J x_ai5K)
    = fmap (\ y_ai5L -> Network.Riak.Protocol.ErrorResponse.ErrorResponse y_ai5L x_ai5K) (f_ai5I x_ai5J)
instance HasBucket Network.Riak.Protocol.GetBucketKeyPreflistRequest.GetBucketKeyPreflistRequest ByteString where
  {-# INLINE bucket #-}
  bucket f_ai7c (Network.Riak.Protocol.GetBucketKeyPreflistRequest.GetBucketKeyPreflistRequest x_ai7d x_ai7e x_ai7f)
    = fmap
        (\ y_ai7g -> Network.Riak.Protocol.GetBucketKeyPreflistRequest.GetBucketKeyPreflistRequest y_ai7g x_ai7e x_ai7f) (f_ai7c x_ai7d)
instance HasKey Network.Riak.Protocol.GetBucketKeyPreflistRequest.GetBucketKeyPreflistRequest ByteString where
  {-# INLINE key #-}
  key f_ai7h (Network.Riak.Protocol.GetBucketKeyPreflistRequest.GetBucketKeyPreflistRequest x_ai7i x_ai7j x_ai7k)
    = fmap
        (\ y_ai7l -> Network.Riak.Protocol.GetBucketKeyPreflistRequest.GetBucketKeyPreflistRequest x_ai7i y_ai7l x_ai7k) (f_ai7h x_ai7j)
instance HasType' Network.Riak.Protocol.GetBucketKeyPreflistRequest.GetBucketKeyPreflistRequest (Maybe ByteString) where
  {-# INLINE type' #-}
  type' f_ai7m (Network.Riak.Protocol.GetBucketKeyPreflistRequest.GetBucketKeyPreflistRequest x_ai7n x_ai7o x_ai7p)
    = fmap
        (\ y_ai7q -> Network.Riak.Protocol.GetBucketKeyPreflistRequest.GetBucketKeyPreflistRequest x_ai7n x_ai7o y_ai7q) (f_ai7m x_ai7p)
class HasPreflist s a | s -> a where
  preflist :: Lens' s a
instance HasPreflist Network.Riak.Protocol.GetBucketKeyPreflistResponse.GetBucketKeyPreflistResponse (Seq Network.Riak.Protocol.BucketKeyPreflistItem.BucketKeyPreflistItem) where
  {-# INLINE preflist #-}
  preflist f_ai8e (Network.Riak.Protocol.GetBucketKeyPreflistResponse.GetBucketKeyPreflistResponse x_ai8f)
    = fmap (\ y_ai8g -> Network.Riak.Protocol.GetBucketKeyPreflistResponse.GetBucketKeyPreflistResponse y_ai8g) (f_ai8e x_ai8f)
instance HasBucket Network.Riak.Protocol.GetBucketRequest.GetBucketRequest ByteString where
  {-# INLINE bucket #-}
  bucket f_ai92 (Network.Riak.Protocol.GetBucketRequest.GetBucketRequest x_ai93 x_ai94)
    = fmap (\ y_ai95 -> Network.Riak.Protocol.GetBucketRequest.GetBucketRequest y_ai95 x_ai94) (f_ai92 x_ai93)
instance HasType' Network.Riak.Protocol.GetBucketRequest.GetBucketRequest (Maybe ByteString) where
  {-# INLINE type' #-}
  type' f_ai96 (Network.Riak.Protocol.GetBucketRequest.GetBucketRequest x_ai97 x_ai98)
    = fmap (\ y_ai99 -> Network.Riak.Protocol.GetBucketRequest.GetBucketRequest x_ai97 y_ai99) (f_ai96 x_ai98)
class HasProps s a | s -> a where
  props :: Lens' s a
instance HasProps Network.Riak.Protocol.GetBucketResponse.GetBucketResponse Network.Riak.Protocol.BucketProps.BucketProps where
  {-# INLINE props #-}
  props f_ai9J (Network.Riak.Protocol.GetBucketResponse.GetBucketResponse x_ai9K)
    = fmap (\ y_ai9L -> Network.Riak.Protocol.GetBucketResponse.GetBucketResponse y_ai9L) (f_ai9J x_ai9K)
instance HasType' Network.Riak.Protocol.GetBucketTypeRequest.GetBucketTypeRequest ByteString where
  {-# INLINE type' #-}
  type' f_aiax (Network.Riak.Protocol.GetBucketTypeRequest.GetBucketTypeRequest x_aiay)
    = fmap (\ y_aiaz -> Network.Riak.Protocol.GetBucketTypeRequest.GetBucketTypeRequest y_aiaz) (f_aiax x_aiay)
class HasClientId s a | s -> a where
  client_id :: Lens' s a
instance HasClientId Network.Riak.Protocol.GetClientIDResponse.GetClientIDResponse ByteString where
  {-# INLINE client_id #-}
  client_id f_aib2 (Network.Riak.Protocol.GetClientIDResponse.GetClientIDResponse x_aib3)
    = fmap (\ y_aib4 -> Network.Riak.Protocol.GetClientIDResponse.GetClientIDResponse y_aib4) (f_aib2 x_aib3)
instance HasBasicQuorum Network.Riak.Protocol.GetRequest.GetRequest (Maybe Bool) where
  {-# INLINE basic_quorum #-}
  basic_quorum
    f_aibQ
    (Network.Riak.Protocol.GetRequest.GetRequest x_aibR
                                                 x_aibS
                                                 x_aibT
                                                 x_aibU
                                                 x_aibV
                                                 x_aibW
                                                 x_aibX
                                                 x_aibY
                                                 x_aibZ
                                                 x_aic0
                                                 x_aic1
                                                 x_aic2
                                                 x_aic3)
    = fmap
        (\ y_aic4
           -> Network.Riak.Protocol.GetRequest.GetRequest
                x_aibR x_aibS x_aibT x_aibU y_aic4 x_aibW x_aibX x_aibY x_aibZ x_aic0 x_aic1 x_aic2 x_aic3)
        (f_aibQ x_aibV)
instance HasBucket Network.Riak.Protocol.GetRequest.GetRequest ByteString where
  {-# INLINE bucket #-}
  bucket
    f_aic5
    (Network.Riak.Protocol.GetRequest.GetRequest x_aic6
                                                 x_aic7
                                                 x_aic8
                                                 x_aic9
                                                 x_aica
                                                 x_aicb
                                                 x_aicc
                                                 x_aicd
                                                 x_aice
                                                 x_aicf
                                                 x_aicg
                                                 x_aich
                                                 x_aici)
    = fmap
        (\ y_aicj
           -> Network.Riak.Protocol.GetRequest.GetRequest
                y_aicj x_aic7 x_aic8 x_aic9 x_aica x_aicb x_aicc x_aicd x_aice x_aicf x_aicg x_aich x_aici)
        (f_aic5 x_aic6)
class HasDeletedvclock s a | s -> a where
  deletedvclock :: Lens' s a
instance HasDeletedvclock Network.Riak.Protocol.GetRequest.GetRequest (Maybe Bool) where
  {-# INLINE deletedvclock #-}
  deletedvclock
    f_aick
    (Network.Riak.Protocol.GetRequest.GetRequest x_aicl
                                                 x_aicm
                                                 x_aicn
                                                 x_aico
                                                 x_aicp
                                                 x_aicq
                                                 x_aicr
                                                 x_aics
                                                 x_aict
                                                 x_aicu
                                                 x_aicv
                                                 x_aicw
                                                 x_aicx)
    = fmap
        (\ y_aicy
           -> Network.Riak.Protocol.GetRequest.GetRequest
                x_aicl x_aicm x_aicn x_aico x_aicp x_aicq x_aicr x_aics y_aicy x_aicu x_aicv x_aicw x_aicx)
        (f_aick x_aict)
class HasHead s a | s -> a where
  head :: Lens' s a
instance HasHead Network.Riak.Protocol.GetRequest.GetRequest (Maybe Bool) where
  {-# INLINE head #-}
  head
    f_aicz
    (Network.Riak.Protocol.GetRequest.GetRequest x_aicA
                                                 x_aicB
                                                 x_aicC
                                                 x_aicD
                                                 x_aicE
                                                 x_aicF
                                                 x_aicG
                                                 x_aicH
                                                 x_aicI
                                                 x_aicJ
                                                 x_aicK
                                                 x_aicL
                                                 x_aicM)
    = fmap
        (\ y_aicN
           -> Network.Riak.Protocol.GetRequest.GetRequest
                x_aicA x_aicB x_aicC x_aicD x_aicE x_aicF x_aicG y_aicN x_aicI x_aicJ x_aicK x_aicL x_aicM)
        (f_aicz x_aicH)
class HasIfModified s a | s -> a where
  if_modified :: Lens' s a
instance HasIfModified Network.Riak.Protocol.GetRequest.GetRequest (Maybe ByteString) where
  {-# INLINE if_modified #-}
  if_modified
    f_aicO
    (Network.Riak.Protocol.GetRequest.GetRequest x_aicP
                                                 x_aicQ
                                                 x_aicR
                                                 x_aicS
                                                 x_aicT
                                                 x_aicU
                                                 x_aicV
                                                 x_aicW
                                                 x_aicX
                                                 x_aicY
                                                 x_aicZ
                                                 x_aid0
                                                 x_aid1)
    = fmap
        (\ y_aid2
           -> Network.Riak.Protocol.GetRequest.GetRequest
                x_aicP x_aicQ x_aicR x_aicS x_aicT x_aicU y_aid2 x_aicW x_aicX x_aicY x_aicZ x_aid0 x_aid1)
        (f_aicO x_aicV)
instance HasKey Network.Riak.Protocol.GetRequest.GetRequest ByteString where
  {-# INLINE key #-}
  key
    f_aid3
    (Network.Riak.Protocol.GetRequest.GetRequest x_aid4
                                                 x_aid5
                                                 x_aid6
                                                 x_aid7
                                                 x_aid8
                                                 x_aid9
                                                 x_aida
                                                 x_aidb
                                                 x_aidc
                                                 x_aidd
                                                 x_aide
                                                 x_aidf
                                                 x_aidg)
    = fmap
        (\ y_aidh
           -> Network.Riak.Protocol.GetRequest.GetRequest
                x_aid4 y_aidh x_aid6 x_aid7 x_aid8 x_aid9 x_aida x_aidb x_aidc x_aidd x_aide x_aidf x_aidg)
        (f_aid3 x_aid5)
instance HasNVal Network.Riak.Protocol.GetRequest.GetRequest (Maybe Word32) where
  {-# INLINE n_val #-}
  n_val
    f_aidi
    (Network.Riak.Protocol.GetRequest.GetRequest x_aidj
                                                 x_aidk
                                                 x_aidl
                                                 x_aidm
                                                 x_aidn
                                                 x_aido
                                                 x_aidp
                                                 x_aidq
                                                 x_aidr
                                                 x_aids
                                                 x_aidt
                                                 x_aidu
                                                 x_aidv)
    = fmap
        (\ y_aidw
           -> Network.Riak.Protocol.GetRequest.GetRequest
                x_aidj x_aidk x_aidl x_aidm x_aidn x_aido x_aidp x_aidq x_aidr x_aids x_aidt y_aidw x_aidv)
        (f_aidi x_aidu)
instance HasNotfoundOk Network.Riak.Protocol.GetRequest.GetRequest (Maybe Bool) where
  {-# INLINE notfound_ok #-}
  notfound_ok
    f_aidx
    (Network.Riak.Protocol.GetRequest.GetRequest x_aidy
                                                 x_aidz
                                                 x_aidA
                                                 x_aidB
                                                 x_aidC
                                                 x_aidD
                                                 x_aidE
                                                 x_aidF
                                                 x_aidG
                                                 x_aidH
                                                 x_aidI
                                                 x_aidJ
                                                 x_aidK)
    = fmap
        (\ y_aidL
           -> Network.Riak.Protocol.GetRequest.GetRequest
                x_aidy x_aidz x_aidA x_aidB x_aidC y_aidL x_aidE x_aidF x_aidG x_aidH x_aidI x_aidJ x_aidK)
        (f_aidx x_aidD)
instance HasPr Network.Riak.Protocol.GetRequest.GetRequest (Maybe Word32) where
  {-# INLINE pr #-}
  pr
    f_aidM
    (Network.Riak.Protocol.GetRequest.GetRequest x_aidN
                                                 x_aidO
                                                 x_aidP
                                                 x_aidQ
                                                 x_aidR
                                                 x_aidS
                                                 x_aidT
                                                 x_aidU
                                                 x_aidV
                                                 x_aidW
                                                 x_aidX
                                                 x_aidY
                                                 x_aidZ)
    = fmap
        (\ y_aie0
           -> Network.Riak.Protocol.GetRequest.GetRequest
                x_aidN x_aidO x_aidP y_aie0 x_aidR x_aidS x_aidT x_aidU x_aidV x_aidW x_aidX x_aidY x_aidZ)
        (f_aidM x_aidQ)
instance HasR Network.Riak.Protocol.GetRequest.GetRequest (Maybe Word32) where
  {-# INLINE r #-}
  r f_aie1
    (Network.Riak.Protocol.GetRequest.GetRequest x_aie2
                                                 x_aie3
                                                 x_aie4
                                                 x_aie5
                                                 x_aie6
                                                 x_aie7
                                                 x_aie8
                                                 x_aie9
                                                 x_aiea
                                                 x_aieb
                                                 x_aiec
                                                 x_aied
                                                 x_aiee)
    = fmap
        (\ y_aief
           -> Network.Riak.Protocol.GetRequest.GetRequest
                x_aie2 x_aie3 y_aief x_aie5 x_aie6 x_aie7 x_aie8 x_aie9 x_aiea x_aieb x_aiec x_aied x_aiee)
        (f_aie1 x_aie4)
instance HasSloppyQuorum Network.Riak.Protocol.GetRequest.GetRequest (Maybe Bool) where
  {-# INLINE sloppy_quorum #-}
  sloppy_quorum
    f_aieg
    (Network.Riak.Protocol.GetRequest.GetRequest x_aieh
                                                 x_aiei
                                                 x_aiej
                                                 x_aiek
                                                 x_aiel
                                                 x_aiem
                                                 x_aien
                                                 x_aieo
                                                 x_aiep
                                                 x_aieq
                                                 x_aier
                                                 x_aies
                                                 x_aiet)
    = fmap
        (\ y_aieu
           -> Network.Riak.Protocol.GetRequest.GetRequest
                x_aieh x_aiei x_aiej x_aiek x_aiel x_aiem x_aien x_aieo x_aiep x_aieq y_aieu x_aies x_aiet)
        (f_aieg x_aier)
instance HasTimeout Network.Riak.Protocol.GetRequest.GetRequest (Maybe Word32) where
  {-# INLINE timeout #-}
  timeout
    f_aiev
    (Network.Riak.Protocol.GetRequest.GetRequest x_aiew
                                                 x_aiex
                                                 x_aiey
                                                 x_aiez
                                                 x_aieA
                                                 x_aieB
                                                 x_aieC
                                                 x_aieD
                                                 x_aieE
                                                 x_aieF
                                                 x_aieG
                                                 x_aieH
                                                 x_aieI)
    = fmap
        (\ y_aieJ
           -> Network.Riak.Protocol.GetRequest.GetRequest
                x_aiew x_aiex x_aiey x_aiez x_aieA x_aieB x_aieC x_aieD x_aieE y_aieJ x_aieG x_aieH x_aieI)
        (f_aiev x_aieF)
instance HasType' Network.Riak.Protocol.GetRequest.GetRequest (Maybe ByteString) where
  {-# INLINE type' #-}
  type'
    f_aieK
    (Network.Riak.Protocol.GetRequest.GetRequest x_aieL
                                                 x_aieM
                                                 x_aieN
                                                 x_aieO
                                                 x_aieP
                                                 x_aieQ
                                                 x_aieR
                                                 x_aieS
                                                 x_aieT
                                                 x_aieU
                                                 x_aieV
                                                 x_aieW
                                                 x_aieX)
    = fmap
        (\ y_aieY
           -> Network.Riak.Protocol.GetRequest.GetRequest
                x_aieL x_aieM x_aieN x_aieO x_aieP x_aieQ x_aieR x_aieS x_aieT x_aieU x_aieV x_aieW y_aieY)
        (f_aieK x_aieX)
class HasContent s a | s -> a where
  content :: Lens' s a
instance HasContent Network.Riak.Protocol.GetResponse.GetResponse (Seq Network.Riak.Protocol.Content.Content) where
  {-# INLINE content #-}
  content f_aiji (Network.Riak.Protocol.GetResponse.GetResponse x_aijj x_aijk x_aijl)
    = fmap (\ y_aijm -> Network.Riak.Protocol.GetResponse.GetResponse y_aijm x_aijk x_aijl) (f_aiji x_aijj)
class HasUnchanged s a | s -> a where
  unchanged :: Lens' s a
instance HasUnchanged Network.Riak.Protocol.GetResponse.GetResponse (Maybe Bool) where
  {-# INLINE unchanged #-}
  unchanged f_aijn (Network.Riak.Protocol.GetResponse.GetResponse x_aijo x_aijp x_aijq)
    = fmap (\ y_aijr -> Network.Riak.Protocol.GetResponse.GetResponse x_aijo x_aijp y_aijr) (f_aijn x_aijq)
instance HasVclock Network.Riak.Protocol.GetResponse.GetResponse (Maybe ByteString) where
  {-# INLINE vclock #-}
  vclock f_aijs (Network.Riak.Protocol.GetResponse.GetResponse x_aijt x_aiju x_aijv)
    = fmap (\ y_aijw -> Network.Riak.Protocol.GetResponse.GetResponse x_aijt y_aijw x_aijv) (f_aijs x_aiju)
instance HasKey Network.Riak.Protocol.IndexObject.IndexObject ByteString where
  {-# INLINE key #-}
  key f_ailh (Network.Riak.Protocol.IndexObject.IndexObject x_aili x_ailj)
    = fmap (\ y_ailk -> Network.Riak.Protocol.IndexObject.IndexObject y_ailk x_ailj) (f_ailh x_aili)
class HasObject s a | s -> a where
  object :: Lens' s a
instance HasObject Network.Riak.Protocol.IndexObject.IndexObject Network.Riak.Protocol.GetResponse.GetResponse where
  {-# INLINE object #-}
  object f_aill (Network.Riak.Protocol.IndexObject.IndexObject x_ailm x_ailn)
    = fmap (\ y_ailo -> Network.Riak.Protocol.IndexObject.IndexObject x_ailm y_ailo) (f_aill x_ailn)
instance HasBucket Network.Riak.Protocol.IndexRequest.IndexRequest ByteString where
  {-# INLINE bucket #-}
  bucket
    f_aimo
    (Network.Riak.Protocol.IndexRequest.IndexRequest x_aimp
                                                     x_aimq
                                                     x_aimr
                                                     x_aims
                                                     x_aimt
                                                     x_aimu
                                                     x_aimv
                                                     x_aimw
                                                     x_aimx
                                                     x_aimy
                                                     x_aimz
                                                     x_aimA
                                                     x_aimB
                                                     x_aimC)
    = fmap
        (\ y_aimD
           -> Network.Riak.Protocol.IndexRequest.IndexRequest
                y_aimD x_aimq x_aimr x_aims x_aimt x_aimu x_aimv x_aimw x_aimx x_aimy x_aimz x_aimA x_aimB x_aimC)
        (f_aimo x_aimp)
instance HasContinuation Network.Riak.Protocol.IndexRequest.IndexRequest (Maybe ByteString) where
  {-# INLINE continuation #-}
  continuation
    f_aimE
    (Network.Riak.Protocol.IndexRequest.IndexRequest x_aimF
                                                     x_aimG
                                                     x_aimH
                                                     x_aimI
                                                     x_aimJ
                                                     x_aimK
                                                     x_aimL
                                                     x_aimM
                                                     x_aimN
                                                     x_aimO
                                                     x_aimP
                                                     x_aimQ
                                                     x_aimR
                                                     x_aimS)
    = fmap
        (\ y_aimT
           -> Network.Riak.Protocol.IndexRequest.IndexRequest
                x_aimF x_aimG x_aimH x_aimI x_aimJ x_aimK x_aimL x_aimM x_aimN y_aimT x_aimP x_aimQ x_aimR x_aimS)
        (f_aimE x_aimO)
class HasIndex s a | s -> a where
  index :: Lens' s a
instance HasIndex Network.Riak.Protocol.IndexRequest.IndexRequest ByteString where
  {-# INLINE index #-}
  index
    f_aimU
    (Network.Riak.Protocol.IndexRequest.IndexRequest x_aimV
                                                     x_aimW
                                                     x_aimX
                                                     x_aimY
                                                     x_aimZ
                                                     x_ain0
                                                     x_ain1
                                                     x_ain2
                                                     x_ain3
                                                     x_ain4
                                                     x_ain5
                                                     x_ain6
                                                     x_ain7
                                                     x_ain8)
    = fmap
        (\ y_ain9
           -> Network.Riak.Protocol.IndexRequest.IndexRequest
                x_aimV y_ain9 x_aimX x_aimY x_aimZ x_ain0 x_ain1 x_ain2 x_ain3 x_ain4 x_ain5 x_ain6 x_ain7 x_ain8)
        (f_aimU x_aimW)
instance HasKey Network.Riak.Protocol.IndexRequest.IndexRequest (Maybe ByteString) where
  {-# INLINE key #-}
  key
    f_aina
    (Network.Riak.Protocol.IndexRequest.IndexRequest x_ainb
                                                     x_ainc
                                                     x_aind
                                                     x_aine
                                                     x_ainf
                                                     x_aing
                                                     x_ainh
                                                     x_aini
                                                     x_ainj
                                                     x_aink
                                                     x_ainl
                                                     x_ainm
                                                     x_ainn
                                                     x_aino)
    = fmap
        (\ y_ainp
           -> Network.Riak.Protocol.IndexRequest.IndexRequest
                x_ainb x_ainc x_aind y_ainp x_ainf x_aing x_ainh x_aini x_ainj x_aink x_ainl x_ainm x_ainn x_aino)
        (f_aina x_aine)
instance HasMaxResults Network.Riak.Protocol.IndexRequest.IndexRequest (Maybe Word32) where
  {-# INLINE max_results #-}
  max_results
    f_ainq
    (Network.Riak.Protocol.IndexRequest.IndexRequest x_ainr
                                                     x_ains
                                                     x_aint
                                                     x_ainu
                                                     x_ainv
                                                     x_ainw
                                                     x_ainx
                                                     x_ainy
                                                     x_ainz
                                                     x_ainA
                                                     x_ainB
                                                     x_ainC
                                                     x_ainD
                                                     x_ainE)
    = fmap
        (\ y_ainF
           -> Network.Riak.Protocol.IndexRequest.IndexRequest
                x_ainr x_ains x_aint x_ainu x_ainv x_ainw x_ainx x_ainy y_ainF x_ainA x_ainB x_ainC x_ainD x_ainE)
        (f_ainq x_ainz)
class HasPaginationSort s a | s -> a where
  pagination_sort :: Lens' s a
instance HasPaginationSort Network.Riak.Protocol.IndexRequest.IndexRequest (Maybe Bool) where
  {-# INLINE pagination_sort #-}
  pagination_sort
    f_ainG
    (Network.Riak.Protocol.IndexRequest.IndexRequest x_ainH
                                                     x_ainI
                                                     x_ainJ
                                                     x_ainK
                                                     x_ainL
                                                     x_ainM
                                                     x_ainN
                                                     x_ainO
                                                     x_ainP
                                                     x_ainQ
                                                     x_ainR
                                                     x_ainS
                                                     x_ainT
                                                     x_ainU)
    = fmap
        (\ y_ainV
           -> Network.Riak.Protocol.IndexRequest.IndexRequest
                x_ainH x_ainI x_ainJ x_ainK x_ainL x_ainM x_ainN x_ainO x_ainP x_ainQ x_ainR x_ainS x_ainT y_ainV)
        (f_ainG x_ainU)
class HasQtype s a | s -> a where
  qtype :: Lens' s a
instance HasQtype Network.Riak.Protocol.IndexRequest.IndexRequest Network.Riak.Protocol.IndexRequest.IndexQueryType.IndexQueryType where
  {-# INLINE qtype #-}
  qtype
    f_ainW
    (Network.Riak.Protocol.IndexRequest.IndexRequest x_ainX
                                                     x_ainY
                                                     x_ainZ
                                                     x_aio0
                                                     x_aio1
                                                     x_aio2
                                                     x_aio3
                                                     x_aio4
                                                     x_aio5
                                                     x_aio6
                                                     x_aio7
                                                     x_aio8
                                                     x_aio9
                                                     x_aioa)
    = fmap
        (\ y_aiob
           -> Network.Riak.Protocol.IndexRequest.IndexRequest
                x_ainX x_ainY y_aiob x_aio0 x_aio1 x_aio2 x_aio3 x_aio4 x_aio5 x_aio6 x_aio7 x_aio8 x_aio9 x_aioa)
        (f_ainW x_ainZ)
class HasRangeMax s a | s -> a where
  range_max :: Lens' s a
instance HasRangeMax Network.Riak.Protocol.IndexRequest.IndexRequest (Maybe ByteString) where
  {-# INLINE range_max #-}
  range_max
    f_aioc
    (Network.Riak.Protocol.IndexRequest.IndexRequest x_aiod
                                                     x_aioe
                                                     x_aiof
                                                     x_aiog
                                                     x_aioh
                                                     x_aioi
                                                     x_aioj
                                                     x_aiok
                                                     x_aiol
                                                     x_aiom
                                                     x_aion
                                                     x_aioo
                                                     x_aiop
                                                     x_aioq)
    = fmap
        (\ y_aior
           -> Network.Riak.Protocol.IndexRequest.IndexRequest
                x_aiod x_aioe x_aiof x_aiog x_aioh y_aior x_aioj x_aiok x_aiol x_aiom x_aion x_aioo x_aiop x_aioq)
        (f_aioc x_aioi)
class HasRangeMin s a | s -> a where
  range_min :: Lens' s a
instance HasRangeMin Network.Riak.Protocol.IndexRequest.IndexRequest (Maybe ByteString) where
  {-# INLINE range_min #-}
  range_min
    f_aios
    (Network.Riak.Protocol.IndexRequest.IndexRequest x_aiot
                                                     x_aiou
                                                     x_aiov
                                                     x_aiow
                                                     x_aiox
                                                     x_aioy
                                                     x_aioz
                                                     x_aioA
                                                     x_aioB
                                                     x_aioC
                                                     x_aioD
                                                     x_aioE
                                                     x_aioF
                                                     x_aioG)
    = fmap
        (\ y_aioH
           -> Network.Riak.Protocol.IndexRequest.IndexRequest
                x_aiot x_aiou x_aiov x_aiow y_aioH x_aioy x_aioz x_aioA x_aioB x_aioC x_aioD x_aioE x_aioF x_aioG)
        (f_aios x_aiox)
class HasReturnTerms s a | s -> a where
  return_terms :: Lens' s a
instance HasReturnTerms Network.Riak.Protocol.IndexRequest.IndexRequest (Maybe Bool) where
  {-# INLINE return_terms #-}
  return_terms
    f_aioI
    (Network.Riak.Protocol.IndexRequest.IndexRequest x_aioJ
                                                     x_aioK
                                                     x_aioL
                                                     x_aioM
                                                     x_aioN
                                                     x_aioO
                                                     x_aioP
                                                     x_aioQ
                                                     x_aioR
                                                     x_aioS
                                                     x_aioT
                                                     x_aioU
                                                     x_aioV
                                                     x_aioW)
    = fmap
        (\ y_aioX
           -> Network.Riak.Protocol.IndexRequest.IndexRequest
                x_aioJ x_aioK x_aioL x_aioM x_aioN x_aioO y_aioX x_aioQ x_aioR x_aioS x_aioT x_aioU x_aioV x_aioW)
        (f_aioI x_aioP)
class HasStream s a | s -> a where
  stream :: Lens' s a
instance HasStream Network.Riak.Protocol.IndexRequest.IndexRequest (Maybe Bool) where
  {-# INLINE stream #-}
  stream
    f_aioY
    (Network.Riak.Protocol.IndexRequest.IndexRequest x_aioZ
                                                     x_aip0
                                                     x_aip1
                                                     x_aip2
                                                     x_aip3
                                                     x_aip4
                                                     x_aip5
                                                     x_aip6
                                                     x_aip7
                                                     x_aip8
                                                     x_aip9
                                                     x_aipa
                                                     x_aipb
                                                     x_aipc)
    = fmap
        (\ y_aipd
           -> Network.Riak.Protocol.IndexRequest.IndexRequest
                x_aioZ x_aip0 x_aip1 x_aip2 x_aip3 x_aip4 x_aip5 y_aipd x_aip7 x_aip8 x_aip9 x_aipa x_aipb x_aipc)
        (f_aioY x_aip6)
class HasTermRegex s a | s -> a where
  term_regex :: Lens' s a
instance HasTermRegex Network.Riak.Protocol.IndexRequest.IndexRequest (Maybe ByteString) where
  {-# INLINE term_regex #-}
  term_regex
    f_aipe
    (Network.Riak.Protocol.IndexRequest.IndexRequest x_aipf
                                                     x_aipg
                                                     x_aiph
                                                     x_aipi
                                                     x_aipj
                                                     x_aipk
                                                     x_aipl
                                                     x_aipm
                                                     x_aipn
                                                     x_aipo
                                                     x_aipp
                                                     x_aipq
                                                     x_aipr
                                                     x_aips)
    = fmap
        (\ y_aipt
           -> Network.Riak.Protocol.IndexRequest.IndexRequest
                x_aipf x_aipg x_aiph x_aipi x_aipj x_aipk x_aipl x_aipm x_aipn x_aipo x_aipp x_aipq y_aipt x_aips)
        (f_aipe x_aipr)
instance HasTimeout Network.Riak.Protocol.IndexRequest.IndexRequest (Maybe Word32) where
  {-# INLINE timeout #-}
  timeout
    f_aipu
    (Network.Riak.Protocol.IndexRequest.IndexRequest x_aipv
                                                     x_aipw
                                                     x_aipx
                                                     x_aipy
                                                     x_aipz
                                                     x_aipA
                                                     x_aipB
                                                     x_aipC
                                                     x_aipD
                                                     x_aipE
                                                     x_aipF
                                                     x_aipG
                                                     x_aipH
                                                     x_aipI)
    = fmap
        (\ y_aipJ
           -> Network.Riak.Protocol.IndexRequest.IndexRequest
                x_aipv x_aipw x_aipx x_aipy x_aipz x_aipA x_aipB x_aipC x_aipD x_aipE y_aipJ x_aipG x_aipH x_aipI)
        (f_aipu x_aipF)
instance HasType' Network.Riak.Protocol.IndexRequest.IndexRequest (Maybe ByteString) where
  {-# INLINE type' #-}
  type'
    f_aipK
    (Network.Riak.Protocol.IndexRequest.IndexRequest x_aipL
                                                     x_aipM
                                                     x_aipN
                                                     x_aipO
                                                     x_aipP
                                                     x_aipQ
                                                     x_aipR
                                                     x_aipS
                                                     x_aipT
                                                     x_aipU
                                                     x_aipV
                                                     x_aipW
                                                     x_aipX
                                                     x_aipY)
    = fmap
        (\ y_aipZ
           -> Network.Riak.Protocol.IndexRequest.IndexRequest
                x_aipL x_aipM x_aipN x_aipO x_aipP x_aipQ x_aipR x_aipS x_aipT x_aipU x_aipV y_aipZ x_aipX x_aipY)
        (f_aipK x_aipW)
instance HasContinuation Network.Riak.Protocol.IndexResponse.IndexResponse (Maybe ByteString) where
  {-# INLINE continuation #-}
  continuation f_aiwD (Network.Riak.Protocol.IndexResponse.IndexResponse x_aiwE x_aiwF x_aiwG x_aiwH)
    = fmap (\ y_aiwI -> Network.Riak.Protocol.IndexResponse.IndexResponse x_aiwE x_aiwF y_aiwI x_aiwH) (f_aiwD x_aiwG)
instance HasDone Network.Riak.Protocol.IndexResponse.IndexResponse (Maybe Bool) where
  {-# INLINE done #-}
  done f_aiwJ (Network.Riak.Protocol.IndexResponse.IndexResponse x_aiwK x_aiwL x_aiwM x_aiwN)
    = fmap (\ y_aiwO -> Network.Riak.Protocol.IndexResponse.IndexResponse x_aiwK x_aiwL x_aiwM y_aiwO) (f_aiwJ x_aiwN)
class HasKeys s a | s -> a where
  keys :: Lens' s a
instance HasKeys Network.Riak.Protocol.IndexResponse.IndexResponse (Seq ByteString) where
  {-# INLINE keys #-}
  keys f_aiwP (Network.Riak.Protocol.IndexResponse.IndexResponse x_aiwQ x_aiwR x_aiwS x_aiwT)
    = fmap (\ y_aiwU -> Network.Riak.Protocol.IndexResponse.IndexResponse y_aiwU x_aiwR x_aiwS x_aiwT) (f_aiwP x_aiwQ)
class HasResults s a | s -> a where
  results :: Lens' s a
instance HasResults Network.Riak.Protocol.IndexResponse.IndexResponse (Seq Network.Riak.Protocol.Pair.Pair) where
  {-# INLINE results #-}
  results f_aiwV (Network.Riak.Protocol.IndexResponse.IndexResponse x_aiwW x_aiwX x_aiwY x_aiwZ)
    = fmap (\ y_aix0 -> Network.Riak.Protocol.IndexResponse.IndexResponse x_aiwW y_aix0 x_aiwY x_aiwZ) (f_aiwV x_aiwX)
instance HasBucket Network.Riak.Protocol.Link.Link (Maybe ByteString) where
  {-# INLINE bucket #-}
  bucket f_aiyS (Network.Riak.Protocol.Link.Link x_aiyT x_aiyU x_aiyV)
    = fmap (\ y_aiyW -> Network.Riak.Protocol.Link.Link y_aiyW x_aiyU x_aiyV) (f_aiyS x_aiyT)
instance HasKey Network.Riak.Protocol.Link.Link (Maybe ByteString) where
  {-# INLINE key #-}
  key f_aiyX (Network.Riak.Protocol.Link.Link x_aiyY x_aiyZ x_aiz0)
    = fmap (\ y_aiz1 -> Network.Riak.Protocol.Link.Link x_aiyY y_aiz1 x_aiz0) (f_aiyX x_aiyZ)
class HasTag s a | s -> a where
  tag :: Lens' s a
instance HasTag Network.Riak.Protocol.Link.Link (Maybe ByteString) where
  {-# INLINE tag #-}
  tag f_aiz2 (Network.Riak.Protocol.Link.Link x_aiz3 x_aiz4 x_aiz5)
    = fmap (\ y_aiz6 -> Network.Riak.Protocol.Link.Link x_aiz3 x_aiz4 y_aiz6) (f_aiz2 x_aiz5)
instance HasStream Network.Riak.Protocol.ListBucketsRequest.ListBucketsRequest (Maybe Bool) where
  {-# INLINE stream #-}
  stream f_aiAk (Network.Riak.Protocol.ListBucketsRequest.ListBucketsRequest x_aiAl x_aiAm x_aiAn)
    = fmap (\ y_aiAo -> Network.Riak.Protocol.ListBucketsRequest.ListBucketsRequest x_aiAl y_aiAo x_aiAn) (f_aiAk x_aiAm)
instance HasTimeout Network.Riak.Protocol.ListBucketsRequest.ListBucketsRequest (Maybe Word32) where
  {-# INLINE timeout #-}
  timeout f_aiAp (Network.Riak.Protocol.ListBucketsRequest.ListBucketsRequest x_aiAq x_aiAr x_aiAs)
    = fmap (\ y_aiAt -> Network.Riak.Protocol.ListBucketsRequest.ListBucketsRequest y_aiAt x_aiAr x_aiAs) (f_aiAp x_aiAq)
instance HasType' Network.Riak.Protocol.ListBucketsRequest.ListBucketsRequest (Maybe ByteString) where
  {-# INLINE type' #-}
  type' f_aiAu (Network.Riak.Protocol.ListBucketsRequest.ListBucketsRequest x_aiAv x_aiAw x_aiAx)
    = fmap (\ y_aiAy -> Network.Riak.Protocol.ListBucketsRequest.ListBucketsRequest x_aiAv x_aiAw y_aiAy) (f_aiAu x_aiAx)
class HasBuckets s a | s -> a where
  buckets :: Lens' s a
instance HasBuckets Network.Riak.Protocol.ListBucketsResponse.ListBucketsResponse (Seq ByteString) where
  {-# INLINE buckets #-}
  buckets f_aiBm (Network.Riak.Protocol.ListBucketsResponse.ListBucketsResponse x_aiBn x_aiBo)
    = fmap (\ y_aiBp -> Network.Riak.Protocol.ListBucketsResponse.ListBucketsResponse y_aiBp x_aiBo) (f_aiBm x_aiBn)
instance HasDone Network.Riak.Protocol.ListBucketsResponse.ListBucketsResponse (Maybe Bool) where
  {-# INLINE done #-}
  done f_aiBq (Network.Riak.Protocol.ListBucketsResponse.ListBucketsResponse x_aiBr x_aiBs)
    = fmap (\ y_aiBt -> Network.Riak.Protocol.ListBucketsResponse.ListBucketsResponse x_aiBr y_aiBt) (f_aiBq x_aiBs)
instance HasBucket Network.Riak.Protocol.ListKeysRequest.ListKeysRequest ByteString where
  {-# INLINE bucket #-}
  bucket f_aiCt (Network.Riak.Protocol.ListKeysRequest.ListKeysRequest x_aiCu x_aiCv x_aiCw)
    = fmap (\ y_aiCx -> Network.Riak.Protocol.ListKeysRequest.ListKeysRequest y_aiCx x_aiCv x_aiCw) (f_aiCt x_aiCu)
instance HasTimeout Network.Riak.Protocol.ListKeysRequest.ListKeysRequest (Maybe Word32) where
  {-# INLINE timeout #-}
  timeout f_aiCy (Network.Riak.Protocol.ListKeysRequest.ListKeysRequest x_aiCz x_aiCA x_aiCB)
    = fmap (\ y_aiCC -> Network.Riak.Protocol.ListKeysRequest.ListKeysRequest x_aiCz y_aiCC x_aiCB) (f_aiCy x_aiCA)
instance HasType' Network.Riak.Protocol.ListKeysRequest.ListKeysRequest (Maybe ByteString) where
  {-# INLINE type' #-}
  type' f_aiCD (Network.Riak.Protocol.ListKeysRequest.ListKeysRequest x_aiCE x_aiCF x_aiCG)
    = fmap (\ y_aiCH -> Network.Riak.Protocol.ListKeysRequest.ListKeysRequest x_aiCE x_aiCF y_aiCH) (f_aiCD x_aiCG)
instance HasDone Network.Riak.Protocol.ListKeysResponse.ListKeysResponse (Maybe Bool) where
  {-# INLINE done #-}
  done f_aiDv (Network.Riak.Protocol.ListKeysResponse.ListKeysResponse x_aiDw x_aiDx)
    = fmap (\ y_aiDy -> Network.Riak.Protocol.ListKeysResponse.ListKeysResponse x_aiDw y_aiDy) (f_aiDv x_aiDx)
instance HasKeys Network.Riak.Protocol.ListKeysResponse.ListKeysResponse (Seq ByteString) where
  {-# INLINE keys #-}
  keys f_aiDz (Network.Riak.Protocol.ListKeysResponse.ListKeysResponse x_aiDA x_aiDB)
    = fmap (\ y_aiDC -> Network.Riak.Protocol.ListKeysResponse.ListKeysResponse y_aiDC x_aiDB) (f_aiDz x_aiDA)
instance HasCounterValue Network.Riak.Protocol.MapEntry.MapEntry (Maybe Int64) where
  {-# INLINE counter_value #-}
  counter_value f_aiEc (Network.Riak.Protocol.MapEntry.MapEntry x_aiEd x_aiEe x_aiEf x_aiEg x_aiEh x_aiEi)
    = fmap (\ y_aiEj -> Network.Riak.Protocol.MapEntry.MapEntry x_aiEd y_aiEj x_aiEf x_aiEg x_aiEh x_aiEi) (f_aiEc x_aiEe)
class HasField s a | s -> a where
  field :: Lens' s a
instance HasField Network.Riak.Protocol.MapEntry.MapEntry Network.Riak.Protocol.MapField.MapField where
  {-# INLINE field #-}
  field f_aiEk (Network.Riak.Protocol.MapEntry.MapEntry x_aiEl x_aiEm x_aiEn x_aiEo x_aiEp x_aiEq)
    = fmap (\ y_aiEr -> Network.Riak.Protocol.MapEntry.MapEntry y_aiEr x_aiEm x_aiEn x_aiEo x_aiEp x_aiEq) (f_aiEk x_aiEl)
class HasFlagValue s a | s -> a where
  flag_value :: Lens' s a
instance HasFlagValue Network.Riak.Protocol.MapEntry.MapEntry (Maybe Bool) where
  {-# INLINE flag_value #-}
  flag_value f_aiEs (Network.Riak.Protocol.MapEntry.MapEntry x_aiEt x_aiEu x_aiEv x_aiEw x_aiEx x_aiEy)
    = fmap (\ y_aiEz -> Network.Riak.Protocol.MapEntry.MapEntry x_aiEt x_aiEu x_aiEv x_aiEw y_aiEz x_aiEy) (f_aiEs x_aiEx)
instance HasMapValue Network.Riak.Protocol.MapEntry.MapEntry (Seq Network.Riak.Protocol.MapEntry.MapEntry) where
  {-# INLINE map_value #-}
  map_value f_aiEA (Network.Riak.Protocol.MapEntry.MapEntry x_aiEB x_aiEC x_aiED x_aiEE x_aiEF x_aiEG)
    = fmap (\ y_aiEH -> Network.Riak.Protocol.MapEntry.MapEntry x_aiEB x_aiEC x_aiED x_aiEE x_aiEF y_aiEH) (f_aiEA x_aiEG)
class HasRegisterValue s a | s -> a where
  register_value :: Lens' s a
instance HasRegisterValue Network.Riak.Protocol.MapEntry.MapEntry (Maybe ByteString) where
  {-# INLINE register_value #-}
  register_value f_aiEI (Network.Riak.Protocol.MapEntry.MapEntry x_aiEJ x_aiEK x_aiEL x_aiEM x_aiEN x_aiEO)
    = fmap (\ y_aiEP -> Network.Riak.Protocol.MapEntry.MapEntry x_aiEJ x_aiEK x_aiEL y_aiEP x_aiEN x_aiEO) (f_aiEI x_aiEM)
instance HasSetValue Network.Riak.Protocol.MapEntry.MapEntry (Seq ByteString) where
  {-# INLINE set_value #-}
  set_value f_aiEQ (Network.Riak.Protocol.MapEntry.MapEntry x_aiER x_aiES x_aiET x_aiEU x_aiEV x_aiEW)
    = fmap (\ y_aiEX -> Network.Riak.Protocol.MapEntry.MapEntry x_aiER x_aiES y_aiEX x_aiEU x_aiEV x_aiEW) (f_aiEQ x_aiET)
instance HasName Network.Riak.Protocol.MapField.MapField ByteString where
  {-# INLINE name #-}
  name f_aiHH (Network.Riak.Protocol.MapField.MapField x_aiHI x_aiHJ)
    = fmap (\ y_aiHK -> Network.Riak.Protocol.MapField.MapField y_aiHK x_aiHJ) (f_aiHH x_aiHI)
instance HasType' Network.Riak.Protocol.MapField.MapField Network.Riak.Protocol.MapField.MapFieldType.MapFieldType where
  {-# INLINE type' #-}
  type' f_aiHL (Network.Riak.Protocol.MapField.MapField x_aiHM x_aiHN)
    = fmap (\ y_aiHO -> Network.Riak.Protocol.MapField.MapField x_aiHM y_aiHO) (f_aiHL x_aiHN)
class HasRemoves s a | s -> a where
  removes :: Lens' s a
instance HasRemoves Network.Riak.Protocol.MapOp.MapOp (Seq Network.Riak.Protocol.MapField.MapField) where
  {-# INLINE removes #-}
  removes f_aiIv (Network.Riak.Protocol.MapOp.MapOp x_aiIw x_aiIx)
    = fmap (\ y_aiIy -> Network.Riak.Protocol.MapOp.MapOp y_aiIy x_aiIx) (f_aiIv x_aiIw)
class HasUpdates s a | s -> a where
  updates :: Lens' s a
instance HasUpdates Network.Riak.Protocol.MapOp.MapOp (Seq Network.Riak.Protocol.MapUpdate.MapUpdate) where
  {-# INLINE updates #-}
  updates f_aiIz (Network.Riak.Protocol.MapOp.MapOp x_aiIA x_aiIB)
    = fmap (\ y_aiIC -> Network.Riak.Protocol.MapOp.MapOp x_aiIA y_aiIC) (f_aiIz x_aiIB)
instance HasDone Network.Riak.Protocol.MapReduce.MapReduce (Maybe Bool) where
  {-# INLINE done #-}
  done f_aiK2 (Network.Riak.Protocol.MapReduce.MapReduce x_aiK3 x_aiK4 x_aiK5)
    = fmap (\ y_aiK6 -> Network.Riak.Protocol.MapReduce.MapReduce x_aiK3 x_aiK4 y_aiK6) (f_aiK2 x_aiK5)
class HasPhase s a | s -> a where
  phase :: Lens' s a
instance HasPhase Network.Riak.Protocol.MapReduce.MapReduce (Maybe Word32) where
  {-# INLINE phase #-}
  phase f_aiK7 (Network.Riak.Protocol.MapReduce.MapReduce x_aiK8 x_aiK9 x_aiKa)
    = fmap (\ y_aiKb -> Network.Riak.Protocol.MapReduce.MapReduce y_aiKb x_aiK9 x_aiKa) (f_aiK7 x_aiK8)
class HasResponse s a | s -> a where
  response :: Lens' s a
instance HasResponse Network.Riak.Protocol.MapReduce.MapReduce (Maybe ByteString) where
  {-# INLINE response #-}
  response f_aiKc (Network.Riak.Protocol.MapReduce.MapReduce x_aiKd x_aiKe x_aiKf)
    = fmap (\ y_aiKg -> Network.Riak.Protocol.MapReduce.MapReduce x_aiKd y_aiKg x_aiKf) (f_aiKc x_aiKe)
instance HasContentType Network.Riak.Protocol.MapReduceRequest.MapReduceRequest ByteString where
  {-# INLINE content_type #-}
  content_type f_aiLU (Network.Riak.Protocol.MapReduceRequest.MapReduceRequest x_aiLV x_aiLW)
    = fmap (\ y_aiLX -> Network.Riak.Protocol.MapReduceRequest.MapReduceRequest x_aiLV y_aiLX) (f_aiLU x_aiLW)
class HasRequest s a | s -> a where
  request :: Lens' s a
instance HasRequest Network.Riak.Protocol.MapReduceRequest.MapReduceRequest ByteString where
  {-# INLINE request #-}
  request f_aiLY (Network.Riak.Protocol.MapReduceRequest.MapReduceRequest x_aiLZ x_aiM0)
    = fmap (\ y_aiM1 -> Network.Riak.Protocol.MapReduceRequest.MapReduceRequest y_aiM1 x_aiM0) (f_aiLY x_aiLZ)
instance HasCounterOp Network.Riak.Protocol.MapUpdate.MapUpdate (Maybe Network.Riak.Protocol.CounterOp.CounterOp) where
  {-# INLINE counter_op #-}
  counter_op f_aiN1 (Network.Riak.Protocol.MapUpdate.MapUpdate x_aiN2 x_aiN3 x_aiN4 x_aiN5 x_aiN6 x_aiN7)
    = fmap (\ y_aiN8 -> Network.Riak.Protocol.MapUpdate.MapUpdate x_aiN2 y_aiN8 x_aiN4 x_aiN5 x_aiN6 x_aiN7) (f_aiN1 x_aiN3)
instance HasField Network.Riak.Protocol.MapUpdate.MapUpdate Network.Riak.Protocol.MapField.MapField where
  {-# INLINE field #-}
  field f_aiN9 (Network.Riak.Protocol.MapUpdate.MapUpdate x_aiNa x_aiNb x_aiNc x_aiNd x_aiNe x_aiNf)
    = fmap (\ y_aiNg -> Network.Riak.Protocol.MapUpdate.MapUpdate y_aiNg x_aiNb x_aiNc x_aiNd x_aiNe x_aiNf) (f_aiN9 x_aiNa)
class HasFlagOp s a | s -> a where
  flag_op :: Lens' s a
instance HasFlagOp Network.Riak.Protocol.MapUpdate.MapUpdate (Maybe Network.Riak.Protocol.MapUpdate.FlagOp.FlagOp) where
  {-# INLINE flag_op #-}
  flag_op f_aiNh (Network.Riak.Protocol.MapUpdate.MapUpdate x_aiNi x_aiNj x_aiNk x_aiNl x_aiNm x_aiNn)
    = fmap (\ y_aiNo -> Network.Riak.Protocol.MapUpdate.MapUpdate x_aiNi x_aiNj x_aiNk x_aiNl y_aiNo x_aiNn) (f_aiNh x_aiNm)
instance HasMapOp Network.Riak.Protocol.MapUpdate.MapUpdate (Maybe Network.Riak.Protocol.MapOp.MapOp) where
  {-# INLINE map_op #-}
  map_op f_aiNp (Network.Riak.Protocol.MapUpdate.MapUpdate x_aiNq x_aiNr x_aiNs x_aiNt x_aiNu x_aiNv)
    = fmap (\ y_aiNw -> Network.Riak.Protocol.MapUpdate.MapUpdate x_aiNq x_aiNr x_aiNs x_aiNt x_aiNu y_aiNw) (f_aiNp x_aiNv)
class HasRegisterOp s a | s -> a where
  register_op :: Lens' s a
instance HasRegisterOp Network.Riak.Protocol.MapUpdate.MapUpdate (Maybe ByteString) where
  {-# INLINE register_op #-}
  register_op f_aiNx (Network.Riak.Protocol.MapUpdate.MapUpdate x_aiNy x_aiNz x_aiNA x_aiNB x_aiNC x_aiND)
    = fmap (\ y_aiNE -> Network.Riak.Protocol.MapUpdate.MapUpdate x_aiNy x_aiNz x_aiNA y_aiNE x_aiNC x_aiND) (f_aiNx x_aiNB)
instance HasSetOp Network.Riak.Protocol.MapUpdate.MapUpdate (Maybe Network.Riak.Protocol.SetOp.SetOp) where
  {-# INLINE set_op #-}
  set_op f_aiNF (Network.Riak.Protocol.MapUpdate.MapUpdate x_aiNG x_aiNH x_aiNI x_aiNJ x_aiNK x_aiNL)
    = fmap (\ y_aiNM -> Network.Riak.Protocol.MapUpdate.MapUpdate x_aiNG x_aiNH y_aiNM x_aiNJ x_aiNK x_aiNL) (f_aiNF x_aiNI)
class HasFunction s a | s -> a where
  function :: Lens' s a
instance HasFunction Network.Riak.Protocol.ModFun.ModFun ByteString where
  {-# INLINE function #-}
  function f_aiQd (Network.Riak.Protocol.ModFun.ModFun x_aiQe x_aiQf)
    = fmap (\ y_aiQg -> Network.Riak.Protocol.ModFun.ModFun x_aiQe y_aiQg) (f_aiQd x_aiQf)
class HasModule' s a | s -> a where
  module' :: Lens' s a
instance HasModule' Network.Riak.Protocol.ModFun.ModFun ByteString where
  {-# INLINE module' #-}
  module' f_aiQh (Network.Riak.Protocol.ModFun.ModFun x_aiQi x_aiQj)
    = fmap (\ y_aiQk -> Network.Riak.Protocol.ModFun.ModFun y_aiQk x_aiQj) (f_aiQh x_aiQi)
instance HasKey Network.Riak.Protocol.Pair.Pair ByteString where
  {-# INLINE key #-}
  key f_aiRK (Network.Riak.Protocol.Pair.Pair x_aiRL x_aiRM)
    = fmap (\ y_aiRN -> Network.Riak.Protocol.Pair.Pair y_aiRN x_aiRM) (f_aiRK x_aiRL)
instance HasValue Network.Riak.Protocol.Pair.Pair (Maybe ByteString) where
  {-# INLINE value #-}
  value f_aiRO (Network.Riak.Protocol.Pair.Pair x_aiRP x_aiRQ)
    = fmap (\ y_aiRR -> Network.Riak.Protocol.Pair.Pair x_aiRP y_aiRR) (f_aiRO x_aiRQ)
class HasAsis s a | s -> a where
  asis :: Lens' s a
instance HasAsis Network.Riak.Protocol.PutRequest.PutRequest (Maybe Bool) where
  {-# INLINE asis #-}
  asis
    f_aiSy
    (Network.Riak.Protocol.PutRequest.PutRequest x_aiSz
                                                 x_aiSA
                                                 x_aiSB
                                                 x_aiSC
                                                 x_aiSD
                                                 x_aiSE
                                                 x_aiSF
                                                 x_aiSG
                                                 x_aiSH
                                                 x_aiSI
                                                 x_aiSJ
                                                 x_aiSK
                                                 x_aiSL
                                                 x_aiSM
                                                 x_aiSN
                                                 x_aiSO)
    = fmap
        (\ y_aiSP
           -> Network.Riak.Protocol.PutRequest.PutRequest
                x_aiSz x_aiSA x_aiSB x_aiSC x_aiSD x_aiSE x_aiSF x_aiSG x_aiSH x_aiSI x_aiSJ x_aiSK y_aiSP x_aiSM x_aiSN x_aiSO)
        (f_aiSy x_aiSL)
instance HasBucket Network.Riak.Protocol.PutRequest.PutRequest ByteString where
  {-# INLINE bucket #-}
  bucket
    f_aiSQ
    (Network.Riak.Protocol.PutRequest.PutRequest x_aiSR
                                                 x_aiSS
                                                 x_aiST
                                                 x_aiSU
                                                 x_aiSV
                                                 x_aiSW
                                                 x_aiSX
                                                 x_aiSY
                                                 x_aiSZ
                                                 x_aiT0
                                                 x_aiT1
                                                 x_aiT2
                                                 x_aiT3
                                                 x_aiT4
                                                 x_aiT5
                                                 x_aiT6)
    = fmap
        (\ y_aiT7
           -> Network.Riak.Protocol.PutRequest.PutRequest
                y_aiT7 x_aiSS x_aiST x_aiSU x_aiSV x_aiSW x_aiSX x_aiSY x_aiSZ x_aiT0 x_aiT1 x_aiT2 x_aiT3 x_aiT4 x_aiT5 x_aiT6)
        (f_aiSQ x_aiSR)
instance HasContent Network.Riak.Protocol.PutRequest.PutRequest Network.Riak.Protocol.Content.Content where
  {-# INLINE content #-}
  content
    f_aiT8
    (Network.Riak.Protocol.PutRequest.PutRequest x_aiT9
                                                 x_aiTa
                                                 x_aiTb
                                                 x_aiTc
                                                 x_aiTd
                                                 x_aiTe
                                                 x_aiTf
                                                 x_aiTg
                                                 x_aiTh
                                                 x_aiTi
                                                 x_aiTj
                                                 x_aiTk
                                                 x_aiTl
                                                 x_aiTm
                                                 x_aiTn
                                                 x_aiTo)
    = fmap
        (\ y_aiTp
           -> Network.Riak.Protocol.PutRequest.PutRequest
                x_aiT9 x_aiTa x_aiTb y_aiTp x_aiTd x_aiTe x_aiTf x_aiTg x_aiTh x_aiTi x_aiTj x_aiTk x_aiTl x_aiTm x_aiTn x_aiTo)
        (f_aiT8 x_aiTc)
instance HasDw Network.Riak.Protocol.PutRequest.PutRequest (Maybe Word32) where
  {-# INLINE dw #-}
  dw
    f_aiTq
    (Network.Riak.Protocol.PutRequest.PutRequest x_aiTr
                                                 x_aiTs
                                                 x_aiTt
                                                 x_aiTu
                                                 x_aiTv
                                                 x_aiTw
                                                 x_aiTx
                                                 x_aiTy
                                                 x_aiTz
                                                 x_aiTA
                                                 x_aiTB
                                                 x_aiTC
                                                 x_aiTD
                                                 x_aiTE
                                                 x_aiTF
                                                 x_aiTG)
    = fmap
        (\ y_aiTH
           -> Network.Riak.Protocol.PutRequest.PutRequest
                x_aiTr x_aiTs x_aiTt x_aiTu x_aiTv y_aiTH x_aiTx x_aiTy x_aiTz x_aiTA x_aiTB x_aiTC x_aiTD x_aiTE x_aiTF x_aiTG)
        (f_aiTq x_aiTw)
class HasIfNoneMatch s a | s -> a where
  if_none_match :: Lens' s a
instance HasIfNoneMatch Network.Riak.Protocol.PutRequest.PutRequest (Maybe Bool) where
  {-# INLINE if_none_match #-}
  if_none_match
    f_aiTI
    (Network.Riak.Protocol.PutRequest.PutRequest x_aiTJ
                                                 x_aiTK
                                                 x_aiTL
                                                 x_aiTM
                                                 x_aiTN
                                                 x_aiTO
                                                 x_aiTP
                                                 x_aiTQ
                                                 x_aiTR
                                                 x_aiTS
                                                 x_aiTT
                                                 x_aiTU
                                                 x_aiTV
                                                 x_aiTW
                                                 x_aiTX
                                                 x_aiTY)
    = fmap
        (\ y_aiTZ
           -> Network.Riak.Protocol.PutRequest.PutRequest
                x_aiTJ x_aiTK x_aiTL x_aiTM x_aiTN x_aiTO x_aiTP x_aiTQ x_aiTR y_aiTZ x_aiTT x_aiTU x_aiTV x_aiTW x_aiTX x_aiTY)
        (f_aiTI x_aiTS)
class HasIfNotModified s a | s -> a where
  if_not_modified :: Lens' s a
instance HasIfNotModified Network.Riak.Protocol.PutRequest.PutRequest (Maybe Bool) where
  {-# INLINE if_not_modified #-}
  if_not_modified
    f_aiU0
    (Network.Riak.Protocol.PutRequest.PutRequest x_aiU1
                                                 x_aiU2
                                                 x_aiU3
                                                 x_aiU4
                                                 x_aiU5
                                                 x_aiU6
                                                 x_aiU7
                                                 x_aiU8
                                                 x_aiU9
                                                 x_aiUa
                                                 x_aiUb
                                                 x_aiUc
                                                 x_aiUd
                                                 x_aiUe
                                                 x_aiUf
                                                 x_aiUg)
    = fmap
        (\ y_aiUh
           -> Network.Riak.Protocol.PutRequest.PutRequest
                x_aiU1 x_aiU2 x_aiU3 x_aiU4 x_aiU5 x_aiU6 x_aiU7 x_aiU8 y_aiUh x_aiUa x_aiUb x_aiUc x_aiUd x_aiUe x_aiUf x_aiUg)
        (f_aiU0 x_aiU9)
instance HasKey Network.Riak.Protocol.PutRequest.PutRequest (Maybe ByteString) where
  {-# INLINE key #-}
  key
    f_aiUi
    (Network.Riak.Protocol.PutRequest.PutRequest x_aiUj
                                                 x_aiUk
                                                 x_aiUl
                                                 x_aiUm
                                                 x_aiUn
                                                 x_aiUo
                                                 x_aiUp
                                                 x_aiUq
                                                 x_aiUr
                                                 x_aiUs
                                                 x_aiUt
                                                 x_aiUu
                                                 x_aiUv
                                                 x_aiUw
                                                 x_aiUx
                                                 x_aiUy)
    = fmap
        (\ y_aiUz
           -> Network.Riak.Protocol.PutRequest.PutRequest
                x_aiUj y_aiUz x_aiUl x_aiUm x_aiUn x_aiUo x_aiUp x_aiUq x_aiUr x_aiUs x_aiUt x_aiUu x_aiUv x_aiUw x_aiUx x_aiUy)
        (f_aiUi x_aiUk)
instance HasNVal Network.Riak.Protocol.PutRequest.PutRequest (Maybe Word32) where
  {-# INLINE n_val #-}
  n_val
    f_aiUA
    (Network.Riak.Protocol.PutRequest.PutRequest x_aiUB
                                                 x_aiUC
                                                 x_aiUD
                                                 x_aiUE
                                                 x_aiUF
                                                 x_aiUG
                                                 x_aiUH
                                                 x_aiUI
                                                 x_aiUJ
                                                 x_aiUK
                                                 x_aiUL
                                                 x_aiUM
                                                 x_aiUN
                                                 x_aiUO
                                                 x_aiUP
                                                 x_aiUQ)
    = fmap
        (\ y_aiUR
           -> Network.Riak.Protocol.PutRequest.PutRequest
                x_aiUB x_aiUC x_aiUD x_aiUE x_aiUF x_aiUG x_aiUH x_aiUI x_aiUJ x_aiUK x_aiUL x_aiUM x_aiUN x_aiUO y_aiUR x_aiUQ)
        (f_aiUA x_aiUP)
instance HasPw Network.Riak.Protocol.PutRequest.PutRequest (Maybe Word32) where
  {-# INLINE pw #-}
  pw
    f_aiUS
    (Network.Riak.Protocol.PutRequest.PutRequest x_aiUT
                                                 x_aiUU
                                                 x_aiUV
                                                 x_aiUW
                                                 x_aiUX
                                                 x_aiUY
                                                 x_aiUZ
                                                 x_aiV0
                                                 x_aiV1
                                                 x_aiV2
                                                 x_aiV3
                                                 x_aiV4
                                                 x_aiV5
                                                 x_aiV6
                                                 x_aiV7
                                                 x_aiV8)
    = fmap
        (\ y_aiV9
           -> Network.Riak.Protocol.PutRequest.PutRequest
                x_aiUT x_aiUU x_aiUV x_aiUW x_aiUX x_aiUY x_aiUZ y_aiV9 x_aiV1 x_aiV2 x_aiV3 x_aiV4 x_aiV5 x_aiV6 x_aiV7 x_aiV8)
        (f_aiUS x_aiV0)
instance HasReturnBody Network.Riak.Protocol.PutRequest.PutRequest (Maybe Bool) where
  {-# INLINE return_body #-}
  return_body
    f_aiVa
    (Network.Riak.Protocol.PutRequest.PutRequest x_aiVb
                                                 x_aiVc
                                                 x_aiVd
                                                 x_aiVe
                                                 x_aiVf
                                                 x_aiVg
                                                 x_aiVh
                                                 x_aiVi
                                                 x_aiVj
                                                 x_aiVk
                                                 x_aiVl
                                                 x_aiVm
                                                 x_aiVn
                                                 x_aiVo
                                                 x_aiVp
                                                 x_aiVq)
    = fmap
        (\ y_aiVr
           -> Network.Riak.Protocol.PutRequest.PutRequest
                x_aiVb x_aiVc x_aiVd x_aiVe x_aiVf x_aiVg y_aiVr x_aiVi x_aiVj x_aiVk x_aiVl x_aiVm x_aiVn x_aiVo x_aiVp x_aiVq)
        (f_aiVa x_aiVh)
class HasReturnHead s a | s -> a where
  return_head :: Lens' s a
instance HasReturnHead Network.Riak.Protocol.PutRequest.PutRequest (Maybe Bool) where
  {-# INLINE return_head #-}
  return_head
    f_aiVs
    (Network.Riak.Protocol.PutRequest.PutRequest x_aiVt
                                                 x_aiVu
                                                 x_aiVv
                                                 x_aiVw
                                                 x_aiVx
                                                 x_aiVy
                                                 x_aiVz
                                                 x_aiVA
                                                 x_aiVB
                                                 x_aiVC
                                                 x_aiVD
                                                 x_aiVE
                                                 x_aiVF
                                                 x_aiVG
                                                 x_aiVH
                                                 x_aiVI)
    = fmap
        (\ y_aiVJ
           -> Network.Riak.Protocol.PutRequest.PutRequest
                x_aiVt x_aiVu x_aiVv x_aiVw x_aiVx x_aiVy x_aiVz x_aiVA x_aiVB x_aiVC y_aiVJ x_aiVE x_aiVF x_aiVG x_aiVH x_aiVI)
        (f_aiVs x_aiVD)
instance HasSloppyQuorum Network.Riak.Protocol.PutRequest.PutRequest (Maybe Bool) where
  {-# INLINE sloppy_quorum #-}
  sloppy_quorum
    f_aiVK
    (Network.Riak.Protocol.PutRequest.PutRequest x_aiVL
                                                 x_aiVM
                                                 x_aiVN
                                                 x_aiVO
                                                 x_aiVP
                                                 x_aiVQ
                                                 x_aiVR
                                                 x_aiVS
                                                 x_aiVT
                                                 x_aiVU
                                                 x_aiVV
                                                 x_aiVW
                                                 x_aiVX
                                                 x_aiVY
                                                 x_aiVZ
                                                 x_aiW0)
    = fmap
        (\ y_aiW1
           -> Network.Riak.Protocol.PutRequest.PutRequest
                x_aiVL x_aiVM x_aiVN x_aiVO x_aiVP x_aiVQ x_aiVR x_aiVS x_aiVT x_aiVU x_aiVV x_aiVW x_aiVX y_aiW1 x_aiVZ x_aiW0)
        (f_aiVK x_aiVY)
instance HasTimeout Network.Riak.Protocol.PutRequest.PutRequest (Maybe Word32) where
  {-# INLINE timeout #-}
  timeout
    f_aiW2
    (Network.Riak.Protocol.PutRequest.PutRequest x_aiW3
                                                 x_aiW4
                                                 x_aiW5
                                                 x_aiW6
                                                 x_aiW7
                                                 x_aiW8
                                                 x_aiW9
                                                 x_aiWa
                                                 x_aiWb
                                                 x_aiWc
                                                 x_aiWd
                                                 x_aiWe
                                                 x_aiWf
                                                 x_aiWg
                                                 x_aiWh
                                                 x_aiWi)
    = fmap
        (\ y_aiWj
           -> Network.Riak.Protocol.PutRequest.PutRequest
                x_aiW3 x_aiW4 x_aiW5 x_aiW6 x_aiW7 x_aiW8 x_aiW9 x_aiWa x_aiWb x_aiWc x_aiWd y_aiWj x_aiWf x_aiWg x_aiWh x_aiWi)
        (f_aiW2 x_aiWe)
instance HasType' Network.Riak.Protocol.PutRequest.PutRequest (Maybe ByteString) where
  {-# INLINE type' #-}
  type'
    f_aiWk
    (Network.Riak.Protocol.PutRequest.PutRequest x_aiWl
                                                 x_aiWm
                                                 x_aiWn
                                                 x_aiWo
                                                 x_aiWp
                                                 x_aiWq
                                                 x_aiWr
                                                 x_aiWs
                                                 x_aiWt
                                                 x_aiWu
                                                 x_aiWv
                                                 x_aiWw
                                                 x_aiWx
                                                 x_aiWy
                                                 x_aiWz
                                                 x_aiWA)
    = fmap
        (\ y_aiWB
           -> Network.Riak.Protocol.PutRequest.PutRequest
                x_aiWl x_aiWm x_aiWn x_aiWo x_aiWp x_aiWq x_aiWr x_aiWs x_aiWt x_aiWu x_aiWv x_aiWw x_aiWx x_aiWy x_aiWz y_aiWB)
        (f_aiWk x_aiWA)
instance HasVclock Network.Riak.Protocol.PutRequest.PutRequest (Maybe ByteString) where
  {-# INLINE vclock #-}
  vclock
    f_aiWC
    (Network.Riak.Protocol.PutRequest.PutRequest x_aiWD
                                                 x_aiWE
                                                 x_aiWF
                                                 x_aiWG
                                                 x_aiWH
                                                 x_aiWI
                                                 x_aiWJ
                                                 x_aiWK
                                                 x_aiWL
                                                 x_aiWM
                                                 x_aiWN
                                                 x_aiWO
                                                 x_aiWP
                                                 x_aiWQ
                                                 x_aiWR
                                                 x_aiWS)
    = fmap
        (\ y_aiWT
           -> Network.Riak.Protocol.PutRequest.PutRequest
                x_aiWD x_aiWE y_aiWT x_aiWG x_aiWH x_aiWI x_aiWJ x_aiWK x_aiWL x_aiWM x_aiWN x_aiWO x_aiWP x_aiWQ x_aiWR x_aiWS)
        (f_aiWC x_aiWF)
instance HasW Network.Riak.Protocol.PutRequest.PutRequest (Maybe Word32) where
  {-# INLINE w #-}
  w f_aiWU
    (Network.Riak.Protocol.PutRequest.PutRequest x_aiWV
                                                 x_aiWW
                                                 x_aiWX
                                                 x_aiWY
                                                 x_aiWZ
                                                 x_aiX0
                                                 x_aiX1
                                                 x_aiX2
                                                 x_aiX3
                                                 x_aiX4
                                                 x_aiX5
                                                 x_aiX6
                                                 x_aiX7
                                                 x_aiX8
                                                 x_aiX9
                                                 x_aiXa)
    = fmap
        (\ y_aiXb
           -> Network.Riak.Protocol.PutRequest.PutRequest
                x_aiWV x_aiWW x_aiWX x_aiWY y_aiXb x_aiX0 x_aiX1 x_aiX2 x_aiX3 x_aiX4 x_aiX5 x_aiX6 x_aiX7 x_aiX8 x_aiX9 x_aiXa)
        (f_aiWU x_aiWZ)
instance HasContent Network.Riak.Protocol.PutResponse.PutResponse (Seq Network.Riak.Protocol.Content.Content) where
  {-# INLINE content #-}
  content f_aj2B (Network.Riak.Protocol.PutResponse.PutResponse x_aj2C x_aj2D x_aj2E)
    = fmap (\ y_aj2F -> Network.Riak.Protocol.PutResponse.PutResponse y_aj2F x_aj2D x_aj2E) (f_aj2B x_aj2C)
instance HasKey Network.Riak.Protocol.PutResponse.PutResponse (Maybe ByteString) where
  {-# INLINE key #-}
  key f_aj2G (Network.Riak.Protocol.PutResponse.PutResponse x_aj2H x_aj2I x_aj2J)
    = fmap (\ y_aj2K -> Network.Riak.Protocol.PutResponse.PutResponse x_aj2H x_aj2I y_aj2K) (f_aj2G x_aj2J)
instance HasVclock Network.Riak.Protocol.PutResponse.PutResponse (Maybe ByteString) where
  {-# INLINE vclock #-}
  vclock f_aj2L (Network.Riak.Protocol.PutResponse.PutResponse x_aj2M x_aj2N x_aj2O)
    = fmap (\ y_aj2P -> Network.Riak.Protocol.PutResponse.PutResponse x_aj2M y_aj2P x_aj2O) (f_aj2L x_aj2N)
instance HasBucket Network.Riak.Protocol.ResetBucketRequest.ResetBucketRequest ByteString where
  {-# INLINE bucket #-}
  bucket f_aj3D (Network.Riak.Protocol.ResetBucketRequest.ResetBucketRequest x_aj3E x_aj3F)
    = fmap (\ y_aj3G -> Network.Riak.Protocol.ResetBucketRequest.ResetBucketRequest y_aj3G x_aj3F) (f_aj3D x_aj3E)
instance HasType' Network.Riak.Protocol.ResetBucketRequest.ResetBucketRequest (Maybe ByteString) where
  {-# INLINE type' #-}
  type' f_aj3H (Network.Riak.Protocol.ResetBucketRequest.ResetBucketRequest x_aj3I x_aj3J)
    = fmap (\ y_aj3K -> Network.Riak.Protocol.ResetBucketRequest.ResetBucketRequest x_aj3I y_aj3K) (f_aj3H x_aj3J)
class HasFields s a | s -> a where
  fields :: Lens' s a
instance HasFields Network.Riak.Protocol.SearchDoc.SearchDoc (Seq Network.Riak.Protocol.Pair.Pair) where
  {-# INLINE fields #-}
  fields f_aj4k (Network.Riak.Protocol.SearchDoc.SearchDoc x_aj4l)
    = fmap (\ y_aj4m -> Network.Riak.Protocol.SearchDoc.SearchDoc y_aj4m) (f_aj4k x_aj4l)
class HasDf s a | s -> a where
  df :: Lens' s a
instance HasDf Network.Riak.Protocol.SearchQueryRequest.SearchQueryRequest (Maybe ByteString) where
  {-# INLINE df #-}
  df
    f_aj58
    (Network.Riak.Protocol.SearchQueryRequest.SearchQueryRequest x_aj59 x_aj5a x_aj5b x_aj5c x_aj5d x_aj5e x_aj5f x_aj5g x_aj5h x_aj5i)
    = fmap
        (\ y_aj5j
           -> Network.Riak.Protocol.SearchQueryRequest.SearchQueryRequest x_aj59 x_aj5a x_aj5b x_aj5c x_aj5d x_aj5e y_aj5j x_aj5g x_aj5h x_aj5i)
        (f_aj58 x_aj5f)
class HasFilter s a | s -> a where
  filter :: Lens' s a
instance HasFilter Network.Riak.Protocol.SearchQueryRequest.SearchQueryRequest (Maybe ByteString) where
  {-# INLINE filter #-}
  filter
    f_aj5k
    (Network.Riak.Protocol.SearchQueryRequest.SearchQueryRequest x_aj5l x_aj5m x_aj5n x_aj5o x_aj5p x_aj5q x_aj5r x_aj5s x_aj5t x_aj5u)
    = fmap
        (\ y_aj5v
           -> Network.Riak.Protocol.SearchQueryRequest.SearchQueryRequest x_aj5l x_aj5m x_aj5n x_aj5o x_aj5p y_aj5v x_aj5r x_aj5s x_aj5t x_aj5u)
        (f_aj5k x_aj5q)
class HasFl s a | s -> a where
  fl :: Lens' s a
instance HasFl Network.Riak.Protocol.SearchQueryRequest.SearchQueryRequest (Seq ByteString) where
  {-# INLINE fl #-}
  fl
    f_aj5w
    (Network.Riak.Protocol.SearchQueryRequest.SearchQueryRequest x_aj5x x_aj5y x_aj5z x_aj5A x_aj5B x_aj5C x_aj5D x_aj5E x_aj5F x_aj5G)
    = fmap
        (\ y_aj5H
           -> Network.Riak.Protocol.SearchQueryRequest.SearchQueryRequest x_aj5x x_aj5y x_aj5z x_aj5A x_aj5B x_aj5C x_aj5D x_aj5E y_aj5H x_aj5G)
        (f_aj5w x_aj5F)
instance HasIndex Network.Riak.Protocol.SearchQueryRequest.SearchQueryRequest ByteString where
  {-# INLINE index #-}
  index
    f_aj5I
    (Network.Riak.Protocol.SearchQueryRequest.SearchQueryRequest x_aj5J x_aj5K x_aj5L x_aj5M x_aj5N x_aj5O x_aj5P x_aj5Q x_aj5R x_aj5S)
    = fmap
        (\ y_aj5T
           -> Network.Riak.Protocol.SearchQueryRequest.SearchQueryRequest x_aj5J y_aj5T x_aj5L x_aj5M x_aj5N x_aj5O x_aj5P x_aj5Q x_aj5R x_aj5S)
        (f_aj5I x_aj5K)
instance HasOp Network.Riak.Protocol.SearchQueryRequest.SearchQueryRequest (Maybe ByteString) where
  {-# INLINE op #-}
  op
    f_aj5U
    (Network.Riak.Protocol.SearchQueryRequest.SearchQueryRequest x_aj5V x_aj5W x_aj5X x_aj5Y x_aj5Z x_aj60 x_aj61 x_aj62 x_aj63 x_aj64)
    = fmap
        (\ y_aj65
           -> Network.Riak.Protocol.SearchQueryRequest.SearchQueryRequest x_aj5V x_aj5W x_aj5X x_aj5Y x_aj5Z x_aj60 x_aj61 y_aj65 x_aj63 x_aj64)
        (f_aj5U x_aj62)
class HasPresort s a | s -> a where
  presort :: Lens' s a
instance HasPresort Network.Riak.Protocol.SearchQueryRequest.SearchQueryRequest (Maybe ByteString) where
  {-# INLINE presort #-}
  presort
    f_aj66
    (Network.Riak.Protocol.SearchQueryRequest.SearchQueryRequest x_aj67 x_aj68 x_aj69 x_aj6a x_aj6b x_aj6c x_aj6d x_aj6e x_aj6f x_aj6g)
    = fmap
        (\ y_aj6h
           -> Network.Riak.Protocol.SearchQueryRequest.SearchQueryRequest x_aj67 x_aj68 x_aj69 x_aj6a x_aj6b x_aj6c x_aj6d x_aj6e x_aj6f y_aj6h)
        (f_aj66 x_aj6g)
class HasQ s a | s -> a where
  q :: Lens' s a
instance HasQ Network.Riak.Protocol.SearchQueryRequest.SearchQueryRequest ByteString where
  {-# INLINE q #-}
  q f_aj6i
    (Network.Riak.Protocol.SearchQueryRequest.SearchQueryRequest x_aj6j x_aj6k x_aj6l x_aj6m x_aj6n x_aj6o x_aj6p x_aj6q x_aj6r x_aj6s)
    = fmap
        (\ y_aj6t
           -> Network.Riak.Protocol.SearchQueryRequest.SearchQueryRequest y_aj6t x_aj6k x_aj6l x_aj6m x_aj6n x_aj6o x_aj6p x_aj6q x_aj6r x_aj6s)
        (f_aj6i x_aj6j)
class HasRows s a | s -> a where
  rows :: Lens' s a
instance HasRows Network.Riak.Protocol.SearchQueryRequest.SearchQueryRequest (Maybe Word32) where
  {-# INLINE rows #-}
  rows
    f_aj6u
    (Network.Riak.Protocol.SearchQueryRequest.SearchQueryRequest x_aj6v x_aj6w x_aj6x x_aj6y x_aj6z x_aj6A x_aj6B x_aj6C x_aj6D x_aj6E)
    = fmap
        (\ y_aj6F
           -> Network.Riak.Protocol.SearchQueryRequest.SearchQueryRequest x_aj6v x_aj6w y_aj6F x_aj6y x_aj6z x_aj6A x_aj6B x_aj6C x_aj6D x_aj6E)
        (f_aj6u x_aj6x)
class HasSort s a | s -> a where
  sort :: Lens' s a
instance HasSort Network.Riak.Protocol.SearchQueryRequest.SearchQueryRequest (Maybe ByteString) where
  {-# INLINE sort #-}
  sort
    f_aj6G
    (Network.Riak.Protocol.SearchQueryRequest.SearchQueryRequest x_aj6H x_aj6I x_aj6J x_aj6K x_aj6L x_aj6M x_aj6N x_aj6O x_aj6P x_aj6Q)
    = fmap
        (\ y_aj6R
           -> Network.Riak.Protocol.SearchQueryRequest.SearchQueryRequest x_aj6H x_aj6I x_aj6J x_aj6K y_aj6R x_aj6M x_aj6N x_aj6O x_aj6P x_aj6Q)
        (f_aj6G x_aj6L)
class HasStart s a | s -> a where
  start :: Lens' s a
instance HasStart Network.Riak.Protocol.SearchQueryRequest.SearchQueryRequest (Maybe Word32) where
  {-# INLINE start #-}
  start
    f_aj6S
    (Network.Riak.Protocol.SearchQueryRequest.SearchQueryRequest x_aj6T x_aj6U x_aj6V x_aj6W x_aj6X x_aj6Y x_aj6Z x_aj70 x_aj71 x_aj72)
    = fmap
        (\ y_aj73
           -> Network.Riak.Protocol.SearchQueryRequest.SearchQueryRequest x_aj6T x_aj6U x_aj6V y_aj73 x_aj6X x_aj6Y x_aj6Z x_aj70 x_aj71 x_aj72)
        (f_aj6S x_aj6W)
class HasDocs s a | s -> a where
  docs :: Lens' s a
instance HasDocs Network.Riak.Protocol.SearchQueryResponse.SearchQueryResponse (Seq Network.Riak.Protocol.SearchDoc.SearchDoc) where
  {-# INLINE docs #-}
  docs f_ajcN (Network.Riak.Protocol.SearchQueryResponse.SearchQueryResponse x_ajcO x_ajcP x_ajcQ)
    = fmap (\ y_ajcR -> Network.Riak.Protocol.SearchQueryResponse.SearchQueryResponse y_ajcR x_ajcP x_ajcQ) (f_ajcN x_ajcO)
class HasMaxScore s a | s -> a where
  max_score :: Lens' s a
instance HasMaxScore Network.Riak.Protocol.SearchQueryResponse.SearchQueryResponse (Maybe Float) where
  {-# INLINE max_score #-}
  max_score f_ajcS (Network.Riak.Protocol.SearchQueryResponse.SearchQueryResponse x_ajcT x_ajcU x_ajcV)
    = fmap (\ y_ajcW -> Network.Riak.Protocol.SearchQueryResponse.SearchQueryResponse x_ajcT y_ajcW x_ajcV) (f_ajcS x_ajcU)
class HasNumFound s a | s -> a where
  num_found :: Lens' s a
instance HasNumFound Network.Riak.Protocol.SearchQueryResponse.SearchQueryResponse (Maybe Word32) where
  {-# INLINE num_found #-}
  num_found f_ajcX (Network.Riak.Protocol.SearchQueryResponse.SearchQueryResponse x_ajcY x_ajcZ x_ajd0)
    = fmap (\ y_ajd1 -> Network.Riak.Protocol.SearchQueryResponse.SearchQueryResponse x_ajcY x_ajcZ y_ajd1) (f_ajcX x_ajd0)
instance HasNode Network.Riak.Protocol.ServerInfo.ServerInfo (Maybe ByteString) where
  {-# INLINE node #-}
  node f_ajf5 (Network.Riak.Protocol.ServerInfo.ServerInfo x_ajf6 x_ajf7)
    = fmap (\ y_ajf8 -> Network.Riak.Protocol.ServerInfo.ServerInfo y_ajf8 x_ajf7) (f_ajf5 x_ajf6)
class HasServerVersion s a | s -> a where
  server_version :: Lens' s a
instance HasServerVersion Network.Riak.Protocol.ServerInfo.ServerInfo (Maybe ByteString) where
  {-# INLINE server_version #-}
  server_version f_ajf9 (Network.Riak.Protocol.ServerInfo.ServerInfo x_ajfa x_ajfb)
    = fmap (\ y_ajfc -> Network.Riak.Protocol.ServerInfo.ServerInfo x_ajfa y_ajfc) (f_ajf9 x_ajfb)
instance HasBucket Network.Riak.Protocol.SetBucketRequest.SetBucketRequest ByteString where
  {-# INLINE bucket #-}
  bucket f_ajgc (Network.Riak.Protocol.SetBucketRequest.SetBucketRequest x_ajgd x_ajge x_ajgf)
    = fmap (\ y_ajgg -> Network.Riak.Protocol.SetBucketRequest.SetBucketRequest y_ajgg x_ajge x_ajgf) (f_ajgc x_ajgd)
instance HasProps Network.Riak.Protocol.SetBucketRequest.SetBucketRequest Network.Riak.Protocol.BucketProps.BucketProps where
  {-# INLINE props #-}
  props f_ajgh (Network.Riak.Protocol.SetBucketRequest.SetBucketRequest x_ajgi x_ajgj x_ajgk)
    = fmap (\ y_ajgl -> Network.Riak.Protocol.SetBucketRequest.SetBucketRequest x_ajgi y_ajgl x_ajgk) (f_ajgh x_ajgj)
instance HasType' Network.Riak.Protocol.SetBucketRequest.SetBucketRequest (Maybe ByteString) where
  {-# INLINE type' #-}
  type' f_ajgm (Network.Riak.Protocol.SetBucketRequest.SetBucketRequest x_ajgn x_ajgo x_ajgp)
    = fmap (\ y_ajgq -> Network.Riak.Protocol.SetBucketRequest.SetBucketRequest x_ajgn x_ajgo y_ajgq) (f_ajgm x_ajgp)
instance HasProps Network.Riak.Protocol.SetBucketTypeRequest.SetBucketTypeRequest Network.Riak.Protocol.BucketProps.BucketProps where
  {-# INLINE props #-}
  props f_ajhe (Network.Riak.Protocol.SetBucketTypeRequest.SetBucketTypeRequest x_ajhf x_ajhg)
    = fmap (\ y_ajhh -> Network.Riak.Protocol.SetBucketTypeRequest.SetBucketTypeRequest x_ajhf y_ajhh) (f_ajhe x_ajhg)
instance HasType' Network.Riak.Protocol.SetBucketTypeRequest.SetBucketTypeRequest ByteString where
  {-# INLINE type' #-}
  type' f_ajhi (Network.Riak.Protocol.SetBucketTypeRequest.SetBucketTypeRequest x_ajhj x_ajhk)
    = fmap (\ y_ajhl -> Network.Riak.Protocol.SetBucketTypeRequest.SetBucketTypeRequest y_ajhl x_ajhk) (f_ajhi x_ajhj)
instance HasClientId Network.Riak.Protocol.SetClientIDRequest.SetClientIDRequest ByteString where
  {-# INLINE client_id #-}
  client_id f_ajhV (Network.Riak.Protocol.SetClientIDRequest.SetClientIDRequest x_ajhW)
    = fmap (\ y_ajhX -> Network.Riak.Protocol.SetClientIDRequest.SetClientIDRequest y_ajhX) (f_ajhV x_ajhW)
class HasAdds s a | s -> a where
  adds :: Lens' s a
instance HasAdds Network.Riak.Protocol.SetOp.SetOp (Seq ByteString) where
  {-# INLINE adds #-}
  adds f_ajij (Network.Riak.Protocol.SetOp.SetOp x_ajik x_ajil)
    = fmap (\ y_ajim -> Network.Riak.Protocol.SetOp.SetOp y_ajim x_ajil) (f_ajij x_ajik)
instance HasRemoves Network.Riak.Protocol.SetOp.SetOp (Seq ByteString) where
  {-# INLINE removes #-}
  removes f_ajin (Network.Riak.Protocol.SetOp.SetOp x_ajio x_ajip)
    = fmap (\ y_ajiq -> Network.Riak.Protocol.SetOp.SetOp x_ajio y_ajiq) (f_ajin x_ajip)
instance HasNVal Network.Riak.Protocol.YzIndex.YzIndex (Maybe Word32) where
  {-# INLINE n_val #-}
  n_val f_ajjq (Network.Riak.Protocol.YzIndex.YzIndex x_ajjr x_ajjs x_ajjt)
    = fmap (\ y_ajju -> Network.Riak.Protocol.YzIndex.YzIndex x_ajjr x_ajjs y_ajju) (f_ajjq x_ajjt)
instance HasName Network.Riak.Protocol.YzIndex.YzIndex ByteString where
  {-# INLINE name #-}
  name f_ajjv (Network.Riak.Protocol.YzIndex.YzIndex x_ajjw x_ajjx x_ajjy)
    = fmap (\ y_ajjz -> Network.Riak.Protocol.YzIndex.YzIndex y_ajjz x_ajjx x_ajjy) (f_ajjv x_ajjw)
class HasSchema s a | s -> a where
  schema :: Lens' s a
instance HasSchema Network.Riak.Protocol.YzIndex.YzIndex (Maybe ByteString) where
  {-# INLINE schema #-}
  schema f_ajjA (Network.Riak.Protocol.YzIndex.YzIndex x_ajjB x_ajjC x_ajjD)
    = fmap (\ y_ajjE -> Network.Riak.Protocol.YzIndex.YzIndex x_ajjB y_ajjE x_ajjD) (f_ajjA x_ajjC)
instance HasName Network.Riak.Protocol.YzIndexDeleteRequest.YzIndexDeleteRequest ByteString where
  {-# INLINE name #-}
  name f_ajkS (Network.Riak.Protocol.YzIndexDeleteRequest.YzIndexDeleteRequest x_ajkT)
    = fmap (\ y_ajkU -> Network.Riak.Protocol.YzIndexDeleteRequest.YzIndexDeleteRequest y_ajkU) (f_ajkS x_ajkT)
instance HasName Network.Riak.Protocol.YzIndexGetRequest.YzIndexGetRequest (Maybe ByteString) where
  {-# INLINE name #-}
  name f_ajlg (Network.Riak.Protocol.YzIndexGetRequest.YzIndexGetRequest x_ajlh)
    = fmap (\ y_ajli -> Network.Riak.Protocol.YzIndexGetRequest.YzIndexGetRequest y_ajli) (f_ajlg x_ajlh)
instance HasIndex Network.Riak.Protocol.YzIndexGetResponse.YzIndexGetResponse (Seq Network.Riak.Protocol.YzIndex.YzIndex) where
  {-# INLINE index #-}
  index f_ajlE (Network.Riak.Protocol.YzIndexGetResponse.YzIndexGetResponse x_ajlF)
    = fmap (\ y_ajlG -> Network.Riak.Protocol.YzIndexGetResponse.YzIndexGetResponse y_ajlG) (f_ajlE x_ajlF)
instance HasIndex Network.Riak.Protocol.YzIndexPutRequest.YzIndexPutRequest Network.Riak.Protocol.YzIndex.YzIndex where
  {-# INLINE index #-}
  index f_ajm2 (Network.Riak.Protocol.YzIndexPutRequest.YzIndexPutRequest x_ajm3 x_ajm4)
    = fmap (\ y_ajm5 -> Network.Riak.Protocol.YzIndexPutRequest.YzIndexPutRequest y_ajm5 x_ajm4) (f_ajm2 x_ajm3)
instance HasTimeout Network.Riak.Protocol.YzIndexPutRequest.YzIndexPutRequest (Maybe Word32) where
  {-# INLINE timeout #-}
  timeout f_ajm6 (Network.Riak.Protocol.YzIndexPutRequest.YzIndexPutRequest x_ajm7 x_ajm8)
    = fmap (\ y_ajm9 -> Network.Riak.Protocol.YzIndexPutRequest.YzIndexPutRequest x_ajm7 y_ajm9) (f_ajm6 x_ajm8)
instance HasContent Network.Riak.Protocol.YzSchema.YzSchema (Maybe ByteString) where
  {-# INLINE content #-}
  content f_ajmL (Network.Riak.Protocol.YzSchema.YzSchema x_ajmM x_ajmN)
    = fmap (\ y_ajmO -> Network.Riak.Protocol.YzSchema.YzSchema x_ajmM y_ajmO) (f_ajmL x_ajmN)
instance HasName Network.Riak.Protocol.YzSchema.YzSchema ByteString where
  {-# INLINE name #-}
  name f_ajmP (Network.Riak.Protocol.YzSchema.YzSchema x_ajmQ x_ajmR)
    = fmap (\ y_ajmS -> Network.Riak.Protocol.YzSchema.YzSchema y_ajmS x_ajmR) (f_ajmP x_ajmQ)
instance HasName Network.Riak.Protocol.YzSchemaGetRequest.YzSchemaGetRequest ByteString where
  {-# INLINE name #-}
  name f_ajns (Network.Riak.Protocol.YzSchemaGetRequest.YzSchemaGetRequest x_ajnt)
    = fmap (\ y_ajnu -> Network.Riak.Protocol.YzSchemaGetRequest.YzSchemaGetRequest y_ajnu) (f_ajns x_ajnt)
instance HasSchema Network.Riak.Protocol.YzSchemaGetResponse.YzSchemaGetResponse Network.Riak.Protocol.YzSchema.YzSchema where
  {-# INLINE schema #-}
  schema f_ajnQ (Network.Riak.Protocol.YzSchemaGetResponse.YzSchemaGetResponse x_ajnR)
    = fmap (\ y_ajnS -> Network.Riak.Protocol.YzSchemaGetResponse.YzSchemaGetResponse y_ajnS) (f_ajnQ x_ajnR)
instance HasSchema Network.Riak.Protocol.YzSchemaPutRequest.YzSchemaPutRequest Network.Riak.Protocol.YzSchema.YzSchema where
  {-# INLINE schema #-}
  schema f_ajoe (Network.Riak.Protocol.YzSchemaPutRequest.YzSchemaPutRequest x_ajof)
    = fmap (\ y_ajog -> Network.Riak.Protocol.YzSchemaPutRequest.YzSchemaPutRequest y_ajog) (f_ajoe x_ajof)