{- This file was auto-generated from tensorflow/core/protobuf/meta_graph.proto by the proto-lens-protoc program. -}
{-# LANGUAGE ScopedTypeVariables, DataKinds, TypeFamilies, UndecidableInstances, GeneralizedNewtypeDeriving, MultiParamTypeClasses, FlexibleContexts, FlexibleInstances, PatternSynonyms, MagicHash, NoImplicitPrelude, DataKinds, BangPatterns, TypeApplications, OverloadedStrings, DerivingStrategies#-}
{-# OPTIONS_GHC -Wno-unused-imports#-}
{-# OPTIONS_GHC -Wno-duplicate-exports#-}
{-# OPTIONS_GHC -Wno-dodgy-exports#-}
module Proto.Tensorflow.Core.Protobuf.MetaGraph (
        AssetFileDef(), CollectionDef(), CollectionDef'Kind(..),
        _CollectionDef'NodeList', _CollectionDef'BytesList',
        _CollectionDef'Int64List', _CollectionDef'FloatList',
        _CollectionDef'AnyList', CollectionDef'AnyList(),
        CollectionDef'BytesList(), CollectionDef'FloatList(),
        CollectionDef'Int64List(), CollectionDef'NodeList(),
        MetaGraphDef(), MetaGraphDef'CollectionDefEntry(),
        MetaGraphDef'MetaInfoDef(),
        MetaGraphDef'MetaInfoDef'FunctionAliasesEntry(),
        MetaGraphDef'SignatureDefEntry(), SignatureDef(),
        SignatureDef'InputsEntry(), SignatureDef'OutputsEntry(),
        TensorInfo(), TensorInfo'Encoding(..), _TensorInfo'Name,
        _TensorInfo'CooSparse', _TensorInfo'CompositeTensor',
        TensorInfo'CompositeTensor(), TensorInfo'CooSparse()
    ) where
import qualified Data.ProtoLens.Runtime.Control.DeepSeq as Control.DeepSeq
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Prism as Data.ProtoLens.Prism
import qualified Data.ProtoLens.Runtime.Prelude as Prelude
import qualified Data.ProtoLens.Runtime.Data.Int as Data.Int
import qualified Data.ProtoLens.Runtime.Data.Monoid as Data.Monoid
import qualified Data.ProtoLens.Runtime.Data.Word as Data.Word
import qualified Data.ProtoLens.Runtime.Data.ProtoLens as Data.ProtoLens
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Bytes as Data.ProtoLens.Encoding.Bytes
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Growing as Data.ProtoLens.Encoding.Growing
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Parser.Unsafe as Data.ProtoLens.Encoding.Parser.Unsafe
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Wire as Data.ProtoLens.Encoding.Wire
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Field as Data.ProtoLens.Field
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Message.Enum as Data.ProtoLens.Message.Enum
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Service.Types as Data.ProtoLens.Service.Types
import qualified Data.ProtoLens.Runtime.Lens.Family2 as Lens.Family2
import qualified Data.ProtoLens.Runtime.Lens.Family2.Unchecked as Lens.Family2.Unchecked
import qualified Data.ProtoLens.Runtime.Data.Text as Data.Text
import qualified Data.ProtoLens.Runtime.Data.Map as Data.Map
import qualified Data.ProtoLens.Runtime.Data.ByteString as Data.ByteString
import qualified Data.ProtoLens.Runtime.Data.ByteString.Char8 as Data.ByteString.Char8
import qualified Data.ProtoLens.Runtime.Data.Text.Encoding as Data.Text.Encoding
import qualified Data.ProtoLens.Runtime.Data.Vector as Data.Vector
import qualified Data.ProtoLens.Runtime.Data.Vector.Generic as Data.Vector.Generic
import qualified Data.ProtoLens.Runtime.Data.Vector.Unboxed as Data.Vector.Unboxed
import qualified Data.ProtoLens.Runtime.Text.Read as Text.Read
import qualified Proto.Google.Protobuf.Any
import qualified Proto.Tensorflow.Core.Framework.Graph
import qualified Proto.Tensorflow.Core.Framework.OpDef
import qualified Proto.Tensorflow.Core.Framework.TensorShape
import qualified Proto.Tensorflow.Core.Framework.Types
import qualified Proto.Tensorflow.Core.Protobuf.SavedObjectGraph
import qualified Proto.Tensorflow.Core.Protobuf.Saver
import qualified Proto.Tensorflow.Core.Protobuf.Struct
{- | Fields :
     
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.tensorInfo' @:: Lens' AssetFileDef TensorInfo@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.maybe'tensorInfo' @:: Lens' AssetFileDef (Prelude.Maybe TensorInfo)@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.filename' @:: Lens' AssetFileDef Data.Text.Text@ -}
data AssetFileDef
  = AssetFileDef'_constructor {AssetFileDef -> Maybe TensorInfo
_AssetFileDef'tensorInfo :: !(Prelude.Maybe TensorInfo),
                               AssetFileDef -> Text
_AssetFileDef'filename :: !Data.Text.Text,
                               AssetFileDef -> FieldSet
_AssetFileDef'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (AssetFileDef -> AssetFileDef -> Bool
(AssetFileDef -> AssetFileDef -> Bool)
-> (AssetFileDef -> AssetFileDef -> Bool) -> Eq AssetFileDef
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: AssetFileDef -> AssetFileDef -> Bool
$c/= :: AssetFileDef -> AssetFileDef -> Bool
== :: AssetFileDef -> AssetFileDef -> Bool
$c== :: AssetFileDef -> AssetFileDef -> Bool
Prelude.Eq, Eq AssetFileDef
Eq AssetFileDef =>
(AssetFileDef -> AssetFileDef -> Ordering)
-> (AssetFileDef -> AssetFileDef -> Bool)
-> (AssetFileDef -> AssetFileDef -> Bool)
-> (AssetFileDef -> AssetFileDef -> Bool)
-> (AssetFileDef -> AssetFileDef -> Bool)
-> (AssetFileDef -> AssetFileDef -> AssetFileDef)
-> (AssetFileDef -> AssetFileDef -> AssetFileDef)
-> Ord AssetFileDef
AssetFileDef -> AssetFileDef -> Bool
AssetFileDef -> AssetFileDef -> Ordering
AssetFileDef -> AssetFileDef -> AssetFileDef
forall a.
Eq a =>
(a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
min :: AssetFileDef -> AssetFileDef -> AssetFileDef
$cmin :: AssetFileDef -> AssetFileDef -> AssetFileDef
max :: AssetFileDef -> AssetFileDef -> AssetFileDef
$cmax :: AssetFileDef -> AssetFileDef -> AssetFileDef
>= :: AssetFileDef -> AssetFileDef -> Bool
$c>= :: AssetFileDef -> AssetFileDef -> Bool
> :: AssetFileDef -> AssetFileDef -> Bool
$c> :: AssetFileDef -> AssetFileDef -> Bool
<= :: AssetFileDef -> AssetFileDef -> Bool
$c<= :: AssetFileDef -> AssetFileDef -> Bool
< :: AssetFileDef -> AssetFileDef -> Bool
$c< :: AssetFileDef -> AssetFileDef -> Bool
compare :: AssetFileDef -> AssetFileDef -> Ordering
$ccompare :: AssetFileDef -> AssetFileDef -> Ordering
$cp1Ord :: Eq AssetFileDef
Prelude.Ord)
instance Prelude.Show AssetFileDef where
  showsPrec :: Int -> AssetFileDef -> ShowS
showsPrec _ __x :: AssetFileDef
__x __s :: String
__s
    = Char -> ShowS
Prelude.showChar
        '{'
        (String -> ShowS
Prelude.showString
           (AssetFileDef -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort AssetFileDef
__x) (Char -> ShowS
Prelude.showChar '}' String
__s))
instance Data.ProtoLens.Field.HasField AssetFileDef "tensorInfo" TensorInfo where
  fieldOf :: Proxy# "tensorInfo"
-> (TensorInfo -> f TensorInfo) -> AssetFileDef -> f AssetFileDef
fieldOf _
    = ((Maybe TensorInfo -> f (Maybe TensorInfo))
 -> AssetFileDef -> f AssetFileDef)
-> ((TensorInfo -> f TensorInfo)
    -> Maybe TensorInfo -> f (Maybe TensorInfo))
-> (TensorInfo -> f TensorInfo)
-> AssetFileDef
-> f AssetFileDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((AssetFileDef -> Maybe TensorInfo)
-> (AssetFileDef -> Maybe TensorInfo -> AssetFileDef)
-> Lens
     AssetFileDef AssetFileDef (Maybe TensorInfo) (Maybe TensorInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           AssetFileDef -> Maybe TensorInfo
_AssetFileDef'tensorInfo
           (\ x__ :: AssetFileDef
x__ y__ :: Maybe TensorInfo
y__ -> AssetFileDef
x__ {_AssetFileDef'tensorInfo :: Maybe TensorInfo
_AssetFileDef'tensorInfo = Maybe TensorInfo
y__}))
        (TensorInfo -> Lens' (Maybe TensorInfo) TensorInfo
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens TensorInfo
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField AssetFileDef "maybe'tensorInfo" (Prelude.Maybe TensorInfo) where
  fieldOf :: Proxy# "maybe'tensorInfo"
-> (Maybe TensorInfo -> f (Maybe TensorInfo))
-> AssetFileDef
-> f AssetFileDef
fieldOf _
    = ((Maybe TensorInfo -> f (Maybe TensorInfo))
 -> AssetFileDef -> f AssetFileDef)
-> ((Maybe TensorInfo -> f (Maybe TensorInfo))
    -> Maybe TensorInfo -> f (Maybe TensorInfo))
-> (Maybe TensorInfo -> f (Maybe TensorInfo))
-> AssetFileDef
-> f AssetFileDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((AssetFileDef -> Maybe TensorInfo)
-> (AssetFileDef -> Maybe TensorInfo -> AssetFileDef)
-> Lens
     AssetFileDef AssetFileDef (Maybe TensorInfo) (Maybe TensorInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           AssetFileDef -> Maybe TensorInfo
_AssetFileDef'tensorInfo
           (\ x__ :: AssetFileDef
x__ y__ :: Maybe TensorInfo
y__ -> AssetFileDef
x__ {_AssetFileDef'tensorInfo :: Maybe TensorInfo
_AssetFileDef'tensorInfo = Maybe TensorInfo
y__}))
        (Maybe TensorInfo -> f (Maybe TensorInfo))
-> Maybe TensorInfo -> f (Maybe TensorInfo)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField AssetFileDef "filename" Data.Text.Text where
  fieldOf :: Proxy# "filename"
-> (Text -> f Text) -> AssetFileDef -> f AssetFileDef
fieldOf _
    = ((Text -> f Text) -> AssetFileDef -> f AssetFileDef)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> AssetFileDef
-> f AssetFileDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((AssetFileDef -> Text)
-> (AssetFileDef -> Text -> AssetFileDef)
-> Lens AssetFileDef AssetFileDef Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           AssetFileDef -> Text
_AssetFileDef'filename
           (\ x__ :: AssetFileDef
x__ y__ :: Text
y__ -> AssetFileDef
x__ {_AssetFileDef'filename :: Text
_AssetFileDef'filename = Text
y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message AssetFileDef where
  messageName :: Proxy AssetFileDef -> Text
messageName _ = String -> Text
Data.Text.pack "tensorflow.AssetFileDef"
  packedMessageDescriptor :: Proxy AssetFileDef -> ByteString
packedMessageDescriptor _
    = "\n\
      \\fAssetFileDef\DC27\n\
      \\vtensor_info\CAN\SOH \SOH(\v2\SYN.tensorflow.TensorInfoR\n\
      \tensorInfo\DC2\SUB\n\
      \\bfilename\CAN\STX \SOH(\tR\bfilename"
  packedFileDescriptor :: Proxy AssetFileDef -> ByteString
packedFileDescriptor _ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor AssetFileDef)
fieldsByTag
    = let
        tensorInfo__field_descriptor :: FieldDescriptor AssetFileDef
tensorInfo__field_descriptor
          = String
-> FieldTypeDescriptor TensorInfo
-> FieldAccessor AssetFileDef TensorInfo
-> FieldDescriptor AssetFileDef
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "tensor_info"
              (MessageOrGroup -> FieldTypeDescriptor TensorInfo
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor TensorInfo)
              (Lens
  AssetFileDef AssetFileDef (Maybe TensorInfo) (Maybe TensorInfo)
-> FieldAccessor AssetFileDef TensorInfo
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall s a (f :: * -> *).
(HasField s "maybe'tensorInfo" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'tensorInfo")) ::
              Data.ProtoLens.FieldDescriptor AssetFileDef
        filename__field_descriptor :: FieldDescriptor AssetFileDef
filename__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor AssetFileDef Text
-> FieldDescriptor AssetFileDef
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "filename"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens AssetFileDef AssetFileDef Text Text
-> FieldAccessor AssetFileDef Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "filename" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"filename")) ::
              Data.ProtoLens.FieldDescriptor AssetFileDef
      in
        [(Tag, FieldDescriptor AssetFileDef)]
-> Map Tag (FieldDescriptor AssetFileDef)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag 1, FieldDescriptor AssetFileDef
tensorInfo__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 2, FieldDescriptor AssetFileDef
filename__field_descriptor)]
  unknownFields :: LensLike' f AssetFileDef FieldSet
unknownFields
    = (AssetFileDef -> FieldSet)
-> (AssetFileDef -> FieldSet -> AssetFileDef)
-> Lens' AssetFileDef FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        AssetFileDef -> FieldSet
_AssetFileDef'_unknownFields
        (\ x__ :: AssetFileDef
x__ y__ :: FieldSet
y__ -> AssetFileDef
x__ {_AssetFileDef'_unknownFields :: FieldSet
_AssetFileDef'_unknownFields = FieldSet
y__})
  defMessage :: AssetFileDef
defMessage
    = $WAssetFileDef'_constructor :: Maybe TensorInfo -> Text -> FieldSet -> AssetFileDef
AssetFileDef'_constructor
        {_AssetFileDef'tensorInfo :: Maybe TensorInfo
_AssetFileDef'tensorInfo = Maybe TensorInfo
forall a. Maybe a
Prelude.Nothing,
         _AssetFileDef'filename :: Text
_AssetFileDef'filename = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _AssetFileDef'_unknownFields :: FieldSet
_AssetFileDef'_unknownFields = []}
  parseMessage :: Parser AssetFileDef
parseMessage
    = let
        loop ::
          AssetFileDef -> Data.ProtoLens.Encoding.Bytes.Parser AssetFileDef
        loop :: AssetFileDef -> Parser AssetFileDef
loop x :: AssetFileDef
x
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do (let missing :: [a]
missing = []
                       in
                         if [Any] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
                             () -> Parser ()
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
                         else
                             String -> Parser ()
forall (m :: * -> *) a. MonadFail m => String -> m a
Prelude.fail
                               (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
                                  "Missing required fields: "
                                  ([String] -> String
forall a. Show a => a -> String
Prelude.show ([String]
forall a. [a]
missing :: [Prelude.String]))))
                      AssetFileDef -> Parser AssetFileDef
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter AssetFileDef AssetFileDef FieldSet FieldSet
-> (FieldSet -> FieldSet) -> AssetFileDef -> AssetFileDef
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                           forall msg. Message msg => Lens' msg FieldSet
Setter AssetFileDef AssetFileDef FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) AssetFileDef
x)
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        10
                          -> do TensorInfo
y <- Parser TensorInfo -> String -> Parser TensorInfo
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser TensorInfo -> Parser TensorInfo
forall a. Int -> Parser a -> Parser a
Data.ProtoLens.Encoding.Bytes.isolate
                                             (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len) Parser TensorInfo
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       "tensor_info"
                                AssetFileDef -> Parser AssetFileDef
loop
                                  (Setter AssetFileDef AssetFileDef TensorInfo TensorInfo
-> TensorInfo -> AssetFileDef -> AssetFileDef
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "tensorInfo" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"tensorInfo") TensorInfo
y AssetFileDef
x)
                        18
                          -> do Text
y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do ByteString
value <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                       Int -> Parser ByteString
Data.ProtoLens.Encoding.Bytes.getBytes
                                                         (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
                                           Either String Text -> Parser Text
forall a. Either String a -> Parser a
Data.ProtoLens.Encoding.Bytes.runEither
                                             (case ByteString -> Either UnicodeException Text
Data.Text.Encoding.decodeUtf8' ByteString
value of
                                                (Prelude.Left err :: UnicodeException
err)
                                                  -> String -> Either String Text
forall a b. a -> Either a b
Prelude.Left (UnicodeException -> String
forall a. Show a => a -> String
Prelude.show UnicodeException
err)
                                                (Prelude.Right r :: Text
r) -> Text -> Either String Text
forall a b. b -> Either a b
Prelude.Right Text
r))
                                       "filename"
                                AssetFileDef -> Parser AssetFileDef
loop
                                  (Setter AssetFileDef AssetFileDef Text Text
-> Text -> AssetFileDef -> AssetFileDef
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "filename" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"filename") Text
y AssetFileDef
x)
                        wire :: Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                AssetFileDef -> Parser AssetFileDef
loop
                                  (Setter AssetFileDef AssetFileDef FieldSet FieldSet
-> (FieldSet -> FieldSet) -> AssetFileDef -> AssetFileDef
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                     forall msg. Message msg => Lens' msg FieldSet
Setter AssetFileDef AssetFileDef FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) AssetFileDef
x)
      in
        Parser AssetFileDef -> String -> Parser AssetFileDef
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do AssetFileDef -> Parser AssetFileDef
loop AssetFileDef
forall msg. Message msg => msg
Data.ProtoLens.defMessage) "AssetFileDef"
  buildMessage :: AssetFileDef -> Builder
buildMessage
    = \ _x :: AssetFileDef
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (case
                  FoldLike
  (Maybe TensorInfo)
  AssetFileDef
  AssetFileDef
  (Maybe TensorInfo)
  (Maybe TensorInfo)
-> AssetFileDef -> Maybe TensorInfo
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                    (forall s a (f :: * -> *).
(HasField s "maybe'tensorInfo" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'tensorInfo") AssetFileDef
_x
              of
                Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                (Prelude.Just _v :: TensorInfo
_v)
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 10)
                       ((ByteString -> Builder)
-> (TensorInfo -> ByteString) -> TensorInfo -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ bs :: ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          TensorInfo -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                          TensorInfo
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   _v :: Text
_v = FoldLike Text AssetFileDef AssetFileDef Text Text
-> AssetFileDef -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "filename" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"filename") AssetFileDef
_x
                 in
                   if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 18)
                         ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            (\ bs :: ByteString
bs
                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                       (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                    (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                            Text -> ByteString
Data.Text.Encoding.encodeUtf8
                            Text
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike FieldSet AssetFileDef AssetFileDef FieldSet FieldSet
-> AssetFileDef -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet AssetFileDef AssetFileDef FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields AssetFileDef
_x)))
instance Control.DeepSeq.NFData AssetFileDef where
  rnf :: AssetFileDef -> ()
rnf
    = \ x__ :: AssetFileDef
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (AssetFileDef -> FieldSet
_AssetFileDef'_unknownFields AssetFileDef
x__)
             (Maybe TensorInfo -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (AssetFileDef -> Maybe TensorInfo
_AssetFileDef'tensorInfo AssetFileDef
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (AssetFileDef -> Text
_AssetFileDef'filename AssetFileDef
x__) ()))
{- | Fields :
     
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.maybe'kind' @:: Lens' CollectionDef (Prelude.Maybe CollectionDef'Kind)@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.maybe'nodeList' @:: Lens' CollectionDef (Prelude.Maybe CollectionDef'NodeList)@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.nodeList' @:: Lens' CollectionDef CollectionDef'NodeList@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.maybe'bytesList' @:: Lens' CollectionDef (Prelude.Maybe CollectionDef'BytesList)@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.bytesList' @:: Lens' CollectionDef CollectionDef'BytesList@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.maybe'int64List' @:: Lens' CollectionDef (Prelude.Maybe CollectionDef'Int64List)@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.int64List' @:: Lens' CollectionDef CollectionDef'Int64List@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.maybe'floatList' @:: Lens' CollectionDef (Prelude.Maybe CollectionDef'FloatList)@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.floatList' @:: Lens' CollectionDef CollectionDef'FloatList@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.maybe'anyList' @:: Lens' CollectionDef (Prelude.Maybe CollectionDef'AnyList)@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.anyList' @:: Lens' CollectionDef CollectionDef'AnyList@ -}
data CollectionDef
  = CollectionDef'_constructor {CollectionDef -> Maybe CollectionDef'Kind
_CollectionDef'kind :: !(Prelude.Maybe CollectionDef'Kind),
                                CollectionDef -> FieldSet
_CollectionDef'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (CollectionDef -> CollectionDef -> Bool
(CollectionDef -> CollectionDef -> Bool)
-> (CollectionDef -> CollectionDef -> Bool) -> Eq CollectionDef
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: CollectionDef -> CollectionDef -> Bool
$c/= :: CollectionDef -> CollectionDef -> Bool
== :: CollectionDef -> CollectionDef -> Bool
$c== :: CollectionDef -> CollectionDef -> Bool
Prelude.Eq, Eq CollectionDef
Eq CollectionDef =>
(CollectionDef -> CollectionDef -> Ordering)
-> (CollectionDef -> CollectionDef -> Bool)
-> (CollectionDef -> CollectionDef -> Bool)
-> (CollectionDef -> CollectionDef -> Bool)
-> (CollectionDef -> CollectionDef -> Bool)
-> (CollectionDef -> CollectionDef -> CollectionDef)
-> (CollectionDef -> CollectionDef -> CollectionDef)
-> Ord CollectionDef
CollectionDef -> CollectionDef -> Bool
CollectionDef -> CollectionDef -> Ordering
CollectionDef -> CollectionDef -> CollectionDef
forall a.
Eq a =>
(a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
min :: CollectionDef -> CollectionDef -> CollectionDef
$cmin :: CollectionDef -> CollectionDef -> CollectionDef
max :: CollectionDef -> CollectionDef -> CollectionDef
$cmax :: CollectionDef -> CollectionDef -> CollectionDef
>= :: CollectionDef -> CollectionDef -> Bool
$c>= :: CollectionDef -> CollectionDef -> Bool
> :: CollectionDef -> CollectionDef -> Bool
$c> :: CollectionDef -> CollectionDef -> Bool
<= :: CollectionDef -> CollectionDef -> Bool
$c<= :: CollectionDef -> CollectionDef -> Bool
< :: CollectionDef -> CollectionDef -> Bool
$c< :: CollectionDef -> CollectionDef -> Bool
compare :: CollectionDef -> CollectionDef -> Ordering
$ccompare :: CollectionDef -> CollectionDef -> Ordering
$cp1Ord :: Eq CollectionDef
Prelude.Ord)
instance Prelude.Show CollectionDef where
  showsPrec :: Int -> CollectionDef -> ShowS
showsPrec _ __x :: CollectionDef
__x __s :: String
__s
    = Char -> ShowS
Prelude.showChar
        '{'
        (String -> ShowS
Prelude.showString
           (CollectionDef -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort CollectionDef
__x) (Char -> ShowS
Prelude.showChar '}' String
__s))
data CollectionDef'Kind
  = CollectionDef'NodeList' !CollectionDef'NodeList |
    CollectionDef'BytesList' !CollectionDef'BytesList |
    CollectionDef'Int64List' !CollectionDef'Int64List |
    CollectionDef'FloatList' !CollectionDef'FloatList |
    CollectionDef'AnyList' !CollectionDef'AnyList
  deriving stock (Int -> CollectionDef'Kind -> ShowS
[CollectionDef'Kind] -> ShowS
CollectionDef'Kind -> String
(Int -> CollectionDef'Kind -> ShowS)
-> (CollectionDef'Kind -> String)
-> ([CollectionDef'Kind] -> ShowS)
-> Show CollectionDef'Kind
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [CollectionDef'Kind] -> ShowS
$cshowList :: [CollectionDef'Kind] -> ShowS
show :: CollectionDef'Kind -> String
$cshow :: CollectionDef'Kind -> String
showsPrec :: Int -> CollectionDef'Kind -> ShowS
$cshowsPrec :: Int -> CollectionDef'Kind -> ShowS
Prelude.Show, CollectionDef'Kind -> CollectionDef'Kind -> Bool
(CollectionDef'Kind -> CollectionDef'Kind -> Bool)
-> (CollectionDef'Kind -> CollectionDef'Kind -> Bool)
-> Eq CollectionDef'Kind
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: CollectionDef'Kind -> CollectionDef'Kind -> Bool
$c/= :: CollectionDef'Kind -> CollectionDef'Kind -> Bool
== :: CollectionDef'Kind -> CollectionDef'Kind -> Bool
$c== :: CollectionDef'Kind -> CollectionDef'Kind -> Bool
Prelude.Eq, Eq CollectionDef'Kind
Eq CollectionDef'Kind =>
(CollectionDef'Kind -> CollectionDef'Kind -> Ordering)
-> (CollectionDef'Kind -> CollectionDef'Kind -> Bool)
-> (CollectionDef'Kind -> CollectionDef'Kind -> Bool)
-> (CollectionDef'Kind -> CollectionDef'Kind -> Bool)
-> (CollectionDef'Kind -> CollectionDef'Kind -> Bool)
-> (CollectionDef'Kind -> CollectionDef'Kind -> CollectionDef'Kind)
-> (CollectionDef'Kind -> CollectionDef'Kind -> CollectionDef'Kind)
-> Ord CollectionDef'Kind
CollectionDef'Kind -> CollectionDef'Kind -> Bool
CollectionDef'Kind -> CollectionDef'Kind -> Ordering
CollectionDef'Kind -> CollectionDef'Kind -> CollectionDef'Kind
forall a.
Eq a =>
(a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
min :: CollectionDef'Kind -> CollectionDef'Kind -> CollectionDef'Kind
$cmin :: CollectionDef'Kind -> CollectionDef'Kind -> CollectionDef'Kind
max :: CollectionDef'Kind -> CollectionDef'Kind -> CollectionDef'Kind
$cmax :: CollectionDef'Kind -> CollectionDef'Kind -> CollectionDef'Kind
>= :: CollectionDef'Kind -> CollectionDef'Kind -> Bool
$c>= :: CollectionDef'Kind -> CollectionDef'Kind -> Bool
> :: CollectionDef'Kind -> CollectionDef'Kind -> Bool
$c> :: CollectionDef'Kind -> CollectionDef'Kind -> Bool
<= :: CollectionDef'Kind -> CollectionDef'Kind -> Bool
$c<= :: CollectionDef'Kind -> CollectionDef'Kind -> Bool
< :: CollectionDef'Kind -> CollectionDef'Kind -> Bool
$c< :: CollectionDef'Kind -> CollectionDef'Kind -> Bool
compare :: CollectionDef'Kind -> CollectionDef'Kind -> Ordering
$ccompare :: CollectionDef'Kind -> CollectionDef'Kind -> Ordering
$cp1Ord :: Eq CollectionDef'Kind
Prelude.Ord)
instance Data.ProtoLens.Field.HasField CollectionDef "maybe'kind" (Prelude.Maybe CollectionDef'Kind) where
  fieldOf :: Proxy# "maybe'kind"
-> (Maybe CollectionDef'Kind -> f (Maybe CollectionDef'Kind))
-> CollectionDef
-> f CollectionDef
fieldOf _
    = ((Maybe CollectionDef'Kind -> f (Maybe CollectionDef'Kind))
 -> CollectionDef -> f CollectionDef)
-> ((Maybe CollectionDef'Kind -> f (Maybe CollectionDef'Kind))
    -> Maybe CollectionDef'Kind -> f (Maybe CollectionDef'Kind))
-> (Maybe CollectionDef'Kind -> f (Maybe CollectionDef'Kind))
-> CollectionDef
-> f CollectionDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CollectionDef -> Maybe CollectionDef'Kind)
-> (CollectionDef -> Maybe CollectionDef'Kind -> CollectionDef)
-> Lens
     CollectionDef
     CollectionDef
     (Maybe CollectionDef'Kind)
     (Maybe CollectionDef'Kind)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CollectionDef -> Maybe CollectionDef'Kind
_CollectionDef'kind (\ x__ :: CollectionDef
x__ y__ :: Maybe CollectionDef'Kind
y__ -> CollectionDef
x__ {_CollectionDef'kind :: Maybe CollectionDef'Kind
_CollectionDef'kind = Maybe CollectionDef'Kind
y__}))
        (Maybe CollectionDef'Kind -> f (Maybe CollectionDef'Kind))
-> Maybe CollectionDef'Kind -> f (Maybe CollectionDef'Kind)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField CollectionDef "maybe'nodeList" (Prelude.Maybe CollectionDef'NodeList) where
  fieldOf :: Proxy# "maybe'nodeList"
-> (Maybe CollectionDef'NodeList
    -> f (Maybe CollectionDef'NodeList))
-> CollectionDef
-> f CollectionDef
fieldOf _
    = ((Maybe CollectionDef'Kind -> f (Maybe CollectionDef'Kind))
 -> CollectionDef -> f CollectionDef)
-> ((Maybe CollectionDef'NodeList
     -> f (Maybe CollectionDef'NodeList))
    -> Maybe CollectionDef'Kind -> f (Maybe CollectionDef'Kind))
-> (Maybe CollectionDef'NodeList
    -> f (Maybe CollectionDef'NodeList))
-> CollectionDef
-> f CollectionDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CollectionDef -> Maybe CollectionDef'Kind)
-> (CollectionDef -> Maybe CollectionDef'Kind -> CollectionDef)
-> Lens
     CollectionDef
     CollectionDef
     (Maybe CollectionDef'Kind)
     (Maybe CollectionDef'Kind)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CollectionDef -> Maybe CollectionDef'Kind
_CollectionDef'kind (\ x__ :: CollectionDef
x__ y__ :: Maybe CollectionDef'Kind
y__ -> CollectionDef
x__ {_CollectionDef'kind :: Maybe CollectionDef'Kind
_CollectionDef'kind = Maybe CollectionDef'Kind
y__}))
        ((Maybe CollectionDef'Kind -> Maybe CollectionDef'NodeList)
-> (Maybe CollectionDef'Kind
    -> Maybe CollectionDef'NodeList -> Maybe CollectionDef'Kind)
-> Lens
     (Maybe CollectionDef'Kind)
     (Maybe CollectionDef'Kind)
     (Maybe CollectionDef'NodeList)
     (Maybe CollectionDef'NodeList)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ x__ :: Maybe CollectionDef'Kind
x__
              -> case Maybe CollectionDef'Kind
x__ of
                   (Prelude.Just (CollectionDef'NodeList' x__val :: CollectionDef'NodeList
x__val))
                     -> CollectionDef'NodeList -> Maybe CollectionDef'NodeList
forall a. a -> Maybe a
Prelude.Just CollectionDef'NodeList
x__val
                   _otherwise :: Maybe CollectionDef'Kind
_otherwise -> Maybe CollectionDef'NodeList
forall a. Maybe a
Prelude.Nothing)
           (\ _ y__ :: Maybe CollectionDef'NodeList
y__ -> (CollectionDef'NodeList -> CollectionDef'Kind)
-> Maybe CollectionDef'NodeList -> Maybe CollectionDef'Kind
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap CollectionDef'NodeList -> CollectionDef'Kind
CollectionDef'NodeList' Maybe CollectionDef'NodeList
y__))
instance Data.ProtoLens.Field.HasField CollectionDef "nodeList" CollectionDef'NodeList where
  fieldOf :: Proxy# "nodeList"
-> (CollectionDef'NodeList -> f CollectionDef'NodeList)
-> CollectionDef
-> f CollectionDef
fieldOf _
    = ((Maybe CollectionDef'Kind -> f (Maybe CollectionDef'Kind))
 -> CollectionDef -> f CollectionDef)
-> ((CollectionDef'NodeList -> f CollectionDef'NodeList)
    -> Maybe CollectionDef'Kind -> f (Maybe CollectionDef'Kind))
-> (CollectionDef'NodeList -> f CollectionDef'NodeList)
-> CollectionDef
-> f CollectionDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CollectionDef -> Maybe CollectionDef'Kind)
-> (CollectionDef -> Maybe CollectionDef'Kind -> CollectionDef)
-> Lens
     CollectionDef
     CollectionDef
     (Maybe CollectionDef'Kind)
     (Maybe CollectionDef'Kind)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CollectionDef -> Maybe CollectionDef'Kind
_CollectionDef'kind (\ x__ :: CollectionDef
x__ y__ :: Maybe CollectionDef'Kind
y__ -> CollectionDef
x__ {_CollectionDef'kind :: Maybe CollectionDef'Kind
_CollectionDef'kind = Maybe CollectionDef'Kind
y__}))
        (((Maybe CollectionDef'NodeList -> f (Maybe CollectionDef'NodeList))
 -> Maybe CollectionDef'Kind -> f (Maybe CollectionDef'Kind))
-> ((CollectionDef'NodeList -> f CollectionDef'NodeList)
    -> Maybe CollectionDef'NodeList
    -> f (Maybe CollectionDef'NodeList))
-> (CollectionDef'NodeList -> f CollectionDef'NodeList)
-> Maybe CollectionDef'Kind
-> f (Maybe CollectionDef'Kind)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe CollectionDef'Kind -> Maybe CollectionDef'NodeList)
-> (Maybe CollectionDef'Kind
    -> Maybe CollectionDef'NodeList -> Maybe CollectionDef'Kind)
-> Lens
     (Maybe CollectionDef'Kind)
     (Maybe CollectionDef'Kind)
     (Maybe CollectionDef'NodeList)
     (Maybe CollectionDef'NodeList)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ x__ :: Maybe CollectionDef'Kind
x__
                 -> case Maybe CollectionDef'Kind
x__ of
                      (Prelude.Just (CollectionDef'NodeList' x__val :: CollectionDef'NodeList
x__val))
                        -> CollectionDef'NodeList -> Maybe CollectionDef'NodeList
forall a. a -> Maybe a
Prelude.Just CollectionDef'NodeList
x__val
                      _otherwise :: Maybe CollectionDef'Kind
_otherwise -> Maybe CollectionDef'NodeList
forall a. Maybe a
Prelude.Nothing)
              (\ _ y__ :: Maybe CollectionDef'NodeList
y__ -> (CollectionDef'NodeList -> CollectionDef'Kind)
-> Maybe CollectionDef'NodeList -> Maybe CollectionDef'Kind
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap CollectionDef'NodeList -> CollectionDef'Kind
CollectionDef'NodeList' Maybe CollectionDef'NodeList
y__))
           (CollectionDef'NodeList
-> Lens' (Maybe CollectionDef'NodeList) CollectionDef'NodeList
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens CollectionDef'NodeList
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField CollectionDef "maybe'bytesList" (Prelude.Maybe CollectionDef'BytesList) where
  fieldOf :: Proxy# "maybe'bytesList"
-> (Maybe CollectionDef'BytesList
    -> f (Maybe CollectionDef'BytesList))
-> CollectionDef
-> f CollectionDef
fieldOf _
    = ((Maybe CollectionDef'Kind -> f (Maybe CollectionDef'Kind))
 -> CollectionDef -> f CollectionDef)
-> ((Maybe CollectionDef'BytesList
     -> f (Maybe CollectionDef'BytesList))
    -> Maybe CollectionDef'Kind -> f (Maybe CollectionDef'Kind))
-> (Maybe CollectionDef'BytesList
    -> f (Maybe CollectionDef'BytesList))
-> CollectionDef
-> f CollectionDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CollectionDef -> Maybe CollectionDef'Kind)
-> (CollectionDef -> Maybe CollectionDef'Kind -> CollectionDef)
-> Lens
     CollectionDef
     CollectionDef
     (Maybe CollectionDef'Kind)
     (Maybe CollectionDef'Kind)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CollectionDef -> Maybe CollectionDef'Kind
_CollectionDef'kind (\ x__ :: CollectionDef
x__ y__ :: Maybe CollectionDef'Kind
y__ -> CollectionDef
x__ {_CollectionDef'kind :: Maybe CollectionDef'Kind
_CollectionDef'kind = Maybe CollectionDef'Kind
y__}))
        ((Maybe CollectionDef'Kind -> Maybe CollectionDef'BytesList)
-> (Maybe CollectionDef'Kind
    -> Maybe CollectionDef'BytesList -> Maybe CollectionDef'Kind)
-> Lens
     (Maybe CollectionDef'Kind)
     (Maybe CollectionDef'Kind)
     (Maybe CollectionDef'BytesList)
     (Maybe CollectionDef'BytesList)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ x__ :: Maybe CollectionDef'Kind
x__
              -> case Maybe CollectionDef'Kind
x__ of
                   (Prelude.Just (CollectionDef'BytesList' x__val :: CollectionDef'BytesList
x__val))
                     -> CollectionDef'BytesList -> Maybe CollectionDef'BytesList
forall a. a -> Maybe a
Prelude.Just CollectionDef'BytesList
x__val
                   _otherwise :: Maybe CollectionDef'Kind
_otherwise -> Maybe CollectionDef'BytesList
forall a. Maybe a
Prelude.Nothing)
           (\ _ y__ :: Maybe CollectionDef'BytesList
y__ -> (CollectionDef'BytesList -> CollectionDef'Kind)
-> Maybe CollectionDef'BytesList -> Maybe CollectionDef'Kind
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap CollectionDef'BytesList -> CollectionDef'Kind
CollectionDef'BytesList' Maybe CollectionDef'BytesList
y__))
instance Data.ProtoLens.Field.HasField CollectionDef "bytesList" CollectionDef'BytesList where
  fieldOf :: Proxy# "bytesList"
-> (CollectionDef'BytesList -> f CollectionDef'BytesList)
-> CollectionDef
-> f CollectionDef
fieldOf _
    = ((Maybe CollectionDef'Kind -> f (Maybe CollectionDef'Kind))
 -> CollectionDef -> f CollectionDef)
-> ((CollectionDef'BytesList -> f CollectionDef'BytesList)
    -> Maybe CollectionDef'Kind -> f (Maybe CollectionDef'Kind))
-> (CollectionDef'BytesList -> f CollectionDef'BytesList)
-> CollectionDef
-> f CollectionDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CollectionDef -> Maybe CollectionDef'Kind)
-> (CollectionDef -> Maybe CollectionDef'Kind -> CollectionDef)
-> Lens
     CollectionDef
     CollectionDef
     (Maybe CollectionDef'Kind)
     (Maybe CollectionDef'Kind)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CollectionDef -> Maybe CollectionDef'Kind
_CollectionDef'kind (\ x__ :: CollectionDef
x__ y__ :: Maybe CollectionDef'Kind
y__ -> CollectionDef
x__ {_CollectionDef'kind :: Maybe CollectionDef'Kind
_CollectionDef'kind = Maybe CollectionDef'Kind
y__}))
        (((Maybe CollectionDef'BytesList
  -> f (Maybe CollectionDef'BytesList))
 -> Maybe CollectionDef'Kind -> f (Maybe CollectionDef'Kind))
-> ((CollectionDef'BytesList -> f CollectionDef'BytesList)
    -> Maybe CollectionDef'BytesList
    -> f (Maybe CollectionDef'BytesList))
-> (CollectionDef'BytesList -> f CollectionDef'BytesList)
-> Maybe CollectionDef'Kind
-> f (Maybe CollectionDef'Kind)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe CollectionDef'Kind -> Maybe CollectionDef'BytesList)
-> (Maybe CollectionDef'Kind
    -> Maybe CollectionDef'BytesList -> Maybe CollectionDef'Kind)
-> Lens
     (Maybe CollectionDef'Kind)
     (Maybe CollectionDef'Kind)
     (Maybe CollectionDef'BytesList)
     (Maybe CollectionDef'BytesList)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ x__ :: Maybe CollectionDef'Kind
x__
                 -> case Maybe CollectionDef'Kind
x__ of
                      (Prelude.Just (CollectionDef'BytesList' x__val :: CollectionDef'BytesList
x__val))
                        -> CollectionDef'BytesList -> Maybe CollectionDef'BytesList
forall a. a -> Maybe a
Prelude.Just CollectionDef'BytesList
x__val
                      _otherwise :: Maybe CollectionDef'Kind
_otherwise -> Maybe CollectionDef'BytesList
forall a. Maybe a
Prelude.Nothing)
              (\ _ y__ :: Maybe CollectionDef'BytesList
y__ -> (CollectionDef'BytesList -> CollectionDef'Kind)
-> Maybe CollectionDef'BytesList -> Maybe CollectionDef'Kind
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap CollectionDef'BytesList -> CollectionDef'Kind
CollectionDef'BytesList' Maybe CollectionDef'BytesList
y__))
           (CollectionDef'BytesList
-> Lens' (Maybe CollectionDef'BytesList) CollectionDef'BytesList
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens CollectionDef'BytesList
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField CollectionDef "maybe'int64List" (Prelude.Maybe CollectionDef'Int64List) where
  fieldOf :: Proxy# "maybe'int64List"
-> (Maybe CollectionDef'Int64List
    -> f (Maybe CollectionDef'Int64List))
-> CollectionDef
-> f CollectionDef
fieldOf _
    = ((Maybe CollectionDef'Kind -> f (Maybe CollectionDef'Kind))
 -> CollectionDef -> f CollectionDef)
-> ((Maybe CollectionDef'Int64List
     -> f (Maybe CollectionDef'Int64List))
    -> Maybe CollectionDef'Kind -> f (Maybe CollectionDef'Kind))
-> (Maybe CollectionDef'Int64List
    -> f (Maybe CollectionDef'Int64List))
-> CollectionDef
-> f CollectionDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CollectionDef -> Maybe CollectionDef'Kind)
-> (CollectionDef -> Maybe CollectionDef'Kind -> CollectionDef)
-> Lens
     CollectionDef
     CollectionDef
     (Maybe CollectionDef'Kind)
     (Maybe CollectionDef'Kind)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CollectionDef -> Maybe CollectionDef'Kind
_CollectionDef'kind (\ x__ :: CollectionDef
x__ y__ :: Maybe CollectionDef'Kind
y__ -> CollectionDef
x__ {_CollectionDef'kind :: Maybe CollectionDef'Kind
_CollectionDef'kind = Maybe CollectionDef'Kind
y__}))
        ((Maybe CollectionDef'Kind -> Maybe CollectionDef'Int64List)
-> (Maybe CollectionDef'Kind
    -> Maybe CollectionDef'Int64List -> Maybe CollectionDef'Kind)
-> Lens
     (Maybe CollectionDef'Kind)
     (Maybe CollectionDef'Kind)
     (Maybe CollectionDef'Int64List)
     (Maybe CollectionDef'Int64List)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ x__ :: Maybe CollectionDef'Kind
x__
              -> case Maybe CollectionDef'Kind
x__ of
                   (Prelude.Just (CollectionDef'Int64List' x__val :: CollectionDef'Int64List
x__val))
                     -> CollectionDef'Int64List -> Maybe CollectionDef'Int64List
forall a. a -> Maybe a
Prelude.Just CollectionDef'Int64List
x__val
                   _otherwise :: Maybe CollectionDef'Kind
_otherwise -> Maybe CollectionDef'Int64List
forall a. Maybe a
Prelude.Nothing)
           (\ _ y__ :: Maybe CollectionDef'Int64List
y__ -> (CollectionDef'Int64List -> CollectionDef'Kind)
-> Maybe CollectionDef'Int64List -> Maybe CollectionDef'Kind
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap CollectionDef'Int64List -> CollectionDef'Kind
CollectionDef'Int64List' Maybe CollectionDef'Int64List
y__))
instance Data.ProtoLens.Field.HasField CollectionDef "int64List" CollectionDef'Int64List where
  fieldOf :: Proxy# "int64List"
-> (CollectionDef'Int64List -> f CollectionDef'Int64List)
-> CollectionDef
-> f CollectionDef
fieldOf _
    = ((Maybe CollectionDef'Kind -> f (Maybe CollectionDef'Kind))
 -> CollectionDef -> f CollectionDef)
-> ((CollectionDef'Int64List -> f CollectionDef'Int64List)
    -> Maybe CollectionDef'Kind -> f (Maybe CollectionDef'Kind))
-> (CollectionDef'Int64List -> f CollectionDef'Int64List)
-> CollectionDef
-> f CollectionDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CollectionDef -> Maybe CollectionDef'Kind)
-> (CollectionDef -> Maybe CollectionDef'Kind -> CollectionDef)
-> Lens
     CollectionDef
     CollectionDef
     (Maybe CollectionDef'Kind)
     (Maybe CollectionDef'Kind)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CollectionDef -> Maybe CollectionDef'Kind
_CollectionDef'kind (\ x__ :: CollectionDef
x__ y__ :: Maybe CollectionDef'Kind
y__ -> CollectionDef
x__ {_CollectionDef'kind :: Maybe CollectionDef'Kind
_CollectionDef'kind = Maybe CollectionDef'Kind
y__}))
        (((Maybe CollectionDef'Int64List
  -> f (Maybe CollectionDef'Int64List))
 -> Maybe CollectionDef'Kind -> f (Maybe CollectionDef'Kind))
-> ((CollectionDef'Int64List -> f CollectionDef'Int64List)
    -> Maybe CollectionDef'Int64List
    -> f (Maybe CollectionDef'Int64List))
-> (CollectionDef'Int64List -> f CollectionDef'Int64List)
-> Maybe CollectionDef'Kind
-> f (Maybe CollectionDef'Kind)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe CollectionDef'Kind -> Maybe CollectionDef'Int64List)
-> (Maybe CollectionDef'Kind
    -> Maybe CollectionDef'Int64List -> Maybe CollectionDef'Kind)
-> Lens
     (Maybe CollectionDef'Kind)
     (Maybe CollectionDef'Kind)
     (Maybe CollectionDef'Int64List)
     (Maybe CollectionDef'Int64List)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ x__ :: Maybe CollectionDef'Kind
x__
                 -> case Maybe CollectionDef'Kind
x__ of
                      (Prelude.Just (CollectionDef'Int64List' x__val :: CollectionDef'Int64List
x__val))
                        -> CollectionDef'Int64List -> Maybe CollectionDef'Int64List
forall a. a -> Maybe a
Prelude.Just CollectionDef'Int64List
x__val
                      _otherwise :: Maybe CollectionDef'Kind
_otherwise -> Maybe CollectionDef'Int64List
forall a. Maybe a
Prelude.Nothing)
              (\ _ y__ :: Maybe CollectionDef'Int64List
y__ -> (CollectionDef'Int64List -> CollectionDef'Kind)
-> Maybe CollectionDef'Int64List -> Maybe CollectionDef'Kind
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap CollectionDef'Int64List -> CollectionDef'Kind
CollectionDef'Int64List' Maybe CollectionDef'Int64List
y__))
           (CollectionDef'Int64List
-> Lens' (Maybe CollectionDef'Int64List) CollectionDef'Int64List
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens CollectionDef'Int64List
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField CollectionDef "maybe'floatList" (Prelude.Maybe CollectionDef'FloatList) where
  fieldOf :: Proxy# "maybe'floatList"
-> (Maybe CollectionDef'FloatList
    -> f (Maybe CollectionDef'FloatList))
-> CollectionDef
-> f CollectionDef
fieldOf _
    = ((Maybe CollectionDef'Kind -> f (Maybe CollectionDef'Kind))
 -> CollectionDef -> f CollectionDef)
-> ((Maybe CollectionDef'FloatList
     -> f (Maybe CollectionDef'FloatList))
    -> Maybe CollectionDef'Kind -> f (Maybe CollectionDef'Kind))
-> (Maybe CollectionDef'FloatList
    -> f (Maybe CollectionDef'FloatList))
-> CollectionDef
-> f CollectionDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CollectionDef -> Maybe CollectionDef'Kind)
-> (CollectionDef -> Maybe CollectionDef'Kind -> CollectionDef)
-> Lens
     CollectionDef
     CollectionDef
     (Maybe CollectionDef'Kind)
     (Maybe CollectionDef'Kind)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CollectionDef -> Maybe CollectionDef'Kind
_CollectionDef'kind (\ x__ :: CollectionDef
x__ y__ :: Maybe CollectionDef'Kind
y__ -> CollectionDef
x__ {_CollectionDef'kind :: Maybe CollectionDef'Kind
_CollectionDef'kind = Maybe CollectionDef'Kind
y__}))
        ((Maybe CollectionDef'Kind -> Maybe CollectionDef'FloatList)
-> (Maybe CollectionDef'Kind
    -> Maybe CollectionDef'FloatList -> Maybe CollectionDef'Kind)
-> Lens
     (Maybe CollectionDef'Kind)
     (Maybe CollectionDef'Kind)
     (Maybe CollectionDef'FloatList)
     (Maybe CollectionDef'FloatList)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ x__ :: Maybe CollectionDef'Kind
x__
              -> case Maybe CollectionDef'Kind
x__ of
                   (Prelude.Just (CollectionDef'FloatList' x__val :: CollectionDef'FloatList
x__val))
                     -> CollectionDef'FloatList -> Maybe CollectionDef'FloatList
forall a. a -> Maybe a
Prelude.Just CollectionDef'FloatList
x__val
                   _otherwise :: Maybe CollectionDef'Kind
_otherwise -> Maybe CollectionDef'FloatList
forall a. Maybe a
Prelude.Nothing)
           (\ _ y__ :: Maybe CollectionDef'FloatList
y__ -> (CollectionDef'FloatList -> CollectionDef'Kind)
-> Maybe CollectionDef'FloatList -> Maybe CollectionDef'Kind
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap CollectionDef'FloatList -> CollectionDef'Kind
CollectionDef'FloatList' Maybe CollectionDef'FloatList
y__))
instance Data.ProtoLens.Field.HasField CollectionDef "floatList" CollectionDef'FloatList where
  fieldOf :: Proxy# "floatList"
-> (CollectionDef'FloatList -> f CollectionDef'FloatList)
-> CollectionDef
-> f CollectionDef
fieldOf _
    = ((Maybe CollectionDef'Kind -> f (Maybe CollectionDef'Kind))
 -> CollectionDef -> f CollectionDef)
-> ((CollectionDef'FloatList -> f CollectionDef'FloatList)
    -> Maybe CollectionDef'Kind -> f (Maybe CollectionDef'Kind))
-> (CollectionDef'FloatList -> f CollectionDef'FloatList)
-> CollectionDef
-> f CollectionDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CollectionDef -> Maybe CollectionDef'Kind)
-> (CollectionDef -> Maybe CollectionDef'Kind -> CollectionDef)
-> Lens
     CollectionDef
     CollectionDef
     (Maybe CollectionDef'Kind)
     (Maybe CollectionDef'Kind)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CollectionDef -> Maybe CollectionDef'Kind
_CollectionDef'kind (\ x__ :: CollectionDef
x__ y__ :: Maybe CollectionDef'Kind
y__ -> CollectionDef
x__ {_CollectionDef'kind :: Maybe CollectionDef'Kind
_CollectionDef'kind = Maybe CollectionDef'Kind
y__}))
        (((Maybe CollectionDef'FloatList
  -> f (Maybe CollectionDef'FloatList))
 -> Maybe CollectionDef'Kind -> f (Maybe CollectionDef'Kind))
-> ((CollectionDef'FloatList -> f CollectionDef'FloatList)
    -> Maybe CollectionDef'FloatList
    -> f (Maybe CollectionDef'FloatList))
-> (CollectionDef'FloatList -> f CollectionDef'FloatList)
-> Maybe CollectionDef'Kind
-> f (Maybe CollectionDef'Kind)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe CollectionDef'Kind -> Maybe CollectionDef'FloatList)
-> (Maybe CollectionDef'Kind
    -> Maybe CollectionDef'FloatList -> Maybe CollectionDef'Kind)
-> Lens
     (Maybe CollectionDef'Kind)
     (Maybe CollectionDef'Kind)
     (Maybe CollectionDef'FloatList)
     (Maybe CollectionDef'FloatList)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ x__ :: Maybe CollectionDef'Kind
x__
                 -> case Maybe CollectionDef'Kind
x__ of
                      (Prelude.Just (CollectionDef'FloatList' x__val :: CollectionDef'FloatList
x__val))
                        -> CollectionDef'FloatList -> Maybe CollectionDef'FloatList
forall a. a -> Maybe a
Prelude.Just CollectionDef'FloatList
x__val
                      _otherwise :: Maybe CollectionDef'Kind
_otherwise -> Maybe CollectionDef'FloatList
forall a. Maybe a
Prelude.Nothing)
              (\ _ y__ :: Maybe CollectionDef'FloatList
y__ -> (CollectionDef'FloatList -> CollectionDef'Kind)
-> Maybe CollectionDef'FloatList -> Maybe CollectionDef'Kind
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap CollectionDef'FloatList -> CollectionDef'Kind
CollectionDef'FloatList' Maybe CollectionDef'FloatList
y__))
           (CollectionDef'FloatList
-> Lens' (Maybe CollectionDef'FloatList) CollectionDef'FloatList
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens CollectionDef'FloatList
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField CollectionDef "maybe'anyList" (Prelude.Maybe CollectionDef'AnyList) where
  fieldOf :: Proxy# "maybe'anyList"
-> (Maybe CollectionDef'AnyList -> f (Maybe CollectionDef'AnyList))
-> CollectionDef
-> f CollectionDef
fieldOf _
    = ((Maybe CollectionDef'Kind -> f (Maybe CollectionDef'Kind))
 -> CollectionDef -> f CollectionDef)
-> ((Maybe CollectionDef'AnyList
     -> f (Maybe CollectionDef'AnyList))
    -> Maybe CollectionDef'Kind -> f (Maybe CollectionDef'Kind))
-> (Maybe CollectionDef'AnyList -> f (Maybe CollectionDef'AnyList))
-> CollectionDef
-> f CollectionDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CollectionDef -> Maybe CollectionDef'Kind)
-> (CollectionDef -> Maybe CollectionDef'Kind -> CollectionDef)
-> Lens
     CollectionDef
     CollectionDef
     (Maybe CollectionDef'Kind)
     (Maybe CollectionDef'Kind)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CollectionDef -> Maybe CollectionDef'Kind
_CollectionDef'kind (\ x__ :: CollectionDef
x__ y__ :: Maybe CollectionDef'Kind
y__ -> CollectionDef
x__ {_CollectionDef'kind :: Maybe CollectionDef'Kind
_CollectionDef'kind = Maybe CollectionDef'Kind
y__}))
        ((Maybe CollectionDef'Kind -> Maybe CollectionDef'AnyList)
-> (Maybe CollectionDef'Kind
    -> Maybe CollectionDef'AnyList -> Maybe CollectionDef'Kind)
-> Lens
     (Maybe CollectionDef'Kind)
     (Maybe CollectionDef'Kind)
     (Maybe CollectionDef'AnyList)
     (Maybe CollectionDef'AnyList)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ x__ :: Maybe CollectionDef'Kind
x__
              -> case Maybe CollectionDef'Kind
x__ of
                   (Prelude.Just (CollectionDef'AnyList' x__val :: CollectionDef'AnyList
x__val))
                     -> CollectionDef'AnyList -> Maybe CollectionDef'AnyList
forall a. a -> Maybe a
Prelude.Just CollectionDef'AnyList
x__val
                   _otherwise :: Maybe CollectionDef'Kind
_otherwise -> Maybe CollectionDef'AnyList
forall a. Maybe a
Prelude.Nothing)
           (\ _ y__ :: Maybe CollectionDef'AnyList
y__ -> (CollectionDef'AnyList -> CollectionDef'Kind)
-> Maybe CollectionDef'AnyList -> Maybe CollectionDef'Kind
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap CollectionDef'AnyList -> CollectionDef'Kind
CollectionDef'AnyList' Maybe CollectionDef'AnyList
y__))
instance Data.ProtoLens.Field.HasField CollectionDef "anyList" CollectionDef'AnyList where
  fieldOf :: Proxy# "anyList"
-> (CollectionDef'AnyList -> f CollectionDef'AnyList)
-> CollectionDef
-> f CollectionDef
fieldOf _
    = ((Maybe CollectionDef'Kind -> f (Maybe CollectionDef'Kind))
 -> CollectionDef -> f CollectionDef)
-> ((CollectionDef'AnyList -> f CollectionDef'AnyList)
    -> Maybe CollectionDef'Kind -> f (Maybe CollectionDef'Kind))
-> (CollectionDef'AnyList -> f CollectionDef'AnyList)
-> CollectionDef
-> f CollectionDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CollectionDef -> Maybe CollectionDef'Kind)
-> (CollectionDef -> Maybe CollectionDef'Kind -> CollectionDef)
-> Lens
     CollectionDef
     CollectionDef
     (Maybe CollectionDef'Kind)
     (Maybe CollectionDef'Kind)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CollectionDef -> Maybe CollectionDef'Kind
_CollectionDef'kind (\ x__ :: CollectionDef
x__ y__ :: Maybe CollectionDef'Kind
y__ -> CollectionDef
x__ {_CollectionDef'kind :: Maybe CollectionDef'Kind
_CollectionDef'kind = Maybe CollectionDef'Kind
y__}))
        (((Maybe CollectionDef'AnyList -> f (Maybe CollectionDef'AnyList))
 -> Maybe CollectionDef'Kind -> f (Maybe CollectionDef'Kind))
-> ((CollectionDef'AnyList -> f CollectionDef'AnyList)
    -> Maybe CollectionDef'AnyList -> f (Maybe CollectionDef'AnyList))
-> (CollectionDef'AnyList -> f CollectionDef'AnyList)
-> Maybe CollectionDef'Kind
-> f (Maybe CollectionDef'Kind)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe CollectionDef'Kind -> Maybe CollectionDef'AnyList)
-> (Maybe CollectionDef'Kind
    -> Maybe CollectionDef'AnyList -> Maybe CollectionDef'Kind)
-> Lens
     (Maybe CollectionDef'Kind)
     (Maybe CollectionDef'Kind)
     (Maybe CollectionDef'AnyList)
     (Maybe CollectionDef'AnyList)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ x__ :: Maybe CollectionDef'Kind
x__
                 -> case Maybe CollectionDef'Kind
x__ of
                      (Prelude.Just (CollectionDef'AnyList' x__val :: CollectionDef'AnyList
x__val))
                        -> CollectionDef'AnyList -> Maybe CollectionDef'AnyList
forall a. a -> Maybe a
Prelude.Just CollectionDef'AnyList
x__val
                      _otherwise :: Maybe CollectionDef'Kind
_otherwise -> Maybe CollectionDef'AnyList
forall a. Maybe a
Prelude.Nothing)
              (\ _ y__ :: Maybe CollectionDef'AnyList
y__ -> (CollectionDef'AnyList -> CollectionDef'Kind)
-> Maybe CollectionDef'AnyList -> Maybe CollectionDef'Kind
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap CollectionDef'AnyList -> CollectionDef'Kind
CollectionDef'AnyList' Maybe CollectionDef'AnyList
y__))
           (CollectionDef'AnyList
-> Lens' (Maybe CollectionDef'AnyList) CollectionDef'AnyList
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens CollectionDef'AnyList
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Message CollectionDef where
  messageName :: Proxy CollectionDef -> Text
messageName _ = String -> Text
Data.Text.pack "tensorflow.CollectionDef"
  packedMessageDescriptor :: Proxy CollectionDef -> ByteString
packedMessageDescriptor _
    = "\n\
      \\rCollectionDef\DC2A\n\
      \\tnode_list\CAN\SOH \SOH(\v2\".tensorflow.CollectionDef.NodeListH\NULR\bnodeList\DC2D\n\
      \\n\
      \bytes_list\CAN\STX \SOH(\v2#.tensorflow.CollectionDef.BytesListH\NULR\tbytesList\DC2D\n\
      \\n\
      \int64_list\CAN\ETX \SOH(\v2#.tensorflow.CollectionDef.Int64ListH\NULR\tint64List\DC2D\n\
      \\n\
      \float_list\CAN\EOT \SOH(\v2#.tensorflow.CollectionDef.FloatListH\NULR\tfloatList\DC2>\n\
      \\bany_list\CAN\ENQ \SOH(\v2!.tensorflow.CollectionDef.AnyListH\NULR\aanyList\SUB \n\
      \\bNodeList\DC2\DC4\n\
      \\ENQvalue\CAN\SOH \ETX(\tR\ENQvalue\SUB!\n\
      \\tBytesList\DC2\DC4\n\
      \\ENQvalue\CAN\SOH \ETX(\fR\ENQvalue\SUB%\n\
      \\tInt64List\DC2\CAN\n\
      \\ENQvalue\CAN\SOH \ETX(\ETXR\ENQvalueB\STX\DLE\SOH\SUB%\n\
      \\tFloatList\DC2\CAN\n\
      \\ENQvalue\CAN\SOH \ETX(\STXR\ENQvalueB\STX\DLE\SOH\SUB5\n\
      \\aAnyList\DC2*\n\
      \\ENQvalue\CAN\SOH \ETX(\v2\DC4.google.protobuf.AnyR\ENQvalueB\ACK\n\
      \\EOTkind"
  packedFileDescriptor :: Proxy CollectionDef -> ByteString
packedFileDescriptor _ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor CollectionDef)
fieldsByTag
    = let
        nodeList__field_descriptor :: FieldDescriptor CollectionDef
nodeList__field_descriptor
          = String
-> FieldTypeDescriptor CollectionDef'NodeList
-> FieldAccessor CollectionDef CollectionDef'NodeList
-> FieldDescriptor CollectionDef
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "node_list"
              (MessageOrGroup -> FieldTypeDescriptor CollectionDef'NodeList
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor CollectionDef'NodeList)
              (Lens' CollectionDef (Maybe CollectionDef'NodeList)
-> FieldAccessor CollectionDef CollectionDef'NodeList
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall s a (f :: * -> *).
(HasField s "maybe'nodeList" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'nodeList")) ::
              Data.ProtoLens.FieldDescriptor CollectionDef
        bytesList__field_descriptor :: FieldDescriptor CollectionDef
bytesList__field_descriptor
          = String
-> FieldTypeDescriptor CollectionDef'BytesList
-> FieldAccessor CollectionDef CollectionDef'BytesList
-> FieldDescriptor CollectionDef
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "bytes_list"
              (MessageOrGroup -> FieldTypeDescriptor CollectionDef'BytesList
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor CollectionDef'BytesList)
              (Lens' CollectionDef (Maybe CollectionDef'BytesList)
-> FieldAccessor CollectionDef CollectionDef'BytesList
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall s a (f :: * -> *).
(HasField s "maybe'bytesList" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'bytesList")) ::
              Data.ProtoLens.FieldDescriptor CollectionDef
        int64List__field_descriptor :: FieldDescriptor CollectionDef
int64List__field_descriptor
          = String
-> FieldTypeDescriptor CollectionDef'Int64List
-> FieldAccessor CollectionDef CollectionDef'Int64List
-> FieldDescriptor CollectionDef
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "int64_list"
              (MessageOrGroup -> FieldTypeDescriptor CollectionDef'Int64List
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor CollectionDef'Int64List)
              (Lens' CollectionDef (Maybe CollectionDef'Int64List)
-> FieldAccessor CollectionDef CollectionDef'Int64List
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall s a (f :: * -> *).
(HasField s "maybe'int64List" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'int64List")) ::
              Data.ProtoLens.FieldDescriptor CollectionDef
        floatList__field_descriptor :: FieldDescriptor CollectionDef
floatList__field_descriptor
          = String
-> FieldTypeDescriptor CollectionDef'FloatList
-> FieldAccessor CollectionDef CollectionDef'FloatList
-> FieldDescriptor CollectionDef
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "float_list"
              (MessageOrGroup -> FieldTypeDescriptor CollectionDef'FloatList
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor CollectionDef'FloatList)
              (Lens' CollectionDef (Maybe CollectionDef'FloatList)
-> FieldAccessor CollectionDef CollectionDef'FloatList
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall s a (f :: * -> *).
(HasField s "maybe'floatList" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'floatList")) ::
              Data.ProtoLens.FieldDescriptor CollectionDef
        anyList__field_descriptor :: FieldDescriptor CollectionDef
anyList__field_descriptor
          = String
-> FieldTypeDescriptor CollectionDef'AnyList
-> FieldAccessor CollectionDef CollectionDef'AnyList
-> FieldDescriptor CollectionDef
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "any_list"
              (MessageOrGroup -> FieldTypeDescriptor CollectionDef'AnyList
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor CollectionDef'AnyList)
              (Lens' CollectionDef (Maybe CollectionDef'AnyList)
-> FieldAccessor CollectionDef CollectionDef'AnyList
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall s a (f :: * -> *).
(HasField s "maybe'anyList" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'anyList")) ::
              Data.ProtoLens.FieldDescriptor CollectionDef
      in
        [(Tag, FieldDescriptor CollectionDef)]
-> Map Tag (FieldDescriptor CollectionDef)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag 1, FieldDescriptor CollectionDef
nodeList__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 2, FieldDescriptor CollectionDef
bytesList__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 3, FieldDescriptor CollectionDef
int64List__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 4, FieldDescriptor CollectionDef
floatList__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 5, FieldDescriptor CollectionDef
anyList__field_descriptor)]
  unknownFields :: LensLike' f CollectionDef FieldSet
unknownFields
    = (CollectionDef -> FieldSet)
-> (CollectionDef -> FieldSet -> CollectionDef)
-> Lens' CollectionDef FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        CollectionDef -> FieldSet
_CollectionDef'_unknownFields
        (\ x__ :: CollectionDef
x__ y__ :: FieldSet
y__ -> CollectionDef
x__ {_CollectionDef'_unknownFields :: FieldSet
_CollectionDef'_unknownFields = FieldSet
y__})
  defMessage :: CollectionDef
defMessage
    = $WCollectionDef'_constructor :: Maybe CollectionDef'Kind -> FieldSet -> CollectionDef
CollectionDef'_constructor
        {_CollectionDef'kind :: Maybe CollectionDef'Kind
_CollectionDef'kind = Maybe CollectionDef'Kind
forall a. Maybe a
Prelude.Nothing,
         _CollectionDef'_unknownFields :: FieldSet
_CollectionDef'_unknownFields = []}
  parseMessage :: Parser CollectionDef
parseMessage
    = let
        loop ::
          CollectionDef -> Data.ProtoLens.Encoding.Bytes.Parser CollectionDef
        loop :: CollectionDef -> Parser CollectionDef
loop x :: CollectionDef
x
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do (let missing :: [a]
missing = []
                       in
                         if [Any] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
                             () -> Parser ()
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
                         else
                             String -> Parser ()
forall (m :: * -> *) a. MonadFail m => String -> m a
Prelude.fail
                               (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
                                  "Missing required fields: "
                                  ([String] -> String
forall a. Show a => a -> String
Prelude.show ([String]
forall a. [a]
missing :: [Prelude.String]))))
                      CollectionDef -> Parser CollectionDef
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter CollectionDef CollectionDef FieldSet FieldSet
-> (FieldSet -> FieldSet) -> CollectionDef -> CollectionDef
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                           forall msg. Message msg => Lens' msg FieldSet
Setter CollectionDef CollectionDef FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) CollectionDef
x)
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        10
                          -> do CollectionDef'NodeList
y <- Parser CollectionDef'NodeList
-> String -> Parser CollectionDef'NodeList
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int
-> Parser CollectionDef'NodeList -> Parser CollectionDef'NodeList
forall a. Int -> Parser a -> Parser a
Data.ProtoLens.Encoding.Bytes.isolate
                                             (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len) Parser CollectionDef'NodeList
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       "node_list"
                                CollectionDef -> Parser CollectionDef
loop
                                  (Setter
  CollectionDef
  CollectionDef
  CollectionDef'NodeList
  CollectionDef'NodeList
-> CollectionDef'NodeList -> CollectionDef -> CollectionDef
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "nodeList" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nodeList") CollectionDef'NodeList
y CollectionDef
x)
                        18
                          -> do CollectionDef'BytesList
y <- Parser CollectionDef'BytesList
-> String -> Parser CollectionDef'BytesList
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int
-> Parser CollectionDef'BytesList -> Parser CollectionDef'BytesList
forall a. Int -> Parser a -> Parser a
Data.ProtoLens.Encoding.Bytes.isolate
                                             (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len) Parser CollectionDef'BytesList
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       "bytes_list"
                                CollectionDef -> Parser CollectionDef
loop
                                  (Setter
  CollectionDef
  CollectionDef
  CollectionDef'BytesList
  CollectionDef'BytesList
-> CollectionDef'BytesList -> CollectionDef -> CollectionDef
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "bytesList" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"bytesList") CollectionDef'BytesList
y CollectionDef
x)
                        26
                          -> do CollectionDef'Int64List
y <- Parser CollectionDef'Int64List
-> String -> Parser CollectionDef'Int64List
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int
-> Parser CollectionDef'Int64List -> Parser CollectionDef'Int64List
forall a. Int -> Parser a -> Parser a
Data.ProtoLens.Encoding.Bytes.isolate
                                             (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len) Parser CollectionDef'Int64List
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       "int64_list"
                                CollectionDef -> Parser CollectionDef
loop
                                  (Setter
  CollectionDef
  CollectionDef
  CollectionDef'Int64List
  CollectionDef'Int64List
-> CollectionDef'Int64List -> CollectionDef -> CollectionDef
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "int64List" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"int64List") CollectionDef'Int64List
y CollectionDef
x)
                        34
                          -> do CollectionDef'FloatList
y <- Parser CollectionDef'FloatList
-> String -> Parser CollectionDef'FloatList
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int
-> Parser CollectionDef'FloatList -> Parser CollectionDef'FloatList
forall a. Int -> Parser a -> Parser a
Data.ProtoLens.Encoding.Bytes.isolate
                                             (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len) Parser CollectionDef'FloatList
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       "float_list"
                                CollectionDef -> Parser CollectionDef
loop
                                  (Setter
  CollectionDef
  CollectionDef
  CollectionDef'FloatList
  CollectionDef'FloatList
-> CollectionDef'FloatList -> CollectionDef -> CollectionDef
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "floatList" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"floatList") CollectionDef'FloatList
y CollectionDef
x)
                        42
                          -> do CollectionDef'AnyList
y <- Parser CollectionDef'AnyList
-> String -> Parser CollectionDef'AnyList
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser CollectionDef'AnyList -> Parser CollectionDef'AnyList
forall a. Int -> Parser a -> Parser a
Data.ProtoLens.Encoding.Bytes.isolate
                                             (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len) Parser CollectionDef'AnyList
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       "any_list"
                                CollectionDef -> Parser CollectionDef
loop (Setter
  CollectionDef
  CollectionDef
  CollectionDef'AnyList
  CollectionDef'AnyList
-> CollectionDef'AnyList -> CollectionDef -> CollectionDef
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "anyList" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"anyList") CollectionDef'AnyList
y CollectionDef
x)
                        wire :: Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                CollectionDef -> Parser CollectionDef
loop
                                  (Setter CollectionDef CollectionDef FieldSet FieldSet
-> (FieldSet -> FieldSet) -> CollectionDef -> CollectionDef
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                     forall msg. Message msg => Lens' msg FieldSet
Setter CollectionDef CollectionDef FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) CollectionDef
x)
      in
        Parser CollectionDef -> String -> Parser CollectionDef
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do CollectionDef -> Parser CollectionDef
loop CollectionDef
forall msg. Message msg => msg
Data.ProtoLens.defMessage) "CollectionDef"
  buildMessage :: CollectionDef -> Builder
buildMessage
    = \ _x :: CollectionDef
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (case
                  FoldLike
  (Maybe CollectionDef'Kind)
  CollectionDef
  CollectionDef
  (Maybe CollectionDef'Kind)
  (Maybe CollectionDef'Kind)
-> CollectionDef -> Maybe CollectionDef'Kind
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "maybe'kind" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'kind") CollectionDef
_x
              of
                Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                (Prelude.Just (CollectionDef'NodeList' v :: CollectionDef'NodeList
v))
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 10)
                       ((ByteString -> Builder)
-> (CollectionDef'NodeList -> ByteString)
-> CollectionDef'NodeList
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ bs :: ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          CollectionDef'NodeList -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                          CollectionDef'NodeList
v)
                (Prelude.Just (CollectionDef'BytesList' v :: CollectionDef'BytesList
v))
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 18)
                       ((ByteString -> Builder)
-> (CollectionDef'BytesList -> ByteString)
-> CollectionDef'BytesList
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ bs :: ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          CollectionDef'BytesList -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                          CollectionDef'BytesList
v)
                (Prelude.Just (CollectionDef'Int64List' v :: CollectionDef'Int64List
v))
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 26)
                       ((ByteString -> Builder)
-> (CollectionDef'Int64List -> ByteString)
-> CollectionDef'Int64List
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ bs :: ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          CollectionDef'Int64List -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                          CollectionDef'Int64List
v)
                (Prelude.Just (CollectionDef'FloatList' v :: CollectionDef'FloatList
v))
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 34)
                       ((ByteString -> Builder)
-> (CollectionDef'FloatList -> ByteString)
-> CollectionDef'FloatList
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ bs :: ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          CollectionDef'FloatList -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                          CollectionDef'FloatList
v)
                (Prelude.Just (CollectionDef'AnyList' v :: CollectionDef'AnyList
v))
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 42)
                       ((ByteString -> Builder)
-> (CollectionDef'AnyList -> ByteString)
-> CollectionDef'AnyList
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ bs :: ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          CollectionDef'AnyList -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                          CollectionDef'AnyList
v))
             (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                (FoldLike FieldSet CollectionDef CollectionDef FieldSet FieldSet
-> CollectionDef -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet CollectionDef CollectionDef FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields CollectionDef
_x))
instance Control.DeepSeq.NFData CollectionDef where
  rnf :: CollectionDef -> ()
rnf
    = \ x__ :: CollectionDef
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (CollectionDef -> FieldSet
_CollectionDef'_unknownFields CollectionDef
x__)
             (Maybe CollectionDef'Kind -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (CollectionDef -> Maybe CollectionDef'Kind
_CollectionDef'kind CollectionDef
x__) ())
instance Control.DeepSeq.NFData CollectionDef'Kind where
  rnf :: CollectionDef'Kind -> ()
rnf (CollectionDef'NodeList' x__ :: CollectionDef'NodeList
x__) = CollectionDef'NodeList -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf CollectionDef'NodeList
x__
  rnf (CollectionDef'BytesList' x__ :: CollectionDef'BytesList
x__) = CollectionDef'BytesList -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf CollectionDef'BytesList
x__
  rnf (CollectionDef'Int64List' x__ :: CollectionDef'Int64List
x__) = CollectionDef'Int64List -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf CollectionDef'Int64List
x__
  rnf (CollectionDef'FloatList' x__ :: CollectionDef'FloatList
x__) = CollectionDef'FloatList -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf CollectionDef'FloatList
x__
  rnf (CollectionDef'AnyList' x__ :: CollectionDef'AnyList
x__) = CollectionDef'AnyList -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf CollectionDef'AnyList
x__
_CollectionDef'NodeList' ::
  Data.ProtoLens.Prism.Prism' CollectionDef'Kind CollectionDef'NodeList
_CollectionDef'NodeList' :: p CollectionDef'NodeList (f CollectionDef'NodeList)
-> p CollectionDef'Kind (f CollectionDef'Kind)
_CollectionDef'NodeList'
  = (CollectionDef'NodeList -> CollectionDef'Kind)
-> (CollectionDef'Kind -> Maybe CollectionDef'NodeList)
-> Prism
     CollectionDef'Kind
     CollectionDef'Kind
     CollectionDef'NodeList
     CollectionDef'NodeList
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      CollectionDef'NodeList -> CollectionDef'Kind
CollectionDef'NodeList'
      (\ p__ :: CollectionDef'Kind
p__
         -> case CollectionDef'Kind
p__ of
              (CollectionDef'NodeList' p__val :: CollectionDef'NodeList
p__val) -> CollectionDef'NodeList -> Maybe CollectionDef'NodeList
forall a. a -> Maybe a
Prelude.Just CollectionDef'NodeList
p__val
              _otherwise :: CollectionDef'Kind
_otherwise -> Maybe CollectionDef'NodeList
forall a. Maybe a
Prelude.Nothing)
_CollectionDef'BytesList' ::
  Data.ProtoLens.Prism.Prism' CollectionDef'Kind CollectionDef'BytesList
_CollectionDef'BytesList' :: p CollectionDef'BytesList (f CollectionDef'BytesList)
-> p CollectionDef'Kind (f CollectionDef'Kind)
_CollectionDef'BytesList'
  = (CollectionDef'BytesList -> CollectionDef'Kind)
-> (CollectionDef'Kind -> Maybe CollectionDef'BytesList)
-> Prism
     CollectionDef'Kind
     CollectionDef'Kind
     CollectionDef'BytesList
     CollectionDef'BytesList
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      CollectionDef'BytesList -> CollectionDef'Kind
CollectionDef'BytesList'
      (\ p__ :: CollectionDef'Kind
p__
         -> case CollectionDef'Kind
p__ of
              (CollectionDef'BytesList' p__val :: CollectionDef'BytesList
p__val) -> CollectionDef'BytesList -> Maybe CollectionDef'BytesList
forall a. a -> Maybe a
Prelude.Just CollectionDef'BytesList
p__val
              _otherwise :: CollectionDef'Kind
_otherwise -> Maybe CollectionDef'BytesList
forall a. Maybe a
Prelude.Nothing)
_CollectionDef'Int64List' ::
  Data.ProtoLens.Prism.Prism' CollectionDef'Kind CollectionDef'Int64List
_CollectionDef'Int64List' :: p CollectionDef'Int64List (f CollectionDef'Int64List)
-> p CollectionDef'Kind (f CollectionDef'Kind)
_CollectionDef'Int64List'
  = (CollectionDef'Int64List -> CollectionDef'Kind)
-> (CollectionDef'Kind -> Maybe CollectionDef'Int64List)
-> Prism
     CollectionDef'Kind
     CollectionDef'Kind
     CollectionDef'Int64List
     CollectionDef'Int64List
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      CollectionDef'Int64List -> CollectionDef'Kind
CollectionDef'Int64List'
      (\ p__ :: CollectionDef'Kind
p__
         -> case CollectionDef'Kind
p__ of
              (CollectionDef'Int64List' p__val :: CollectionDef'Int64List
p__val) -> CollectionDef'Int64List -> Maybe CollectionDef'Int64List
forall a. a -> Maybe a
Prelude.Just CollectionDef'Int64List
p__val
              _otherwise :: CollectionDef'Kind
_otherwise -> Maybe CollectionDef'Int64List
forall a. Maybe a
Prelude.Nothing)
_CollectionDef'FloatList' ::
  Data.ProtoLens.Prism.Prism' CollectionDef'Kind CollectionDef'FloatList
_CollectionDef'FloatList' :: p CollectionDef'FloatList (f CollectionDef'FloatList)
-> p CollectionDef'Kind (f CollectionDef'Kind)
_CollectionDef'FloatList'
  = (CollectionDef'FloatList -> CollectionDef'Kind)
-> (CollectionDef'Kind -> Maybe CollectionDef'FloatList)
-> Prism
     CollectionDef'Kind
     CollectionDef'Kind
     CollectionDef'FloatList
     CollectionDef'FloatList
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      CollectionDef'FloatList -> CollectionDef'Kind
CollectionDef'FloatList'
      (\ p__ :: CollectionDef'Kind
p__
         -> case CollectionDef'Kind
p__ of
              (CollectionDef'FloatList' p__val :: CollectionDef'FloatList
p__val) -> CollectionDef'FloatList -> Maybe CollectionDef'FloatList
forall a. a -> Maybe a
Prelude.Just CollectionDef'FloatList
p__val
              _otherwise :: CollectionDef'Kind
_otherwise -> Maybe CollectionDef'FloatList
forall a. Maybe a
Prelude.Nothing)
_CollectionDef'AnyList' ::
  Data.ProtoLens.Prism.Prism' CollectionDef'Kind CollectionDef'AnyList
_CollectionDef'AnyList' :: p CollectionDef'AnyList (f CollectionDef'AnyList)
-> p CollectionDef'Kind (f CollectionDef'Kind)
_CollectionDef'AnyList'
  = (CollectionDef'AnyList -> CollectionDef'Kind)
-> (CollectionDef'Kind -> Maybe CollectionDef'AnyList)
-> Prism
     CollectionDef'Kind
     CollectionDef'Kind
     CollectionDef'AnyList
     CollectionDef'AnyList
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      CollectionDef'AnyList -> CollectionDef'Kind
CollectionDef'AnyList'
      (\ p__ :: CollectionDef'Kind
p__
         -> case CollectionDef'Kind
p__ of
              (CollectionDef'AnyList' p__val :: CollectionDef'AnyList
p__val) -> CollectionDef'AnyList -> Maybe CollectionDef'AnyList
forall a. a -> Maybe a
Prelude.Just CollectionDef'AnyList
p__val
              _otherwise :: CollectionDef'Kind
_otherwise -> Maybe CollectionDef'AnyList
forall a. Maybe a
Prelude.Nothing)
{- | Fields :
     
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.value' @:: Lens' CollectionDef'AnyList [Proto.Google.Protobuf.Any.Any]@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.vec'value' @:: Lens' CollectionDef'AnyList (Data.Vector.Vector Proto.Google.Protobuf.Any.Any)@ -}
data CollectionDef'AnyList
  = CollectionDef'AnyList'_constructor {CollectionDef'AnyList -> Vector Any
_CollectionDef'AnyList'value :: !(Data.Vector.Vector Proto.Google.Protobuf.Any.Any),
                                        CollectionDef'AnyList -> FieldSet
_CollectionDef'AnyList'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (CollectionDef'AnyList -> CollectionDef'AnyList -> Bool
(CollectionDef'AnyList -> CollectionDef'AnyList -> Bool)
-> (CollectionDef'AnyList -> CollectionDef'AnyList -> Bool)
-> Eq CollectionDef'AnyList
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: CollectionDef'AnyList -> CollectionDef'AnyList -> Bool
$c/= :: CollectionDef'AnyList -> CollectionDef'AnyList -> Bool
== :: CollectionDef'AnyList -> CollectionDef'AnyList -> Bool
$c== :: CollectionDef'AnyList -> CollectionDef'AnyList -> Bool
Prelude.Eq, Eq CollectionDef'AnyList
Eq CollectionDef'AnyList =>
(CollectionDef'AnyList -> CollectionDef'AnyList -> Ordering)
-> (CollectionDef'AnyList -> CollectionDef'AnyList -> Bool)
-> (CollectionDef'AnyList -> CollectionDef'AnyList -> Bool)
-> (CollectionDef'AnyList -> CollectionDef'AnyList -> Bool)
-> (CollectionDef'AnyList -> CollectionDef'AnyList -> Bool)
-> (CollectionDef'AnyList
    -> CollectionDef'AnyList -> CollectionDef'AnyList)
-> (CollectionDef'AnyList
    -> CollectionDef'AnyList -> CollectionDef'AnyList)
-> Ord CollectionDef'AnyList
CollectionDef'AnyList -> CollectionDef'AnyList -> Bool
CollectionDef'AnyList -> CollectionDef'AnyList -> Ordering
CollectionDef'AnyList
-> CollectionDef'AnyList -> CollectionDef'AnyList
forall a.
Eq a =>
(a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
min :: CollectionDef'AnyList
-> CollectionDef'AnyList -> CollectionDef'AnyList
$cmin :: CollectionDef'AnyList
-> CollectionDef'AnyList -> CollectionDef'AnyList
max :: CollectionDef'AnyList
-> CollectionDef'AnyList -> CollectionDef'AnyList
$cmax :: CollectionDef'AnyList
-> CollectionDef'AnyList -> CollectionDef'AnyList
>= :: CollectionDef'AnyList -> CollectionDef'AnyList -> Bool
$c>= :: CollectionDef'AnyList -> CollectionDef'AnyList -> Bool
> :: CollectionDef'AnyList -> CollectionDef'AnyList -> Bool
$c> :: CollectionDef'AnyList -> CollectionDef'AnyList -> Bool
<= :: CollectionDef'AnyList -> CollectionDef'AnyList -> Bool
$c<= :: CollectionDef'AnyList -> CollectionDef'AnyList -> Bool
< :: CollectionDef'AnyList -> CollectionDef'AnyList -> Bool
$c< :: CollectionDef'AnyList -> CollectionDef'AnyList -> Bool
compare :: CollectionDef'AnyList -> CollectionDef'AnyList -> Ordering
$ccompare :: CollectionDef'AnyList -> CollectionDef'AnyList -> Ordering
$cp1Ord :: Eq CollectionDef'AnyList
Prelude.Ord)
instance Prelude.Show CollectionDef'AnyList where
  showsPrec :: Int -> CollectionDef'AnyList -> ShowS
showsPrec _ __x :: CollectionDef'AnyList
__x __s :: String
__s
    = Char -> ShowS
Prelude.showChar
        '{'
        (String -> ShowS
Prelude.showString
           (CollectionDef'AnyList -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort CollectionDef'AnyList
__x) (Char -> ShowS
Prelude.showChar '}' String
__s))
instance Data.ProtoLens.Field.HasField CollectionDef'AnyList "value" [Proto.Google.Protobuf.Any.Any] where
  fieldOf :: Proxy# "value"
-> ([Any] -> f [Any])
-> CollectionDef'AnyList
-> f CollectionDef'AnyList
fieldOf _
    = ((Vector Any -> f (Vector Any))
 -> CollectionDef'AnyList -> f CollectionDef'AnyList)
-> (([Any] -> f [Any]) -> Vector Any -> f (Vector Any))
-> ([Any] -> f [Any])
-> CollectionDef'AnyList
-> f CollectionDef'AnyList
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CollectionDef'AnyList -> Vector Any)
-> (CollectionDef'AnyList -> Vector Any -> CollectionDef'AnyList)
-> Lens
     CollectionDef'AnyList
     CollectionDef'AnyList
     (Vector Any)
     (Vector Any)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CollectionDef'AnyList -> Vector Any
_CollectionDef'AnyList'value
           (\ x__ :: CollectionDef'AnyList
x__ y__ :: Vector Any
y__ -> CollectionDef'AnyList
x__ {_CollectionDef'AnyList'value :: Vector Any
_CollectionDef'AnyList'value = Vector Any
y__}))
        ((Vector Any -> [Any])
-> (Vector Any -> [Any] -> Vector Any)
-> Lens (Vector Any) (Vector Any) [Any] [Any]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Any -> [Any]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ _ y__ :: [Any]
y__ -> [Any] -> Vector Any
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Any]
y__))
instance Data.ProtoLens.Field.HasField CollectionDef'AnyList "vec'value" (Data.Vector.Vector Proto.Google.Protobuf.Any.Any) where
  fieldOf :: Proxy# "vec'value"
-> (Vector Any -> f (Vector Any))
-> CollectionDef'AnyList
-> f CollectionDef'AnyList
fieldOf _
    = ((Vector Any -> f (Vector Any))
 -> CollectionDef'AnyList -> f CollectionDef'AnyList)
-> ((Vector Any -> f (Vector Any)) -> Vector Any -> f (Vector Any))
-> (Vector Any -> f (Vector Any))
-> CollectionDef'AnyList
-> f CollectionDef'AnyList
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CollectionDef'AnyList -> Vector Any)
-> (CollectionDef'AnyList -> Vector Any -> CollectionDef'AnyList)
-> Lens
     CollectionDef'AnyList
     CollectionDef'AnyList
     (Vector Any)
     (Vector Any)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CollectionDef'AnyList -> Vector Any
_CollectionDef'AnyList'value
           (\ x__ :: CollectionDef'AnyList
x__ y__ :: Vector Any
y__ -> CollectionDef'AnyList
x__ {_CollectionDef'AnyList'value :: Vector Any
_CollectionDef'AnyList'value = Vector Any
y__}))
        (Vector Any -> f (Vector Any)) -> Vector Any -> f (Vector Any)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message CollectionDef'AnyList where
  messageName :: Proxy CollectionDef'AnyList -> Text
messageName _ = String -> Text
Data.Text.pack "tensorflow.CollectionDef.AnyList"
  packedMessageDescriptor :: Proxy CollectionDef'AnyList -> ByteString
packedMessageDescriptor _
    = "\n\
      \\aAnyList\DC2*\n\
      \\ENQvalue\CAN\SOH \ETX(\v2\DC4.google.protobuf.AnyR\ENQvalue"
  packedFileDescriptor :: Proxy CollectionDef'AnyList -> ByteString
packedFileDescriptor _ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor CollectionDef'AnyList)
fieldsByTag
    = let
        value__field_descriptor :: FieldDescriptor CollectionDef'AnyList
value__field_descriptor
          = String
-> FieldTypeDescriptor Any
-> FieldAccessor CollectionDef'AnyList Any
-> FieldDescriptor CollectionDef'AnyList
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "value"
              (MessageOrGroup -> FieldTypeDescriptor Any
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Any.Any)
              (Packing
-> Lens' CollectionDef'AnyList [Any]
-> FieldAccessor CollectionDef'AnyList Any
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Unpacked (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value")) ::
              Data.ProtoLens.FieldDescriptor CollectionDef'AnyList
      in
        [(Tag, FieldDescriptor CollectionDef'AnyList)]
-> Map Tag (FieldDescriptor CollectionDef'AnyList)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList [(Int -> Tag
Data.ProtoLens.Tag 1, FieldDescriptor CollectionDef'AnyList
value__field_descriptor)]
  unknownFields :: LensLike' f CollectionDef'AnyList FieldSet
unknownFields
    = (CollectionDef'AnyList -> FieldSet)
-> (CollectionDef'AnyList -> FieldSet -> CollectionDef'AnyList)
-> Lens' CollectionDef'AnyList FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        CollectionDef'AnyList -> FieldSet
_CollectionDef'AnyList'_unknownFields
        (\ x__ :: CollectionDef'AnyList
x__ y__ :: FieldSet
y__ -> CollectionDef'AnyList
x__ {_CollectionDef'AnyList'_unknownFields :: FieldSet
_CollectionDef'AnyList'_unknownFields = FieldSet
y__})
  defMessage :: CollectionDef'AnyList
defMessage
    = $WCollectionDef'AnyList'_constructor :: Vector Any -> FieldSet -> CollectionDef'AnyList
CollectionDef'AnyList'_constructor
        {_CollectionDef'AnyList'value :: Vector Any
_CollectionDef'AnyList'value = Vector Any
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _CollectionDef'AnyList'_unknownFields :: FieldSet
_CollectionDef'AnyList'_unknownFields = []}
  parseMessage :: Parser CollectionDef'AnyList
parseMessage
    = let
        loop ::
          CollectionDef'AnyList
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Google.Protobuf.Any.Any
             -> Data.ProtoLens.Encoding.Bytes.Parser CollectionDef'AnyList
        loop :: CollectionDef'AnyList
-> Growing Vector RealWorld Any -> Parser CollectionDef'AnyList
loop x :: CollectionDef'AnyList
x mutable'value :: Growing Vector RealWorld Any
mutable'value
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do Vector Any
frozen'value <- IO (Vector Any) -> Parser (Vector Any)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                        (Growing Vector (PrimState IO) Any -> IO (Vector Any)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> m (v a)
Data.ProtoLens.Encoding.Growing.unsafeFreeze Growing Vector RealWorld Any
Growing Vector (PrimState IO) Any
mutable'value)
                      (let missing :: [a]
missing = []
                       in
                         if [Any] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
                             () -> Parser ()
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
                         else
                             String -> Parser ()
forall (m :: * -> *) a. MonadFail m => String -> m a
Prelude.fail
                               (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
                                  "Missing required fields: "
                                  ([String] -> String
forall a. Show a => a -> String
Prelude.show ([String]
forall a. [a]
missing :: [Prelude.String]))))
                      CollectionDef'AnyList -> Parser CollectionDef'AnyList
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter
  CollectionDef'AnyList CollectionDef'AnyList FieldSet FieldSet
-> (FieldSet -> FieldSet)
-> CollectionDef'AnyList
-> CollectionDef'AnyList
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                           forall msg. Message msg => Lens' msg FieldSet
Setter
  CollectionDef'AnyList CollectionDef'AnyList FieldSet FieldSet
Data.ProtoLens.unknownFields
                           (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t)
                           (Setter
  CollectionDef'AnyList
  CollectionDef'AnyList
  (Vector Any)
  (Vector Any)
-> Vector Any -> CollectionDef'AnyList -> CollectionDef'AnyList
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                              (forall s a (f :: * -> *).
(HasField s "vec'value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'value") Vector Any
frozen'value CollectionDef'AnyList
x))
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        10
                          -> do !Any
y <- Parser Any -> String -> Parser Any
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Int -> Parser Any -> Parser Any
forall a. Int -> Parser a -> Parser a
Data.ProtoLens.Encoding.Bytes.isolate
                                              (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
                                              Parser Any
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                        "value"
                                Growing Vector RealWorld Any
v <- IO (Growing Vector RealWorld Any)
-> Parser (Growing Vector RealWorld Any)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) Any
-> Any -> IO (Growing Vector (PrimState IO) Any)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> a -> m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.append Growing Vector RealWorld Any
Growing Vector (PrimState IO) Any
mutable'value Any
y)
                                CollectionDef'AnyList
-> Growing Vector RealWorld Any -> Parser CollectionDef'AnyList
loop CollectionDef'AnyList
x Growing Vector RealWorld Any
v
                        wire :: Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                CollectionDef'AnyList
-> Growing Vector RealWorld Any -> Parser CollectionDef'AnyList
loop
                                  (Setter
  CollectionDef'AnyList CollectionDef'AnyList FieldSet FieldSet
-> (FieldSet -> FieldSet)
-> CollectionDef'AnyList
-> CollectionDef'AnyList
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                     forall msg. Message msg => Lens' msg FieldSet
Setter
  CollectionDef'AnyList CollectionDef'AnyList FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) CollectionDef'AnyList
x)
                                  Growing Vector RealWorld Any
mutable'value
      in
        Parser CollectionDef'AnyList
-> String -> Parser CollectionDef'AnyList
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do Growing Vector RealWorld Any
mutable'value <- IO (Growing Vector RealWorld Any)
-> Parser (Growing Vector RealWorld Any)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                 IO (Growing Vector RealWorld Any)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              CollectionDef'AnyList
-> Growing Vector RealWorld Any -> Parser CollectionDef'AnyList
loop CollectionDef'AnyList
forall msg. Message msg => msg
Data.ProtoLens.defMessage Growing Vector RealWorld Any
mutable'value)
          "AnyList"
  buildMessage :: CollectionDef'AnyList -> Builder
buildMessage
    = \ _x :: CollectionDef'AnyList
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             ((Any -> Builder) -> Vector Any -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                (\ _v :: Any
_v
                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 10)
                        ((ByteString -> Builder) -> (Any -> ByteString) -> Any -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                           (\ bs :: ByteString
bs
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                      (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                   (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                           Any -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                           Any
_v))
                (FoldLike
  (Vector Any)
  CollectionDef'AnyList
  CollectionDef'AnyList
  (Vector Any)
  (Vector Any)
-> CollectionDef'AnyList -> Vector Any
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "vec'value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'value") CollectionDef'AnyList
_x))
             (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                (FoldLike
  FieldSet
  CollectionDef'AnyList
  CollectionDef'AnyList
  FieldSet
  FieldSet
-> CollectionDef'AnyList -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  CollectionDef'AnyList
  CollectionDef'AnyList
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields CollectionDef'AnyList
_x))
instance Control.DeepSeq.NFData CollectionDef'AnyList where
  rnf :: CollectionDef'AnyList -> ()
rnf
    = \ x__ :: CollectionDef'AnyList
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (CollectionDef'AnyList -> FieldSet
_CollectionDef'AnyList'_unknownFields CollectionDef'AnyList
x__)
             (Vector Any -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (CollectionDef'AnyList -> Vector Any
_CollectionDef'AnyList'value CollectionDef'AnyList
x__) ())
{- | Fields :
     
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.value' @:: Lens' CollectionDef'BytesList [Data.ByteString.ByteString]@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.vec'value' @:: Lens' CollectionDef'BytesList (Data.Vector.Vector Data.ByteString.ByteString)@ -}
data CollectionDef'BytesList
  = CollectionDef'BytesList'_constructor {CollectionDef'BytesList -> Vector ByteString
_CollectionDef'BytesList'value :: !(Data.Vector.Vector Data.ByteString.ByteString),
                                          CollectionDef'BytesList -> FieldSet
_CollectionDef'BytesList'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (CollectionDef'BytesList -> CollectionDef'BytesList -> Bool
(CollectionDef'BytesList -> CollectionDef'BytesList -> Bool)
-> (CollectionDef'BytesList -> CollectionDef'BytesList -> Bool)
-> Eq CollectionDef'BytesList
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: CollectionDef'BytesList -> CollectionDef'BytesList -> Bool
$c/= :: CollectionDef'BytesList -> CollectionDef'BytesList -> Bool
== :: CollectionDef'BytesList -> CollectionDef'BytesList -> Bool
$c== :: CollectionDef'BytesList -> CollectionDef'BytesList -> Bool
Prelude.Eq, Eq CollectionDef'BytesList
Eq CollectionDef'BytesList =>
(CollectionDef'BytesList -> CollectionDef'BytesList -> Ordering)
-> (CollectionDef'BytesList -> CollectionDef'BytesList -> Bool)
-> (CollectionDef'BytesList -> CollectionDef'BytesList -> Bool)
-> (CollectionDef'BytesList -> CollectionDef'BytesList -> Bool)
-> (CollectionDef'BytesList -> CollectionDef'BytesList -> Bool)
-> (CollectionDef'BytesList
    -> CollectionDef'BytesList -> CollectionDef'BytesList)
-> (CollectionDef'BytesList
    -> CollectionDef'BytesList -> CollectionDef'BytesList)
-> Ord CollectionDef'BytesList
CollectionDef'BytesList -> CollectionDef'BytesList -> Bool
CollectionDef'BytesList -> CollectionDef'BytesList -> Ordering
CollectionDef'BytesList
-> CollectionDef'BytesList -> CollectionDef'BytesList
forall a.
Eq a =>
(a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
min :: CollectionDef'BytesList
-> CollectionDef'BytesList -> CollectionDef'BytesList
$cmin :: CollectionDef'BytesList
-> CollectionDef'BytesList -> CollectionDef'BytesList
max :: CollectionDef'BytesList
-> CollectionDef'BytesList -> CollectionDef'BytesList
$cmax :: CollectionDef'BytesList
-> CollectionDef'BytesList -> CollectionDef'BytesList
>= :: CollectionDef'BytesList -> CollectionDef'BytesList -> Bool
$c>= :: CollectionDef'BytesList -> CollectionDef'BytesList -> Bool
> :: CollectionDef'BytesList -> CollectionDef'BytesList -> Bool
$c> :: CollectionDef'BytesList -> CollectionDef'BytesList -> Bool
<= :: CollectionDef'BytesList -> CollectionDef'BytesList -> Bool
$c<= :: CollectionDef'BytesList -> CollectionDef'BytesList -> Bool
< :: CollectionDef'BytesList -> CollectionDef'BytesList -> Bool
$c< :: CollectionDef'BytesList -> CollectionDef'BytesList -> Bool
compare :: CollectionDef'BytesList -> CollectionDef'BytesList -> Ordering
$ccompare :: CollectionDef'BytesList -> CollectionDef'BytesList -> Ordering
$cp1Ord :: Eq CollectionDef'BytesList
Prelude.Ord)
instance Prelude.Show CollectionDef'BytesList where
  showsPrec :: Int -> CollectionDef'BytesList -> ShowS
showsPrec _ __x :: CollectionDef'BytesList
__x __s :: String
__s
    = Char -> ShowS
Prelude.showChar
        '{'
        (String -> ShowS
Prelude.showString
           (CollectionDef'BytesList -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort CollectionDef'BytesList
__x) (Char -> ShowS
Prelude.showChar '}' String
__s))
instance Data.ProtoLens.Field.HasField CollectionDef'BytesList "value" [Data.ByteString.ByteString] where
  fieldOf :: Proxy# "value"
-> ([ByteString] -> f [ByteString])
-> CollectionDef'BytesList
-> f CollectionDef'BytesList
fieldOf _
    = ((Vector ByteString -> f (Vector ByteString))
 -> CollectionDef'BytesList -> f CollectionDef'BytesList)
-> (([ByteString] -> f [ByteString])
    -> Vector ByteString -> f (Vector ByteString))
-> ([ByteString] -> f [ByteString])
-> CollectionDef'BytesList
-> f CollectionDef'BytesList
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CollectionDef'BytesList -> Vector ByteString)
-> (CollectionDef'BytesList
    -> Vector ByteString -> CollectionDef'BytesList)
-> Lens
     CollectionDef'BytesList
     CollectionDef'BytesList
     (Vector ByteString)
     (Vector ByteString)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CollectionDef'BytesList -> Vector ByteString
_CollectionDef'BytesList'value
           (\ x__ :: CollectionDef'BytesList
x__ y__ :: Vector ByteString
y__ -> CollectionDef'BytesList
x__ {_CollectionDef'BytesList'value :: Vector ByteString
_CollectionDef'BytesList'value = Vector ByteString
y__}))
        ((Vector ByteString -> [ByteString])
-> (Vector ByteString -> [ByteString] -> Vector ByteString)
-> Lens
     (Vector ByteString) (Vector ByteString) [ByteString] [ByteString]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector ByteString -> [ByteString]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ _ y__ :: [ByteString]
y__ -> [ByteString] -> Vector ByteString
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [ByteString]
y__))
instance Data.ProtoLens.Field.HasField CollectionDef'BytesList "vec'value" (Data.Vector.Vector Data.ByteString.ByteString) where
  fieldOf :: Proxy# "vec'value"
-> (Vector ByteString -> f (Vector ByteString))
-> CollectionDef'BytesList
-> f CollectionDef'BytesList
fieldOf _
    = ((Vector ByteString -> f (Vector ByteString))
 -> CollectionDef'BytesList -> f CollectionDef'BytesList)
-> ((Vector ByteString -> f (Vector ByteString))
    -> Vector ByteString -> f (Vector ByteString))
-> (Vector ByteString -> f (Vector ByteString))
-> CollectionDef'BytesList
-> f CollectionDef'BytesList
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CollectionDef'BytesList -> Vector ByteString)
-> (CollectionDef'BytesList
    -> Vector ByteString -> CollectionDef'BytesList)
-> Lens
     CollectionDef'BytesList
     CollectionDef'BytesList
     (Vector ByteString)
     (Vector ByteString)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CollectionDef'BytesList -> Vector ByteString
_CollectionDef'BytesList'value
           (\ x__ :: CollectionDef'BytesList
x__ y__ :: Vector ByteString
y__ -> CollectionDef'BytesList
x__ {_CollectionDef'BytesList'value :: Vector ByteString
_CollectionDef'BytesList'value = Vector ByteString
y__}))
        (Vector ByteString -> f (Vector ByteString))
-> Vector ByteString -> f (Vector ByteString)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message CollectionDef'BytesList where
  messageName :: Proxy CollectionDef'BytesList -> Text
messageName _ = String -> Text
Data.Text.pack "tensorflow.CollectionDef.BytesList"
  packedMessageDescriptor :: Proxy CollectionDef'BytesList -> ByteString
packedMessageDescriptor _
    = "\n\
      \\tBytesList\DC2\DC4\n\
      \\ENQvalue\CAN\SOH \ETX(\fR\ENQvalue"
  packedFileDescriptor :: Proxy CollectionDef'BytesList -> ByteString
packedFileDescriptor _ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor CollectionDef'BytesList)
fieldsByTag
    = let
        value__field_descriptor :: FieldDescriptor CollectionDef'BytesList
value__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor CollectionDef'BytesList ByteString
-> FieldDescriptor CollectionDef'BytesList
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "value"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (Packing
-> Lens' CollectionDef'BytesList [ByteString]
-> FieldAccessor CollectionDef'BytesList ByteString
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Unpacked (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value")) ::
              Data.ProtoLens.FieldDescriptor CollectionDef'BytesList
      in
        [(Tag, FieldDescriptor CollectionDef'BytesList)]
-> Map Tag (FieldDescriptor CollectionDef'BytesList)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList [(Int -> Tag
Data.ProtoLens.Tag 1, FieldDescriptor CollectionDef'BytesList
value__field_descriptor)]
  unknownFields :: LensLike' f CollectionDef'BytesList FieldSet
unknownFields
    = (CollectionDef'BytesList -> FieldSet)
-> (CollectionDef'BytesList -> FieldSet -> CollectionDef'BytesList)
-> Lens' CollectionDef'BytesList FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        CollectionDef'BytesList -> FieldSet
_CollectionDef'BytesList'_unknownFields
        (\ x__ :: CollectionDef'BytesList
x__ y__ :: FieldSet
y__ -> CollectionDef'BytesList
x__ {_CollectionDef'BytesList'_unknownFields :: FieldSet
_CollectionDef'BytesList'_unknownFields = FieldSet
y__})
  defMessage :: CollectionDef'BytesList
defMessage
    = $WCollectionDef'BytesList'_constructor :: Vector ByteString -> FieldSet -> CollectionDef'BytesList
CollectionDef'BytesList'_constructor
        {_CollectionDef'BytesList'value :: Vector ByteString
_CollectionDef'BytesList'value = Vector ByteString
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _CollectionDef'BytesList'_unknownFields :: FieldSet
_CollectionDef'BytesList'_unknownFields = []}
  parseMessage :: Parser CollectionDef'BytesList
parseMessage
    = let
        loop ::
          CollectionDef'BytesList
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.ByteString.ByteString
             -> Data.ProtoLens.Encoding.Bytes.Parser CollectionDef'BytesList
        loop :: CollectionDef'BytesList
-> Growing Vector RealWorld ByteString
-> Parser CollectionDef'BytesList
loop x :: CollectionDef'BytesList
x mutable'value :: Growing Vector RealWorld ByteString
mutable'value
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do Vector ByteString
frozen'value <- IO (Vector ByteString) -> Parser (Vector ByteString)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                        (Growing Vector (PrimState IO) ByteString -> IO (Vector ByteString)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> m (v a)
Data.ProtoLens.Encoding.Growing.unsafeFreeze Growing Vector RealWorld ByteString
Growing Vector (PrimState IO) ByteString
mutable'value)
                      (let missing :: [a]
missing = []
                       in
                         if [Any] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
                             () -> Parser ()
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
                         else
                             String -> Parser ()
forall (m :: * -> *) a. MonadFail m => String -> m a
Prelude.fail
                               (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
                                  "Missing required fields: "
                                  ([String] -> String
forall a. Show a => a -> String
Prelude.show ([String]
forall a. [a]
missing :: [Prelude.String]))))
                      CollectionDef'BytesList -> Parser CollectionDef'BytesList
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter
  CollectionDef'BytesList CollectionDef'BytesList FieldSet FieldSet
-> (FieldSet -> FieldSet)
-> CollectionDef'BytesList
-> CollectionDef'BytesList
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                           forall msg. Message msg => Lens' msg FieldSet
Setter
  CollectionDef'BytesList CollectionDef'BytesList FieldSet FieldSet
Data.ProtoLens.unknownFields
                           (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t)
                           (Setter
  CollectionDef'BytesList
  CollectionDef'BytesList
  (Vector ByteString)
  (Vector ByteString)
-> Vector ByteString
-> CollectionDef'BytesList
-> CollectionDef'BytesList
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                              (forall s a (f :: * -> *).
(HasField s "vec'value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'value") Vector ByteString
frozen'value CollectionDef'BytesList
x))
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        10
                          -> do !ByteString
y <- Parser ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Int -> Parser ByteString
Data.ProtoLens.Encoding.Bytes.getBytes
                                              (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len))
                                        "value"
                                Growing Vector RealWorld ByteString
v <- IO (Growing Vector RealWorld ByteString)
-> Parser (Growing Vector RealWorld ByteString)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) ByteString
-> ByteString -> IO (Growing Vector (PrimState IO) ByteString)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> a -> m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.append Growing Vector RealWorld ByteString
Growing Vector (PrimState IO) ByteString
mutable'value ByteString
y)
                                CollectionDef'BytesList
-> Growing Vector RealWorld ByteString
-> Parser CollectionDef'BytesList
loop CollectionDef'BytesList
x Growing Vector RealWorld ByteString
v
                        wire :: Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                CollectionDef'BytesList
-> Growing Vector RealWorld ByteString
-> Parser CollectionDef'BytesList
loop
                                  (Setter
  CollectionDef'BytesList CollectionDef'BytesList FieldSet FieldSet
-> (FieldSet -> FieldSet)
-> CollectionDef'BytesList
-> CollectionDef'BytesList
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                     forall msg. Message msg => Lens' msg FieldSet
Setter
  CollectionDef'BytesList CollectionDef'BytesList FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) CollectionDef'BytesList
x)
                                  Growing Vector RealWorld ByteString
mutable'value
      in
        Parser CollectionDef'BytesList
-> String -> Parser CollectionDef'BytesList
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do Growing Vector RealWorld ByteString
mutable'value <- IO (Growing Vector RealWorld ByteString)
-> Parser (Growing Vector RealWorld ByteString)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                 IO (Growing Vector RealWorld ByteString)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              CollectionDef'BytesList
-> Growing Vector RealWorld ByteString
-> Parser CollectionDef'BytesList
loop CollectionDef'BytesList
forall msg. Message msg => msg
Data.ProtoLens.defMessage Growing Vector RealWorld ByteString
mutable'value)
          "BytesList"
  buildMessage :: CollectionDef'BytesList -> Builder
buildMessage
    = \ _x :: CollectionDef'BytesList
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             ((ByteString -> Builder) -> Vector ByteString -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                (\ _v :: ByteString
_v
                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 10)
                        ((\ bs :: ByteString
bs
                            -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                 (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                    (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                 (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                           ByteString
_v))
                (FoldLike
  (Vector ByteString)
  CollectionDef'BytesList
  CollectionDef'BytesList
  (Vector ByteString)
  (Vector ByteString)
-> CollectionDef'BytesList -> Vector ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "vec'value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'value") CollectionDef'BytesList
_x))
             (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                (FoldLike
  FieldSet
  CollectionDef'BytesList
  CollectionDef'BytesList
  FieldSet
  FieldSet
-> CollectionDef'BytesList -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  CollectionDef'BytesList
  CollectionDef'BytesList
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields CollectionDef'BytesList
_x))
instance Control.DeepSeq.NFData CollectionDef'BytesList where
  rnf :: CollectionDef'BytesList -> ()
rnf
    = \ x__ :: CollectionDef'BytesList
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (CollectionDef'BytesList -> FieldSet
_CollectionDef'BytesList'_unknownFields CollectionDef'BytesList
x__)
             (Vector ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (CollectionDef'BytesList -> Vector ByteString
_CollectionDef'BytesList'value CollectionDef'BytesList
x__) ())
{- | Fields :
     
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.value' @:: Lens' CollectionDef'FloatList [Prelude.Float]@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.vec'value' @:: Lens' CollectionDef'FloatList (Data.Vector.Unboxed.Vector Prelude.Float)@ -}
data CollectionDef'FloatList
  = CollectionDef'FloatList'_constructor {CollectionDef'FloatList -> Vector Float
_CollectionDef'FloatList'value :: !(Data.Vector.Unboxed.Vector Prelude.Float),
                                          CollectionDef'FloatList -> FieldSet
_CollectionDef'FloatList'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (CollectionDef'FloatList -> CollectionDef'FloatList -> Bool
(CollectionDef'FloatList -> CollectionDef'FloatList -> Bool)
-> (CollectionDef'FloatList -> CollectionDef'FloatList -> Bool)
-> Eq CollectionDef'FloatList
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: CollectionDef'FloatList -> CollectionDef'FloatList -> Bool
$c/= :: CollectionDef'FloatList -> CollectionDef'FloatList -> Bool
== :: CollectionDef'FloatList -> CollectionDef'FloatList -> Bool
$c== :: CollectionDef'FloatList -> CollectionDef'FloatList -> Bool
Prelude.Eq, Eq CollectionDef'FloatList
Eq CollectionDef'FloatList =>
(CollectionDef'FloatList -> CollectionDef'FloatList -> Ordering)
-> (CollectionDef'FloatList -> CollectionDef'FloatList -> Bool)
-> (CollectionDef'FloatList -> CollectionDef'FloatList -> Bool)
-> (CollectionDef'FloatList -> CollectionDef'FloatList -> Bool)
-> (CollectionDef'FloatList -> CollectionDef'FloatList -> Bool)
-> (CollectionDef'FloatList
    -> CollectionDef'FloatList -> CollectionDef'FloatList)
-> (CollectionDef'FloatList
    -> CollectionDef'FloatList -> CollectionDef'FloatList)
-> Ord CollectionDef'FloatList
CollectionDef'FloatList -> CollectionDef'FloatList -> Bool
CollectionDef'FloatList -> CollectionDef'FloatList -> Ordering
CollectionDef'FloatList
-> CollectionDef'FloatList -> CollectionDef'FloatList
forall a.
Eq a =>
(a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
min :: CollectionDef'FloatList
-> CollectionDef'FloatList -> CollectionDef'FloatList
$cmin :: CollectionDef'FloatList
-> CollectionDef'FloatList -> CollectionDef'FloatList
max :: CollectionDef'FloatList
-> CollectionDef'FloatList -> CollectionDef'FloatList
$cmax :: CollectionDef'FloatList
-> CollectionDef'FloatList -> CollectionDef'FloatList
>= :: CollectionDef'FloatList -> CollectionDef'FloatList -> Bool
$c>= :: CollectionDef'FloatList -> CollectionDef'FloatList -> Bool
> :: CollectionDef'FloatList -> CollectionDef'FloatList -> Bool
$c> :: CollectionDef'FloatList -> CollectionDef'FloatList -> Bool
<= :: CollectionDef'FloatList -> CollectionDef'FloatList -> Bool
$c<= :: CollectionDef'FloatList -> CollectionDef'FloatList -> Bool
< :: CollectionDef'FloatList -> CollectionDef'FloatList -> Bool
$c< :: CollectionDef'FloatList -> CollectionDef'FloatList -> Bool
compare :: CollectionDef'FloatList -> CollectionDef'FloatList -> Ordering
$ccompare :: CollectionDef'FloatList -> CollectionDef'FloatList -> Ordering
$cp1Ord :: Eq CollectionDef'FloatList
Prelude.Ord)
instance Prelude.Show CollectionDef'FloatList where
  showsPrec :: Int -> CollectionDef'FloatList -> ShowS
showsPrec _ __x :: CollectionDef'FloatList
__x __s :: String
__s
    = Char -> ShowS
Prelude.showChar
        '{'
        (String -> ShowS
Prelude.showString
           (CollectionDef'FloatList -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort CollectionDef'FloatList
__x) (Char -> ShowS
Prelude.showChar '}' String
__s))
instance Data.ProtoLens.Field.HasField CollectionDef'FloatList "value" [Prelude.Float] where
  fieldOf :: Proxy# "value"
-> ([Float] -> f [Float])
-> CollectionDef'FloatList
-> f CollectionDef'FloatList
fieldOf _
    = ((Vector Float -> f (Vector Float))
 -> CollectionDef'FloatList -> f CollectionDef'FloatList)
-> (([Float] -> f [Float]) -> Vector Float -> f (Vector Float))
-> ([Float] -> f [Float])
-> CollectionDef'FloatList
-> f CollectionDef'FloatList
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CollectionDef'FloatList -> Vector Float)
-> (CollectionDef'FloatList
    -> Vector Float -> CollectionDef'FloatList)
-> Lens
     CollectionDef'FloatList
     CollectionDef'FloatList
     (Vector Float)
     (Vector Float)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CollectionDef'FloatList -> Vector Float
_CollectionDef'FloatList'value
           (\ x__ :: CollectionDef'FloatList
x__ y__ :: Vector Float
y__ -> CollectionDef'FloatList
x__ {_CollectionDef'FloatList'value :: Vector Float
_CollectionDef'FloatList'value = Vector Float
y__}))
        ((Vector Float -> [Float])
-> (Vector Float -> [Float] -> Vector Float)
-> Lens (Vector Float) (Vector Float) [Float] [Float]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Float -> [Float]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ _ y__ :: [Float]
y__ -> [Float] -> Vector Float
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Float]
y__))
instance Data.ProtoLens.Field.HasField CollectionDef'FloatList "vec'value" (Data.Vector.Unboxed.Vector Prelude.Float) where
  fieldOf :: Proxy# "vec'value"
-> (Vector Float -> f (Vector Float))
-> CollectionDef'FloatList
-> f CollectionDef'FloatList
fieldOf _
    = ((Vector Float -> f (Vector Float))
 -> CollectionDef'FloatList -> f CollectionDef'FloatList)
-> ((Vector Float -> f (Vector Float))
    -> Vector Float -> f (Vector Float))
-> (Vector Float -> f (Vector Float))
-> CollectionDef'FloatList
-> f CollectionDef'FloatList
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CollectionDef'FloatList -> Vector Float)
-> (CollectionDef'FloatList
    -> Vector Float -> CollectionDef'FloatList)
-> Lens
     CollectionDef'FloatList
     CollectionDef'FloatList
     (Vector Float)
     (Vector Float)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CollectionDef'FloatList -> Vector Float
_CollectionDef'FloatList'value
           (\ x__ :: CollectionDef'FloatList
x__ y__ :: Vector Float
y__ -> CollectionDef'FloatList
x__ {_CollectionDef'FloatList'value :: Vector Float
_CollectionDef'FloatList'value = Vector Float
y__}))
        (Vector Float -> f (Vector Float))
-> Vector Float -> f (Vector Float)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message CollectionDef'FloatList where
  messageName :: Proxy CollectionDef'FloatList -> Text
messageName _ = String -> Text
Data.Text.pack "tensorflow.CollectionDef.FloatList"
  packedMessageDescriptor :: Proxy CollectionDef'FloatList -> ByteString
packedMessageDescriptor _
    = "\n\
      \\tFloatList\DC2\CAN\n\
      \\ENQvalue\CAN\SOH \ETX(\STXR\ENQvalueB\STX\DLE\SOH"
  packedFileDescriptor :: Proxy CollectionDef'FloatList -> ByteString
packedFileDescriptor _ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor CollectionDef'FloatList)
fieldsByTag
    = let
        value__field_descriptor :: FieldDescriptor CollectionDef'FloatList
value__field_descriptor
          = String
-> FieldTypeDescriptor Float
-> FieldAccessor CollectionDef'FloatList Float
-> FieldDescriptor CollectionDef'FloatList
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "value"
              (ScalarField Float -> FieldTypeDescriptor Float
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Float
Data.ProtoLens.FloatField ::
                 Data.ProtoLens.FieldTypeDescriptor Prelude.Float)
              (Packing
-> Lens' CollectionDef'FloatList [Float]
-> FieldAccessor CollectionDef'FloatList Float
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Packed (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value")) ::
              Data.ProtoLens.FieldDescriptor CollectionDef'FloatList
      in
        [(Tag, FieldDescriptor CollectionDef'FloatList)]
-> Map Tag (FieldDescriptor CollectionDef'FloatList)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList [(Int -> Tag
Data.ProtoLens.Tag 1, FieldDescriptor CollectionDef'FloatList
value__field_descriptor)]
  unknownFields :: LensLike' f CollectionDef'FloatList FieldSet
unknownFields
    = (CollectionDef'FloatList -> FieldSet)
-> (CollectionDef'FloatList -> FieldSet -> CollectionDef'FloatList)
-> Lens' CollectionDef'FloatList FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        CollectionDef'FloatList -> FieldSet
_CollectionDef'FloatList'_unknownFields
        (\ x__ :: CollectionDef'FloatList
x__ y__ :: FieldSet
y__ -> CollectionDef'FloatList
x__ {_CollectionDef'FloatList'_unknownFields :: FieldSet
_CollectionDef'FloatList'_unknownFields = FieldSet
y__})
  defMessage :: CollectionDef'FloatList
defMessage
    = $WCollectionDef'FloatList'_constructor :: Vector Float -> FieldSet -> CollectionDef'FloatList
CollectionDef'FloatList'_constructor
        {_CollectionDef'FloatList'value :: Vector Float
_CollectionDef'FloatList'value = Vector Float
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _CollectionDef'FloatList'_unknownFields :: FieldSet
_CollectionDef'FloatList'_unknownFields = []}
  parseMessage :: Parser CollectionDef'FloatList
parseMessage
    = let
        loop ::
          CollectionDef'FloatList
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Prelude.Float
             -> Data.ProtoLens.Encoding.Bytes.Parser CollectionDef'FloatList
        loop :: CollectionDef'FloatList
-> Growing Vector RealWorld Float -> Parser CollectionDef'FloatList
loop x :: CollectionDef'FloatList
x mutable'value :: Growing Vector RealWorld Float
mutable'value
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do Vector Float
frozen'value <- IO (Vector Float) -> Parser (Vector Float)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                        (Growing Vector (PrimState IO) Float -> IO (Vector Float)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> m (v a)
Data.ProtoLens.Encoding.Growing.unsafeFreeze Growing Vector RealWorld Float
Growing Vector (PrimState IO) Float
mutable'value)
                      (let missing :: [a]
missing = []
                       in
                         if [Any] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
                             () -> Parser ()
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
                         else
                             String -> Parser ()
forall (m :: * -> *) a. MonadFail m => String -> m a
Prelude.fail
                               (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
                                  "Missing required fields: "
                                  ([String] -> String
forall a. Show a => a -> String
Prelude.show ([String]
forall a. [a]
missing :: [Prelude.String]))))
                      CollectionDef'FloatList -> Parser CollectionDef'FloatList
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter
  CollectionDef'FloatList CollectionDef'FloatList FieldSet FieldSet
-> (FieldSet -> FieldSet)
-> CollectionDef'FloatList
-> CollectionDef'FloatList
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                           forall msg. Message msg => Lens' msg FieldSet
Setter
  CollectionDef'FloatList CollectionDef'FloatList FieldSet FieldSet
Data.ProtoLens.unknownFields
                           (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t)
                           (Setter
  CollectionDef'FloatList
  CollectionDef'FloatList
  (Vector Float)
  (Vector Float)
-> Vector Float
-> CollectionDef'FloatList
-> CollectionDef'FloatList
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                              (forall s a (f :: * -> *).
(HasField s "vec'value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'value") Vector Float
frozen'value CollectionDef'FloatList
x))
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        13
                          -> do !Float
y <- Parser Float -> String -> Parser Float
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        ((Word32 -> Float) -> Parser Word32 -> Parser Float
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                           Word32 -> Float
Data.ProtoLens.Encoding.Bytes.wordToFloat
                                           Parser Word32
Data.ProtoLens.Encoding.Bytes.getFixed32)
                                        "value"
                                Growing Vector RealWorld Float
v <- IO (Growing Vector RealWorld Float)
-> Parser (Growing Vector RealWorld Float)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) Float
-> Float -> IO (Growing Vector (PrimState IO) Float)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> a -> m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.append Growing Vector RealWorld Float
Growing Vector (PrimState IO) Float
mutable'value Float
y)
                                CollectionDef'FloatList
-> Growing Vector RealWorld Float -> Parser CollectionDef'FloatList
loop CollectionDef'FloatList
x Growing Vector RealWorld Float
v
                        10
                          -> do Growing Vector RealWorld Float
y <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                        Int
-> Parser (Growing Vector RealWorld Float)
-> Parser (Growing Vector RealWorld Float)
forall a. Int -> Parser a -> Parser a
Data.ProtoLens.Encoding.Bytes.isolate
                                          (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
                                          ((let
                                              ploop :: Growing v RealWorld Float -> Parser (Growing v RealWorld Float)
ploop qs :: Growing v RealWorld Float
qs
                                                = do Bool
packedEnd <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
                                                     if Bool
packedEnd then
                                                         Growing v RealWorld Float -> Parser (Growing v RealWorld Float)
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return Growing v RealWorld Float
qs
                                                     else
                                                         do !Float
q <- Parser Float -> String -> Parser Float
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                                                    ((Word32 -> Float) -> Parser Word32 -> Parser Float
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                                                       Word32 -> Float
Data.ProtoLens.Encoding.Bytes.wordToFloat
                                                                       Parser Word32
Data.ProtoLens.Encoding.Bytes.getFixed32)
                                                                    "value"
                                                            Growing v RealWorld Float
qs' <- IO (Growing v RealWorld Float)
-> Parser (Growing v RealWorld Float)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                                     (Growing v (PrimState IO) Float
-> Float -> IO (Growing v (PrimState IO) Float)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> a -> m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.append
                                                                        Growing v RealWorld Float
Growing v (PrimState IO) Float
qs Float
q)
                                                            Growing v RealWorld Float -> Parser (Growing v RealWorld Float)
ploop Growing v RealWorld Float
qs'
                                            in forall (v :: * -> *).
Vector v Float =>
Growing v RealWorld Float -> Parser (Growing v RealWorld Float)
ploop)
                                             Growing Vector RealWorld Float
mutable'value)
                                CollectionDef'FloatList
-> Growing Vector RealWorld Float -> Parser CollectionDef'FloatList
loop CollectionDef'FloatList
x Growing Vector RealWorld Float
y
                        wire :: Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                CollectionDef'FloatList
-> Growing Vector RealWorld Float -> Parser CollectionDef'FloatList
loop
                                  (Setter
  CollectionDef'FloatList CollectionDef'FloatList FieldSet FieldSet
-> (FieldSet -> FieldSet)
-> CollectionDef'FloatList
-> CollectionDef'FloatList
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                     forall msg. Message msg => Lens' msg FieldSet
Setter
  CollectionDef'FloatList CollectionDef'FloatList FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) CollectionDef'FloatList
x)
                                  Growing Vector RealWorld Float
mutable'value
      in
        Parser CollectionDef'FloatList
-> String -> Parser CollectionDef'FloatList
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do Growing Vector RealWorld Float
mutable'value <- IO (Growing Vector RealWorld Float)
-> Parser (Growing Vector RealWorld Float)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                 IO (Growing Vector RealWorld Float)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              CollectionDef'FloatList
-> Growing Vector RealWorld Float -> Parser CollectionDef'FloatList
loop CollectionDef'FloatList
forall msg. Message msg => msg
Data.ProtoLens.defMessage Growing Vector RealWorld Float
mutable'value)
          "FloatList"
  buildMessage :: CollectionDef'FloatList -> Builder
buildMessage
    = \ _x :: CollectionDef'FloatList
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                p :: Vector Float
p = FoldLike
  (Vector Float)
  CollectionDef'FloatList
  CollectionDef'FloatList
  (Vector Float)
  (Vector Float)
-> CollectionDef'FloatList -> Vector Float
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "vec'value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'value") CollectionDef'FloatList
_x
              in
                if Vector Float -> Bool
forall (v :: * -> *) a. Vector v a => v a -> Bool
Data.Vector.Generic.null Vector Float
p then
                    Builder
forall a. Monoid a => a
Data.Monoid.mempty
                else
                    Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 10)
                      ((\ bs :: ByteString
bs
                          -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                  (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                               (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                         (Builder -> ByteString
Data.ProtoLens.Encoding.Bytes.runBuilder
                            ((Float -> Builder) -> Vector Float -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                               ((Word32 -> Builder) -> (Float -> Word32) -> Float -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                  Word32 -> Builder
Data.ProtoLens.Encoding.Bytes.putFixed32
                                  Float -> Word32
Data.ProtoLens.Encoding.Bytes.floatToWord)
                               Vector Float
p))))
             (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                (FoldLike
  FieldSet
  CollectionDef'FloatList
  CollectionDef'FloatList
  FieldSet
  FieldSet
-> CollectionDef'FloatList -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  CollectionDef'FloatList
  CollectionDef'FloatList
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields CollectionDef'FloatList
_x))
instance Control.DeepSeq.NFData CollectionDef'FloatList where
  rnf :: CollectionDef'FloatList -> ()
rnf
    = \ x__ :: CollectionDef'FloatList
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (CollectionDef'FloatList -> FieldSet
_CollectionDef'FloatList'_unknownFields CollectionDef'FloatList
x__)
             (Vector Float -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (CollectionDef'FloatList -> Vector Float
_CollectionDef'FloatList'value CollectionDef'FloatList
x__) ())
{- | Fields :
     
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.value' @:: Lens' CollectionDef'Int64List [Data.Int.Int64]@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.vec'value' @:: Lens' CollectionDef'Int64List (Data.Vector.Unboxed.Vector Data.Int.Int64)@ -}
data CollectionDef'Int64List
  = CollectionDef'Int64List'_constructor {CollectionDef'Int64List -> Vector Int64
_CollectionDef'Int64List'value :: !(Data.Vector.Unboxed.Vector Data.Int.Int64),
                                          CollectionDef'Int64List -> FieldSet
_CollectionDef'Int64List'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (CollectionDef'Int64List -> CollectionDef'Int64List -> Bool
(CollectionDef'Int64List -> CollectionDef'Int64List -> Bool)
-> (CollectionDef'Int64List -> CollectionDef'Int64List -> Bool)
-> Eq CollectionDef'Int64List
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: CollectionDef'Int64List -> CollectionDef'Int64List -> Bool
$c/= :: CollectionDef'Int64List -> CollectionDef'Int64List -> Bool
== :: CollectionDef'Int64List -> CollectionDef'Int64List -> Bool
$c== :: CollectionDef'Int64List -> CollectionDef'Int64List -> Bool
Prelude.Eq, Eq CollectionDef'Int64List
Eq CollectionDef'Int64List =>
(CollectionDef'Int64List -> CollectionDef'Int64List -> Ordering)
-> (CollectionDef'Int64List -> CollectionDef'Int64List -> Bool)
-> (CollectionDef'Int64List -> CollectionDef'Int64List -> Bool)
-> (CollectionDef'Int64List -> CollectionDef'Int64List -> Bool)
-> (CollectionDef'Int64List -> CollectionDef'Int64List -> Bool)
-> (CollectionDef'Int64List
    -> CollectionDef'Int64List -> CollectionDef'Int64List)
-> (CollectionDef'Int64List
    -> CollectionDef'Int64List -> CollectionDef'Int64List)
-> Ord CollectionDef'Int64List
CollectionDef'Int64List -> CollectionDef'Int64List -> Bool
CollectionDef'Int64List -> CollectionDef'Int64List -> Ordering
CollectionDef'Int64List
-> CollectionDef'Int64List -> CollectionDef'Int64List
forall a.
Eq a =>
(a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
min :: CollectionDef'Int64List
-> CollectionDef'Int64List -> CollectionDef'Int64List
$cmin :: CollectionDef'Int64List
-> CollectionDef'Int64List -> CollectionDef'Int64List
max :: CollectionDef'Int64List
-> CollectionDef'Int64List -> CollectionDef'Int64List
$cmax :: CollectionDef'Int64List
-> CollectionDef'Int64List -> CollectionDef'Int64List
>= :: CollectionDef'Int64List -> CollectionDef'Int64List -> Bool
$c>= :: CollectionDef'Int64List -> CollectionDef'Int64List -> Bool
> :: CollectionDef'Int64List -> CollectionDef'Int64List -> Bool
$c> :: CollectionDef'Int64List -> CollectionDef'Int64List -> Bool
<= :: CollectionDef'Int64List -> CollectionDef'Int64List -> Bool
$c<= :: CollectionDef'Int64List -> CollectionDef'Int64List -> Bool
< :: CollectionDef'Int64List -> CollectionDef'Int64List -> Bool
$c< :: CollectionDef'Int64List -> CollectionDef'Int64List -> Bool
compare :: CollectionDef'Int64List -> CollectionDef'Int64List -> Ordering
$ccompare :: CollectionDef'Int64List -> CollectionDef'Int64List -> Ordering
$cp1Ord :: Eq CollectionDef'Int64List
Prelude.Ord)
instance Prelude.Show CollectionDef'Int64List where
  showsPrec :: Int -> CollectionDef'Int64List -> ShowS
showsPrec _ __x :: CollectionDef'Int64List
__x __s :: String
__s
    = Char -> ShowS
Prelude.showChar
        '{'
        (String -> ShowS
Prelude.showString
           (CollectionDef'Int64List -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort CollectionDef'Int64List
__x) (Char -> ShowS
Prelude.showChar '}' String
__s))
instance Data.ProtoLens.Field.HasField CollectionDef'Int64List "value" [Data.Int.Int64] where
  fieldOf :: Proxy# "value"
-> ([Int64] -> f [Int64])
-> CollectionDef'Int64List
-> f CollectionDef'Int64List
fieldOf _
    = ((Vector Int64 -> f (Vector Int64))
 -> CollectionDef'Int64List -> f CollectionDef'Int64List)
-> (([Int64] -> f [Int64]) -> Vector Int64 -> f (Vector Int64))
-> ([Int64] -> f [Int64])
-> CollectionDef'Int64List
-> f CollectionDef'Int64List
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CollectionDef'Int64List -> Vector Int64)
-> (CollectionDef'Int64List
    -> Vector Int64 -> CollectionDef'Int64List)
-> Lens
     CollectionDef'Int64List
     CollectionDef'Int64List
     (Vector Int64)
     (Vector Int64)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CollectionDef'Int64List -> Vector Int64
_CollectionDef'Int64List'value
           (\ x__ :: CollectionDef'Int64List
x__ y__ :: Vector Int64
y__ -> CollectionDef'Int64List
x__ {_CollectionDef'Int64List'value :: Vector Int64
_CollectionDef'Int64List'value = Vector Int64
y__}))
        ((Vector Int64 -> [Int64])
-> (Vector Int64 -> [Int64] -> Vector Int64)
-> Lens (Vector Int64) (Vector Int64) [Int64] [Int64]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Int64 -> [Int64]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ _ y__ :: [Int64]
y__ -> [Int64] -> Vector Int64
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Int64]
y__))
instance Data.ProtoLens.Field.HasField CollectionDef'Int64List "vec'value" (Data.Vector.Unboxed.Vector Data.Int.Int64) where
  fieldOf :: Proxy# "vec'value"
-> (Vector Int64 -> f (Vector Int64))
-> CollectionDef'Int64List
-> f CollectionDef'Int64List
fieldOf _
    = ((Vector Int64 -> f (Vector Int64))
 -> CollectionDef'Int64List -> f CollectionDef'Int64List)
-> ((Vector Int64 -> f (Vector Int64))
    -> Vector Int64 -> f (Vector Int64))
-> (Vector Int64 -> f (Vector Int64))
-> CollectionDef'Int64List
-> f CollectionDef'Int64List
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CollectionDef'Int64List -> Vector Int64)
-> (CollectionDef'Int64List
    -> Vector Int64 -> CollectionDef'Int64List)
-> Lens
     CollectionDef'Int64List
     CollectionDef'Int64List
     (Vector Int64)
     (Vector Int64)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CollectionDef'Int64List -> Vector Int64
_CollectionDef'Int64List'value
           (\ x__ :: CollectionDef'Int64List
x__ y__ :: Vector Int64
y__ -> CollectionDef'Int64List
x__ {_CollectionDef'Int64List'value :: Vector Int64
_CollectionDef'Int64List'value = Vector Int64
y__}))
        (Vector Int64 -> f (Vector Int64))
-> Vector Int64 -> f (Vector Int64)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message CollectionDef'Int64List where
  messageName :: Proxy CollectionDef'Int64List -> Text
messageName _ = String -> Text
Data.Text.pack "tensorflow.CollectionDef.Int64List"
  packedMessageDescriptor :: Proxy CollectionDef'Int64List -> ByteString
packedMessageDescriptor _
    = "\n\
      \\tInt64List\DC2\CAN\n\
      \\ENQvalue\CAN\SOH \ETX(\ETXR\ENQvalueB\STX\DLE\SOH"
  packedFileDescriptor :: Proxy CollectionDef'Int64List -> ByteString
packedFileDescriptor _ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor CollectionDef'Int64List)
fieldsByTag
    = let
        value__field_descriptor :: FieldDescriptor CollectionDef'Int64List
value__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor CollectionDef'Int64List Int64
-> FieldDescriptor CollectionDef'Int64List
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "value"
              (ScalarField Int64 -> FieldTypeDescriptor Int64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int64
Data.ProtoLens.Int64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64)
              (Packing
-> Lens' CollectionDef'Int64List [Int64]
-> FieldAccessor CollectionDef'Int64List Int64
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Packed (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value")) ::
              Data.ProtoLens.FieldDescriptor CollectionDef'Int64List
      in
        [(Tag, FieldDescriptor CollectionDef'Int64List)]
-> Map Tag (FieldDescriptor CollectionDef'Int64List)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList [(Int -> Tag
Data.ProtoLens.Tag 1, FieldDescriptor CollectionDef'Int64List
value__field_descriptor)]
  unknownFields :: LensLike' f CollectionDef'Int64List FieldSet
unknownFields
    = (CollectionDef'Int64List -> FieldSet)
-> (CollectionDef'Int64List -> FieldSet -> CollectionDef'Int64List)
-> Lens' CollectionDef'Int64List FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        CollectionDef'Int64List -> FieldSet
_CollectionDef'Int64List'_unknownFields
        (\ x__ :: CollectionDef'Int64List
x__ y__ :: FieldSet
y__ -> CollectionDef'Int64List
x__ {_CollectionDef'Int64List'_unknownFields :: FieldSet
_CollectionDef'Int64List'_unknownFields = FieldSet
y__})
  defMessage :: CollectionDef'Int64List
defMessage
    = $WCollectionDef'Int64List'_constructor :: Vector Int64 -> FieldSet -> CollectionDef'Int64List
CollectionDef'Int64List'_constructor
        {_CollectionDef'Int64List'value :: Vector Int64
_CollectionDef'Int64List'value = Vector Int64
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _CollectionDef'Int64List'_unknownFields :: FieldSet
_CollectionDef'Int64List'_unknownFields = []}
  parseMessage :: Parser CollectionDef'Int64List
parseMessage
    = let
        loop ::
          CollectionDef'Int64List
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Int.Int64
             -> Data.ProtoLens.Encoding.Bytes.Parser CollectionDef'Int64List
        loop :: CollectionDef'Int64List
-> Growing Vector RealWorld Int64 -> Parser CollectionDef'Int64List
loop x :: CollectionDef'Int64List
x mutable'value :: Growing Vector RealWorld Int64
mutable'value
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do Vector Int64
frozen'value <- IO (Vector Int64) -> Parser (Vector Int64)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                        (Growing Vector (PrimState IO) Int64 -> IO (Vector Int64)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> m (v a)
Data.ProtoLens.Encoding.Growing.unsafeFreeze Growing Vector RealWorld Int64
Growing Vector (PrimState IO) Int64
mutable'value)
                      (let missing :: [a]
missing = []
                       in
                         if [Any] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
                             () -> Parser ()
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
                         else
                             String -> Parser ()
forall (m :: * -> *) a. MonadFail m => String -> m a
Prelude.fail
                               (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
                                  "Missing required fields: "
                                  ([String] -> String
forall a. Show a => a -> String
Prelude.show ([String]
forall a. [a]
missing :: [Prelude.String]))))
                      CollectionDef'Int64List -> Parser CollectionDef'Int64List
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter
  CollectionDef'Int64List CollectionDef'Int64List FieldSet FieldSet
-> (FieldSet -> FieldSet)
-> CollectionDef'Int64List
-> CollectionDef'Int64List
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                           forall msg. Message msg => Lens' msg FieldSet
Setter
  CollectionDef'Int64List CollectionDef'Int64List FieldSet FieldSet
Data.ProtoLens.unknownFields
                           (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t)
                           (Setter
  CollectionDef'Int64List
  CollectionDef'Int64List
  (Vector Int64)
  (Vector Int64)
-> Vector Int64
-> CollectionDef'Int64List
-> CollectionDef'Int64List
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                              (forall s a (f :: * -> *).
(HasField s "vec'value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'value") Vector Int64
frozen'value CollectionDef'Int64List
x))
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        8 -> do !Int64
y <- Parser Int64 -> String -> Parser Int64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        ((Word64 -> Int64) -> Parser Word64 -> Parser Int64
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                           Word64 -> Int64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                           Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                        "value"
                                Growing Vector RealWorld Int64
v <- IO (Growing Vector RealWorld Int64)
-> Parser (Growing Vector RealWorld Int64)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) Int64
-> Int64 -> IO (Growing Vector (PrimState IO) Int64)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> a -> m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.append Growing Vector RealWorld Int64
Growing Vector (PrimState IO) Int64
mutable'value Int64
y)
                                CollectionDef'Int64List
-> Growing Vector RealWorld Int64 -> Parser CollectionDef'Int64List
loop CollectionDef'Int64List
x Growing Vector RealWorld Int64
v
                        10
                          -> do Growing Vector RealWorld Int64
y <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                        Int
-> Parser (Growing Vector RealWorld Int64)
-> Parser (Growing Vector RealWorld Int64)
forall a. Int -> Parser a -> Parser a
Data.ProtoLens.Encoding.Bytes.isolate
                                          (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
                                          ((let
                                              ploop :: Growing v RealWorld a -> Parser (Growing v RealWorld a)
ploop qs :: Growing v RealWorld a
qs
                                                = do Bool
packedEnd <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
                                                     if Bool
packedEnd then
                                                         Growing v RealWorld a -> Parser (Growing v RealWorld a)
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return Growing v RealWorld a
qs
                                                     else
                                                         do !a
q <- Parser a -> String -> Parser a
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                                                    ((Word64 -> a) -> Parser Word64 -> Parser a
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                                                       Word64 -> a
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                       Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                                                    "value"
                                                            Growing v RealWorld a
qs' <- IO (Growing v RealWorld a) -> Parser (Growing v RealWorld a)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                                     (Growing v (PrimState IO) a -> a -> IO (Growing v (PrimState IO) a)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> a -> m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.append
                                                                        Growing v RealWorld a
Growing v (PrimState IO) a
qs a
q)
                                                            Growing v RealWorld a -> Parser (Growing v RealWorld a)
ploop Growing v RealWorld a
qs'
                                            in forall a (v :: * -> *).
(Num a, Vector v a) =>
Growing v RealWorld a -> Parser (Growing v RealWorld a)
ploop)
                                             Growing Vector RealWorld Int64
mutable'value)
                                CollectionDef'Int64List
-> Growing Vector RealWorld Int64 -> Parser CollectionDef'Int64List
loop CollectionDef'Int64List
x Growing Vector RealWorld Int64
y
                        wire :: Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                CollectionDef'Int64List
-> Growing Vector RealWorld Int64 -> Parser CollectionDef'Int64List
loop
                                  (Setter
  CollectionDef'Int64List CollectionDef'Int64List FieldSet FieldSet
-> (FieldSet -> FieldSet)
-> CollectionDef'Int64List
-> CollectionDef'Int64List
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                     forall msg. Message msg => Lens' msg FieldSet
Setter
  CollectionDef'Int64List CollectionDef'Int64List FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) CollectionDef'Int64List
x)
                                  Growing Vector RealWorld Int64
mutable'value
      in
        Parser CollectionDef'Int64List
-> String -> Parser CollectionDef'Int64List
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do Growing Vector RealWorld Int64
mutable'value <- IO (Growing Vector RealWorld Int64)
-> Parser (Growing Vector RealWorld Int64)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                 IO (Growing Vector RealWorld Int64)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              CollectionDef'Int64List
-> Growing Vector RealWorld Int64 -> Parser CollectionDef'Int64List
loop CollectionDef'Int64List
forall msg. Message msg => msg
Data.ProtoLens.defMessage Growing Vector RealWorld Int64
mutable'value)
          "Int64List"
  buildMessage :: CollectionDef'Int64List -> Builder
buildMessage
    = \ _x :: CollectionDef'Int64List
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                p :: Vector Int64
p = FoldLike
  (Vector Int64)
  CollectionDef'Int64List
  CollectionDef'Int64List
  (Vector Int64)
  (Vector Int64)
-> CollectionDef'Int64List -> Vector Int64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "vec'value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'value") CollectionDef'Int64List
_x
              in
                if Vector Int64 -> Bool
forall (v :: * -> *) a. Vector v a => v a -> Bool
Data.Vector.Generic.null Vector Int64
p then
                    Builder
forall a. Monoid a => a
Data.Monoid.mempty
                else
                    Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 10)
                      ((\ bs :: ByteString
bs
                          -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                  (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                               (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                         (Builder -> ByteString
Data.ProtoLens.Encoding.Bytes.runBuilder
                            ((Int64 -> Builder) -> Vector Int64 -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                               ((Word64 -> Builder) -> (Int64 -> Word64) -> Int64 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                  Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int64 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral)
                               Vector Int64
p))))
             (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                (FoldLike
  FieldSet
  CollectionDef'Int64List
  CollectionDef'Int64List
  FieldSet
  FieldSet
-> CollectionDef'Int64List -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  CollectionDef'Int64List
  CollectionDef'Int64List
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields CollectionDef'Int64List
_x))
instance Control.DeepSeq.NFData CollectionDef'Int64List where
  rnf :: CollectionDef'Int64List -> ()
rnf
    = \ x__ :: CollectionDef'Int64List
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (CollectionDef'Int64List -> FieldSet
_CollectionDef'Int64List'_unknownFields CollectionDef'Int64List
x__)
             (Vector Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (CollectionDef'Int64List -> Vector Int64
_CollectionDef'Int64List'value CollectionDef'Int64List
x__) ())
{- | Fields :
     
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.value' @:: Lens' CollectionDef'NodeList [Data.Text.Text]@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.vec'value' @:: Lens' CollectionDef'NodeList (Data.Vector.Vector Data.Text.Text)@ -}
data CollectionDef'NodeList
  = CollectionDef'NodeList'_constructor {CollectionDef'NodeList -> Vector Text
_CollectionDef'NodeList'value :: !(Data.Vector.Vector Data.Text.Text),
                                         CollectionDef'NodeList -> FieldSet
_CollectionDef'NodeList'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (CollectionDef'NodeList -> CollectionDef'NodeList -> Bool
(CollectionDef'NodeList -> CollectionDef'NodeList -> Bool)
-> (CollectionDef'NodeList -> CollectionDef'NodeList -> Bool)
-> Eq CollectionDef'NodeList
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: CollectionDef'NodeList -> CollectionDef'NodeList -> Bool
$c/= :: CollectionDef'NodeList -> CollectionDef'NodeList -> Bool
== :: CollectionDef'NodeList -> CollectionDef'NodeList -> Bool
$c== :: CollectionDef'NodeList -> CollectionDef'NodeList -> Bool
Prelude.Eq, Eq CollectionDef'NodeList
Eq CollectionDef'NodeList =>
(CollectionDef'NodeList -> CollectionDef'NodeList -> Ordering)
-> (CollectionDef'NodeList -> CollectionDef'NodeList -> Bool)
-> (CollectionDef'NodeList -> CollectionDef'NodeList -> Bool)
-> (CollectionDef'NodeList -> CollectionDef'NodeList -> Bool)
-> (CollectionDef'NodeList -> CollectionDef'NodeList -> Bool)
-> (CollectionDef'NodeList
    -> CollectionDef'NodeList -> CollectionDef'NodeList)
-> (CollectionDef'NodeList
    -> CollectionDef'NodeList -> CollectionDef'NodeList)
-> Ord CollectionDef'NodeList
CollectionDef'NodeList -> CollectionDef'NodeList -> Bool
CollectionDef'NodeList -> CollectionDef'NodeList -> Ordering
CollectionDef'NodeList
-> CollectionDef'NodeList -> CollectionDef'NodeList
forall a.
Eq a =>
(a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
min :: CollectionDef'NodeList
-> CollectionDef'NodeList -> CollectionDef'NodeList
$cmin :: CollectionDef'NodeList
-> CollectionDef'NodeList -> CollectionDef'NodeList
max :: CollectionDef'NodeList
-> CollectionDef'NodeList -> CollectionDef'NodeList
$cmax :: CollectionDef'NodeList
-> CollectionDef'NodeList -> CollectionDef'NodeList
>= :: CollectionDef'NodeList -> CollectionDef'NodeList -> Bool
$c>= :: CollectionDef'NodeList -> CollectionDef'NodeList -> Bool
> :: CollectionDef'NodeList -> CollectionDef'NodeList -> Bool
$c> :: CollectionDef'NodeList -> CollectionDef'NodeList -> Bool
<= :: CollectionDef'NodeList -> CollectionDef'NodeList -> Bool
$c<= :: CollectionDef'NodeList -> CollectionDef'NodeList -> Bool
< :: CollectionDef'NodeList -> CollectionDef'NodeList -> Bool
$c< :: CollectionDef'NodeList -> CollectionDef'NodeList -> Bool
compare :: CollectionDef'NodeList -> CollectionDef'NodeList -> Ordering
$ccompare :: CollectionDef'NodeList -> CollectionDef'NodeList -> Ordering
$cp1Ord :: Eq CollectionDef'NodeList
Prelude.Ord)
instance Prelude.Show CollectionDef'NodeList where
  showsPrec :: Int -> CollectionDef'NodeList -> ShowS
showsPrec _ __x :: CollectionDef'NodeList
__x __s :: String
__s
    = Char -> ShowS
Prelude.showChar
        '{'
        (String -> ShowS
Prelude.showString
           (CollectionDef'NodeList -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort CollectionDef'NodeList
__x) (Char -> ShowS
Prelude.showChar '}' String
__s))
instance Data.ProtoLens.Field.HasField CollectionDef'NodeList "value" [Data.Text.Text] where
  fieldOf :: Proxy# "value"
-> ([Text] -> f [Text])
-> CollectionDef'NodeList
-> f CollectionDef'NodeList
fieldOf _
    = ((Vector Text -> f (Vector Text))
 -> CollectionDef'NodeList -> f CollectionDef'NodeList)
-> (([Text] -> f [Text]) -> Vector Text -> f (Vector Text))
-> ([Text] -> f [Text])
-> CollectionDef'NodeList
-> f CollectionDef'NodeList
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CollectionDef'NodeList -> Vector Text)
-> (CollectionDef'NodeList
    -> Vector Text -> CollectionDef'NodeList)
-> Lens
     CollectionDef'NodeList
     CollectionDef'NodeList
     (Vector Text)
     (Vector Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CollectionDef'NodeList -> Vector Text
_CollectionDef'NodeList'value
           (\ x__ :: CollectionDef'NodeList
x__ y__ :: Vector Text
y__ -> CollectionDef'NodeList
x__ {_CollectionDef'NodeList'value :: Vector Text
_CollectionDef'NodeList'value = Vector Text
y__}))
        ((Vector Text -> [Text])
-> (Vector Text -> [Text] -> Vector Text)
-> Lens (Vector Text) (Vector Text) [Text] [Text]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Text -> [Text]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ _ y__ :: [Text]
y__ -> [Text] -> Vector Text
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Text]
y__))
instance Data.ProtoLens.Field.HasField CollectionDef'NodeList "vec'value" (Data.Vector.Vector Data.Text.Text) where
  fieldOf :: Proxy# "vec'value"
-> (Vector Text -> f (Vector Text))
-> CollectionDef'NodeList
-> f CollectionDef'NodeList
fieldOf _
    = ((Vector Text -> f (Vector Text))
 -> CollectionDef'NodeList -> f CollectionDef'NodeList)
-> ((Vector Text -> f (Vector Text))
    -> Vector Text -> f (Vector Text))
-> (Vector Text -> f (Vector Text))
-> CollectionDef'NodeList
-> f CollectionDef'NodeList
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CollectionDef'NodeList -> Vector Text)
-> (CollectionDef'NodeList
    -> Vector Text -> CollectionDef'NodeList)
-> Lens
     CollectionDef'NodeList
     CollectionDef'NodeList
     (Vector Text)
     (Vector Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CollectionDef'NodeList -> Vector Text
_CollectionDef'NodeList'value
           (\ x__ :: CollectionDef'NodeList
x__ y__ :: Vector Text
y__ -> CollectionDef'NodeList
x__ {_CollectionDef'NodeList'value :: Vector Text
_CollectionDef'NodeList'value = Vector Text
y__}))
        (Vector Text -> f (Vector Text)) -> Vector Text -> f (Vector Text)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message CollectionDef'NodeList where
  messageName :: Proxy CollectionDef'NodeList -> Text
messageName _ = String -> Text
Data.Text.pack "tensorflow.CollectionDef.NodeList"
  packedMessageDescriptor :: Proxy CollectionDef'NodeList -> ByteString
packedMessageDescriptor _
    = "\n\
      \\bNodeList\DC2\DC4\n\
      \\ENQvalue\CAN\SOH \ETX(\tR\ENQvalue"
  packedFileDescriptor :: Proxy CollectionDef'NodeList -> ByteString
packedFileDescriptor _ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor CollectionDef'NodeList)
fieldsByTag
    = let
        value__field_descriptor :: FieldDescriptor CollectionDef'NodeList
value__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor CollectionDef'NodeList Text
-> FieldDescriptor CollectionDef'NodeList
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "value"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (Packing
-> Lens' CollectionDef'NodeList [Text]
-> FieldAccessor CollectionDef'NodeList Text
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Unpacked (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value")) ::
              Data.ProtoLens.FieldDescriptor CollectionDef'NodeList
      in
        [(Tag, FieldDescriptor CollectionDef'NodeList)]
-> Map Tag (FieldDescriptor CollectionDef'NodeList)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList [(Int -> Tag
Data.ProtoLens.Tag 1, FieldDescriptor CollectionDef'NodeList
value__field_descriptor)]
  unknownFields :: LensLike' f CollectionDef'NodeList FieldSet
unknownFields
    = (CollectionDef'NodeList -> FieldSet)
-> (CollectionDef'NodeList -> FieldSet -> CollectionDef'NodeList)
-> Lens' CollectionDef'NodeList FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        CollectionDef'NodeList -> FieldSet
_CollectionDef'NodeList'_unknownFields
        (\ x__ :: CollectionDef'NodeList
x__ y__ :: FieldSet
y__ -> CollectionDef'NodeList
x__ {_CollectionDef'NodeList'_unknownFields :: FieldSet
_CollectionDef'NodeList'_unknownFields = FieldSet
y__})
  defMessage :: CollectionDef'NodeList
defMessage
    = $WCollectionDef'NodeList'_constructor :: Vector Text -> FieldSet -> CollectionDef'NodeList
CollectionDef'NodeList'_constructor
        {_CollectionDef'NodeList'value :: Vector Text
_CollectionDef'NodeList'value = Vector Text
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _CollectionDef'NodeList'_unknownFields :: FieldSet
_CollectionDef'NodeList'_unknownFields = []}
  parseMessage :: Parser CollectionDef'NodeList
parseMessage
    = let
        loop ::
          CollectionDef'NodeList
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text
             -> Data.ProtoLens.Encoding.Bytes.Parser CollectionDef'NodeList
        loop :: CollectionDef'NodeList
-> Growing Vector RealWorld Text -> Parser CollectionDef'NodeList
loop x :: CollectionDef'NodeList
x mutable'value :: Growing Vector RealWorld Text
mutable'value
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do Vector Text
frozen'value <- IO (Vector Text) -> Parser (Vector Text)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                        (Growing Vector (PrimState IO) Text -> IO (Vector Text)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> m (v a)
Data.ProtoLens.Encoding.Growing.unsafeFreeze Growing Vector RealWorld Text
Growing Vector (PrimState IO) Text
mutable'value)
                      (let missing :: [a]
missing = []
                       in
                         if [Any] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
                             () -> Parser ()
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
                         else
                             String -> Parser ()
forall (m :: * -> *) a. MonadFail m => String -> m a
Prelude.fail
                               (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
                                  "Missing required fields: "
                                  ([String] -> String
forall a. Show a => a -> String
Prelude.show ([String]
forall a. [a]
missing :: [Prelude.String]))))
                      CollectionDef'NodeList -> Parser CollectionDef'NodeList
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter
  CollectionDef'NodeList CollectionDef'NodeList FieldSet FieldSet
-> (FieldSet -> FieldSet)
-> CollectionDef'NodeList
-> CollectionDef'NodeList
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                           forall msg. Message msg => Lens' msg FieldSet
Setter
  CollectionDef'NodeList CollectionDef'NodeList FieldSet FieldSet
Data.ProtoLens.unknownFields
                           (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t)
                           (Setter
  CollectionDef'NodeList
  CollectionDef'NodeList
  (Vector Text)
  (Vector Text)
-> Vector Text -> CollectionDef'NodeList -> CollectionDef'NodeList
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                              (forall s a (f :: * -> *).
(HasField s "vec'value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'value") Vector Text
frozen'value CollectionDef'NodeList
x))
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        10
                          -> do !Text
y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do ByteString
value <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                        Int -> Parser ByteString
Data.ProtoLens.Encoding.Bytes.getBytes
                                                          (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
                                            Either String Text -> Parser Text
forall a. Either String a -> Parser a
Data.ProtoLens.Encoding.Bytes.runEither
                                              (case ByteString -> Either UnicodeException Text
Data.Text.Encoding.decodeUtf8' ByteString
value of
                                                 (Prelude.Left err :: UnicodeException
err)
                                                   -> String -> Either String Text
forall a b. a -> Either a b
Prelude.Left (UnicodeException -> String
forall a. Show a => a -> String
Prelude.show UnicodeException
err)
                                                 (Prelude.Right r :: Text
r) -> Text -> Either String Text
forall a b. b -> Either a b
Prelude.Right Text
r))
                                        "value"
                                Growing Vector RealWorld Text
v <- IO (Growing Vector RealWorld Text)
-> Parser (Growing Vector RealWorld Text)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) Text
-> Text -> IO (Growing Vector (PrimState IO) Text)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> a -> m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.append Growing Vector RealWorld Text
Growing Vector (PrimState IO) Text
mutable'value Text
y)
                                CollectionDef'NodeList
-> Growing Vector RealWorld Text -> Parser CollectionDef'NodeList
loop CollectionDef'NodeList
x Growing Vector RealWorld Text
v
                        wire :: Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                CollectionDef'NodeList
-> Growing Vector RealWorld Text -> Parser CollectionDef'NodeList
loop
                                  (Setter
  CollectionDef'NodeList CollectionDef'NodeList FieldSet FieldSet
-> (FieldSet -> FieldSet)
-> CollectionDef'NodeList
-> CollectionDef'NodeList
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                     forall msg. Message msg => Lens' msg FieldSet
Setter
  CollectionDef'NodeList CollectionDef'NodeList FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) CollectionDef'NodeList
x)
                                  Growing Vector RealWorld Text
mutable'value
      in
        Parser CollectionDef'NodeList
-> String -> Parser CollectionDef'NodeList
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do Growing Vector RealWorld Text
mutable'value <- IO (Growing Vector RealWorld Text)
-> Parser (Growing Vector RealWorld Text)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                 IO (Growing Vector RealWorld Text)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              CollectionDef'NodeList
-> Growing Vector RealWorld Text -> Parser CollectionDef'NodeList
loop CollectionDef'NodeList
forall msg. Message msg => msg
Data.ProtoLens.defMessage Growing Vector RealWorld Text
mutable'value)
          "NodeList"
  buildMessage :: CollectionDef'NodeList -> Builder
buildMessage
    = \ _x :: CollectionDef'NodeList
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             ((Text -> Builder) -> Vector Text -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                (\ _v :: Text
_v
                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 10)
                        ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                           (\ bs :: ByteString
bs
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                      (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                   (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                           Text -> ByteString
Data.Text.Encoding.encodeUtf8
                           Text
_v))
                (FoldLike
  (Vector Text)
  CollectionDef'NodeList
  CollectionDef'NodeList
  (Vector Text)
  (Vector Text)
-> CollectionDef'NodeList -> Vector Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "vec'value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'value") CollectionDef'NodeList
_x))
             (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                (FoldLike
  FieldSet
  CollectionDef'NodeList
  CollectionDef'NodeList
  FieldSet
  FieldSet
-> CollectionDef'NodeList -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  CollectionDef'NodeList
  CollectionDef'NodeList
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields CollectionDef'NodeList
_x))
instance Control.DeepSeq.NFData CollectionDef'NodeList where
  rnf :: CollectionDef'NodeList -> ()
rnf
    = \ x__ :: CollectionDef'NodeList
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (CollectionDef'NodeList -> FieldSet
_CollectionDef'NodeList'_unknownFields CollectionDef'NodeList
x__)
             (Vector Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (CollectionDef'NodeList -> Vector Text
_CollectionDef'NodeList'value CollectionDef'NodeList
x__) ())
{- | Fields :
     
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.metaInfoDef' @:: Lens' MetaGraphDef MetaGraphDef'MetaInfoDef@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.maybe'metaInfoDef' @:: Lens' MetaGraphDef (Prelude.Maybe MetaGraphDef'MetaInfoDef)@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.graphDef' @:: Lens' MetaGraphDef Proto.Tensorflow.Core.Framework.Graph.GraphDef@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.maybe'graphDef' @:: Lens' MetaGraphDef (Prelude.Maybe Proto.Tensorflow.Core.Framework.Graph.GraphDef)@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.saverDef' @:: Lens' MetaGraphDef Proto.Tensorflow.Core.Protobuf.Saver.SaverDef@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.maybe'saverDef' @:: Lens' MetaGraphDef (Prelude.Maybe Proto.Tensorflow.Core.Protobuf.Saver.SaverDef)@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.collectionDef' @:: Lens' MetaGraphDef (Data.Map.Map Data.Text.Text CollectionDef)@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.signatureDef' @:: Lens' MetaGraphDef (Data.Map.Map Data.Text.Text SignatureDef)@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.assetFileDef' @:: Lens' MetaGraphDef [AssetFileDef]@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.vec'assetFileDef' @:: Lens' MetaGraphDef (Data.Vector.Vector AssetFileDef)@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.objectGraphDef' @:: Lens' MetaGraphDef Proto.Tensorflow.Core.Protobuf.SavedObjectGraph.SavedObjectGraph@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.maybe'objectGraphDef' @:: Lens' MetaGraphDef (Prelude.Maybe Proto.Tensorflow.Core.Protobuf.SavedObjectGraph.SavedObjectGraph)@ -}
data MetaGraphDef
  = MetaGraphDef'_constructor {MetaGraphDef -> Maybe MetaGraphDef'MetaInfoDef
_MetaGraphDef'metaInfoDef :: !(Prelude.Maybe MetaGraphDef'MetaInfoDef),
                               MetaGraphDef -> Maybe GraphDef
_MetaGraphDef'graphDef :: !(Prelude.Maybe Proto.Tensorflow.Core.Framework.Graph.GraphDef),
                               MetaGraphDef -> Maybe SaverDef
_MetaGraphDef'saverDef :: !(Prelude.Maybe Proto.Tensorflow.Core.Protobuf.Saver.SaverDef),
                               MetaGraphDef -> Map Text CollectionDef
_MetaGraphDef'collectionDef :: !(Data.Map.Map Data.Text.Text CollectionDef),
                               MetaGraphDef -> Map Text SignatureDef
_MetaGraphDef'signatureDef :: !(Data.Map.Map Data.Text.Text SignatureDef),
                               MetaGraphDef -> Vector AssetFileDef
_MetaGraphDef'assetFileDef :: !(Data.Vector.Vector AssetFileDef),
                               MetaGraphDef -> Maybe SavedObjectGraph
_MetaGraphDef'objectGraphDef :: !(Prelude.Maybe Proto.Tensorflow.Core.Protobuf.SavedObjectGraph.SavedObjectGraph),
                               MetaGraphDef -> FieldSet
_MetaGraphDef'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (MetaGraphDef -> MetaGraphDef -> Bool
(MetaGraphDef -> MetaGraphDef -> Bool)
-> (MetaGraphDef -> MetaGraphDef -> Bool) -> Eq MetaGraphDef
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: MetaGraphDef -> MetaGraphDef -> Bool
$c/= :: MetaGraphDef -> MetaGraphDef -> Bool
== :: MetaGraphDef -> MetaGraphDef -> Bool
$c== :: MetaGraphDef -> MetaGraphDef -> Bool
Prelude.Eq, Eq MetaGraphDef
Eq MetaGraphDef =>
(MetaGraphDef -> MetaGraphDef -> Ordering)
-> (MetaGraphDef -> MetaGraphDef -> Bool)
-> (MetaGraphDef -> MetaGraphDef -> Bool)
-> (MetaGraphDef -> MetaGraphDef -> Bool)
-> (MetaGraphDef -> MetaGraphDef -> Bool)
-> (MetaGraphDef -> MetaGraphDef -> MetaGraphDef)
-> (MetaGraphDef -> MetaGraphDef -> MetaGraphDef)
-> Ord MetaGraphDef
MetaGraphDef -> MetaGraphDef -> Bool
MetaGraphDef -> MetaGraphDef -> Ordering
MetaGraphDef -> MetaGraphDef -> MetaGraphDef
forall a.
Eq a =>
(a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
min :: MetaGraphDef -> MetaGraphDef -> MetaGraphDef
$cmin :: MetaGraphDef -> MetaGraphDef -> MetaGraphDef
max :: MetaGraphDef -> MetaGraphDef -> MetaGraphDef
$cmax :: MetaGraphDef -> MetaGraphDef -> MetaGraphDef
>= :: MetaGraphDef -> MetaGraphDef -> Bool
$c>= :: MetaGraphDef -> MetaGraphDef -> Bool
> :: MetaGraphDef -> MetaGraphDef -> Bool
$c> :: MetaGraphDef -> MetaGraphDef -> Bool
<= :: MetaGraphDef -> MetaGraphDef -> Bool
$c<= :: MetaGraphDef -> MetaGraphDef -> Bool
< :: MetaGraphDef -> MetaGraphDef -> Bool
$c< :: MetaGraphDef -> MetaGraphDef -> Bool
compare :: MetaGraphDef -> MetaGraphDef -> Ordering
$ccompare :: MetaGraphDef -> MetaGraphDef -> Ordering
$cp1Ord :: Eq MetaGraphDef
Prelude.Ord)
instance Prelude.Show MetaGraphDef where
  showsPrec :: Int -> MetaGraphDef -> ShowS
showsPrec _ __x :: MetaGraphDef
__x __s :: String
__s
    = Char -> ShowS
Prelude.showChar
        '{'
        (String -> ShowS
Prelude.showString
           (MetaGraphDef -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort MetaGraphDef
__x) (Char -> ShowS
Prelude.showChar '}' String
__s))
instance Data.ProtoLens.Field.HasField MetaGraphDef "metaInfoDef" MetaGraphDef'MetaInfoDef where
  fieldOf :: Proxy# "metaInfoDef"
-> (MetaGraphDef'MetaInfoDef -> f MetaGraphDef'MetaInfoDef)
-> MetaGraphDef
-> f MetaGraphDef
fieldOf _
    = ((Maybe MetaGraphDef'MetaInfoDef
  -> f (Maybe MetaGraphDef'MetaInfoDef))
 -> MetaGraphDef -> f MetaGraphDef)
-> ((MetaGraphDef'MetaInfoDef -> f MetaGraphDef'MetaInfoDef)
    -> Maybe MetaGraphDef'MetaInfoDef
    -> f (Maybe MetaGraphDef'MetaInfoDef))
-> (MetaGraphDef'MetaInfoDef -> f MetaGraphDef'MetaInfoDef)
-> MetaGraphDef
-> f MetaGraphDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((MetaGraphDef -> Maybe MetaGraphDef'MetaInfoDef)
-> (MetaGraphDef -> Maybe MetaGraphDef'MetaInfoDef -> MetaGraphDef)
-> Lens
     MetaGraphDef
     MetaGraphDef
     (Maybe MetaGraphDef'MetaInfoDef)
     (Maybe MetaGraphDef'MetaInfoDef)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           MetaGraphDef -> Maybe MetaGraphDef'MetaInfoDef
_MetaGraphDef'metaInfoDef
           (\ x__ :: MetaGraphDef
x__ y__ :: Maybe MetaGraphDef'MetaInfoDef
y__ -> MetaGraphDef
x__ {_MetaGraphDef'metaInfoDef :: Maybe MetaGraphDef'MetaInfoDef
_MetaGraphDef'metaInfoDef = Maybe MetaGraphDef'MetaInfoDef
y__}))
        (MetaGraphDef'MetaInfoDef
-> Lens' (Maybe MetaGraphDef'MetaInfoDef) MetaGraphDef'MetaInfoDef
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens MetaGraphDef'MetaInfoDef
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField MetaGraphDef "maybe'metaInfoDef" (Prelude.Maybe MetaGraphDef'MetaInfoDef) where
  fieldOf :: Proxy# "maybe'metaInfoDef"
-> (Maybe MetaGraphDef'MetaInfoDef
    -> f (Maybe MetaGraphDef'MetaInfoDef))
-> MetaGraphDef
-> f MetaGraphDef
fieldOf _
    = ((Maybe MetaGraphDef'MetaInfoDef
  -> f (Maybe MetaGraphDef'MetaInfoDef))
 -> MetaGraphDef -> f MetaGraphDef)
-> ((Maybe MetaGraphDef'MetaInfoDef
     -> f (Maybe MetaGraphDef'MetaInfoDef))
    -> Maybe MetaGraphDef'MetaInfoDef
    -> f (Maybe MetaGraphDef'MetaInfoDef))
-> (Maybe MetaGraphDef'MetaInfoDef
    -> f (Maybe MetaGraphDef'MetaInfoDef))
-> MetaGraphDef
-> f MetaGraphDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((MetaGraphDef -> Maybe MetaGraphDef'MetaInfoDef)
-> (MetaGraphDef -> Maybe MetaGraphDef'MetaInfoDef -> MetaGraphDef)
-> Lens
     MetaGraphDef
     MetaGraphDef
     (Maybe MetaGraphDef'MetaInfoDef)
     (Maybe MetaGraphDef'MetaInfoDef)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           MetaGraphDef -> Maybe MetaGraphDef'MetaInfoDef
_MetaGraphDef'metaInfoDef
           (\ x__ :: MetaGraphDef
x__ y__ :: Maybe MetaGraphDef'MetaInfoDef
y__ -> MetaGraphDef
x__ {_MetaGraphDef'metaInfoDef :: Maybe MetaGraphDef'MetaInfoDef
_MetaGraphDef'metaInfoDef = Maybe MetaGraphDef'MetaInfoDef
y__}))
        (Maybe MetaGraphDef'MetaInfoDef
 -> f (Maybe MetaGraphDef'MetaInfoDef))
-> Maybe MetaGraphDef'MetaInfoDef
-> f (Maybe MetaGraphDef'MetaInfoDef)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField MetaGraphDef "graphDef" Proto.Tensorflow.Core.Framework.Graph.GraphDef where
  fieldOf :: Proxy# "graphDef"
-> (GraphDef -> f GraphDef) -> MetaGraphDef -> f MetaGraphDef
fieldOf _
    = ((Maybe GraphDef -> f (Maybe GraphDef))
 -> MetaGraphDef -> f MetaGraphDef)
-> ((GraphDef -> f GraphDef)
    -> Maybe GraphDef -> f (Maybe GraphDef))
-> (GraphDef -> f GraphDef)
-> MetaGraphDef
-> f MetaGraphDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((MetaGraphDef -> Maybe GraphDef)
-> (MetaGraphDef -> Maybe GraphDef -> MetaGraphDef)
-> Lens MetaGraphDef MetaGraphDef (Maybe GraphDef) (Maybe GraphDef)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           MetaGraphDef -> Maybe GraphDef
_MetaGraphDef'graphDef
           (\ x__ :: MetaGraphDef
x__ y__ :: Maybe GraphDef
y__ -> MetaGraphDef
x__ {_MetaGraphDef'graphDef :: Maybe GraphDef
_MetaGraphDef'graphDef = Maybe GraphDef
y__}))
        (GraphDef -> Lens' (Maybe GraphDef) GraphDef
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens GraphDef
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField MetaGraphDef "maybe'graphDef" (Prelude.Maybe Proto.Tensorflow.Core.Framework.Graph.GraphDef) where
  fieldOf :: Proxy# "maybe'graphDef"
-> (Maybe GraphDef -> f (Maybe GraphDef))
-> MetaGraphDef
-> f MetaGraphDef
fieldOf _
    = ((Maybe GraphDef -> f (Maybe GraphDef))
 -> MetaGraphDef -> f MetaGraphDef)
-> ((Maybe GraphDef -> f (Maybe GraphDef))
    -> Maybe GraphDef -> f (Maybe GraphDef))
-> (Maybe GraphDef -> f (Maybe GraphDef))
-> MetaGraphDef
-> f MetaGraphDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((MetaGraphDef -> Maybe GraphDef)
-> (MetaGraphDef -> Maybe GraphDef -> MetaGraphDef)
-> Lens MetaGraphDef MetaGraphDef (Maybe GraphDef) (Maybe GraphDef)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           MetaGraphDef -> Maybe GraphDef
_MetaGraphDef'graphDef
           (\ x__ :: MetaGraphDef
x__ y__ :: Maybe GraphDef
y__ -> MetaGraphDef
x__ {_MetaGraphDef'graphDef :: Maybe GraphDef
_MetaGraphDef'graphDef = Maybe GraphDef
y__}))
        (Maybe GraphDef -> f (Maybe GraphDef))
-> Maybe GraphDef -> f (Maybe GraphDef)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField MetaGraphDef "saverDef" Proto.Tensorflow.Core.Protobuf.Saver.SaverDef where
  fieldOf :: Proxy# "saverDef"
-> (SaverDef -> f SaverDef) -> MetaGraphDef -> f MetaGraphDef
fieldOf _
    = ((Maybe SaverDef -> f (Maybe SaverDef))
 -> MetaGraphDef -> f MetaGraphDef)
-> ((SaverDef -> f SaverDef)
    -> Maybe SaverDef -> f (Maybe SaverDef))
-> (SaverDef -> f SaverDef)
-> MetaGraphDef
-> f MetaGraphDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((MetaGraphDef -> Maybe SaverDef)
-> (MetaGraphDef -> Maybe SaverDef -> MetaGraphDef)
-> Lens MetaGraphDef MetaGraphDef (Maybe SaverDef) (Maybe SaverDef)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           MetaGraphDef -> Maybe SaverDef
_MetaGraphDef'saverDef
           (\ x__ :: MetaGraphDef
x__ y__ :: Maybe SaverDef
y__ -> MetaGraphDef
x__ {_MetaGraphDef'saverDef :: Maybe SaverDef
_MetaGraphDef'saverDef = Maybe SaverDef
y__}))
        (SaverDef -> Lens' (Maybe SaverDef) SaverDef
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens SaverDef
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField MetaGraphDef "maybe'saverDef" (Prelude.Maybe Proto.Tensorflow.Core.Protobuf.Saver.SaverDef) where
  fieldOf :: Proxy# "maybe'saverDef"
-> (Maybe SaverDef -> f (Maybe SaverDef))
-> MetaGraphDef
-> f MetaGraphDef
fieldOf _
    = ((Maybe SaverDef -> f (Maybe SaverDef))
 -> MetaGraphDef -> f MetaGraphDef)
-> ((Maybe SaverDef -> f (Maybe SaverDef))
    -> Maybe SaverDef -> f (Maybe SaverDef))
-> (Maybe SaverDef -> f (Maybe SaverDef))
-> MetaGraphDef
-> f MetaGraphDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((MetaGraphDef -> Maybe SaverDef)
-> (MetaGraphDef -> Maybe SaverDef -> MetaGraphDef)
-> Lens MetaGraphDef MetaGraphDef (Maybe SaverDef) (Maybe SaverDef)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           MetaGraphDef -> Maybe SaverDef
_MetaGraphDef'saverDef
           (\ x__ :: MetaGraphDef
x__ y__ :: Maybe SaverDef
y__ -> MetaGraphDef
x__ {_MetaGraphDef'saverDef :: Maybe SaverDef
_MetaGraphDef'saverDef = Maybe SaverDef
y__}))
        (Maybe SaverDef -> f (Maybe SaverDef))
-> Maybe SaverDef -> f (Maybe SaverDef)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField MetaGraphDef "collectionDef" (Data.Map.Map Data.Text.Text CollectionDef) where
  fieldOf :: Proxy# "collectionDef"
-> (Map Text CollectionDef -> f (Map Text CollectionDef))
-> MetaGraphDef
-> f MetaGraphDef
fieldOf _
    = ((Map Text CollectionDef -> f (Map Text CollectionDef))
 -> MetaGraphDef -> f MetaGraphDef)
-> ((Map Text CollectionDef -> f (Map Text CollectionDef))
    -> Map Text CollectionDef -> f (Map Text CollectionDef))
-> (Map Text CollectionDef -> f (Map Text CollectionDef))
-> MetaGraphDef
-> f MetaGraphDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((MetaGraphDef -> Map Text CollectionDef)
-> (MetaGraphDef -> Map Text CollectionDef -> MetaGraphDef)
-> Lens
     MetaGraphDef
     MetaGraphDef
     (Map Text CollectionDef)
     (Map Text CollectionDef)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           MetaGraphDef -> Map Text CollectionDef
_MetaGraphDef'collectionDef
           (\ x__ :: MetaGraphDef
x__ y__ :: Map Text CollectionDef
y__ -> MetaGraphDef
x__ {_MetaGraphDef'collectionDef :: Map Text CollectionDef
_MetaGraphDef'collectionDef = Map Text CollectionDef
y__}))
        (Map Text CollectionDef -> f (Map Text CollectionDef))
-> Map Text CollectionDef -> f (Map Text CollectionDef)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField MetaGraphDef "signatureDef" (Data.Map.Map Data.Text.Text SignatureDef) where
  fieldOf :: Proxy# "signatureDef"
-> (Map Text SignatureDef -> f (Map Text SignatureDef))
-> MetaGraphDef
-> f MetaGraphDef
fieldOf _
    = ((Map Text SignatureDef -> f (Map Text SignatureDef))
 -> MetaGraphDef -> f MetaGraphDef)
-> ((Map Text SignatureDef -> f (Map Text SignatureDef))
    -> Map Text SignatureDef -> f (Map Text SignatureDef))
-> (Map Text SignatureDef -> f (Map Text SignatureDef))
-> MetaGraphDef
-> f MetaGraphDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((MetaGraphDef -> Map Text SignatureDef)
-> (MetaGraphDef -> Map Text SignatureDef -> MetaGraphDef)
-> Lens
     MetaGraphDef
     MetaGraphDef
     (Map Text SignatureDef)
     (Map Text SignatureDef)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           MetaGraphDef -> Map Text SignatureDef
_MetaGraphDef'signatureDef
           (\ x__ :: MetaGraphDef
x__ y__ :: Map Text SignatureDef
y__ -> MetaGraphDef
x__ {_MetaGraphDef'signatureDef :: Map Text SignatureDef
_MetaGraphDef'signatureDef = Map Text SignatureDef
y__}))
        (Map Text SignatureDef -> f (Map Text SignatureDef))
-> Map Text SignatureDef -> f (Map Text SignatureDef)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField MetaGraphDef "assetFileDef" [AssetFileDef] where
  fieldOf :: Proxy# "assetFileDef"
-> ([AssetFileDef] -> f [AssetFileDef])
-> MetaGraphDef
-> f MetaGraphDef
fieldOf _
    = ((Vector AssetFileDef -> f (Vector AssetFileDef))
 -> MetaGraphDef -> f MetaGraphDef)
-> (([AssetFileDef] -> f [AssetFileDef])
    -> Vector AssetFileDef -> f (Vector AssetFileDef))
-> ([AssetFileDef] -> f [AssetFileDef])
-> MetaGraphDef
-> f MetaGraphDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((MetaGraphDef -> Vector AssetFileDef)
-> (MetaGraphDef -> Vector AssetFileDef -> MetaGraphDef)
-> Lens
     MetaGraphDef
     MetaGraphDef
     (Vector AssetFileDef)
     (Vector AssetFileDef)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           MetaGraphDef -> Vector AssetFileDef
_MetaGraphDef'assetFileDef
           (\ x__ :: MetaGraphDef
x__ y__ :: Vector AssetFileDef
y__ -> MetaGraphDef
x__ {_MetaGraphDef'assetFileDef :: Vector AssetFileDef
_MetaGraphDef'assetFileDef = Vector AssetFileDef
y__}))
        ((Vector AssetFileDef -> [AssetFileDef])
-> (Vector AssetFileDef -> [AssetFileDef] -> Vector AssetFileDef)
-> Lens
     (Vector AssetFileDef)
     (Vector AssetFileDef)
     [AssetFileDef]
     [AssetFileDef]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector AssetFileDef -> [AssetFileDef]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ _ y__ :: [AssetFileDef]
y__ -> [AssetFileDef] -> Vector AssetFileDef
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [AssetFileDef]
y__))
instance Data.ProtoLens.Field.HasField MetaGraphDef "vec'assetFileDef" (Data.Vector.Vector AssetFileDef) where
  fieldOf :: Proxy# "vec'assetFileDef"
-> (Vector AssetFileDef -> f (Vector AssetFileDef))
-> MetaGraphDef
-> f MetaGraphDef
fieldOf _
    = ((Vector AssetFileDef -> f (Vector AssetFileDef))
 -> MetaGraphDef -> f MetaGraphDef)
-> ((Vector AssetFileDef -> f (Vector AssetFileDef))
    -> Vector AssetFileDef -> f (Vector AssetFileDef))
-> (Vector AssetFileDef -> f (Vector AssetFileDef))
-> MetaGraphDef
-> f MetaGraphDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((MetaGraphDef -> Vector AssetFileDef)
-> (MetaGraphDef -> Vector AssetFileDef -> MetaGraphDef)
-> Lens
     MetaGraphDef
     MetaGraphDef
     (Vector AssetFileDef)
     (Vector AssetFileDef)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           MetaGraphDef -> Vector AssetFileDef
_MetaGraphDef'assetFileDef
           (\ x__ :: MetaGraphDef
x__ y__ :: Vector AssetFileDef
y__ -> MetaGraphDef
x__ {_MetaGraphDef'assetFileDef :: Vector AssetFileDef
_MetaGraphDef'assetFileDef = Vector AssetFileDef
y__}))
        (Vector AssetFileDef -> f (Vector AssetFileDef))
-> Vector AssetFileDef -> f (Vector AssetFileDef)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField MetaGraphDef "objectGraphDef" Proto.Tensorflow.Core.Protobuf.SavedObjectGraph.SavedObjectGraph where
  fieldOf :: Proxy# "objectGraphDef"
-> (SavedObjectGraph -> f SavedObjectGraph)
-> MetaGraphDef
-> f MetaGraphDef
fieldOf _
    = ((Maybe SavedObjectGraph -> f (Maybe SavedObjectGraph))
 -> MetaGraphDef -> f MetaGraphDef)
-> ((SavedObjectGraph -> f SavedObjectGraph)
    -> Maybe SavedObjectGraph -> f (Maybe SavedObjectGraph))
-> (SavedObjectGraph -> f SavedObjectGraph)
-> MetaGraphDef
-> f MetaGraphDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((MetaGraphDef -> Maybe SavedObjectGraph)
-> (MetaGraphDef -> Maybe SavedObjectGraph -> MetaGraphDef)
-> Lens
     MetaGraphDef
     MetaGraphDef
     (Maybe SavedObjectGraph)
     (Maybe SavedObjectGraph)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           MetaGraphDef -> Maybe SavedObjectGraph
_MetaGraphDef'objectGraphDef
           (\ x__ :: MetaGraphDef
x__ y__ :: Maybe SavedObjectGraph
y__ -> MetaGraphDef
x__ {_MetaGraphDef'objectGraphDef :: Maybe SavedObjectGraph
_MetaGraphDef'objectGraphDef = Maybe SavedObjectGraph
y__}))
        (SavedObjectGraph -> Lens' (Maybe SavedObjectGraph) SavedObjectGraph
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens SavedObjectGraph
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField MetaGraphDef "maybe'objectGraphDef" (Prelude.Maybe Proto.Tensorflow.Core.Protobuf.SavedObjectGraph.SavedObjectGraph) where
  fieldOf :: Proxy# "maybe'objectGraphDef"
-> (Maybe SavedObjectGraph -> f (Maybe SavedObjectGraph))
-> MetaGraphDef
-> f MetaGraphDef
fieldOf _
    = ((Maybe SavedObjectGraph -> f (Maybe SavedObjectGraph))
 -> MetaGraphDef -> f MetaGraphDef)
-> ((Maybe SavedObjectGraph -> f (Maybe SavedObjectGraph))
    -> Maybe SavedObjectGraph -> f (Maybe SavedObjectGraph))
-> (Maybe SavedObjectGraph -> f (Maybe SavedObjectGraph))
-> MetaGraphDef
-> f MetaGraphDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((MetaGraphDef -> Maybe SavedObjectGraph)
-> (MetaGraphDef -> Maybe SavedObjectGraph -> MetaGraphDef)
-> Lens
     MetaGraphDef
     MetaGraphDef
     (Maybe SavedObjectGraph)
     (Maybe SavedObjectGraph)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           MetaGraphDef -> Maybe SavedObjectGraph
_MetaGraphDef'objectGraphDef
           (\ x__ :: MetaGraphDef
x__ y__ :: Maybe SavedObjectGraph
y__ -> MetaGraphDef
x__ {_MetaGraphDef'objectGraphDef :: Maybe SavedObjectGraph
_MetaGraphDef'objectGraphDef = Maybe SavedObjectGraph
y__}))
        (Maybe SavedObjectGraph -> f (Maybe SavedObjectGraph))
-> Maybe SavedObjectGraph -> f (Maybe SavedObjectGraph)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message MetaGraphDef where
  messageName :: Proxy MetaGraphDef -> Text
messageName _ = String -> Text
Data.Text.pack "tensorflow.MetaGraphDef"
  packedMessageDescriptor :: Proxy MetaGraphDef -> ByteString
packedMessageDescriptor _
    = "\n\
      \\fMetaGraphDef\DC2H\n\
      \\rmeta_info_def\CAN\SOH \SOH(\v2$.tensorflow.MetaGraphDef.MetaInfoDefR\vmetaInfoDef\DC21\n\
      \\tgraph_def\CAN\STX \SOH(\v2\DC4.tensorflow.GraphDefR\bgraphDef\DC21\n\
      \\tsaver_def\CAN\ETX \SOH(\v2\DC4.tensorflow.SaverDefR\bsaverDef\DC2R\n\
      \\SOcollection_def\CAN\EOT \ETX(\v2+.tensorflow.MetaGraphDef.CollectionDefEntryR\rcollectionDef\DC2O\n\
      \\rsignature_def\CAN\ENQ \ETX(\v2*.tensorflow.MetaGraphDef.SignatureDefEntryR\fsignatureDef\DC2>\n\
      \\SOasset_file_def\CAN\ACK \ETX(\v2\CAN.tensorflow.AssetFileDefR\fassetFileDef\DC2F\n\
      \\DLEobject_graph_def\CAN\a \SOH(\v2\FS.tensorflow.SavedObjectGraphR\SOobjectGraphDef\SUB\131\EOT\n\
      \\vMetaInfoDef\DC2,\n\
      \\DC2meta_graph_version\CAN\SOH \SOH(\tR\DLEmetaGraphVersion\DC2<\n\
      \\DLEstripped_op_list\CAN\STX \SOH(\v2\DC2.tensorflow.OpListR\SOstrippedOpList\DC2/\n\
      \\bany_info\CAN\ETX \SOH(\v2\DC4.google.protobuf.AnyR\aanyInfo\DC2\DC2\n\
      \\EOTtags\CAN\EOT \ETX(\tR\EOTtags\DC2-\n\
      \\DC2tensorflow_version\CAN\ENQ \SOH(\tR\DC1tensorflowVersion\DC24\n\
      \\SYNtensorflow_git_version\CAN\ACK \SOH(\tR\DC4tensorflowGitVersion\DC24\n\
      \\SYNstripped_default_attrs\CAN\a \SOH(\bR\DC4strippedDefaultAttrs\DC2d\n\
      \\DLEfunction_aliases\CAN\b \ETX(\v29.tensorflow.MetaGraphDef.MetaInfoDef.FunctionAliasesEntryR\SIfunctionAliases\SUBB\n\
      \\DC4FunctionAliasesEntry\DC2\DLE\n\
      \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2\DC4\n\
      \\ENQvalue\CAN\STX \SOH(\tR\ENQvalue:\STX8\SOH\SUB[\n\
      \\DC2CollectionDefEntry\DC2\DLE\n\
      \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2/\n\
      \\ENQvalue\CAN\STX \SOH(\v2\EM.tensorflow.CollectionDefR\ENQvalue:\STX8\SOH\SUBY\n\
      \\DC1SignatureDefEntry\DC2\DLE\n\
      \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2.\n\
      \\ENQvalue\CAN\STX \SOH(\v2\CAN.tensorflow.SignatureDefR\ENQvalue:\STX8\SOH"
  packedFileDescriptor :: Proxy MetaGraphDef -> ByteString
packedFileDescriptor _ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor MetaGraphDef)
fieldsByTag
    = let
        metaInfoDef__field_descriptor :: FieldDescriptor MetaGraphDef
metaInfoDef__field_descriptor
          = String
-> FieldTypeDescriptor MetaGraphDef'MetaInfoDef
-> FieldAccessor MetaGraphDef MetaGraphDef'MetaInfoDef
-> FieldDescriptor MetaGraphDef
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "meta_info_def"
              (MessageOrGroup -> FieldTypeDescriptor MetaGraphDef'MetaInfoDef
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor MetaGraphDef'MetaInfoDef)
              (Lens
  MetaGraphDef
  MetaGraphDef
  (Maybe MetaGraphDef'MetaInfoDef)
  (Maybe MetaGraphDef'MetaInfoDef)
-> FieldAccessor MetaGraphDef MetaGraphDef'MetaInfoDef
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall s a (f :: * -> *).
(HasField s "maybe'metaInfoDef" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'metaInfoDef")) ::
              Data.ProtoLens.FieldDescriptor MetaGraphDef
        graphDef__field_descriptor :: FieldDescriptor MetaGraphDef
graphDef__field_descriptor
          = String
-> FieldTypeDescriptor GraphDef
-> FieldAccessor MetaGraphDef GraphDef
-> FieldDescriptor MetaGraphDef
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "graph_def"
              (MessageOrGroup -> FieldTypeDescriptor GraphDef
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Tensorflow.Core.Framework.Graph.GraphDef)
              (Lens MetaGraphDef MetaGraphDef (Maybe GraphDef) (Maybe GraphDef)
-> FieldAccessor MetaGraphDef GraphDef
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall s a (f :: * -> *).
(HasField s "maybe'graphDef" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'graphDef")) ::
              Data.ProtoLens.FieldDescriptor MetaGraphDef
        saverDef__field_descriptor :: FieldDescriptor MetaGraphDef
saverDef__field_descriptor
          = String
-> FieldTypeDescriptor SaverDef
-> FieldAccessor MetaGraphDef SaverDef
-> FieldDescriptor MetaGraphDef
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "saver_def"
              (MessageOrGroup -> FieldTypeDescriptor SaverDef
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Tensorflow.Core.Protobuf.Saver.SaverDef)
              (Lens MetaGraphDef MetaGraphDef (Maybe SaverDef) (Maybe SaverDef)
-> FieldAccessor MetaGraphDef SaverDef
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall s a (f :: * -> *).
(HasField s "maybe'saverDef" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'saverDef")) ::
              Data.ProtoLens.FieldDescriptor MetaGraphDef
        collectionDef__field_descriptor :: FieldDescriptor MetaGraphDef
collectionDef__field_descriptor
          = String
-> FieldTypeDescriptor MetaGraphDef'CollectionDefEntry
-> FieldAccessor MetaGraphDef MetaGraphDef'CollectionDefEntry
-> FieldDescriptor MetaGraphDef
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "collection_def"
              (MessageOrGroup
-> FieldTypeDescriptor MetaGraphDef'CollectionDefEntry
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor MetaGraphDef'CollectionDefEntry)
              (Lens' MetaGraphDef'CollectionDefEntry Text
-> Lens' MetaGraphDef'CollectionDefEntry CollectionDef
-> Lens
     MetaGraphDef
     MetaGraphDef
     (Map Text CollectionDef)
     (Map Text CollectionDef)
-> FieldAccessor MetaGraphDef MetaGraphDef'CollectionDefEntry
forall key value value1 msg.
(Ord key, Message value) =>
Lens' value key
-> Lens' value value1
-> Lens' msg (Map key value1)
-> FieldAccessor msg value
Data.ProtoLens.MapField
                 (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key")
                 (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value")
                 (forall s a (f :: * -> *).
(HasField s "collectionDef" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"collectionDef")) ::
              Data.ProtoLens.FieldDescriptor MetaGraphDef
        signatureDef__field_descriptor :: FieldDescriptor MetaGraphDef
signatureDef__field_descriptor
          = String
-> FieldTypeDescriptor MetaGraphDef'SignatureDefEntry
-> FieldAccessor MetaGraphDef MetaGraphDef'SignatureDefEntry
-> FieldDescriptor MetaGraphDef
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "signature_def"
              (MessageOrGroup
-> FieldTypeDescriptor MetaGraphDef'SignatureDefEntry
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor MetaGraphDef'SignatureDefEntry)
              (Lens' MetaGraphDef'SignatureDefEntry Text
-> Lens' MetaGraphDef'SignatureDefEntry SignatureDef
-> Lens
     MetaGraphDef
     MetaGraphDef
     (Map Text SignatureDef)
     (Map Text SignatureDef)
-> FieldAccessor MetaGraphDef MetaGraphDef'SignatureDefEntry
forall key value value1 msg.
(Ord key, Message value) =>
Lens' value key
-> Lens' value value1
-> Lens' msg (Map key value1)
-> FieldAccessor msg value
Data.ProtoLens.MapField
                 (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key")
                 (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value")
                 (forall s a (f :: * -> *).
(HasField s "signatureDef" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"signatureDef")) ::
              Data.ProtoLens.FieldDescriptor MetaGraphDef
        assetFileDef__field_descriptor :: FieldDescriptor MetaGraphDef
assetFileDef__field_descriptor
          = String
-> FieldTypeDescriptor AssetFileDef
-> FieldAccessor MetaGraphDef AssetFileDef
-> FieldDescriptor MetaGraphDef
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "asset_file_def"
              (MessageOrGroup -> FieldTypeDescriptor AssetFileDef
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor AssetFileDef)
              (Packing
-> Lens' MetaGraphDef [AssetFileDef]
-> FieldAccessor MetaGraphDef AssetFileDef
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Unpacked
                 (forall s a (f :: * -> *).
(HasField s "assetFileDef" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"assetFileDef")) ::
              Data.ProtoLens.FieldDescriptor MetaGraphDef
        objectGraphDef__field_descriptor :: FieldDescriptor MetaGraphDef
objectGraphDef__field_descriptor
          = String
-> FieldTypeDescriptor SavedObjectGraph
-> FieldAccessor MetaGraphDef SavedObjectGraph
-> FieldDescriptor MetaGraphDef
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "object_graph_def"
              (MessageOrGroup -> FieldTypeDescriptor SavedObjectGraph
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Tensorflow.Core.Protobuf.SavedObjectGraph.SavedObjectGraph)
              (Lens
  MetaGraphDef
  MetaGraphDef
  (Maybe SavedObjectGraph)
  (Maybe SavedObjectGraph)
-> FieldAccessor MetaGraphDef SavedObjectGraph
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall s a (f :: * -> *).
(HasField s "maybe'objectGraphDef" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'objectGraphDef")) ::
              Data.ProtoLens.FieldDescriptor MetaGraphDef
      in
        [(Tag, FieldDescriptor MetaGraphDef)]
-> Map Tag (FieldDescriptor MetaGraphDef)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag 1, FieldDescriptor MetaGraphDef
metaInfoDef__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 2, FieldDescriptor MetaGraphDef
graphDef__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 3, FieldDescriptor MetaGraphDef
saverDef__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 4, FieldDescriptor MetaGraphDef
collectionDef__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 5, FieldDescriptor MetaGraphDef
signatureDef__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 6, FieldDescriptor MetaGraphDef
assetFileDef__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 7, FieldDescriptor MetaGraphDef
objectGraphDef__field_descriptor)]
  unknownFields :: LensLike' f MetaGraphDef FieldSet
unknownFields
    = (MetaGraphDef -> FieldSet)
-> (MetaGraphDef -> FieldSet -> MetaGraphDef)
-> Lens' MetaGraphDef FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        MetaGraphDef -> FieldSet
_MetaGraphDef'_unknownFields
        (\ x__ :: MetaGraphDef
x__ y__ :: FieldSet
y__ -> MetaGraphDef
x__ {_MetaGraphDef'_unknownFields :: FieldSet
_MetaGraphDef'_unknownFields = FieldSet
y__})
  defMessage :: MetaGraphDef
defMessage
    = $WMetaGraphDef'_constructor :: Maybe MetaGraphDef'MetaInfoDef
-> Maybe GraphDef
-> Maybe SaverDef
-> Map Text CollectionDef
-> Map Text SignatureDef
-> Vector AssetFileDef
-> Maybe SavedObjectGraph
-> FieldSet
-> MetaGraphDef
MetaGraphDef'_constructor
        {_MetaGraphDef'metaInfoDef :: Maybe MetaGraphDef'MetaInfoDef
_MetaGraphDef'metaInfoDef = Maybe MetaGraphDef'MetaInfoDef
forall a. Maybe a
Prelude.Nothing,
         _MetaGraphDef'graphDef :: Maybe GraphDef
_MetaGraphDef'graphDef = Maybe GraphDef
forall a. Maybe a
Prelude.Nothing,
         _MetaGraphDef'saverDef :: Maybe SaverDef
_MetaGraphDef'saverDef = Maybe SaverDef
forall a. Maybe a
Prelude.Nothing,
         _MetaGraphDef'collectionDef :: Map Text CollectionDef
_MetaGraphDef'collectionDef = Map Text CollectionDef
forall k a. Map k a
Data.Map.empty,
         _MetaGraphDef'signatureDef :: Map Text SignatureDef
_MetaGraphDef'signatureDef = Map Text SignatureDef
forall k a. Map k a
Data.Map.empty,
         _MetaGraphDef'assetFileDef :: Vector AssetFileDef
_MetaGraphDef'assetFileDef = Vector AssetFileDef
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _MetaGraphDef'objectGraphDef :: Maybe SavedObjectGraph
_MetaGraphDef'objectGraphDef = Maybe SavedObjectGraph
forall a. Maybe a
Prelude.Nothing,
         _MetaGraphDef'_unknownFields :: FieldSet
_MetaGraphDef'_unknownFields = []}
  parseMessage :: Parser MetaGraphDef
parseMessage
    = let
        loop ::
          MetaGraphDef
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld AssetFileDef
             -> Data.ProtoLens.Encoding.Bytes.Parser MetaGraphDef
        loop :: MetaGraphDef
-> Growing Vector RealWorld AssetFileDef -> Parser MetaGraphDef
loop x :: MetaGraphDef
x mutable'assetFileDef :: Growing Vector RealWorld AssetFileDef
mutable'assetFileDef
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do Vector AssetFileDef
frozen'assetFileDef <- IO (Vector AssetFileDef) -> Parser (Vector AssetFileDef)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                               (Growing Vector (PrimState IO) AssetFileDef
-> IO (Vector AssetFileDef)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> m (v a)
Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                                  Growing Vector RealWorld AssetFileDef
Growing Vector (PrimState IO) AssetFileDef
mutable'assetFileDef)
                      (let missing :: [a]
missing = []
                       in
                         if [Any] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
                             () -> Parser ()
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
                         else
                             String -> Parser ()
forall (m :: * -> *) a. MonadFail m => String -> m a
Prelude.fail
                               (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
                                  "Missing required fields: "
                                  ([String] -> String
forall a. Show a => a -> String
Prelude.show ([String]
forall a. [a]
missing :: [Prelude.String]))))
                      MetaGraphDef -> Parser MetaGraphDef
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter MetaGraphDef MetaGraphDef FieldSet FieldSet
-> (FieldSet -> FieldSet) -> MetaGraphDef -> MetaGraphDef
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                           forall msg. Message msg => Lens' msg FieldSet
Setter MetaGraphDef MetaGraphDef FieldSet FieldSet
Data.ProtoLens.unknownFields
                           (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t)
                           (Setter
  MetaGraphDef
  MetaGraphDef
  (Vector AssetFileDef)
  (Vector AssetFileDef)
-> Vector AssetFileDef -> MetaGraphDef -> MetaGraphDef
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                              (forall s a (f :: * -> *).
(HasField s "vec'assetFileDef" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'assetFileDef")
                              Vector AssetFileDef
frozen'assetFileDef
                              MetaGraphDef
x))
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        10
                          -> do MetaGraphDef'MetaInfoDef
y <- Parser MetaGraphDef'MetaInfoDef
-> String -> Parser MetaGraphDef'MetaInfoDef
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int
-> Parser MetaGraphDef'MetaInfoDef
-> Parser MetaGraphDef'MetaInfoDef
forall a. Int -> Parser a -> Parser a
Data.ProtoLens.Encoding.Bytes.isolate
                                             (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len) Parser MetaGraphDef'MetaInfoDef
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       "meta_info_def"
                                MetaGraphDef
-> Growing Vector RealWorld AssetFileDef -> Parser MetaGraphDef
loop
                                  (Setter
  MetaGraphDef
  MetaGraphDef
  MetaGraphDef'MetaInfoDef
  MetaGraphDef'MetaInfoDef
-> MetaGraphDef'MetaInfoDef -> MetaGraphDef -> MetaGraphDef
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "metaInfoDef" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"metaInfoDef") MetaGraphDef'MetaInfoDef
y MetaGraphDef
x)
                                  Growing Vector RealWorld AssetFileDef
mutable'assetFileDef
                        18
                          -> do GraphDef
y <- Parser GraphDef -> String -> Parser GraphDef
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser GraphDef -> Parser GraphDef
forall a. Int -> Parser a -> Parser a
Data.ProtoLens.Encoding.Bytes.isolate
                                             (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len) Parser GraphDef
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       "graph_def"
                                MetaGraphDef
-> Growing Vector RealWorld AssetFileDef -> Parser MetaGraphDef
loop
                                  (Setter MetaGraphDef MetaGraphDef GraphDef GraphDef
-> GraphDef -> MetaGraphDef -> MetaGraphDef
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "graphDef" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"graphDef") GraphDef
y MetaGraphDef
x)
                                  Growing Vector RealWorld AssetFileDef
mutable'assetFileDef
                        26
                          -> do SaverDef
y <- Parser SaverDef -> String -> Parser SaverDef
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser SaverDef -> Parser SaverDef
forall a. Int -> Parser a -> Parser a
Data.ProtoLens.Encoding.Bytes.isolate
                                             (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len) Parser SaverDef
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       "saver_def"
                                MetaGraphDef
-> Growing Vector RealWorld AssetFileDef -> Parser MetaGraphDef
loop
                                  (Setter MetaGraphDef MetaGraphDef SaverDef SaverDef
-> SaverDef -> MetaGraphDef -> MetaGraphDef
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "saverDef" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"saverDef") SaverDef
y MetaGraphDef
x)
                                  Growing Vector RealWorld AssetFileDef
mutable'assetFileDef
                        34
                          -> do !(MetaGraphDef'CollectionDefEntry
entry :: MetaGraphDef'CollectionDefEntry) <- Parser MetaGraphDef'CollectionDefEntry
-> String -> Parser MetaGraphDef'CollectionDefEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                                                                 (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                                                     Int
-> Parser MetaGraphDef'CollectionDefEntry
-> Parser MetaGraphDef'CollectionDefEntry
forall a. Int -> Parser a -> Parser a
Data.ProtoLens.Encoding.Bytes.isolate
                                                                                       (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                                          Word64
len)
                                                                                       Parser MetaGraphDef'CollectionDefEntry
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                                                                 "collection_def"
                                (let
                                   key :: Text
key = FoldLike
  Text
  MetaGraphDef'CollectionDefEntry
  MetaGraphDef'CollectionDefEntry
  Text
  Text
-> MetaGraphDef'CollectionDefEntry -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key") MetaGraphDef'CollectionDefEntry
entry
                                   value :: CollectionDef
value
                                     = FoldLike
  CollectionDef
  MetaGraphDef'CollectionDefEntry
  MetaGraphDef'CollectionDefEntry
  CollectionDef
  CollectionDef
-> MetaGraphDef'CollectionDefEntry -> CollectionDef
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value") MetaGraphDef'CollectionDefEntry
entry
                                 in
                                   MetaGraphDef
-> Growing Vector RealWorld AssetFileDef -> Parser MetaGraphDef
loop
                                     (Setter
  MetaGraphDef
  MetaGraphDef
  (Map Text CollectionDef)
  (Map Text CollectionDef)
-> (Map Text CollectionDef -> Map Text CollectionDef)
-> MetaGraphDef
-> MetaGraphDef
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                        (forall s a (f :: * -> *).
(HasField s "collectionDef" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"collectionDef")
                                        (\ !Map Text CollectionDef
t -> Text
-> CollectionDef
-> Map Text CollectionDef
-> Map Text CollectionDef
forall k a. Ord k => k -> a -> Map k a -> Map k a
Data.Map.insert Text
key CollectionDef
value Map Text CollectionDef
t)
                                        MetaGraphDef
x)
                                     Growing Vector RealWorld AssetFileDef
mutable'assetFileDef)
                        42
                          -> do !(MetaGraphDef'SignatureDefEntry
entry :: MetaGraphDef'SignatureDefEntry) <- Parser MetaGraphDef'SignatureDefEntry
-> String -> Parser MetaGraphDef'SignatureDefEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                                                                (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                                                    Int
-> Parser MetaGraphDef'SignatureDefEntry
-> Parser MetaGraphDef'SignatureDefEntry
forall a. Int -> Parser a -> Parser a
Data.ProtoLens.Encoding.Bytes.isolate
                                                                                      (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                                         Word64
len)
                                                                                      Parser MetaGraphDef'SignatureDefEntry
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                                                                "signature_def"
                                (let
                                   key :: Text
key = FoldLike
  Text
  MetaGraphDef'SignatureDefEntry
  MetaGraphDef'SignatureDefEntry
  Text
  Text
-> MetaGraphDef'SignatureDefEntry -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key") MetaGraphDef'SignatureDefEntry
entry
                                   value :: SignatureDef
value
                                     = FoldLike
  SignatureDef
  MetaGraphDef'SignatureDefEntry
  MetaGraphDef'SignatureDefEntry
  SignatureDef
  SignatureDef
-> MetaGraphDef'SignatureDefEntry -> SignatureDef
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value") MetaGraphDef'SignatureDefEntry
entry
                                 in
                                   MetaGraphDef
-> Growing Vector RealWorld AssetFileDef -> Parser MetaGraphDef
loop
                                     (Setter
  MetaGraphDef
  MetaGraphDef
  (Map Text SignatureDef)
  (Map Text SignatureDef)
-> (Map Text SignatureDef -> Map Text SignatureDef)
-> MetaGraphDef
-> MetaGraphDef
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                        (forall s a (f :: * -> *).
(HasField s "signatureDef" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"signatureDef")
                                        (\ !Map Text SignatureDef
t -> Text
-> SignatureDef -> Map Text SignatureDef -> Map Text SignatureDef
forall k a. Ord k => k -> a -> Map k a -> Map k a
Data.Map.insert Text
key SignatureDef
value Map Text SignatureDef
t)
                                        MetaGraphDef
x)
                                     Growing Vector RealWorld AssetFileDef
mutable'assetFileDef)
                        50
                          -> do !AssetFileDef
y <- Parser AssetFileDef -> String -> Parser AssetFileDef
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Int -> Parser AssetFileDef -> Parser AssetFileDef
forall a. Int -> Parser a -> Parser a
Data.ProtoLens.Encoding.Bytes.isolate
                                              (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
                                              Parser AssetFileDef
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                        "asset_file_def"
                                Growing Vector RealWorld AssetFileDef
v <- IO (Growing Vector RealWorld AssetFileDef)
-> Parser (Growing Vector RealWorld AssetFileDef)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) AssetFileDef
-> AssetFileDef -> IO (Growing Vector (PrimState IO) AssetFileDef)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> a -> m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.append
                                          Growing Vector RealWorld AssetFileDef
Growing Vector (PrimState IO) AssetFileDef
mutable'assetFileDef AssetFileDef
y)
                                MetaGraphDef
-> Growing Vector RealWorld AssetFileDef -> Parser MetaGraphDef
loop MetaGraphDef
x Growing Vector RealWorld AssetFileDef
v
                        58
                          -> do SavedObjectGraph
y <- Parser SavedObjectGraph -> String -> Parser SavedObjectGraph
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser SavedObjectGraph -> Parser SavedObjectGraph
forall a. Int -> Parser a -> Parser a
Data.ProtoLens.Encoding.Bytes.isolate
                                             (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len) Parser SavedObjectGraph
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       "object_graph_def"
                                MetaGraphDef
-> Growing Vector RealWorld AssetFileDef -> Parser MetaGraphDef
loop
                                  (Setter MetaGraphDef MetaGraphDef SavedObjectGraph SavedObjectGraph
-> SavedObjectGraph -> MetaGraphDef -> MetaGraphDef
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "objectGraphDef" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"objectGraphDef") SavedObjectGraph
y MetaGraphDef
x)
                                  Growing Vector RealWorld AssetFileDef
mutable'assetFileDef
                        wire :: Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                MetaGraphDef
-> Growing Vector RealWorld AssetFileDef -> Parser MetaGraphDef
loop
                                  (Setter MetaGraphDef MetaGraphDef FieldSet FieldSet
-> (FieldSet -> FieldSet) -> MetaGraphDef -> MetaGraphDef
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                     forall msg. Message msg => Lens' msg FieldSet
Setter MetaGraphDef MetaGraphDef FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) MetaGraphDef
x)
                                  Growing Vector RealWorld AssetFileDef
mutable'assetFileDef
      in
        Parser MetaGraphDef -> String -> Parser MetaGraphDef
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do Growing Vector RealWorld AssetFileDef
mutable'assetFileDef <- IO (Growing Vector RealWorld AssetFileDef)
-> Parser (Growing Vector RealWorld AssetFileDef)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                        IO (Growing Vector RealWorld AssetFileDef)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              MetaGraphDef
-> Growing Vector RealWorld AssetFileDef -> Parser MetaGraphDef
loop MetaGraphDef
forall msg. Message msg => msg
Data.ProtoLens.defMessage Growing Vector RealWorld AssetFileDef
mutable'assetFileDef)
          "MetaGraphDef"
  buildMessage :: MetaGraphDef -> Builder
buildMessage
    = \ _x :: MetaGraphDef
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (case
                  FoldLike
  (Maybe MetaGraphDef'MetaInfoDef)
  MetaGraphDef
  MetaGraphDef
  (Maybe MetaGraphDef'MetaInfoDef)
  (Maybe MetaGraphDef'MetaInfoDef)
-> MetaGraphDef -> Maybe MetaGraphDef'MetaInfoDef
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                    (forall s a (f :: * -> *).
(HasField s "maybe'metaInfoDef" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'metaInfoDef") MetaGraphDef
_x
              of
                Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                (Prelude.Just _v :: MetaGraphDef'MetaInfoDef
_v)
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 10)
                       ((ByteString -> Builder)
-> (MetaGraphDef'MetaInfoDef -> ByteString)
-> MetaGraphDef'MetaInfoDef
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ bs :: ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          MetaGraphDef'MetaInfoDef -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                          MetaGraphDef'MetaInfoDef
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (case
                     FoldLike
  (Maybe GraphDef)
  MetaGraphDef
  MetaGraphDef
  (Maybe GraphDef)
  (Maybe GraphDef)
-> MetaGraphDef -> Maybe GraphDef
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "maybe'graphDef" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'graphDef") MetaGraphDef
_x
                 of
                   Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just _v :: GraphDef
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 18)
                          ((ByteString -> Builder)
-> (GraphDef -> ByteString) -> GraphDef -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ bs :: ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             GraphDef -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                             GraphDef
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (case
                        FoldLike
  (Maybe SaverDef)
  MetaGraphDef
  MetaGraphDef
  (Maybe SaverDef)
  (Maybe SaverDef)
-> MetaGraphDef -> Maybe SaverDef
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "maybe'saverDef" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'saverDef") MetaGraphDef
_x
                    of
                      Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      (Prelude.Just _v :: SaverDef
_v)
                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 26)
                             ((ByteString -> Builder)
-> (SaverDef -> ByteString) -> SaverDef -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                (\ bs :: ByteString
bs
                                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                           (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                        (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                SaverDef -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                SaverDef
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      ([Builder] -> Builder
forall a. Monoid a => [a] -> a
Data.Monoid.mconcat
                         (((Text, CollectionDef) -> Builder)
-> [(Text, CollectionDef)] -> [Builder]
forall a b. (a -> b) -> [a] -> [b]
Prelude.map
                            (\ _v :: (Text, CollectionDef)
_v
                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 34)
                                    ((ByteString -> Builder)
-> (MetaGraphDef'CollectionDefEntry -> ByteString)
-> MetaGraphDef'CollectionDefEntry
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                       (\ bs :: ByteString
bs
                                          -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                  (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                     (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                               (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                       MetaGraphDef'CollectionDefEntry -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                       (Setter
  MetaGraphDef'CollectionDefEntry
  MetaGraphDef'CollectionDefEntry
  Text
  Text
-> Text
-> MetaGraphDef'CollectionDefEntry
-> MetaGraphDef'CollectionDefEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                          (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key")
                                          ((Text, CollectionDef) -> Text
forall a b. (a, b) -> a
Prelude.fst (Text, CollectionDef)
_v)
                                          (Setter
  MetaGraphDef'CollectionDefEntry
  MetaGraphDef'CollectionDefEntry
  CollectionDef
  CollectionDef
-> CollectionDef
-> MetaGraphDef'CollectionDefEntry
-> MetaGraphDef'CollectionDefEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                             (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value")
                                             ((Text, CollectionDef) -> CollectionDef
forall a b. (a, b) -> b
Prelude.snd (Text, CollectionDef)
_v)
                                             (MetaGraphDef'CollectionDefEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage ::
                                                MetaGraphDef'CollectionDefEntry)))))
                            (Map Text CollectionDef -> [(Text, CollectionDef)]
forall k a. Map k a -> [(k, a)]
Data.Map.toList
                               (FoldLike
  (Map Text CollectionDef)
  MetaGraphDef
  MetaGraphDef
  (Map Text CollectionDef)
  (Map Text CollectionDef)
-> MetaGraphDef -> Map Text CollectionDef
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                  (forall s a (f :: * -> *).
(HasField s "collectionDef" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"collectionDef") MetaGraphDef
_x))))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         ([Builder] -> Builder
forall a. Monoid a => [a] -> a
Data.Monoid.mconcat
                            (((Text, SignatureDef) -> Builder)
-> [(Text, SignatureDef)] -> [Builder]
forall a b. (a -> b) -> [a] -> [b]
Prelude.map
                               (\ _v :: (Text, SignatureDef)
_v
                                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 42)
                                       ((ByteString -> Builder)
-> (MetaGraphDef'SignatureDefEntry -> ByteString)
-> MetaGraphDef'SignatureDefEntry
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                          (\ bs :: ByteString
bs
                                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                        (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                          MetaGraphDef'SignatureDefEntry -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                          (Setter
  MetaGraphDef'SignatureDefEntry
  MetaGraphDef'SignatureDefEntry
  Text
  Text
-> Text
-> MetaGraphDef'SignatureDefEntry
-> MetaGraphDef'SignatureDefEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                             (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key")
                                             ((Text, SignatureDef) -> Text
forall a b. (a, b) -> a
Prelude.fst (Text, SignatureDef)
_v)
                                             (Setter
  MetaGraphDef'SignatureDefEntry
  MetaGraphDef'SignatureDefEntry
  SignatureDef
  SignatureDef
-> SignatureDef
-> MetaGraphDef'SignatureDefEntry
-> MetaGraphDef'SignatureDefEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                                (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value")
                                                ((Text, SignatureDef) -> SignatureDef
forall a b. (a, b) -> b
Prelude.snd (Text, SignatureDef)
_v)
                                                (MetaGraphDef'SignatureDefEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage ::
                                                   MetaGraphDef'SignatureDefEntry)))))
                               (Map Text SignatureDef -> [(Text, SignatureDef)]
forall k a. Map k a -> [(k, a)]
Data.Map.toList
                                  (FoldLike
  (Map Text SignatureDef)
  MetaGraphDef
  MetaGraphDef
  (Map Text SignatureDef)
  (Map Text SignatureDef)
-> MetaGraphDef -> Map Text SignatureDef
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                     (forall s a (f :: * -> *).
(HasField s "signatureDef" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"signatureDef") MetaGraphDef
_x))))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            ((AssetFileDef -> Builder) -> Vector AssetFileDef -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                               (\ _v :: AssetFileDef
_v
                                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 50)
                                       ((ByteString -> Builder)
-> (AssetFileDef -> ByteString) -> AssetFileDef -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                          (\ bs :: ByteString
bs
                                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                        (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                          AssetFileDef -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                          AssetFileDef
_v))
                               (FoldLike
  (Vector AssetFileDef)
  MetaGraphDef
  MetaGraphDef
  (Vector AssetFileDef)
  (Vector AssetFileDef)
-> MetaGraphDef -> Vector AssetFileDef
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                  (forall s a (f :: * -> *).
(HasField s "vec'assetFileDef" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'assetFileDef") MetaGraphDef
_x))
                            (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (case
                                    FoldLike
  (Maybe SavedObjectGraph)
  MetaGraphDef
  MetaGraphDef
  (Maybe SavedObjectGraph)
  (Maybe SavedObjectGraph)
-> MetaGraphDef -> Maybe SavedObjectGraph
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                      (forall s a (f :: * -> *).
(HasField s "maybe'objectGraphDef" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'objectGraphDef") MetaGraphDef
_x
                                of
                                  Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                  (Prelude.Just _v :: SavedObjectGraph
_v)
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 58)
                                         ((ByteString -> Builder)
-> (SavedObjectGraph -> ByteString) -> SavedObjectGraph -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                            (\ bs :: ByteString
bs
                                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                       (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                          (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                    (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                            SavedObjectGraph -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                            SavedObjectGraph
_v))
                               (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                  (FoldLike FieldSet MetaGraphDef MetaGraphDef FieldSet FieldSet
-> MetaGraphDef -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet MetaGraphDef MetaGraphDef FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields MetaGraphDef
_x))))))))
instance Control.DeepSeq.NFData MetaGraphDef where
  rnf :: MetaGraphDef -> ()
rnf
    = \ x__ :: MetaGraphDef
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (MetaGraphDef -> FieldSet
_MetaGraphDef'_unknownFields MetaGraphDef
x__)
             (Maybe MetaGraphDef'MetaInfoDef -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (MetaGraphDef -> Maybe MetaGraphDef'MetaInfoDef
_MetaGraphDef'metaInfoDef MetaGraphDef
x__)
                (Maybe GraphDef -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (MetaGraphDef -> Maybe GraphDef
_MetaGraphDef'graphDef MetaGraphDef
x__)
                   (Maybe SaverDef -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (MetaGraphDef -> Maybe SaverDef
_MetaGraphDef'saverDef MetaGraphDef
x__)
                      (Map Text CollectionDef -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (MetaGraphDef -> Map Text CollectionDef
_MetaGraphDef'collectionDef MetaGraphDef
x__)
                         (Map Text SignatureDef -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (MetaGraphDef -> Map Text SignatureDef
_MetaGraphDef'signatureDef MetaGraphDef
x__)
                            (Vector AssetFileDef -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (MetaGraphDef -> Vector AssetFileDef
_MetaGraphDef'assetFileDef MetaGraphDef
x__)
                               (Maybe SavedObjectGraph -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (MetaGraphDef -> Maybe SavedObjectGraph
_MetaGraphDef'objectGraphDef MetaGraphDef
x__) ())))))))
{- | Fields :
     
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.key' @:: Lens' MetaGraphDef'CollectionDefEntry Data.Text.Text@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.value' @:: Lens' MetaGraphDef'CollectionDefEntry CollectionDef@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.maybe'value' @:: Lens' MetaGraphDef'CollectionDefEntry (Prelude.Maybe CollectionDef)@ -}
data MetaGraphDef'CollectionDefEntry
  = MetaGraphDef'CollectionDefEntry'_constructor {MetaGraphDef'CollectionDefEntry -> Text
_MetaGraphDef'CollectionDefEntry'key :: !Data.Text.Text,
                                                  MetaGraphDef'CollectionDefEntry -> Maybe CollectionDef
_MetaGraphDef'CollectionDefEntry'value :: !(Prelude.Maybe CollectionDef),
                                                  MetaGraphDef'CollectionDefEntry -> FieldSet
_MetaGraphDef'CollectionDefEntry'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (MetaGraphDef'CollectionDefEntry
-> MetaGraphDef'CollectionDefEntry -> Bool
(MetaGraphDef'CollectionDefEntry
 -> MetaGraphDef'CollectionDefEntry -> Bool)
-> (MetaGraphDef'CollectionDefEntry
    -> MetaGraphDef'CollectionDefEntry -> Bool)
-> Eq MetaGraphDef'CollectionDefEntry
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: MetaGraphDef'CollectionDefEntry
-> MetaGraphDef'CollectionDefEntry -> Bool
$c/= :: MetaGraphDef'CollectionDefEntry
-> MetaGraphDef'CollectionDefEntry -> Bool
== :: MetaGraphDef'CollectionDefEntry
-> MetaGraphDef'CollectionDefEntry -> Bool
$c== :: MetaGraphDef'CollectionDefEntry
-> MetaGraphDef'CollectionDefEntry -> Bool
Prelude.Eq, Eq MetaGraphDef'CollectionDefEntry
Eq MetaGraphDef'CollectionDefEntry =>
(MetaGraphDef'CollectionDefEntry
 -> MetaGraphDef'CollectionDefEntry -> Ordering)
-> (MetaGraphDef'CollectionDefEntry
    -> MetaGraphDef'CollectionDefEntry -> Bool)
-> (MetaGraphDef'CollectionDefEntry
    -> MetaGraphDef'CollectionDefEntry -> Bool)
-> (MetaGraphDef'CollectionDefEntry
    -> MetaGraphDef'CollectionDefEntry -> Bool)
-> (MetaGraphDef'CollectionDefEntry
    -> MetaGraphDef'CollectionDefEntry -> Bool)
-> (MetaGraphDef'CollectionDefEntry
    -> MetaGraphDef'CollectionDefEntry
    -> MetaGraphDef'CollectionDefEntry)
-> (MetaGraphDef'CollectionDefEntry
    -> MetaGraphDef'CollectionDefEntry
    -> MetaGraphDef'CollectionDefEntry)
-> Ord MetaGraphDef'CollectionDefEntry
MetaGraphDef'CollectionDefEntry
-> MetaGraphDef'CollectionDefEntry -> Bool
MetaGraphDef'CollectionDefEntry
-> MetaGraphDef'CollectionDefEntry -> Ordering
MetaGraphDef'CollectionDefEntry
-> MetaGraphDef'CollectionDefEntry
-> MetaGraphDef'CollectionDefEntry
forall a.
Eq a =>
(a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
min :: MetaGraphDef'CollectionDefEntry
-> MetaGraphDef'CollectionDefEntry
-> MetaGraphDef'CollectionDefEntry
$cmin :: MetaGraphDef'CollectionDefEntry
-> MetaGraphDef'CollectionDefEntry
-> MetaGraphDef'CollectionDefEntry
max :: MetaGraphDef'CollectionDefEntry
-> MetaGraphDef'CollectionDefEntry
-> MetaGraphDef'CollectionDefEntry
$cmax :: MetaGraphDef'CollectionDefEntry
-> MetaGraphDef'CollectionDefEntry
-> MetaGraphDef'CollectionDefEntry
>= :: MetaGraphDef'CollectionDefEntry
-> MetaGraphDef'CollectionDefEntry -> Bool
$c>= :: MetaGraphDef'CollectionDefEntry
-> MetaGraphDef'CollectionDefEntry -> Bool
> :: MetaGraphDef'CollectionDefEntry
-> MetaGraphDef'CollectionDefEntry -> Bool
$c> :: MetaGraphDef'CollectionDefEntry
-> MetaGraphDef'CollectionDefEntry -> Bool
<= :: MetaGraphDef'CollectionDefEntry
-> MetaGraphDef'CollectionDefEntry -> Bool
$c<= :: MetaGraphDef'CollectionDefEntry
-> MetaGraphDef'CollectionDefEntry -> Bool
< :: MetaGraphDef'CollectionDefEntry
-> MetaGraphDef'CollectionDefEntry -> Bool
$c< :: MetaGraphDef'CollectionDefEntry
-> MetaGraphDef'CollectionDefEntry -> Bool
compare :: MetaGraphDef'CollectionDefEntry
-> MetaGraphDef'CollectionDefEntry -> Ordering
$ccompare :: MetaGraphDef'CollectionDefEntry
-> MetaGraphDef'CollectionDefEntry -> Ordering
$cp1Ord :: Eq MetaGraphDef'CollectionDefEntry
Prelude.Ord)
instance Prelude.Show MetaGraphDef'CollectionDefEntry where
  showsPrec :: Int -> MetaGraphDef'CollectionDefEntry -> ShowS
showsPrec _ __x :: MetaGraphDef'CollectionDefEntry
__x __s :: String
__s
    = Char -> ShowS
Prelude.showChar
        '{'
        (String -> ShowS
Prelude.showString
           (MetaGraphDef'CollectionDefEntry -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort MetaGraphDef'CollectionDefEntry
__x) (Char -> ShowS
Prelude.showChar '}' String
__s))
instance Data.ProtoLens.Field.HasField MetaGraphDef'CollectionDefEntry "key" Data.Text.Text where
  fieldOf :: Proxy# "key"
-> (Text -> f Text)
-> MetaGraphDef'CollectionDefEntry
-> f MetaGraphDef'CollectionDefEntry
fieldOf _
    = ((Text -> f Text)
 -> MetaGraphDef'CollectionDefEntry
 -> f MetaGraphDef'CollectionDefEntry)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> MetaGraphDef'CollectionDefEntry
-> f MetaGraphDef'CollectionDefEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((MetaGraphDef'CollectionDefEntry -> Text)
-> (MetaGraphDef'CollectionDefEntry
    -> Text -> MetaGraphDef'CollectionDefEntry)
-> Lens' MetaGraphDef'CollectionDefEntry Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           MetaGraphDef'CollectionDefEntry -> Text
_MetaGraphDef'CollectionDefEntry'key
           (\ x__ :: MetaGraphDef'CollectionDefEntry
x__ y__ :: Text
y__ -> MetaGraphDef'CollectionDefEntry
x__ {_MetaGraphDef'CollectionDefEntry'key :: Text
_MetaGraphDef'CollectionDefEntry'key = Text
y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField MetaGraphDef'CollectionDefEntry "value" CollectionDef where
  fieldOf :: Proxy# "value"
-> (CollectionDef -> f CollectionDef)
-> MetaGraphDef'CollectionDefEntry
-> f MetaGraphDef'CollectionDefEntry
fieldOf _
    = ((Maybe CollectionDef -> f (Maybe CollectionDef))
 -> MetaGraphDef'CollectionDefEntry
 -> f MetaGraphDef'CollectionDefEntry)
-> ((CollectionDef -> f CollectionDef)
    -> Maybe CollectionDef -> f (Maybe CollectionDef))
-> (CollectionDef -> f CollectionDef)
-> MetaGraphDef'CollectionDefEntry
-> f MetaGraphDef'CollectionDefEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((MetaGraphDef'CollectionDefEntry -> Maybe CollectionDef)
-> (MetaGraphDef'CollectionDefEntry
    -> Maybe CollectionDef -> MetaGraphDef'CollectionDefEntry)
-> Lens
     MetaGraphDef'CollectionDefEntry
     MetaGraphDef'CollectionDefEntry
     (Maybe CollectionDef)
     (Maybe CollectionDef)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           MetaGraphDef'CollectionDefEntry -> Maybe CollectionDef
_MetaGraphDef'CollectionDefEntry'value
           (\ x__ :: MetaGraphDef'CollectionDefEntry
x__ y__ :: Maybe CollectionDef
y__ -> MetaGraphDef'CollectionDefEntry
x__ {_MetaGraphDef'CollectionDefEntry'value :: Maybe CollectionDef
_MetaGraphDef'CollectionDefEntry'value = Maybe CollectionDef
y__}))
        (CollectionDef -> Lens' (Maybe CollectionDef) CollectionDef
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens CollectionDef
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField MetaGraphDef'CollectionDefEntry "maybe'value" (Prelude.Maybe CollectionDef) where
  fieldOf :: Proxy# "maybe'value"
-> (Maybe CollectionDef -> f (Maybe CollectionDef))
-> MetaGraphDef'CollectionDefEntry
-> f MetaGraphDef'CollectionDefEntry
fieldOf _
    = ((Maybe CollectionDef -> f (Maybe CollectionDef))
 -> MetaGraphDef'CollectionDefEntry
 -> f MetaGraphDef'CollectionDefEntry)
-> ((Maybe CollectionDef -> f (Maybe CollectionDef))
    -> Maybe CollectionDef -> f (Maybe CollectionDef))
-> (Maybe CollectionDef -> f (Maybe CollectionDef))
-> MetaGraphDef'CollectionDefEntry
-> f MetaGraphDef'CollectionDefEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((MetaGraphDef'CollectionDefEntry -> Maybe CollectionDef)
-> (MetaGraphDef'CollectionDefEntry
    -> Maybe CollectionDef -> MetaGraphDef'CollectionDefEntry)
-> Lens
     MetaGraphDef'CollectionDefEntry
     MetaGraphDef'CollectionDefEntry
     (Maybe CollectionDef)
     (Maybe CollectionDef)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           MetaGraphDef'CollectionDefEntry -> Maybe CollectionDef
_MetaGraphDef'CollectionDefEntry'value
           (\ x__ :: MetaGraphDef'CollectionDefEntry
x__ y__ :: Maybe CollectionDef
y__ -> MetaGraphDef'CollectionDefEntry
x__ {_MetaGraphDef'CollectionDefEntry'value :: Maybe CollectionDef
_MetaGraphDef'CollectionDefEntry'value = Maybe CollectionDef
y__}))
        (Maybe CollectionDef -> f (Maybe CollectionDef))
-> Maybe CollectionDef -> f (Maybe CollectionDef)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message MetaGraphDef'CollectionDefEntry where
  messageName :: Proxy MetaGraphDef'CollectionDefEntry -> Text
messageName _
    = String -> Text
Data.Text.pack "tensorflow.MetaGraphDef.CollectionDefEntry"
  packedMessageDescriptor :: Proxy MetaGraphDef'CollectionDefEntry -> ByteString
packedMessageDescriptor _
    = "\n\
      \\DC2CollectionDefEntry\DC2\DLE\n\
      \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2/\n\
      \\ENQvalue\CAN\STX \SOH(\v2\EM.tensorflow.CollectionDefR\ENQvalue:\STX8\SOH"
  packedFileDescriptor :: Proxy MetaGraphDef'CollectionDefEntry -> ByteString
packedFileDescriptor _ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor MetaGraphDef'CollectionDefEntry)
fieldsByTag
    = let
        key__field_descriptor :: FieldDescriptor MetaGraphDef'CollectionDefEntry
key__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor MetaGraphDef'CollectionDefEntry Text
-> FieldDescriptor MetaGraphDef'CollectionDefEntry
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "key"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens' MetaGraphDef'CollectionDefEntry Text
-> FieldAccessor MetaGraphDef'CollectionDefEntry Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key")) ::
              Data.ProtoLens.FieldDescriptor MetaGraphDef'CollectionDefEntry
        value__field_descriptor :: FieldDescriptor MetaGraphDef'CollectionDefEntry
value__field_descriptor
          = String
-> FieldTypeDescriptor CollectionDef
-> FieldAccessor MetaGraphDef'CollectionDefEntry CollectionDef
-> FieldDescriptor MetaGraphDef'CollectionDefEntry
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "value"
              (MessageOrGroup -> FieldTypeDescriptor CollectionDef
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor CollectionDef)
              (Lens
  MetaGraphDef'CollectionDefEntry
  MetaGraphDef'CollectionDefEntry
  (Maybe CollectionDef)
  (Maybe CollectionDef)
-> FieldAccessor MetaGraphDef'CollectionDefEntry CollectionDef
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall s a (f :: * -> *).
(HasField s "maybe'value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'value")) ::
              Data.ProtoLens.FieldDescriptor MetaGraphDef'CollectionDefEntry
      in
        [(Tag, FieldDescriptor MetaGraphDef'CollectionDefEntry)]
-> Map Tag (FieldDescriptor MetaGraphDef'CollectionDefEntry)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag 1, FieldDescriptor MetaGraphDef'CollectionDefEntry
key__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 2, FieldDescriptor MetaGraphDef'CollectionDefEntry
value__field_descriptor)]
  unknownFields :: LensLike' f MetaGraphDef'CollectionDefEntry FieldSet
unknownFields
    = (MetaGraphDef'CollectionDefEntry -> FieldSet)
-> (MetaGraphDef'CollectionDefEntry
    -> FieldSet -> MetaGraphDef'CollectionDefEntry)
-> Lens' MetaGraphDef'CollectionDefEntry FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        MetaGraphDef'CollectionDefEntry -> FieldSet
_MetaGraphDef'CollectionDefEntry'_unknownFields
        (\ x__ :: MetaGraphDef'CollectionDefEntry
x__ y__ :: FieldSet
y__
           -> MetaGraphDef'CollectionDefEntry
x__ {_MetaGraphDef'CollectionDefEntry'_unknownFields :: FieldSet
_MetaGraphDef'CollectionDefEntry'_unknownFields = FieldSet
y__})
  defMessage :: MetaGraphDef'CollectionDefEntry
defMessage
    = $WMetaGraphDef'CollectionDefEntry'_constructor :: Text
-> Maybe CollectionDef
-> FieldSet
-> MetaGraphDef'CollectionDefEntry
MetaGraphDef'CollectionDefEntry'_constructor
        {_MetaGraphDef'CollectionDefEntry'key :: Text
_MetaGraphDef'CollectionDefEntry'key = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _MetaGraphDef'CollectionDefEntry'value :: Maybe CollectionDef
_MetaGraphDef'CollectionDefEntry'value = Maybe CollectionDef
forall a. Maybe a
Prelude.Nothing,
         _MetaGraphDef'CollectionDefEntry'_unknownFields :: FieldSet
_MetaGraphDef'CollectionDefEntry'_unknownFields = []}
  parseMessage :: Parser MetaGraphDef'CollectionDefEntry
parseMessage
    = let
        loop ::
          MetaGraphDef'CollectionDefEntry
          -> Data.ProtoLens.Encoding.Bytes.Parser MetaGraphDef'CollectionDefEntry
        loop :: MetaGraphDef'CollectionDefEntry
-> Parser MetaGraphDef'CollectionDefEntry
loop x :: MetaGraphDef'CollectionDefEntry
x
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do (let missing :: [a]
missing = []
                       in
                         if [Any] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
                             () -> Parser ()
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
                         else
                             String -> Parser ()
forall (m :: * -> *) a. MonadFail m => String -> m a
Prelude.fail
                               (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
                                  "Missing required fields: "
                                  ([String] -> String
forall a. Show a => a -> String
Prelude.show ([String]
forall a. [a]
missing :: [Prelude.String]))))
                      MetaGraphDef'CollectionDefEntry
-> Parser MetaGraphDef'CollectionDefEntry
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter
  MetaGraphDef'CollectionDefEntry
  MetaGraphDef'CollectionDefEntry
  FieldSet
  FieldSet
-> (FieldSet -> FieldSet)
-> MetaGraphDef'CollectionDefEntry
-> MetaGraphDef'CollectionDefEntry
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                           forall msg. Message msg => Lens' msg FieldSet
Setter
  MetaGraphDef'CollectionDefEntry
  MetaGraphDef'CollectionDefEntry
  FieldSet
  FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) MetaGraphDef'CollectionDefEntry
x)
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        10
                          -> do Text
y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do ByteString
value <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                       Int -> Parser ByteString
Data.ProtoLens.Encoding.Bytes.getBytes
                                                         (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
                                           Either String Text -> Parser Text
forall a. Either String a -> Parser a
Data.ProtoLens.Encoding.Bytes.runEither
                                             (case ByteString -> Either UnicodeException Text
Data.Text.Encoding.decodeUtf8' ByteString
value of
                                                (Prelude.Left err :: UnicodeException
err)
                                                  -> String -> Either String Text
forall a b. a -> Either a b
Prelude.Left (UnicodeException -> String
forall a. Show a => a -> String
Prelude.show UnicodeException
err)
                                                (Prelude.Right r :: Text
r) -> Text -> Either String Text
forall a b. b -> Either a b
Prelude.Right Text
r))
                                       "key"
                                MetaGraphDef'CollectionDefEntry
-> Parser MetaGraphDef'CollectionDefEntry
loop (Setter
  MetaGraphDef'CollectionDefEntry
  MetaGraphDef'CollectionDefEntry
  Text
  Text
-> Text
-> MetaGraphDef'CollectionDefEntry
-> MetaGraphDef'CollectionDefEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key") Text
y MetaGraphDef'CollectionDefEntry
x)
                        18
                          -> do CollectionDef
y <- Parser CollectionDef -> String -> Parser CollectionDef
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser CollectionDef -> Parser CollectionDef
forall a. Int -> Parser a -> Parser a
Data.ProtoLens.Encoding.Bytes.isolate
                                             (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len) Parser CollectionDef
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       "value"
                                MetaGraphDef'CollectionDefEntry
-> Parser MetaGraphDef'CollectionDefEntry
loop (Setter
  MetaGraphDef'CollectionDefEntry
  MetaGraphDef'CollectionDefEntry
  CollectionDef
  CollectionDef
-> CollectionDef
-> MetaGraphDef'CollectionDefEntry
-> MetaGraphDef'CollectionDefEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value") CollectionDef
y MetaGraphDef'CollectionDefEntry
x)
                        wire :: Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                MetaGraphDef'CollectionDefEntry
-> Parser MetaGraphDef'CollectionDefEntry
loop
                                  (Setter
  MetaGraphDef'CollectionDefEntry
  MetaGraphDef'CollectionDefEntry
  FieldSet
  FieldSet
-> (FieldSet -> FieldSet)
-> MetaGraphDef'CollectionDefEntry
-> MetaGraphDef'CollectionDefEntry
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                     forall msg. Message msg => Lens' msg FieldSet
Setter
  MetaGraphDef'CollectionDefEntry
  MetaGraphDef'CollectionDefEntry
  FieldSet
  FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) MetaGraphDef'CollectionDefEntry
x)
      in
        Parser MetaGraphDef'CollectionDefEntry
-> String -> Parser MetaGraphDef'CollectionDefEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do MetaGraphDef'CollectionDefEntry
-> Parser MetaGraphDef'CollectionDefEntry
loop MetaGraphDef'CollectionDefEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage) "CollectionDefEntry"
  buildMessage :: MetaGraphDef'CollectionDefEntry -> Builder
buildMessage
    = \ _x :: MetaGraphDef'CollectionDefEntry
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Text
_v = FoldLike
  Text
  MetaGraphDef'CollectionDefEntry
  MetaGraphDef'CollectionDefEntry
  Text
  Text
-> MetaGraphDef'CollectionDefEntry -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key") MetaGraphDef'CollectionDefEntry
_x
              in
                if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                    Builder
forall a. Monoid a => a
Data.Monoid.mempty
                else
                    Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 10)
                      ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                         (\ bs :: ByteString
bs
                            -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                 (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                    (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                 (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                         Text -> ByteString
Data.Text.Encoding.encodeUtf8
                         Text
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (case
                     FoldLike
  (Maybe CollectionDef)
  MetaGraphDef'CollectionDefEntry
  MetaGraphDef'CollectionDefEntry
  (Maybe CollectionDef)
  (Maybe CollectionDef)
-> MetaGraphDef'CollectionDefEntry -> Maybe CollectionDef
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "maybe'value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'value") MetaGraphDef'CollectionDefEntry
_x
                 of
                   Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just _v :: CollectionDef
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 18)
                          ((ByteString -> Builder)
-> (CollectionDef -> ByteString) -> CollectionDef -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ bs :: ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             CollectionDef -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                             CollectionDef
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  MetaGraphDef'CollectionDefEntry
  MetaGraphDef'CollectionDefEntry
  FieldSet
  FieldSet
-> MetaGraphDef'CollectionDefEntry -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  MetaGraphDef'CollectionDefEntry
  MetaGraphDef'CollectionDefEntry
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields MetaGraphDef'CollectionDefEntry
_x)))
instance Control.DeepSeq.NFData MetaGraphDef'CollectionDefEntry where
  rnf :: MetaGraphDef'CollectionDefEntry -> ()
rnf
    = \ x__ :: MetaGraphDef'CollectionDefEntry
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (MetaGraphDef'CollectionDefEntry -> FieldSet
_MetaGraphDef'CollectionDefEntry'_unknownFields MetaGraphDef'CollectionDefEntry
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (MetaGraphDef'CollectionDefEntry -> Text
_MetaGraphDef'CollectionDefEntry'key MetaGraphDef'CollectionDefEntry
x__)
                (Maybe CollectionDef -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (MetaGraphDef'CollectionDefEntry -> Maybe CollectionDef
_MetaGraphDef'CollectionDefEntry'value MetaGraphDef'CollectionDefEntry
x__) ()))
{- | Fields :
     
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.metaGraphVersion' @:: Lens' MetaGraphDef'MetaInfoDef Data.Text.Text@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.strippedOpList' @:: Lens' MetaGraphDef'MetaInfoDef Proto.Tensorflow.Core.Framework.OpDef.OpList@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.maybe'strippedOpList' @:: Lens' MetaGraphDef'MetaInfoDef (Prelude.Maybe Proto.Tensorflow.Core.Framework.OpDef.OpList)@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.anyInfo' @:: Lens' MetaGraphDef'MetaInfoDef Proto.Google.Protobuf.Any.Any@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.maybe'anyInfo' @:: Lens' MetaGraphDef'MetaInfoDef (Prelude.Maybe Proto.Google.Protobuf.Any.Any)@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.tags' @:: Lens' MetaGraphDef'MetaInfoDef [Data.Text.Text]@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.vec'tags' @:: Lens' MetaGraphDef'MetaInfoDef (Data.Vector.Vector Data.Text.Text)@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.tensorflowVersion' @:: Lens' MetaGraphDef'MetaInfoDef Data.Text.Text@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.tensorflowGitVersion' @:: Lens' MetaGraphDef'MetaInfoDef Data.Text.Text@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.strippedDefaultAttrs' @:: Lens' MetaGraphDef'MetaInfoDef Prelude.Bool@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.functionAliases' @:: Lens' MetaGraphDef'MetaInfoDef (Data.Map.Map Data.Text.Text Data.Text.Text)@ -}
data MetaGraphDef'MetaInfoDef
  = MetaGraphDef'MetaInfoDef'_constructor {MetaGraphDef'MetaInfoDef -> Text
_MetaGraphDef'MetaInfoDef'metaGraphVersion :: !Data.Text.Text,
                                           MetaGraphDef'MetaInfoDef -> Maybe OpList
_MetaGraphDef'MetaInfoDef'strippedOpList :: !(Prelude.Maybe Proto.Tensorflow.Core.Framework.OpDef.OpList),
                                           MetaGraphDef'MetaInfoDef -> Maybe Any
_MetaGraphDef'MetaInfoDef'anyInfo :: !(Prelude.Maybe Proto.Google.Protobuf.Any.Any),
                                           MetaGraphDef'MetaInfoDef -> Vector Text
_MetaGraphDef'MetaInfoDef'tags :: !(Data.Vector.Vector Data.Text.Text),
                                           MetaGraphDef'MetaInfoDef -> Text
_MetaGraphDef'MetaInfoDef'tensorflowVersion :: !Data.Text.Text,
                                           MetaGraphDef'MetaInfoDef -> Text
_MetaGraphDef'MetaInfoDef'tensorflowGitVersion :: !Data.Text.Text,
                                           MetaGraphDef'MetaInfoDef -> Bool
_MetaGraphDef'MetaInfoDef'strippedDefaultAttrs :: !Prelude.Bool,
                                           MetaGraphDef'MetaInfoDef -> Map Text Text
_MetaGraphDef'MetaInfoDef'functionAliases :: !(Data.Map.Map Data.Text.Text Data.Text.Text),
                                           MetaGraphDef'MetaInfoDef -> FieldSet
_MetaGraphDef'MetaInfoDef'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (MetaGraphDef'MetaInfoDef -> MetaGraphDef'MetaInfoDef -> Bool
(MetaGraphDef'MetaInfoDef -> MetaGraphDef'MetaInfoDef -> Bool)
-> (MetaGraphDef'MetaInfoDef -> MetaGraphDef'MetaInfoDef -> Bool)
-> Eq MetaGraphDef'MetaInfoDef
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: MetaGraphDef'MetaInfoDef -> MetaGraphDef'MetaInfoDef -> Bool
$c/= :: MetaGraphDef'MetaInfoDef -> MetaGraphDef'MetaInfoDef -> Bool
== :: MetaGraphDef'MetaInfoDef -> MetaGraphDef'MetaInfoDef -> Bool
$c== :: MetaGraphDef'MetaInfoDef -> MetaGraphDef'MetaInfoDef -> Bool
Prelude.Eq, Eq MetaGraphDef'MetaInfoDef
Eq MetaGraphDef'MetaInfoDef =>
(MetaGraphDef'MetaInfoDef -> MetaGraphDef'MetaInfoDef -> Ordering)
-> (MetaGraphDef'MetaInfoDef -> MetaGraphDef'MetaInfoDef -> Bool)
-> (MetaGraphDef'MetaInfoDef -> MetaGraphDef'MetaInfoDef -> Bool)
-> (MetaGraphDef'MetaInfoDef -> MetaGraphDef'MetaInfoDef -> Bool)
-> (MetaGraphDef'MetaInfoDef -> MetaGraphDef'MetaInfoDef -> Bool)
-> (MetaGraphDef'MetaInfoDef
    -> MetaGraphDef'MetaInfoDef -> MetaGraphDef'MetaInfoDef)
-> (MetaGraphDef'MetaInfoDef
    -> MetaGraphDef'MetaInfoDef -> MetaGraphDef'MetaInfoDef)
-> Ord MetaGraphDef'MetaInfoDef
MetaGraphDef'MetaInfoDef -> MetaGraphDef'MetaInfoDef -> Bool
MetaGraphDef'MetaInfoDef -> MetaGraphDef'MetaInfoDef -> Ordering
MetaGraphDef'MetaInfoDef
-> MetaGraphDef'MetaInfoDef -> MetaGraphDef'MetaInfoDef
forall a.
Eq a =>
(a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
min :: MetaGraphDef'MetaInfoDef
-> MetaGraphDef'MetaInfoDef -> MetaGraphDef'MetaInfoDef
$cmin :: MetaGraphDef'MetaInfoDef
-> MetaGraphDef'MetaInfoDef -> MetaGraphDef'MetaInfoDef
max :: MetaGraphDef'MetaInfoDef
-> MetaGraphDef'MetaInfoDef -> MetaGraphDef'MetaInfoDef
$cmax :: MetaGraphDef'MetaInfoDef
-> MetaGraphDef'MetaInfoDef -> MetaGraphDef'MetaInfoDef
>= :: MetaGraphDef'MetaInfoDef -> MetaGraphDef'MetaInfoDef -> Bool
$c>= :: MetaGraphDef'MetaInfoDef -> MetaGraphDef'MetaInfoDef -> Bool
> :: MetaGraphDef'MetaInfoDef -> MetaGraphDef'MetaInfoDef -> Bool
$c> :: MetaGraphDef'MetaInfoDef -> MetaGraphDef'MetaInfoDef -> Bool
<= :: MetaGraphDef'MetaInfoDef -> MetaGraphDef'MetaInfoDef -> Bool
$c<= :: MetaGraphDef'MetaInfoDef -> MetaGraphDef'MetaInfoDef -> Bool
< :: MetaGraphDef'MetaInfoDef -> MetaGraphDef'MetaInfoDef -> Bool
$c< :: MetaGraphDef'MetaInfoDef -> MetaGraphDef'MetaInfoDef -> Bool
compare :: MetaGraphDef'MetaInfoDef -> MetaGraphDef'MetaInfoDef -> Ordering
$ccompare :: MetaGraphDef'MetaInfoDef -> MetaGraphDef'MetaInfoDef -> Ordering
$cp1Ord :: Eq MetaGraphDef'MetaInfoDef
Prelude.Ord)
instance Prelude.Show MetaGraphDef'MetaInfoDef where
  showsPrec :: Int -> MetaGraphDef'MetaInfoDef -> ShowS
showsPrec _ __x :: MetaGraphDef'MetaInfoDef
__x __s :: String
__s
    = Char -> ShowS
Prelude.showChar
        '{'
        (String -> ShowS
Prelude.showString
           (MetaGraphDef'MetaInfoDef -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort MetaGraphDef'MetaInfoDef
__x) (Char -> ShowS
Prelude.showChar '}' String
__s))
instance Data.ProtoLens.Field.HasField MetaGraphDef'MetaInfoDef "metaGraphVersion" Data.Text.Text where
  fieldOf :: Proxy# "metaGraphVersion"
-> (Text -> f Text)
-> MetaGraphDef'MetaInfoDef
-> f MetaGraphDef'MetaInfoDef
fieldOf _
    = ((Text -> f Text)
 -> MetaGraphDef'MetaInfoDef -> f MetaGraphDef'MetaInfoDef)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> MetaGraphDef'MetaInfoDef
-> f MetaGraphDef'MetaInfoDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((MetaGraphDef'MetaInfoDef -> Text)
-> (MetaGraphDef'MetaInfoDef -> Text -> MetaGraphDef'MetaInfoDef)
-> Lens MetaGraphDef'MetaInfoDef MetaGraphDef'MetaInfoDef Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           MetaGraphDef'MetaInfoDef -> Text
_MetaGraphDef'MetaInfoDef'metaGraphVersion
           (\ x__ :: MetaGraphDef'MetaInfoDef
x__ y__ :: Text
y__
              -> MetaGraphDef'MetaInfoDef
x__ {_MetaGraphDef'MetaInfoDef'metaGraphVersion :: Text
_MetaGraphDef'MetaInfoDef'metaGraphVersion = Text
y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField MetaGraphDef'MetaInfoDef "strippedOpList" Proto.Tensorflow.Core.Framework.OpDef.OpList where
  fieldOf :: Proxy# "strippedOpList"
-> (OpList -> f OpList)
-> MetaGraphDef'MetaInfoDef
-> f MetaGraphDef'MetaInfoDef
fieldOf _
    = ((Maybe OpList -> f (Maybe OpList))
 -> MetaGraphDef'MetaInfoDef -> f MetaGraphDef'MetaInfoDef)
-> ((OpList -> f OpList) -> Maybe OpList -> f (Maybe OpList))
-> (OpList -> f OpList)
-> MetaGraphDef'MetaInfoDef
-> f MetaGraphDef'MetaInfoDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((MetaGraphDef'MetaInfoDef -> Maybe OpList)
-> (MetaGraphDef'MetaInfoDef
    -> Maybe OpList -> MetaGraphDef'MetaInfoDef)
-> Lens
     MetaGraphDef'MetaInfoDef
     MetaGraphDef'MetaInfoDef
     (Maybe OpList)
     (Maybe OpList)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           MetaGraphDef'MetaInfoDef -> Maybe OpList
_MetaGraphDef'MetaInfoDef'strippedOpList
           (\ x__ :: MetaGraphDef'MetaInfoDef
x__ y__ :: Maybe OpList
y__
              -> MetaGraphDef'MetaInfoDef
x__ {_MetaGraphDef'MetaInfoDef'strippedOpList :: Maybe OpList
_MetaGraphDef'MetaInfoDef'strippedOpList = Maybe OpList
y__}))
        (OpList -> Lens' (Maybe OpList) OpList
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens OpList
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField MetaGraphDef'MetaInfoDef "maybe'strippedOpList" (Prelude.Maybe Proto.Tensorflow.Core.Framework.OpDef.OpList) where
  fieldOf :: Proxy# "maybe'strippedOpList"
-> (Maybe OpList -> f (Maybe OpList))
-> MetaGraphDef'MetaInfoDef
-> f MetaGraphDef'MetaInfoDef
fieldOf _
    = ((Maybe OpList -> f (Maybe OpList))
 -> MetaGraphDef'MetaInfoDef -> f MetaGraphDef'MetaInfoDef)
-> ((Maybe OpList -> f (Maybe OpList))
    -> Maybe OpList -> f (Maybe OpList))
-> (Maybe OpList -> f (Maybe OpList))
-> MetaGraphDef'MetaInfoDef
-> f MetaGraphDef'MetaInfoDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((MetaGraphDef'MetaInfoDef -> Maybe OpList)
-> (MetaGraphDef'MetaInfoDef
    -> Maybe OpList -> MetaGraphDef'MetaInfoDef)
-> Lens
     MetaGraphDef'MetaInfoDef
     MetaGraphDef'MetaInfoDef
     (Maybe OpList)
     (Maybe OpList)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           MetaGraphDef'MetaInfoDef -> Maybe OpList
_MetaGraphDef'MetaInfoDef'strippedOpList
           (\ x__ :: MetaGraphDef'MetaInfoDef
x__ y__ :: Maybe OpList
y__
              -> MetaGraphDef'MetaInfoDef
x__ {_MetaGraphDef'MetaInfoDef'strippedOpList :: Maybe OpList
_MetaGraphDef'MetaInfoDef'strippedOpList = Maybe OpList
y__}))
        (Maybe OpList -> f (Maybe OpList))
-> Maybe OpList -> f (Maybe OpList)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField MetaGraphDef'MetaInfoDef "anyInfo" Proto.Google.Protobuf.Any.Any where
  fieldOf :: Proxy# "anyInfo"
-> (Any -> f Any)
-> MetaGraphDef'MetaInfoDef
-> f MetaGraphDef'MetaInfoDef
fieldOf _
    = ((Maybe Any -> f (Maybe Any))
 -> MetaGraphDef'MetaInfoDef -> f MetaGraphDef'MetaInfoDef)
-> ((Any -> f Any) -> Maybe Any -> f (Maybe Any))
-> (Any -> f Any)
-> MetaGraphDef'MetaInfoDef
-> f MetaGraphDef'MetaInfoDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((MetaGraphDef'MetaInfoDef -> Maybe Any)
-> (MetaGraphDef'MetaInfoDef
    -> Maybe Any -> MetaGraphDef'MetaInfoDef)
-> Lens
     MetaGraphDef'MetaInfoDef
     MetaGraphDef'MetaInfoDef
     (Maybe Any)
     (Maybe Any)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           MetaGraphDef'MetaInfoDef -> Maybe Any
_MetaGraphDef'MetaInfoDef'anyInfo
           (\ x__ :: MetaGraphDef'MetaInfoDef
x__ y__ :: Maybe Any
y__ -> MetaGraphDef'MetaInfoDef
x__ {_MetaGraphDef'MetaInfoDef'anyInfo :: Maybe Any
_MetaGraphDef'MetaInfoDef'anyInfo = Maybe Any
y__}))
        (Any -> Lens' (Maybe Any) Any
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Any
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField MetaGraphDef'MetaInfoDef "maybe'anyInfo" (Prelude.Maybe Proto.Google.Protobuf.Any.Any) where
  fieldOf :: Proxy# "maybe'anyInfo"
-> (Maybe Any -> f (Maybe Any))
-> MetaGraphDef'MetaInfoDef
-> f MetaGraphDef'MetaInfoDef
fieldOf _
    = ((Maybe Any -> f (Maybe Any))
 -> MetaGraphDef'MetaInfoDef -> f MetaGraphDef'MetaInfoDef)
-> ((Maybe Any -> f (Maybe Any)) -> Maybe Any -> f (Maybe Any))
-> (Maybe Any -> f (Maybe Any))
-> MetaGraphDef'MetaInfoDef
-> f MetaGraphDef'MetaInfoDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((MetaGraphDef'MetaInfoDef -> Maybe Any)
-> (MetaGraphDef'MetaInfoDef
    -> Maybe Any -> MetaGraphDef'MetaInfoDef)
-> Lens
     MetaGraphDef'MetaInfoDef
     MetaGraphDef'MetaInfoDef
     (Maybe Any)
     (Maybe Any)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           MetaGraphDef'MetaInfoDef -> Maybe Any
_MetaGraphDef'MetaInfoDef'anyInfo
           (\ x__ :: MetaGraphDef'MetaInfoDef
x__ y__ :: Maybe Any
y__ -> MetaGraphDef'MetaInfoDef
x__ {_MetaGraphDef'MetaInfoDef'anyInfo :: Maybe Any
_MetaGraphDef'MetaInfoDef'anyInfo = Maybe Any
y__}))
        (Maybe Any -> f (Maybe Any)) -> Maybe Any -> f (Maybe Any)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField MetaGraphDef'MetaInfoDef "tags" [Data.Text.Text] where
  fieldOf :: Proxy# "tags"
-> ([Text] -> f [Text])
-> MetaGraphDef'MetaInfoDef
-> f MetaGraphDef'MetaInfoDef
fieldOf _
    = ((Vector Text -> f (Vector Text))
 -> MetaGraphDef'MetaInfoDef -> f MetaGraphDef'MetaInfoDef)
-> (([Text] -> f [Text]) -> Vector Text -> f (Vector Text))
-> ([Text] -> f [Text])
-> MetaGraphDef'MetaInfoDef
-> f MetaGraphDef'MetaInfoDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((MetaGraphDef'MetaInfoDef -> Vector Text)
-> (MetaGraphDef'MetaInfoDef
    -> Vector Text -> MetaGraphDef'MetaInfoDef)
-> Lens
     MetaGraphDef'MetaInfoDef
     MetaGraphDef'MetaInfoDef
     (Vector Text)
     (Vector Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           MetaGraphDef'MetaInfoDef -> Vector Text
_MetaGraphDef'MetaInfoDef'tags
           (\ x__ :: MetaGraphDef'MetaInfoDef
x__ y__ :: Vector Text
y__ -> MetaGraphDef'MetaInfoDef
x__ {_MetaGraphDef'MetaInfoDef'tags :: Vector Text
_MetaGraphDef'MetaInfoDef'tags = Vector Text
y__}))
        ((Vector Text -> [Text])
-> (Vector Text -> [Text] -> Vector Text)
-> Lens (Vector Text) (Vector Text) [Text] [Text]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Text -> [Text]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ _ y__ :: [Text]
y__ -> [Text] -> Vector Text
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Text]
y__))
instance Data.ProtoLens.Field.HasField MetaGraphDef'MetaInfoDef "vec'tags" (Data.Vector.Vector Data.Text.Text) where
  fieldOf :: Proxy# "vec'tags"
-> (Vector Text -> f (Vector Text))
-> MetaGraphDef'MetaInfoDef
-> f MetaGraphDef'MetaInfoDef
fieldOf _
    = ((Vector Text -> f (Vector Text))
 -> MetaGraphDef'MetaInfoDef -> f MetaGraphDef'MetaInfoDef)
-> ((Vector Text -> f (Vector Text))
    -> Vector Text -> f (Vector Text))
-> (Vector Text -> f (Vector Text))
-> MetaGraphDef'MetaInfoDef
-> f MetaGraphDef'MetaInfoDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((MetaGraphDef'MetaInfoDef -> Vector Text)
-> (MetaGraphDef'MetaInfoDef
    -> Vector Text -> MetaGraphDef'MetaInfoDef)
-> Lens
     MetaGraphDef'MetaInfoDef
     MetaGraphDef'MetaInfoDef
     (Vector Text)
     (Vector Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           MetaGraphDef'MetaInfoDef -> Vector Text
_MetaGraphDef'MetaInfoDef'tags
           (\ x__ :: MetaGraphDef'MetaInfoDef
x__ y__ :: Vector Text
y__ -> MetaGraphDef'MetaInfoDef
x__ {_MetaGraphDef'MetaInfoDef'tags :: Vector Text
_MetaGraphDef'MetaInfoDef'tags = Vector Text
y__}))
        (Vector Text -> f (Vector Text)) -> Vector Text -> f (Vector Text)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField MetaGraphDef'MetaInfoDef "tensorflowVersion" Data.Text.Text where
  fieldOf :: Proxy# "tensorflowVersion"
-> (Text -> f Text)
-> MetaGraphDef'MetaInfoDef
-> f MetaGraphDef'MetaInfoDef
fieldOf _
    = ((Text -> f Text)
 -> MetaGraphDef'MetaInfoDef -> f MetaGraphDef'MetaInfoDef)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> MetaGraphDef'MetaInfoDef
-> f MetaGraphDef'MetaInfoDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((MetaGraphDef'MetaInfoDef -> Text)
-> (MetaGraphDef'MetaInfoDef -> Text -> MetaGraphDef'MetaInfoDef)
-> Lens MetaGraphDef'MetaInfoDef MetaGraphDef'MetaInfoDef Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           MetaGraphDef'MetaInfoDef -> Text
_MetaGraphDef'MetaInfoDef'tensorflowVersion
           (\ x__ :: MetaGraphDef'MetaInfoDef
x__ y__ :: Text
y__
              -> MetaGraphDef'MetaInfoDef
x__ {_MetaGraphDef'MetaInfoDef'tensorflowVersion :: Text
_MetaGraphDef'MetaInfoDef'tensorflowVersion = Text
y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField MetaGraphDef'MetaInfoDef "tensorflowGitVersion" Data.Text.Text where
  fieldOf :: Proxy# "tensorflowGitVersion"
-> (Text -> f Text)
-> MetaGraphDef'MetaInfoDef
-> f MetaGraphDef'MetaInfoDef
fieldOf _
    = ((Text -> f Text)
 -> MetaGraphDef'MetaInfoDef -> f MetaGraphDef'MetaInfoDef)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> MetaGraphDef'MetaInfoDef
-> f MetaGraphDef'MetaInfoDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((MetaGraphDef'MetaInfoDef -> Text)
-> (MetaGraphDef'MetaInfoDef -> Text -> MetaGraphDef'MetaInfoDef)
-> Lens MetaGraphDef'MetaInfoDef MetaGraphDef'MetaInfoDef Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           MetaGraphDef'MetaInfoDef -> Text
_MetaGraphDef'MetaInfoDef'tensorflowGitVersion
           (\ x__ :: MetaGraphDef'MetaInfoDef
x__ y__ :: Text
y__
              -> MetaGraphDef'MetaInfoDef
x__ {_MetaGraphDef'MetaInfoDef'tensorflowGitVersion :: Text
_MetaGraphDef'MetaInfoDef'tensorflowGitVersion = Text
y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField MetaGraphDef'MetaInfoDef "strippedDefaultAttrs" Prelude.Bool where
  fieldOf :: Proxy# "strippedDefaultAttrs"
-> (Bool -> f Bool)
-> MetaGraphDef'MetaInfoDef
-> f MetaGraphDef'MetaInfoDef
fieldOf _
    = ((Bool -> f Bool)
 -> MetaGraphDef'MetaInfoDef -> f MetaGraphDef'MetaInfoDef)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> MetaGraphDef'MetaInfoDef
-> f MetaGraphDef'MetaInfoDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((MetaGraphDef'MetaInfoDef -> Bool)
-> (MetaGraphDef'MetaInfoDef -> Bool -> MetaGraphDef'MetaInfoDef)
-> Lens MetaGraphDef'MetaInfoDef MetaGraphDef'MetaInfoDef Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           MetaGraphDef'MetaInfoDef -> Bool
_MetaGraphDef'MetaInfoDef'strippedDefaultAttrs
           (\ x__ :: MetaGraphDef'MetaInfoDef
x__ y__ :: Bool
y__
              -> MetaGraphDef'MetaInfoDef
x__ {_MetaGraphDef'MetaInfoDef'strippedDefaultAttrs :: Bool
_MetaGraphDef'MetaInfoDef'strippedDefaultAttrs = Bool
y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField MetaGraphDef'MetaInfoDef "functionAliases" (Data.Map.Map Data.Text.Text Data.Text.Text) where
  fieldOf :: Proxy# "functionAliases"
-> (Map Text Text -> f (Map Text Text))
-> MetaGraphDef'MetaInfoDef
-> f MetaGraphDef'MetaInfoDef
fieldOf _
    = ((Map Text Text -> f (Map Text Text))
 -> MetaGraphDef'MetaInfoDef -> f MetaGraphDef'MetaInfoDef)
-> ((Map Text Text -> f (Map Text Text))
    -> Map Text Text -> f (Map Text Text))
-> (Map Text Text -> f (Map Text Text))
-> MetaGraphDef'MetaInfoDef
-> f MetaGraphDef'MetaInfoDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((MetaGraphDef'MetaInfoDef -> Map Text Text)
-> (MetaGraphDef'MetaInfoDef
    -> Map Text Text -> MetaGraphDef'MetaInfoDef)
-> Lens
     MetaGraphDef'MetaInfoDef
     MetaGraphDef'MetaInfoDef
     (Map Text Text)
     (Map Text Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           MetaGraphDef'MetaInfoDef -> Map Text Text
_MetaGraphDef'MetaInfoDef'functionAliases
           (\ x__ :: MetaGraphDef'MetaInfoDef
x__ y__ :: Map Text Text
y__
              -> MetaGraphDef'MetaInfoDef
x__ {_MetaGraphDef'MetaInfoDef'functionAliases :: Map Text Text
_MetaGraphDef'MetaInfoDef'functionAliases = Map Text Text
y__}))
        (Map Text Text -> f (Map Text Text))
-> Map Text Text -> f (Map Text Text)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message MetaGraphDef'MetaInfoDef where
  messageName :: Proxy MetaGraphDef'MetaInfoDef -> Text
messageName _
    = String -> Text
Data.Text.pack "tensorflow.MetaGraphDef.MetaInfoDef"
  packedMessageDescriptor :: Proxy MetaGraphDef'MetaInfoDef -> ByteString
packedMessageDescriptor _
    = "\n\
      \\vMetaInfoDef\DC2,\n\
      \\DC2meta_graph_version\CAN\SOH \SOH(\tR\DLEmetaGraphVersion\DC2<\n\
      \\DLEstripped_op_list\CAN\STX \SOH(\v2\DC2.tensorflow.OpListR\SOstrippedOpList\DC2/\n\
      \\bany_info\CAN\ETX \SOH(\v2\DC4.google.protobuf.AnyR\aanyInfo\DC2\DC2\n\
      \\EOTtags\CAN\EOT \ETX(\tR\EOTtags\DC2-\n\
      \\DC2tensorflow_version\CAN\ENQ \SOH(\tR\DC1tensorflowVersion\DC24\n\
      \\SYNtensorflow_git_version\CAN\ACK \SOH(\tR\DC4tensorflowGitVersion\DC24\n\
      \\SYNstripped_default_attrs\CAN\a \SOH(\bR\DC4strippedDefaultAttrs\DC2d\n\
      \\DLEfunction_aliases\CAN\b \ETX(\v29.tensorflow.MetaGraphDef.MetaInfoDef.FunctionAliasesEntryR\SIfunctionAliases\SUBB\n\
      \\DC4FunctionAliasesEntry\DC2\DLE\n\
      \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2\DC4\n\
      \\ENQvalue\CAN\STX \SOH(\tR\ENQvalue:\STX8\SOH"
  packedFileDescriptor :: Proxy MetaGraphDef'MetaInfoDef -> ByteString
packedFileDescriptor _ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor MetaGraphDef'MetaInfoDef)
fieldsByTag
    = let
        metaGraphVersion__field_descriptor :: FieldDescriptor MetaGraphDef'MetaInfoDef
metaGraphVersion__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor MetaGraphDef'MetaInfoDef Text
-> FieldDescriptor MetaGraphDef'MetaInfoDef
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "meta_graph_version"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens MetaGraphDef'MetaInfoDef MetaGraphDef'MetaInfoDef Text Text
-> FieldAccessor MetaGraphDef'MetaInfoDef Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "metaGraphVersion" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"metaGraphVersion")) ::
              Data.ProtoLens.FieldDescriptor MetaGraphDef'MetaInfoDef
        strippedOpList__field_descriptor :: FieldDescriptor MetaGraphDef'MetaInfoDef
strippedOpList__field_descriptor
          = String
-> FieldTypeDescriptor OpList
-> FieldAccessor MetaGraphDef'MetaInfoDef OpList
-> FieldDescriptor MetaGraphDef'MetaInfoDef
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "stripped_op_list"
              (MessageOrGroup -> FieldTypeDescriptor OpList
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Tensorflow.Core.Framework.OpDef.OpList)
              (Lens
  MetaGraphDef'MetaInfoDef
  MetaGraphDef'MetaInfoDef
  (Maybe OpList)
  (Maybe OpList)
-> FieldAccessor MetaGraphDef'MetaInfoDef OpList
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall s a (f :: * -> *).
(HasField s "maybe'strippedOpList" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'strippedOpList")) ::
              Data.ProtoLens.FieldDescriptor MetaGraphDef'MetaInfoDef
        anyInfo__field_descriptor :: FieldDescriptor MetaGraphDef'MetaInfoDef
anyInfo__field_descriptor
          = String
-> FieldTypeDescriptor Any
-> FieldAccessor MetaGraphDef'MetaInfoDef Any
-> FieldDescriptor MetaGraphDef'MetaInfoDef
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "any_info"
              (MessageOrGroup -> FieldTypeDescriptor Any
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Any.Any)
              (Lens
  MetaGraphDef'MetaInfoDef
  MetaGraphDef'MetaInfoDef
  (Maybe Any)
  (Maybe Any)
-> FieldAccessor MetaGraphDef'MetaInfoDef Any
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall s a (f :: * -> *).
(HasField s "maybe'anyInfo" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'anyInfo")) ::
              Data.ProtoLens.FieldDescriptor MetaGraphDef'MetaInfoDef
        tags__field_descriptor :: FieldDescriptor MetaGraphDef'MetaInfoDef
tags__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor MetaGraphDef'MetaInfoDef Text
-> FieldDescriptor MetaGraphDef'MetaInfoDef
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "tags"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (Packing
-> Lens' MetaGraphDef'MetaInfoDef [Text]
-> FieldAccessor MetaGraphDef'MetaInfoDef Text
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Unpacked (forall s a (f :: * -> *).
(HasField s "tags" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"tags")) ::
              Data.ProtoLens.FieldDescriptor MetaGraphDef'MetaInfoDef
        tensorflowVersion__field_descriptor :: FieldDescriptor MetaGraphDef'MetaInfoDef
tensorflowVersion__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor MetaGraphDef'MetaInfoDef Text
-> FieldDescriptor MetaGraphDef'MetaInfoDef
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "tensorflow_version"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens MetaGraphDef'MetaInfoDef MetaGraphDef'MetaInfoDef Text Text
-> FieldAccessor MetaGraphDef'MetaInfoDef Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "tensorflowVersion" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"tensorflowVersion")) ::
              Data.ProtoLens.FieldDescriptor MetaGraphDef'MetaInfoDef
        tensorflowGitVersion__field_descriptor :: FieldDescriptor MetaGraphDef'MetaInfoDef
tensorflowGitVersion__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor MetaGraphDef'MetaInfoDef Text
-> FieldDescriptor MetaGraphDef'MetaInfoDef
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "tensorflow_git_version"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens MetaGraphDef'MetaInfoDef MetaGraphDef'MetaInfoDef Text Text
-> FieldAccessor MetaGraphDef'MetaInfoDef Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "tensorflowGitVersion" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"tensorflowGitVersion")) ::
              Data.ProtoLens.FieldDescriptor MetaGraphDef'MetaInfoDef
        strippedDefaultAttrs__field_descriptor :: FieldDescriptor MetaGraphDef'MetaInfoDef
strippedDefaultAttrs__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor MetaGraphDef'MetaInfoDef Bool
-> FieldDescriptor MetaGraphDef'MetaInfoDef
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "stripped_default_attrs"
              (ScalarField Bool -> FieldTypeDescriptor Bool
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Bool
Data.ProtoLens.BoolField ::
                 Data.ProtoLens.FieldTypeDescriptor Prelude.Bool)
              (WireDefault Bool
-> Lens MetaGraphDef'MetaInfoDef MetaGraphDef'MetaInfoDef Bool Bool
-> FieldAccessor MetaGraphDef'MetaInfoDef Bool
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Bool
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "strippedDefaultAttrs" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"strippedDefaultAttrs")) ::
              Data.ProtoLens.FieldDescriptor MetaGraphDef'MetaInfoDef
        functionAliases__field_descriptor :: FieldDescriptor MetaGraphDef'MetaInfoDef
functionAliases__field_descriptor
          = String
-> FieldTypeDescriptor
     MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> FieldAccessor
     MetaGraphDef'MetaInfoDef
     MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> FieldDescriptor MetaGraphDef'MetaInfoDef
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "function_aliases"
              (MessageOrGroup
-> FieldTypeDescriptor
     MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor MetaGraphDef'MetaInfoDef'FunctionAliasesEntry)
              (Lens' MetaGraphDef'MetaInfoDef'FunctionAliasesEntry Text
-> Lens' MetaGraphDef'MetaInfoDef'FunctionAliasesEntry Text
-> Lens
     MetaGraphDef'MetaInfoDef
     MetaGraphDef'MetaInfoDef
     (Map Text Text)
     (Map Text Text)
-> FieldAccessor
     MetaGraphDef'MetaInfoDef
     MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
forall key value value1 msg.
(Ord key, Message value) =>
Lens' value key
-> Lens' value value1
-> Lens' msg (Map key value1)
-> FieldAccessor msg value
Data.ProtoLens.MapField
                 (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key")
                 (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value")
                 (forall s a (f :: * -> *).
(HasField s "functionAliases" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"functionAliases")) ::
              Data.ProtoLens.FieldDescriptor MetaGraphDef'MetaInfoDef
      in
        [(Tag, FieldDescriptor MetaGraphDef'MetaInfoDef)]
-> Map Tag (FieldDescriptor MetaGraphDef'MetaInfoDef)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag 1, FieldDescriptor MetaGraphDef'MetaInfoDef
metaGraphVersion__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 2, FieldDescriptor MetaGraphDef'MetaInfoDef
strippedOpList__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 3, FieldDescriptor MetaGraphDef'MetaInfoDef
anyInfo__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 4, FieldDescriptor MetaGraphDef'MetaInfoDef
tags__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 5, FieldDescriptor MetaGraphDef'MetaInfoDef
tensorflowVersion__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 6, FieldDescriptor MetaGraphDef'MetaInfoDef
tensorflowGitVersion__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 7, FieldDescriptor MetaGraphDef'MetaInfoDef
strippedDefaultAttrs__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 8, FieldDescriptor MetaGraphDef'MetaInfoDef
functionAliases__field_descriptor)]
  unknownFields :: LensLike' f MetaGraphDef'MetaInfoDef FieldSet
unknownFields
    = (MetaGraphDef'MetaInfoDef -> FieldSet)
-> (MetaGraphDef'MetaInfoDef
    -> FieldSet -> MetaGraphDef'MetaInfoDef)
-> Lens' MetaGraphDef'MetaInfoDef FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        MetaGraphDef'MetaInfoDef -> FieldSet
_MetaGraphDef'MetaInfoDef'_unknownFields
        (\ x__ :: MetaGraphDef'MetaInfoDef
x__ y__ :: FieldSet
y__ -> MetaGraphDef'MetaInfoDef
x__ {_MetaGraphDef'MetaInfoDef'_unknownFields :: FieldSet
_MetaGraphDef'MetaInfoDef'_unknownFields = FieldSet
y__})
  defMessage :: MetaGraphDef'MetaInfoDef
defMessage
    = $WMetaGraphDef'MetaInfoDef'_constructor :: Text
-> Maybe OpList
-> Maybe Any
-> Vector Text
-> Text
-> Text
-> Bool
-> Map Text Text
-> FieldSet
-> MetaGraphDef'MetaInfoDef
MetaGraphDef'MetaInfoDef'_constructor
        {_MetaGraphDef'MetaInfoDef'metaGraphVersion :: Text
_MetaGraphDef'MetaInfoDef'metaGraphVersion = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _MetaGraphDef'MetaInfoDef'strippedOpList :: Maybe OpList
_MetaGraphDef'MetaInfoDef'strippedOpList = Maybe OpList
forall a. Maybe a
Prelude.Nothing,
         _MetaGraphDef'MetaInfoDef'anyInfo :: Maybe Any
_MetaGraphDef'MetaInfoDef'anyInfo = Maybe Any
forall a. Maybe a
Prelude.Nothing,
         _MetaGraphDef'MetaInfoDef'tags :: Vector Text
_MetaGraphDef'MetaInfoDef'tags = Vector Text
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _MetaGraphDef'MetaInfoDef'tensorflowVersion :: Text
_MetaGraphDef'MetaInfoDef'tensorflowVersion = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _MetaGraphDef'MetaInfoDef'tensorflowGitVersion :: Text
_MetaGraphDef'MetaInfoDef'tensorflowGitVersion = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _MetaGraphDef'MetaInfoDef'strippedDefaultAttrs :: Bool
_MetaGraphDef'MetaInfoDef'strippedDefaultAttrs = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _MetaGraphDef'MetaInfoDef'functionAliases :: Map Text Text
_MetaGraphDef'MetaInfoDef'functionAliases = Map Text Text
forall k a. Map k a
Data.Map.empty,
         _MetaGraphDef'MetaInfoDef'_unknownFields :: FieldSet
_MetaGraphDef'MetaInfoDef'_unknownFields = []}
  parseMessage :: Parser MetaGraphDef'MetaInfoDef
parseMessage
    = let
        loop ::
          MetaGraphDef'MetaInfoDef
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text
             -> Data.ProtoLens.Encoding.Bytes.Parser MetaGraphDef'MetaInfoDef
        loop :: MetaGraphDef'MetaInfoDef
-> Growing Vector RealWorld Text -> Parser MetaGraphDef'MetaInfoDef
loop x :: MetaGraphDef'MetaInfoDef
x mutable'tags :: Growing Vector RealWorld Text
mutable'tags
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do Vector Text
frozen'tags <- IO (Vector Text) -> Parser (Vector Text)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) Text -> IO (Vector Text)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> m (v a)
Data.ProtoLens.Encoding.Growing.unsafeFreeze Growing Vector RealWorld Text
Growing Vector (PrimState IO) Text
mutable'tags)
                      (let missing :: [a]
missing = []
                       in
                         if [Any] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
                             () -> Parser ()
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
                         else
                             String -> Parser ()
forall (m :: * -> *) a. MonadFail m => String -> m a
Prelude.fail
                               (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
                                  "Missing required fields: "
                                  ([String] -> String
forall a. Show a => a -> String
Prelude.show ([String]
forall a. [a]
missing :: [Prelude.String]))))
                      MetaGraphDef'MetaInfoDef -> Parser MetaGraphDef'MetaInfoDef
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter
  MetaGraphDef'MetaInfoDef MetaGraphDef'MetaInfoDef FieldSet FieldSet
-> (FieldSet -> FieldSet)
-> MetaGraphDef'MetaInfoDef
-> MetaGraphDef'MetaInfoDef
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                           forall msg. Message msg => Lens' msg FieldSet
Setter
  MetaGraphDef'MetaInfoDef MetaGraphDef'MetaInfoDef FieldSet FieldSet
Data.ProtoLens.unknownFields
                           (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t)
                           (Setter
  MetaGraphDef'MetaInfoDef
  MetaGraphDef'MetaInfoDef
  (Vector Text)
  (Vector Text)
-> Vector Text
-> MetaGraphDef'MetaInfoDef
-> MetaGraphDef'MetaInfoDef
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                              (forall s a (f :: * -> *).
(HasField s "vec'tags" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'tags") Vector Text
frozen'tags MetaGraphDef'MetaInfoDef
x))
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        10
                          -> do Text
y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do ByteString
value <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                       Int -> Parser ByteString
Data.ProtoLens.Encoding.Bytes.getBytes
                                                         (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
                                           Either String Text -> Parser Text
forall a. Either String a -> Parser a
Data.ProtoLens.Encoding.Bytes.runEither
                                             (case ByteString -> Either UnicodeException Text
Data.Text.Encoding.decodeUtf8' ByteString
value of
                                                (Prelude.Left err :: UnicodeException
err)
                                                  -> String -> Either String Text
forall a b. a -> Either a b
Prelude.Left (UnicodeException -> String
forall a. Show a => a -> String
Prelude.show UnicodeException
err)
                                                (Prelude.Right r :: Text
r) -> Text -> Either String Text
forall a b. b -> Either a b
Prelude.Right Text
r))
                                       "meta_graph_version"
                                MetaGraphDef'MetaInfoDef
-> Growing Vector RealWorld Text -> Parser MetaGraphDef'MetaInfoDef
loop
                                  (Setter MetaGraphDef'MetaInfoDef MetaGraphDef'MetaInfoDef Text Text
-> Text -> MetaGraphDef'MetaInfoDef -> MetaGraphDef'MetaInfoDef
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "metaGraphVersion" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"metaGraphVersion") Text
y MetaGraphDef'MetaInfoDef
x)
                                  Growing Vector RealWorld Text
mutable'tags
                        18
                          -> do OpList
y <- Parser OpList -> String -> Parser OpList
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser OpList -> Parser OpList
forall a. Int -> Parser a -> Parser a
Data.ProtoLens.Encoding.Bytes.isolate
                                             (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len) Parser OpList
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       "stripped_op_list"
                                MetaGraphDef'MetaInfoDef
-> Growing Vector RealWorld Text -> Parser MetaGraphDef'MetaInfoDef
loop
                                  (Setter
  MetaGraphDef'MetaInfoDef MetaGraphDef'MetaInfoDef OpList OpList
-> OpList -> MetaGraphDef'MetaInfoDef -> MetaGraphDef'MetaInfoDef
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "strippedOpList" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"strippedOpList") OpList
y MetaGraphDef'MetaInfoDef
x)
                                  Growing Vector RealWorld Text
mutable'tags
                        26
                          -> do Any
y <- Parser Any -> String -> Parser Any
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser Any -> Parser Any
forall a. Int -> Parser a -> Parser a
Data.ProtoLens.Encoding.Bytes.isolate
                                             (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len) Parser Any
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       "any_info"
                                MetaGraphDef'MetaInfoDef
-> Growing Vector RealWorld Text -> Parser MetaGraphDef'MetaInfoDef
loop
                                  (Setter MetaGraphDef'MetaInfoDef MetaGraphDef'MetaInfoDef Any Any
-> Any -> MetaGraphDef'MetaInfoDef -> MetaGraphDef'MetaInfoDef
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "anyInfo" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"anyInfo") Any
y MetaGraphDef'MetaInfoDef
x)
                                  Growing Vector RealWorld Text
mutable'tags
                        34
                          -> do !Text
y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do ByteString
value <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                        Int -> Parser ByteString
Data.ProtoLens.Encoding.Bytes.getBytes
                                                          (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
                                            Either String Text -> Parser Text
forall a. Either String a -> Parser a
Data.ProtoLens.Encoding.Bytes.runEither
                                              (case ByteString -> Either UnicodeException Text
Data.Text.Encoding.decodeUtf8' ByteString
value of
                                                 (Prelude.Left err :: UnicodeException
err)
                                                   -> String -> Either String Text
forall a b. a -> Either a b
Prelude.Left (UnicodeException -> String
forall a. Show a => a -> String
Prelude.show UnicodeException
err)
                                                 (Prelude.Right r :: Text
r) -> Text -> Either String Text
forall a b. b -> Either a b
Prelude.Right Text
r))
                                        "tags"
                                Growing Vector RealWorld Text
v <- IO (Growing Vector RealWorld Text)
-> Parser (Growing Vector RealWorld Text)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) Text
-> Text -> IO (Growing Vector (PrimState IO) Text)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> a -> m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.append Growing Vector RealWorld Text
Growing Vector (PrimState IO) Text
mutable'tags Text
y)
                                MetaGraphDef'MetaInfoDef
-> Growing Vector RealWorld Text -> Parser MetaGraphDef'MetaInfoDef
loop MetaGraphDef'MetaInfoDef
x Growing Vector RealWorld Text
v
                        42
                          -> do Text
y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do ByteString
value <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                       Int -> Parser ByteString
Data.ProtoLens.Encoding.Bytes.getBytes
                                                         (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
                                           Either String Text -> Parser Text
forall a. Either String a -> Parser a
Data.ProtoLens.Encoding.Bytes.runEither
                                             (case ByteString -> Either UnicodeException Text
Data.Text.Encoding.decodeUtf8' ByteString
value of
                                                (Prelude.Left err :: UnicodeException
err)
                                                  -> String -> Either String Text
forall a b. a -> Either a b
Prelude.Left (UnicodeException -> String
forall a. Show a => a -> String
Prelude.show UnicodeException
err)
                                                (Prelude.Right r :: Text
r) -> Text -> Either String Text
forall a b. b -> Either a b
Prelude.Right Text
r))
                                       "tensorflow_version"
                                MetaGraphDef'MetaInfoDef
-> Growing Vector RealWorld Text -> Parser MetaGraphDef'MetaInfoDef
loop
                                  (Setter MetaGraphDef'MetaInfoDef MetaGraphDef'MetaInfoDef Text Text
-> Text -> MetaGraphDef'MetaInfoDef -> MetaGraphDef'MetaInfoDef
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "tensorflowVersion" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"tensorflowVersion") Text
y MetaGraphDef'MetaInfoDef
x)
                                  Growing Vector RealWorld Text
mutable'tags
                        50
                          -> do Text
y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do ByteString
value <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                       Int -> Parser ByteString
Data.ProtoLens.Encoding.Bytes.getBytes
                                                         (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
                                           Either String Text -> Parser Text
forall a. Either String a -> Parser a
Data.ProtoLens.Encoding.Bytes.runEither
                                             (case ByteString -> Either UnicodeException Text
Data.Text.Encoding.decodeUtf8' ByteString
value of
                                                (Prelude.Left err :: UnicodeException
err)
                                                  -> String -> Either String Text
forall a b. a -> Either a b
Prelude.Left (UnicodeException -> String
forall a. Show a => a -> String
Prelude.show UnicodeException
err)
                                                (Prelude.Right r :: Text
r) -> Text -> Either String Text
forall a b. b -> Either a b
Prelude.Right Text
r))
                                       "tensorflow_git_version"
                                MetaGraphDef'MetaInfoDef
-> Growing Vector RealWorld Text -> Parser MetaGraphDef'MetaInfoDef
loop
                                  (Setter MetaGraphDef'MetaInfoDef MetaGraphDef'MetaInfoDef Text Text
-> Text -> MetaGraphDef'MetaInfoDef -> MetaGraphDef'MetaInfoDef
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "tensorflowGitVersion" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"tensorflowGitVersion") Text
y MetaGraphDef'MetaInfoDef
x)
                                  Growing Vector RealWorld Text
mutable'tags
                        56
                          -> do Bool
y <- Parser Bool -> String -> Parser Bool
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Bool) -> Parser Word64 -> Parser Bool
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          (Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude./=) 0) Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       "stripped_default_attrs"
                                MetaGraphDef'MetaInfoDef
-> Growing Vector RealWorld Text -> Parser MetaGraphDef'MetaInfoDef
loop
                                  (Setter MetaGraphDef'MetaInfoDef MetaGraphDef'MetaInfoDef Bool Bool
-> Bool -> MetaGraphDef'MetaInfoDef -> MetaGraphDef'MetaInfoDef
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "strippedDefaultAttrs" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"strippedDefaultAttrs") Bool
y MetaGraphDef'MetaInfoDef
x)
                                  Growing Vector RealWorld Text
mutable'tags
                        66
                          -> do !(MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
entry :: MetaGraphDef'MetaInfoDef'FunctionAliasesEntry) <- Parser MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> String -> Parser MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                                                                               (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                                                                   Int
-> Parser MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> Parser MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
forall a. Int -> Parser a -> Parser a
Data.ProtoLens.Encoding.Bytes.isolate
                                                                                                     (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                                                        Word64
len)
                                                                                                     Parser MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                                                                               "function_aliases"
                                (let
                                   key :: Text
key = FoldLike
  Text
  MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
  MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
  Text
  Text
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key") MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
entry
                                   value :: Text
value
                                     = FoldLike
  Text
  MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
  MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
  Text
  Text
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value") MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
entry
                                 in
                                   MetaGraphDef'MetaInfoDef
-> Growing Vector RealWorld Text -> Parser MetaGraphDef'MetaInfoDef
loop
                                     (Setter
  MetaGraphDef'MetaInfoDef
  MetaGraphDef'MetaInfoDef
  (Map Text Text)
  (Map Text Text)
-> (Map Text Text -> Map Text Text)
-> MetaGraphDef'MetaInfoDef
-> MetaGraphDef'MetaInfoDef
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                        (forall s a (f :: * -> *).
(HasField s "functionAliases" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"functionAliases")
                                        (\ !Map Text Text
t -> Text -> Text -> Map Text Text -> Map Text Text
forall k a. Ord k => k -> a -> Map k a -> Map k a
Data.Map.insert Text
key Text
value Map Text Text
t)
                                        MetaGraphDef'MetaInfoDef
x)
                                     Growing Vector RealWorld Text
mutable'tags)
                        wire :: Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                MetaGraphDef'MetaInfoDef
-> Growing Vector RealWorld Text -> Parser MetaGraphDef'MetaInfoDef
loop
                                  (Setter
  MetaGraphDef'MetaInfoDef MetaGraphDef'MetaInfoDef FieldSet FieldSet
-> (FieldSet -> FieldSet)
-> MetaGraphDef'MetaInfoDef
-> MetaGraphDef'MetaInfoDef
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                     forall msg. Message msg => Lens' msg FieldSet
Setter
  MetaGraphDef'MetaInfoDef MetaGraphDef'MetaInfoDef FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) MetaGraphDef'MetaInfoDef
x)
                                  Growing Vector RealWorld Text
mutable'tags
      in
        Parser MetaGraphDef'MetaInfoDef
-> String -> Parser MetaGraphDef'MetaInfoDef
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do Growing Vector RealWorld Text
mutable'tags <- IO (Growing Vector RealWorld Text)
-> Parser (Growing Vector RealWorld Text)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                IO (Growing Vector RealWorld Text)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              MetaGraphDef'MetaInfoDef
-> Growing Vector RealWorld Text -> Parser MetaGraphDef'MetaInfoDef
loop MetaGraphDef'MetaInfoDef
forall msg. Message msg => msg
Data.ProtoLens.defMessage Growing Vector RealWorld Text
mutable'tags)
          "MetaInfoDef"
  buildMessage :: MetaGraphDef'MetaInfoDef -> Builder
buildMessage
    = \ _x :: MetaGraphDef'MetaInfoDef
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v
                  = FoldLike
  Text MetaGraphDef'MetaInfoDef MetaGraphDef'MetaInfoDef Text Text
-> MetaGraphDef'MetaInfoDef -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                      (forall s a (f :: * -> *).
(HasField s "metaGraphVersion" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"metaGraphVersion") MetaGraphDef'MetaInfoDef
_x
              in
                if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                    Builder
forall a. Monoid a => a
Data.Monoid.mempty
                else
                    Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 10)
                      ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                         (\ bs :: ByteString
bs
                            -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                 (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                    (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                 (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                         Text -> ByteString
Data.Text.Encoding.encodeUtf8
                         Text
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (case
                     FoldLike
  (Maybe OpList)
  MetaGraphDef'MetaInfoDef
  MetaGraphDef'MetaInfoDef
  (Maybe OpList)
  (Maybe OpList)
-> MetaGraphDef'MetaInfoDef -> Maybe OpList
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                       (forall s a (f :: * -> *).
(HasField s "maybe'strippedOpList" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'strippedOpList") MetaGraphDef'MetaInfoDef
_x
                 of
                   Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just _v :: OpList
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 18)
                          ((ByteString -> Builder)
-> (OpList -> ByteString) -> OpList -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ bs :: ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             OpList -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                             OpList
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (case
                        FoldLike
  (Maybe Any)
  MetaGraphDef'MetaInfoDef
  MetaGraphDef'MetaInfoDef
  (Maybe Any)
  (Maybe Any)
-> MetaGraphDef'MetaInfoDef -> Maybe Any
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "maybe'anyInfo" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'anyInfo") MetaGraphDef'MetaInfoDef
_x
                    of
                      Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      (Prelude.Just _v :: Any
_v)
                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 26)
                             ((ByteString -> Builder) -> (Any -> ByteString) -> Any -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                (\ bs :: ByteString
bs
                                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                           (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                        (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                Any -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                Any
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      ((Text -> Builder) -> Vector Text -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                         (\ _v :: Text
_v
                            -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                 (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 34)
                                 ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                    (\ bs :: ByteString
bs
                                       -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                               (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                            (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                    Text -> ByteString
Data.Text.Encoding.encodeUtf8
                                    Text
_v))
                         (FoldLike
  (Vector Text)
  MetaGraphDef'MetaInfoDef
  MetaGraphDef'MetaInfoDef
  (Vector Text)
  (Vector Text)
-> MetaGraphDef'MetaInfoDef -> Vector Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "vec'tags" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'tags") MetaGraphDef'MetaInfoDef
_x))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (let
                            _v :: Text
_v
                              = FoldLike
  Text MetaGraphDef'MetaInfoDef MetaGraphDef'MetaInfoDef Text Text
-> MetaGraphDef'MetaInfoDef -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                  (forall s a (f :: * -> *).
(HasField s "tensorflowVersion" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"tensorflowVersion") MetaGraphDef'MetaInfoDef
_x
                          in
                            if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            else
                                Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 42)
                                  ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                     (\ bs :: ByteString
bs
                                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                             (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                     Text -> ByteString
Data.Text.Encoding.encodeUtf8
                                     Text
_v))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (let
                               _v :: Text
_v
                                 = FoldLike
  Text MetaGraphDef'MetaInfoDef MetaGraphDef'MetaInfoDef Text Text
-> MetaGraphDef'MetaInfoDef -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                     (forall s a (f :: * -> *).
(HasField s "tensorflowGitVersion" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"tensorflowGitVersion") MetaGraphDef'MetaInfoDef
_x
                             in
                               if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                   Builder
forall a. Monoid a => a
Data.Monoid.mempty
                               else
                                   Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 50)
                                     ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                        (\ bs :: ByteString
bs
                                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                   (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                      (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                        Text -> ByteString
Data.Text.Encoding.encodeUtf8
                                        Text
_v))
                            (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (let
                                  _v :: Bool
_v
                                    = FoldLike
  Bool MetaGraphDef'MetaInfoDef MetaGraphDef'MetaInfoDef Bool Bool
-> MetaGraphDef'MetaInfoDef -> Bool
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                        (forall s a (f :: * -> *).
(HasField s "strippedDefaultAttrs" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"strippedDefaultAttrs") MetaGraphDef'MetaInfoDef
_x
                                in
                                  if Bool -> Bool -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Bool
_v Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                      Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                  else
                                      Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 56)
                                        ((Word64 -> Builder) -> (Bool -> Word64) -> Bool -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                           Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                           (\ b :: Bool
b -> if Bool
b then 1 else 0)
                                           Bool
_v))
                               (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  ([Builder] -> Builder
forall a. Monoid a => [a] -> a
Data.Monoid.mconcat
                                     (((Text, Text) -> Builder) -> [(Text, Text)] -> [Builder]
forall a b. (a -> b) -> [a] -> [b]
Prelude.map
                                        (\ _v :: (Text, Text)
_v
                                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 66)
                                                ((ByteString -> Builder)
-> (MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> ByteString)
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                   (\ bs :: ByteString
bs
                                                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                              (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                 (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                           (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                              ByteString
bs))
                                                   MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                                   (Setter
  MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
  MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
  Text
  Text
-> Text
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                                      (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key")
                                                      ((Text, Text) -> Text
forall a b. (a, b) -> a
Prelude.fst (Text, Text)
_v)
                                                      (Setter
  MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
  MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
  Text
  Text
-> Text
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                                         (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value")
                                                         ((Text, Text) -> Text
forall a b. (a, b) -> b
Prelude.snd (Text, Text)
_v)
                                                         (MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage ::
                                                            MetaGraphDef'MetaInfoDef'FunctionAliasesEntry)))))
                                        (Map Text Text -> [(Text, Text)]
forall k a. Map k a -> [(k, a)]
Data.Map.toList
                                           (FoldLike
  (Map Text Text)
  MetaGraphDef'MetaInfoDef
  MetaGraphDef'MetaInfoDef
  (Map Text Text)
  (Map Text Text)
-> MetaGraphDef'MetaInfoDef -> Map Text Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                              (forall s a (f :: * -> *).
(HasField s "functionAliases" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"functionAliases") MetaGraphDef'MetaInfoDef
_x))))
                                  (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                     (FoldLike
  FieldSet
  MetaGraphDef'MetaInfoDef
  MetaGraphDef'MetaInfoDef
  FieldSet
  FieldSet
-> MetaGraphDef'MetaInfoDef -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  MetaGraphDef'MetaInfoDef
  MetaGraphDef'MetaInfoDef
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields MetaGraphDef'MetaInfoDef
_x)))))))))
instance Control.DeepSeq.NFData MetaGraphDef'MetaInfoDef where
  rnf :: MetaGraphDef'MetaInfoDef -> ()
rnf
    = \ x__ :: MetaGraphDef'MetaInfoDef
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (MetaGraphDef'MetaInfoDef -> FieldSet
_MetaGraphDef'MetaInfoDef'_unknownFields MetaGraphDef'MetaInfoDef
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (MetaGraphDef'MetaInfoDef -> Text
_MetaGraphDef'MetaInfoDef'metaGraphVersion MetaGraphDef'MetaInfoDef
x__)
                (Maybe OpList -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (MetaGraphDef'MetaInfoDef -> Maybe OpList
_MetaGraphDef'MetaInfoDef'strippedOpList MetaGraphDef'MetaInfoDef
x__)
                   (Maybe Any -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (MetaGraphDef'MetaInfoDef -> Maybe Any
_MetaGraphDef'MetaInfoDef'anyInfo MetaGraphDef'MetaInfoDef
x__)
                      (Vector Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (MetaGraphDef'MetaInfoDef -> Vector Text
_MetaGraphDef'MetaInfoDef'tags MetaGraphDef'MetaInfoDef
x__)
                         (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (MetaGraphDef'MetaInfoDef -> Text
_MetaGraphDef'MetaInfoDef'tensorflowVersion MetaGraphDef'MetaInfoDef
x__)
                            (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (MetaGraphDef'MetaInfoDef -> Text
_MetaGraphDef'MetaInfoDef'tensorflowGitVersion MetaGraphDef'MetaInfoDef
x__)
                               (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (MetaGraphDef'MetaInfoDef -> Bool
_MetaGraphDef'MetaInfoDef'strippedDefaultAttrs MetaGraphDef'MetaInfoDef
x__)
                                  (Map Text Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                     (MetaGraphDef'MetaInfoDef -> Map Text Text
_MetaGraphDef'MetaInfoDef'functionAliases MetaGraphDef'MetaInfoDef
x__) ()))))))))
{- | Fields :
     
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.key' @:: Lens' MetaGraphDef'MetaInfoDef'FunctionAliasesEntry Data.Text.Text@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.value' @:: Lens' MetaGraphDef'MetaInfoDef'FunctionAliasesEntry Data.Text.Text@ -}
data MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
  = MetaGraphDef'MetaInfoDef'FunctionAliasesEntry'_constructor {MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> Text
_MetaGraphDef'MetaInfoDef'FunctionAliasesEntry'key :: !Data.Text.Text,
                                                                MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> Text
_MetaGraphDef'MetaInfoDef'FunctionAliasesEntry'value :: !Data.Text.Text,
                                                                MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> FieldSet
_MetaGraphDef'MetaInfoDef'FunctionAliasesEntry'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> Bool
(MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
 -> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> Bool)
-> (MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
    -> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> Bool)
-> Eq MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> Bool
$c/= :: MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> Bool
== :: MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> Bool
$c== :: MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> Bool
Prelude.Eq, Eq MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
Eq MetaGraphDef'MetaInfoDef'FunctionAliasesEntry =>
(MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
 -> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> Ordering)
-> (MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
    -> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> Bool)
-> (MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
    -> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> Bool)
-> (MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
    -> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> Bool)
-> (MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
    -> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> Bool)
-> (MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
    -> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
    -> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry)
-> (MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
    -> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
    -> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry)
-> Ord MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> Bool
MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> Ordering
MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
forall a.
Eq a =>
(a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
min :: MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
$cmin :: MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
max :: MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
$cmax :: MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
>= :: MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> Bool
$c>= :: MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> Bool
> :: MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> Bool
$c> :: MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> Bool
<= :: MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> Bool
$c<= :: MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> Bool
< :: MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> Bool
$c< :: MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> Bool
compare :: MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> Ordering
$ccompare :: MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> Ordering
$cp1Ord :: Eq MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
Prelude.Ord)
instance Prelude.Show MetaGraphDef'MetaInfoDef'FunctionAliasesEntry where
  showsPrec :: Int -> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> ShowS
showsPrec _ __x :: MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
__x __s :: String
__s
    = Char -> ShowS
Prelude.showChar
        '{'
        (String -> ShowS
Prelude.showString
           (MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
__x) (Char -> ShowS
Prelude.showChar '}' String
__s))
instance Data.ProtoLens.Field.HasField MetaGraphDef'MetaInfoDef'FunctionAliasesEntry "key" Data.Text.Text where
  fieldOf :: Proxy# "key"
-> (Text -> f Text)
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> f MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
fieldOf _
    = ((Text -> f Text)
 -> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
 -> f MetaGraphDef'MetaInfoDef'FunctionAliasesEntry)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> f MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> Text)
-> (MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
    -> Text -> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry)
-> Lens' MetaGraphDef'MetaInfoDef'FunctionAliasesEntry Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> Text
_MetaGraphDef'MetaInfoDef'FunctionAliasesEntry'key
           (\ x__ :: MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
x__ y__ :: Text
y__
              -> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
x__ {_MetaGraphDef'MetaInfoDef'FunctionAliasesEntry'key :: Text
_MetaGraphDef'MetaInfoDef'FunctionAliasesEntry'key = Text
y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField MetaGraphDef'MetaInfoDef'FunctionAliasesEntry "value" Data.Text.Text where
  fieldOf :: Proxy# "value"
-> (Text -> f Text)
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> f MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
fieldOf _
    = ((Text -> f Text)
 -> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
 -> f MetaGraphDef'MetaInfoDef'FunctionAliasesEntry)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> f MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> Text)
-> (MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
    -> Text -> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry)
-> Lens' MetaGraphDef'MetaInfoDef'FunctionAliasesEntry Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> Text
_MetaGraphDef'MetaInfoDef'FunctionAliasesEntry'value
           (\ x__ :: MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
x__ y__ :: Text
y__
              -> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
x__
                   {_MetaGraphDef'MetaInfoDef'FunctionAliasesEntry'value :: Text
_MetaGraphDef'MetaInfoDef'FunctionAliasesEntry'value = Text
y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message MetaGraphDef'MetaInfoDef'FunctionAliasesEntry where
  messageName :: Proxy MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> Text
messageName _
    = String -> Text
Data.Text.pack
        "tensorflow.MetaGraphDef.MetaInfoDef.FunctionAliasesEntry"
  packedMessageDescriptor :: Proxy MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> ByteString
packedMessageDescriptor _
    = "\n\
      \\DC4FunctionAliasesEntry\DC2\DLE\n\
      \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2\DC4\n\
      \\ENQvalue\CAN\STX \SOH(\tR\ENQvalue:\STX8\SOH"
  packedFileDescriptor :: Proxy MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> ByteString
packedFileDescriptor _ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag (FieldDescriptor MetaGraphDef'MetaInfoDef'FunctionAliasesEntry)
fieldsByTag
    = let
        key__field_descriptor :: FieldDescriptor MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
key__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor MetaGraphDef'MetaInfoDef'FunctionAliasesEntry Text
-> FieldDescriptor MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "key"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens' MetaGraphDef'MetaInfoDef'FunctionAliasesEntry Text
-> FieldAccessor MetaGraphDef'MetaInfoDef'FunctionAliasesEntry Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key")) ::
              Data.ProtoLens.FieldDescriptor MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
        value__field_descriptor :: FieldDescriptor MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
value__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor MetaGraphDef'MetaInfoDef'FunctionAliasesEntry Text
-> FieldDescriptor MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "value"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens' MetaGraphDef'MetaInfoDef'FunctionAliasesEntry Text
-> FieldAccessor MetaGraphDef'MetaInfoDef'FunctionAliasesEntry Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value")) ::
              Data.ProtoLens.FieldDescriptor MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
      in
        [(Tag,
  FieldDescriptor MetaGraphDef'MetaInfoDef'FunctionAliasesEntry)]
-> Map
     Tag (FieldDescriptor MetaGraphDef'MetaInfoDef'FunctionAliasesEntry)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag 1, FieldDescriptor MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
key__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 2, FieldDescriptor MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
value__field_descriptor)]
  unknownFields :: LensLike' f MetaGraphDef'MetaInfoDef'FunctionAliasesEntry FieldSet
unknownFields
    = (MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> FieldSet)
-> (MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
    -> FieldSet -> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry)
-> Lens' MetaGraphDef'MetaInfoDef'FunctionAliasesEntry FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> FieldSet
_MetaGraphDef'MetaInfoDef'FunctionAliasesEntry'_unknownFields
        (\ x__ :: MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
x__ y__ :: FieldSet
y__
           -> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
x__
                {_MetaGraphDef'MetaInfoDef'FunctionAliasesEntry'_unknownFields :: FieldSet
_MetaGraphDef'MetaInfoDef'FunctionAliasesEntry'_unknownFields = FieldSet
y__})
  defMessage :: MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
defMessage
    = $WMetaGraphDef'MetaInfoDef'FunctionAliasesEntry'_constructor :: Text
-> Text
-> FieldSet
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
MetaGraphDef'MetaInfoDef'FunctionAliasesEntry'_constructor
        {_MetaGraphDef'MetaInfoDef'FunctionAliasesEntry'key :: Text
_MetaGraphDef'MetaInfoDef'FunctionAliasesEntry'key = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _MetaGraphDef'MetaInfoDef'FunctionAliasesEntry'value :: Text
_MetaGraphDef'MetaInfoDef'FunctionAliasesEntry'value = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _MetaGraphDef'MetaInfoDef'FunctionAliasesEntry'_unknownFields :: FieldSet
_MetaGraphDef'MetaInfoDef'FunctionAliasesEntry'_unknownFields = []}
  parseMessage :: Parser MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
parseMessage
    = let
        loop ::
          MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
          -> Data.ProtoLens.Encoding.Bytes.Parser MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
        loop :: MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> Parser MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
loop x :: MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
x
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do (let missing :: [a]
missing = []
                       in
                         if [Any] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
                             () -> Parser ()
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
                         else
                             String -> Parser ()
forall (m :: * -> *) a. MonadFail m => String -> m a
Prelude.fail
                               (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
                                  "Missing required fields: "
                                  ([String] -> String
forall a. Show a => a -> String
Prelude.show ([String]
forall a. [a]
missing :: [Prelude.String]))))
                      MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> Parser MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter
  MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
  MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
  FieldSet
  FieldSet
-> (FieldSet -> FieldSet)
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                           forall msg. Message msg => Lens' msg FieldSet
Setter
  MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
  MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
  FieldSet
  FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
x)
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        10
                          -> do Text
y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do ByteString
value <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                       Int -> Parser ByteString
Data.ProtoLens.Encoding.Bytes.getBytes
                                                         (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
                                           Either String Text -> Parser Text
forall a. Either String a -> Parser a
Data.ProtoLens.Encoding.Bytes.runEither
                                             (case ByteString -> Either UnicodeException Text
Data.Text.Encoding.decodeUtf8' ByteString
value of
                                                (Prelude.Left err :: UnicodeException
err)
                                                  -> String -> Either String Text
forall a b. a -> Either a b
Prelude.Left (UnicodeException -> String
forall a. Show a => a -> String
Prelude.show UnicodeException
err)
                                                (Prelude.Right r :: Text
r) -> Text -> Either String Text
forall a b. b -> Either a b
Prelude.Right Text
r))
                                       "key"
                                MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> Parser MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
loop (Setter
  MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
  MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
  Text
  Text
-> Text
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key") Text
y MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
x)
                        18
                          -> do Text
y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do ByteString
value <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                       Int -> Parser ByteString
Data.ProtoLens.Encoding.Bytes.getBytes
                                                         (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
                                           Either String Text -> Parser Text
forall a. Either String a -> Parser a
Data.ProtoLens.Encoding.Bytes.runEither
                                             (case ByteString -> Either UnicodeException Text
Data.Text.Encoding.decodeUtf8' ByteString
value of
                                                (Prelude.Left err :: UnicodeException
err)
                                                  -> String -> Either String Text
forall a b. a -> Either a b
Prelude.Left (UnicodeException -> String
forall a. Show a => a -> String
Prelude.show UnicodeException
err)
                                                (Prelude.Right r :: Text
r) -> Text -> Either String Text
forall a b. b -> Either a b
Prelude.Right Text
r))
                                       "value"
                                MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> Parser MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
loop (Setter
  MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
  MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
  Text
  Text
-> Text
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value") Text
y MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
x)
                        wire :: Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> Parser MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
loop
                                  (Setter
  MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
  MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
  FieldSet
  FieldSet
-> (FieldSet -> FieldSet)
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                     forall msg. Message msg => Lens' msg FieldSet
Setter
  MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
  MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
  FieldSet
  FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
x)
      in
        Parser MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> String -> Parser MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
-> Parser MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
loop MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage) "FunctionAliasesEntry"
  buildMessage :: MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> Builder
buildMessage
    = \ _x :: MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Text
_v = FoldLike
  Text
  MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
  MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
  Text
  Text
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key") MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
_x
              in
                if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                    Builder
forall a. Monoid a => a
Data.Monoid.mempty
                else
                    Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 10)
                      ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                         (\ bs :: ByteString
bs
                            -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                 (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                    (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                 (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                         Text -> ByteString
Data.Text.Encoding.encodeUtf8
                         Text
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   _v :: Text
_v = FoldLike
  Text
  MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
  MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
  Text
  Text
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value") MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
_x
                 in
                   if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 18)
                         ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            (\ bs :: ByteString
bs
                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                       (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                    (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                            Text -> ByteString
Data.Text.Encoding.encodeUtf8
                            Text
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
  MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
  FieldSet
  FieldSet
-> MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
  MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
_x)))
instance Control.DeepSeq.NFData MetaGraphDef'MetaInfoDef'FunctionAliasesEntry where
  rnf :: MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> ()
rnf
    = \ x__ :: MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> FieldSet
_MetaGraphDef'MetaInfoDef'FunctionAliasesEntry'_unknownFields MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> Text
_MetaGraphDef'MetaInfoDef'FunctionAliasesEntry'key MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (MetaGraphDef'MetaInfoDef'FunctionAliasesEntry -> Text
_MetaGraphDef'MetaInfoDef'FunctionAliasesEntry'value MetaGraphDef'MetaInfoDef'FunctionAliasesEntry
x__) ()))
{- | Fields :
     
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.key' @:: Lens' MetaGraphDef'SignatureDefEntry Data.Text.Text@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.value' @:: Lens' MetaGraphDef'SignatureDefEntry SignatureDef@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.maybe'value' @:: Lens' MetaGraphDef'SignatureDefEntry (Prelude.Maybe SignatureDef)@ -}
data MetaGraphDef'SignatureDefEntry
  = MetaGraphDef'SignatureDefEntry'_constructor {MetaGraphDef'SignatureDefEntry -> Text
_MetaGraphDef'SignatureDefEntry'key :: !Data.Text.Text,
                                                 MetaGraphDef'SignatureDefEntry -> Maybe SignatureDef
_MetaGraphDef'SignatureDefEntry'value :: !(Prelude.Maybe SignatureDef),
                                                 MetaGraphDef'SignatureDefEntry -> FieldSet
_MetaGraphDef'SignatureDefEntry'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (MetaGraphDef'SignatureDefEntry
-> MetaGraphDef'SignatureDefEntry -> Bool
(MetaGraphDef'SignatureDefEntry
 -> MetaGraphDef'SignatureDefEntry -> Bool)
-> (MetaGraphDef'SignatureDefEntry
    -> MetaGraphDef'SignatureDefEntry -> Bool)
-> Eq MetaGraphDef'SignatureDefEntry
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: MetaGraphDef'SignatureDefEntry
-> MetaGraphDef'SignatureDefEntry -> Bool
$c/= :: MetaGraphDef'SignatureDefEntry
-> MetaGraphDef'SignatureDefEntry -> Bool
== :: MetaGraphDef'SignatureDefEntry
-> MetaGraphDef'SignatureDefEntry -> Bool
$c== :: MetaGraphDef'SignatureDefEntry
-> MetaGraphDef'SignatureDefEntry -> Bool
Prelude.Eq, Eq MetaGraphDef'SignatureDefEntry
Eq MetaGraphDef'SignatureDefEntry =>
(MetaGraphDef'SignatureDefEntry
 -> MetaGraphDef'SignatureDefEntry -> Ordering)
-> (MetaGraphDef'SignatureDefEntry
    -> MetaGraphDef'SignatureDefEntry -> Bool)
-> (MetaGraphDef'SignatureDefEntry
    -> MetaGraphDef'SignatureDefEntry -> Bool)
-> (MetaGraphDef'SignatureDefEntry
    -> MetaGraphDef'SignatureDefEntry -> Bool)
-> (MetaGraphDef'SignatureDefEntry
    -> MetaGraphDef'SignatureDefEntry -> Bool)
-> (MetaGraphDef'SignatureDefEntry
    -> MetaGraphDef'SignatureDefEntry
    -> MetaGraphDef'SignatureDefEntry)
-> (MetaGraphDef'SignatureDefEntry
    -> MetaGraphDef'SignatureDefEntry
    -> MetaGraphDef'SignatureDefEntry)
-> Ord MetaGraphDef'SignatureDefEntry
MetaGraphDef'SignatureDefEntry
-> MetaGraphDef'SignatureDefEntry -> Bool
MetaGraphDef'SignatureDefEntry
-> MetaGraphDef'SignatureDefEntry -> Ordering
MetaGraphDef'SignatureDefEntry
-> MetaGraphDef'SignatureDefEntry -> MetaGraphDef'SignatureDefEntry
forall a.
Eq a =>
(a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
min :: MetaGraphDef'SignatureDefEntry
-> MetaGraphDef'SignatureDefEntry -> MetaGraphDef'SignatureDefEntry
$cmin :: MetaGraphDef'SignatureDefEntry
-> MetaGraphDef'SignatureDefEntry -> MetaGraphDef'SignatureDefEntry
max :: MetaGraphDef'SignatureDefEntry
-> MetaGraphDef'SignatureDefEntry -> MetaGraphDef'SignatureDefEntry
$cmax :: MetaGraphDef'SignatureDefEntry
-> MetaGraphDef'SignatureDefEntry -> MetaGraphDef'SignatureDefEntry
>= :: MetaGraphDef'SignatureDefEntry
-> MetaGraphDef'SignatureDefEntry -> Bool
$c>= :: MetaGraphDef'SignatureDefEntry
-> MetaGraphDef'SignatureDefEntry -> Bool
> :: MetaGraphDef'SignatureDefEntry
-> MetaGraphDef'SignatureDefEntry -> Bool
$c> :: MetaGraphDef'SignatureDefEntry
-> MetaGraphDef'SignatureDefEntry -> Bool
<= :: MetaGraphDef'SignatureDefEntry
-> MetaGraphDef'SignatureDefEntry -> Bool
$c<= :: MetaGraphDef'SignatureDefEntry
-> MetaGraphDef'SignatureDefEntry -> Bool
< :: MetaGraphDef'SignatureDefEntry
-> MetaGraphDef'SignatureDefEntry -> Bool
$c< :: MetaGraphDef'SignatureDefEntry
-> MetaGraphDef'SignatureDefEntry -> Bool
compare :: MetaGraphDef'SignatureDefEntry
-> MetaGraphDef'SignatureDefEntry -> Ordering
$ccompare :: MetaGraphDef'SignatureDefEntry
-> MetaGraphDef'SignatureDefEntry -> Ordering
$cp1Ord :: Eq MetaGraphDef'SignatureDefEntry
Prelude.Ord)
instance Prelude.Show MetaGraphDef'SignatureDefEntry where
  showsPrec :: Int -> MetaGraphDef'SignatureDefEntry -> ShowS
showsPrec _ __x :: MetaGraphDef'SignatureDefEntry
__x __s :: String
__s
    = Char -> ShowS
Prelude.showChar
        '{'
        (String -> ShowS
Prelude.showString
           (MetaGraphDef'SignatureDefEntry -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort MetaGraphDef'SignatureDefEntry
__x) (Char -> ShowS
Prelude.showChar '}' String
__s))
instance Data.ProtoLens.Field.HasField MetaGraphDef'SignatureDefEntry "key" Data.Text.Text where
  fieldOf :: Proxy# "key"
-> (Text -> f Text)
-> MetaGraphDef'SignatureDefEntry
-> f MetaGraphDef'SignatureDefEntry
fieldOf _
    = ((Text -> f Text)
 -> MetaGraphDef'SignatureDefEntry
 -> f MetaGraphDef'SignatureDefEntry)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> MetaGraphDef'SignatureDefEntry
-> f MetaGraphDef'SignatureDefEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((MetaGraphDef'SignatureDefEntry -> Text)
-> (MetaGraphDef'SignatureDefEntry
    -> Text -> MetaGraphDef'SignatureDefEntry)
-> Lens' MetaGraphDef'SignatureDefEntry Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           MetaGraphDef'SignatureDefEntry -> Text
_MetaGraphDef'SignatureDefEntry'key
           (\ x__ :: MetaGraphDef'SignatureDefEntry
x__ y__ :: Text
y__ -> MetaGraphDef'SignatureDefEntry
x__ {_MetaGraphDef'SignatureDefEntry'key :: Text
_MetaGraphDef'SignatureDefEntry'key = Text
y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField MetaGraphDef'SignatureDefEntry "value" SignatureDef where
  fieldOf :: Proxy# "value"
-> (SignatureDef -> f SignatureDef)
-> MetaGraphDef'SignatureDefEntry
-> f MetaGraphDef'SignatureDefEntry
fieldOf _
    = ((Maybe SignatureDef -> f (Maybe SignatureDef))
 -> MetaGraphDef'SignatureDefEntry
 -> f MetaGraphDef'SignatureDefEntry)
-> ((SignatureDef -> f SignatureDef)
    -> Maybe SignatureDef -> f (Maybe SignatureDef))
-> (SignatureDef -> f SignatureDef)
-> MetaGraphDef'SignatureDefEntry
-> f MetaGraphDef'SignatureDefEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((MetaGraphDef'SignatureDefEntry -> Maybe SignatureDef)
-> (MetaGraphDef'SignatureDefEntry
    -> Maybe SignatureDef -> MetaGraphDef'SignatureDefEntry)
-> Lens
     MetaGraphDef'SignatureDefEntry
     MetaGraphDef'SignatureDefEntry
     (Maybe SignatureDef)
     (Maybe SignatureDef)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           MetaGraphDef'SignatureDefEntry -> Maybe SignatureDef
_MetaGraphDef'SignatureDefEntry'value
           (\ x__ :: MetaGraphDef'SignatureDefEntry
x__ y__ :: Maybe SignatureDef
y__ -> MetaGraphDef'SignatureDefEntry
x__ {_MetaGraphDef'SignatureDefEntry'value :: Maybe SignatureDef
_MetaGraphDef'SignatureDefEntry'value = Maybe SignatureDef
y__}))
        (SignatureDef -> Lens' (Maybe SignatureDef) SignatureDef
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens SignatureDef
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField MetaGraphDef'SignatureDefEntry "maybe'value" (Prelude.Maybe SignatureDef) where
  fieldOf :: Proxy# "maybe'value"
-> (Maybe SignatureDef -> f (Maybe SignatureDef))
-> MetaGraphDef'SignatureDefEntry
-> f MetaGraphDef'SignatureDefEntry
fieldOf _
    = ((Maybe SignatureDef -> f (Maybe SignatureDef))
 -> MetaGraphDef'SignatureDefEntry
 -> f MetaGraphDef'SignatureDefEntry)
-> ((Maybe SignatureDef -> f (Maybe SignatureDef))
    -> Maybe SignatureDef -> f (Maybe SignatureDef))
-> (Maybe SignatureDef -> f (Maybe SignatureDef))
-> MetaGraphDef'SignatureDefEntry
-> f MetaGraphDef'SignatureDefEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((MetaGraphDef'SignatureDefEntry -> Maybe SignatureDef)
-> (MetaGraphDef'SignatureDefEntry
    -> Maybe SignatureDef -> MetaGraphDef'SignatureDefEntry)
-> Lens
     MetaGraphDef'SignatureDefEntry
     MetaGraphDef'SignatureDefEntry
     (Maybe SignatureDef)
     (Maybe SignatureDef)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           MetaGraphDef'SignatureDefEntry -> Maybe SignatureDef
_MetaGraphDef'SignatureDefEntry'value
           (\ x__ :: MetaGraphDef'SignatureDefEntry
x__ y__ :: Maybe SignatureDef
y__ -> MetaGraphDef'SignatureDefEntry
x__ {_MetaGraphDef'SignatureDefEntry'value :: Maybe SignatureDef
_MetaGraphDef'SignatureDefEntry'value = Maybe SignatureDef
y__}))
        (Maybe SignatureDef -> f (Maybe SignatureDef))
-> Maybe SignatureDef -> f (Maybe SignatureDef)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message MetaGraphDef'SignatureDefEntry where
  messageName :: Proxy MetaGraphDef'SignatureDefEntry -> Text
messageName _
    = String -> Text
Data.Text.pack "tensorflow.MetaGraphDef.SignatureDefEntry"
  packedMessageDescriptor :: Proxy MetaGraphDef'SignatureDefEntry -> ByteString
packedMessageDescriptor _
    = "\n\
      \\DC1SignatureDefEntry\DC2\DLE\n\
      \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2.\n\
      \\ENQvalue\CAN\STX \SOH(\v2\CAN.tensorflow.SignatureDefR\ENQvalue:\STX8\SOH"
  packedFileDescriptor :: Proxy MetaGraphDef'SignatureDefEntry -> ByteString
packedFileDescriptor _ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor MetaGraphDef'SignatureDefEntry)
fieldsByTag
    = let
        key__field_descriptor :: FieldDescriptor MetaGraphDef'SignatureDefEntry
key__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor MetaGraphDef'SignatureDefEntry Text
-> FieldDescriptor MetaGraphDef'SignatureDefEntry
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "key"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens' MetaGraphDef'SignatureDefEntry Text
-> FieldAccessor MetaGraphDef'SignatureDefEntry Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key")) ::
              Data.ProtoLens.FieldDescriptor MetaGraphDef'SignatureDefEntry
        value__field_descriptor :: FieldDescriptor MetaGraphDef'SignatureDefEntry
value__field_descriptor
          = String
-> FieldTypeDescriptor SignatureDef
-> FieldAccessor MetaGraphDef'SignatureDefEntry SignatureDef
-> FieldDescriptor MetaGraphDef'SignatureDefEntry
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "value"
              (MessageOrGroup -> FieldTypeDescriptor SignatureDef
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor SignatureDef)
              (Lens
  MetaGraphDef'SignatureDefEntry
  MetaGraphDef'SignatureDefEntry
  (Maybe SignatureDef)
  (Maybe SignatureDef)
-> FieldAccessor MetaGraphDef'SignatureDefEntry SignatureDef
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall s a (f :: * -> *).
(HasField s "maybe'value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'value")) ::
              Data.ProtoLens.FieldDescriptor MetaGraphDef'SignatureDefEntry
      in
        [(Tag, FieldDescriptor MetaGraphDef'SignatureDefEntry)]
-> Map Tag (FieldDescriptor MetaGraphDef'SignatureDefEntry)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag 1, FieldDescriptor MetaGraphDef'SignatureDefEntry
key__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 2, FieldDescriptor MetaGraphDef'SignatureDefEntry
value__field_descriptor)]
  unknownFields :: LensLike' f MetaGraphDef'SignatureDefEntry FieldSet
unknownFields
    = (MetaGraphDef'SignatureDefEntry -> FieldSet)
-> (MetaGraphDef'SignatureDefEntry
    -> FieldSet -> MetaGraphDef'SignatureDefEntry)
-> Lens' MetaGraphDef'SignatureDefEntry FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        MetaGraphDef'SignatureDefEntry -> FieldSet
_MetaGraphDef'SignatureDefEntry'_unknownFields
        (\ x__ :: MetaGraphDef'SignatureDefEntry
x__ y__ :: FieldSet
y__
           -> MetaGraphDef'SignatureDefEntry
x__ {_MetaGraphDef'SignatureDefEntry'_unknownFields :: FieldSet
_MetaGraphDef'SignatureDefEntry'_unknownFields = FieldSet
y__})
  defMessage :: MetaGraphDef'SignatureDefEntry
defMessage
    = $WMetaGraphDef'SignatureDefEntry'_constructor :: Text
-> Maybe SignatureDef -> FieldSet -> MetaGraphDef'SignatureDefEntry
MetaGraphDef'SignatureDefEntry'_constructor
        {_MetaGraphDef'SignatureDefEntry'key :: Text
_MetaGraphDef'SignatureDefEntry'key = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _MetaGraphDef'SignatureDefEntry'value :: Maybe SignatureDef
_MetaGraphDef'SignatureDefEntry'value = Maybe SignatureDef
forall a. Maybe a
Prelude.Nothing,
         _MetaGraphDef'SignatureDefEntry'_unknownFields :: FieldSet
_MetaGraphDef'SignatureDefEntry'_unknownFields = []}
  parseMessage :: Parser MetaGraphDef'SignatureDefEntry
parseMessage
    = let
        loop ::
          MetaGraphDef'SignatureDefEntry
          -> Data.ProtoLens.Encoding.Bytes.Parser MetaGraphDef'SignatureDefEntry
        loop :: MetaGraphDef'SignatureDefEntry
-> Parser MetaGraphDef'SignatureDefEntry
loop x :: MetaGraphDef'SignatureDefEntry
x
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do (let missing :: [a]
missing = []
                       in
                         if [Any] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
                             () -> Parser ()
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
                         else
                             String -> Parser ()
forall (m :: * -> *) a. MonadFail m => String -> m a
Prelude.fail
                               (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
                                  "Missing required fields: "
                                  ([String] -> String
forall a. Show a => a -> String
Prelude.show ([String]
forall a. [a]
missing :: [Prelude.String]))))
                      MetaGraphDef'SignatureDefEntry
-> Parser MetaGraphDef'SignatureDefEntry
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter
  MetaGraphDef'SignatureDefEntry
  MetaGraphDef'SignatureDefEntry
  FieldSet
  FieldSet
-> (FieldSet -> FieldSet)
-> MetaGraphDef'SignatureDefEntry
-> MetaGraphDef'SignatureDefEntry
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                           forall msg. Message msg => Lens' msg FieldSet
Setter
  MetaGraphDef'SignatureDefEntry
  MetaGraphDef'SignatureDefEntry
  FieldSet
  FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) MetaGraphDef'SignatureDefEntry
x)
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        10
                          -> do Text
y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do ByteString
value <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                       Int -> Parser ByteString
Data.ProtoLens.Encoding.Bytes.getBytes
                                                         (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
                                           Either String Text -> Parser Text
forall a. Either String a -> Parser a
Data.ProtoLens.Encoding.Bytes.runEither
                                             (case ByteString -> Either UnicodeException Text
Data.Text.Encoding.decodeUtf8' ByteString
value of
                                                (Prelude.Left err :: UnicodeException
err)
                                                  -> String -> Either String Text
forall a b. a -> Either a b
Prelude.Left (UnicodeException -> String
forall a. Show a => a -> String
Prelude.show UnicodeException
err)
                                                (Prelude.Right r :: Text
r) -> Text -> Either String Text
forall a b. b -> Either a b
Prelude.Right Text
r))
                                       "key"
                                MetaGraphDef'SignatureDefEntry
-> Parser MetaGraphDef'SignatureDefEntry
loop (Setter
  MetaGraphDef'SignatureDefEntry
  MetaGraphDef'SignatureDefEntry
  Text
  Text
-> Text
-> MetaGraphDef'SignatureDefEntry
-> MetaGraphDef'SignatureDefEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key") Text
y MetaGraphDef'SignatureDefEntry
x)
                        18
                          -> do SignatureDef
y <- Parser SignatureDef -> String -> Parser SignatureDef
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser SignatureDef -> Parser SignatureDef
forall a. Int -> Parser a -> Parser a
Data.ProtoLens.Encoding.Bytes.isolate
                                             (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len) Parser SignatureDef
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       "value"
                                MetaGraphDef'SignatureDefEntry
-> Parser MetaGraphDef'SignatureDefEntry
loop (Setter
  MetaGraphDef'SignatureDefEntry
  MetaGraphDef'SignatureDefEntry
  SignatureDef
  SignatureDef
-> SignatureDef
-> MetaGraphDef'SignatureDefEntry
-> MetaGraphDef'SignatureDefEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value") SignatureDef
y MetaGraphDef'SignatureDefEntry
x)
                        wire :: Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                MetaGraphDef'SignatureDefEntry
-> Parser MetaGraphDef'SignatureDefEntry
loop
                                  (Setter
  MetaGraphDef'SignatureDefEntry
  MetaGraphDef'SignatureDefEntry
  FieldSet
  FieldSet
-> (FieldSet -> FieldSet)
-> MetaGraphDef'SignatureDefEntry
-> MetaGraphDef'SignatureDefEntry
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                     forall msg. Message msg => Lens' msg FieldSet
Setter
  MetaGraphDef'SignatureDefEntry
  MetaGraphDef'SignatureDefEntry
  FieldSet
  FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) MetaGraphDef'SignatureDefEntry
x)
      in
        Parser MetaGraphDef'SignatureDefEntry
-> String -> Parser MetaGraphDef'SignatureDefEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do MetaGraphDef'SignatureDefEntry
-> Parser MetaGraphDef'SignatureDefEntry
loop MetaGraphDef'SignatureDefEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage) "SignatureDefEntry"
  buildMessage :: MetaGraphDef'SignatureDefEntry -> Builder
buildMessage
    = \ _x :: MetaGraphDef'SignatureDefEntry
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Text
_v = FoldLike
  Text
  MetaGraphDef'SignatureDefEntry
  MetaGraphDef'SignatureDefEntry
  Text
  Text
-> MetaGraphDef'SignatureDefEntry -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key") MetaGraphDef'SignatureDefEntry
_x
              in
                if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                    Builder
forall a. Monoid a => a
Data.Monoid.mempty
                else
                    Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 10)
                      ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                         (\ bs :: ByteString
bs
                            -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                 (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                    (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                 (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                         Text -> ByteString
Data.Text.Encoding.encodeUtf8
                         Text
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (case
                     FoldLike
  (Maybe SignatureDef)
  MetaGraphDef'SignatureDefEntry
  MetaGraphDef'SignatureDefEntry
  (Maybe SignatureDef)
  (Maybe SignatureDef)
-> MetaGraphDef'SignatureDefEntry -> Maybe SignatureDef
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "maybe'value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'value") MetaGraphDef'SignatureDefEntry
_x
                 of
                   Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just _v :: SignatureDef
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 18)
                          ((ByteString -> Builder)
-> (SignatureDef -> ByteString) -> SignatureDef -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ bs :: ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             SignatureDef -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                             SignatureDef
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  MetaGraphDef'SignatureDefEntry
  MetaGraphDef'SignatureDefEntry
  FieldSet
  FieldSet
-> MetaGraphDef'SignatureDefEntry -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  MetaGraphDef'SignatureDefEntry
  MetaGraphDef'SignatureDefEntry
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields MetaGraphDef'SignatureDefEntry
_x)))
instance Control.DeepSeq.NFData MetaGraphDef'SignatureDefEntry where
  rnf :: MetaGraphDef'SignatureDefEntry -> ()
rnf
    = \ x__ :: MetaGraphDef'SignatureDefEntry
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (MetaGraphDef'SignatureDefEntry -> FieldSet
_MetaGraphDef'SignatureDefEntry'_unknownFields MetaGraphDef'SignatureDefEntry
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (MetaGraphDef'SignatureDefEntry -> Text
_MetaGraphDef'SignatureDefEntry'key MetaGraphDef'SignatureDefEntry
x__)
                (Maybe SignatureDef -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (MetaGraphDef'SignatureDefEntry -> Maybe SignatureDef
_MetaGraphDef'SignatureDefEntry'value MetaGraphDef'SignatureDefEntry
x__) ()))
{- | Fields :
     
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.inputs' @:: Lens' SignatureDef (Data.Map.Map Data.Text.Text TensorInfo)@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.outputs' @:: Lens' SignatureDef (Data.Map.Map Data.Text.Text TensorInfo)@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.methodName' @:: Lens' SignatureDef Data.Text.Text@ -}
data SignatureDef
  = SignatureDef'_constructor {SignatureDef -> Map Text TensorInfo
_SignatureDef'inputs :: !(Data.Map.Map Data.Text.Text TensorInfo),
                               SignatureDef -> Map Text TensorInfo
_SignatureDef'outputs :: !(Data.Map.Map Data.Text.Text TensorInfo),
                               SignatureDef -> Text
_SignatureDef'methodName :: !Data.Text.Text,
                               SignatureDef -> FieldSet
_SignatureDef'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (SignatureDef -> SignatureDef -> Bool
(SignatureDef -> SignatureDef -> Bool)
-> (SignatureDef -> SignatureDef -> Bool) -> Eq SignatureDef
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: SignatureDef -> SignatureDef -> Bool
$c/= :: SignatureDef -> SignatureDef -> Bool
== :: SignatureDef -> SignatureDef -> Bool
$c== :: SignatureDef -> SignatureDef -> Bool
Prelude.Eq, Eq SignatureDef
Eq SignatureDef =>
(SignatureDef -> SignatureDef -> Ordering)
-> (SignatureDef -> SignatureDef -> Bool)
-> (SignatureDef -> SignatureDef -> Bool)
-> (SignatureDef -> SignatureDef -> Bool)
-> (SignatureDef -> SignatureDef -> Bool)
-> (SignatureDef -> SignatureDef -> SignatureDef)
-> (SignatureDef -> SignatureDef -> SignatureDef)
-> Ord SignatureDef
SignatureDef -> SignatureDef -> Bool
SignatureDef -> SignatureDef -> Ordering
SignatureDef -> SignatureDef -> SignatureDef
forall a.
Eq a =>
(a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
min :: SignatureDef -> SignatureDef -> SignatureDef
$cmin :: SignatureDef -> SignatureDef -> SignatureDef
max :: SignatureDef -> SignatureDef -> SignatureDef
$cmax :: SignatureDef -> SignatureDef -> SignatureDef
>= :: SignatureDef -> SignatureDef -> Bool
$c>= :: SignatureDef -> SignatureDef -> Bool
> :: SignatureDef -> SignatureDef -> Bool
$c> :: SignatureDef -> SignatureDef -> Bool
<= :: SignatureDef -> SignatureDef -> Bool
$c<= :: SignatureDef -> SignatureDef -> Bool
< :: SignatureDef -> SignatureDef -> Bool
$c< :: SignatureDef -> SignatureDef -> Bool
compare :: SignatureDef -> SignatureDef -> Ordering
$ccompare :: SignatureDef -> SignatureDef -> Ordering
$cp1Ord :: Eq SignatureDef
Prelude.Ord)
instance Prelude.Show SignatureDef where
  showsPrec :: Int -> SignatureDef -> ShowS
showsPrec _ __x :: SignatureDef
__x __s :: String
__s
    = Char -> ShowS
Prelude.showChar
        '{'
        (String -> ShowS
Prelude.showString
           (SignatureDef -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort SignatureDef
__x) (Char -> ShowS
Prelude.showChar '}' String
__s))
instance Data.ProtoLens.Field.HasField SignatureDef "inputs" (Data.Map.Map Data.Text.Text TensorInfo) where
  fieldOf :: Proxy# "inputs"
-> (Map Text TensorInfo -> f (Map Text TensorInfo))
-> SignatureDef
-> f SignatureDef
fieldOf _
    = ((Map Text TensorInfo -> f (Map Text TensorInfo))
 -> SignatureDef -> f SignatureDef)
-> ((Map Text TensorInfo -> f (Map Text TensorInfo))
    -> Map Text TensorInfo -> f (Map Text TensorInfo))
-> (Map Text TensorInfo -> f (Map Text TensorInfo))
-> SignatureDef
-> f SignatureDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignatureDef -> Map Text TensorInfo)
-> (SignatureDef -> Map Text TensorInfo -> SignatureDef)
-> Lens
     SignatureDef
     SignatureDef
     (Map Text TensorInfo)
     (Map Text TensorInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignatureDef -> Map Text TensorInfo
_SignatureDef'inputs
           (\ x__ :: SignatureDef
x__ y__ :: Map Text TensorInfo
y__ -> SignatureDef
x__ {_SignatureDef'inputs :: Map Text TensorInfo
_SignatureDef'inputs = Map Text TensorInfo
y__}))
        (Map Text TensorInfo -> f (Map Text TensorInfo))
-> Map Text TensorInfo -> f (Map Text TensorInfo)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignatureDef "outputs" (Data.Map.Map Data.Text.Text TensorInfo) where
  fieldOf :: Proxy# "outputs"
-> (Map Text TensorInfo -> f (Map Text TensorInfo))
-> SignatureDef
-> f SignatureDef
fieldOf _
    = ((Map Text TensorInfo -> f (Map Text TensorInfo))
 -> SignatureDef -> f SignatureDef)
-> ((Map Text TensorInfo -> f (Map Text TensorInfo))
    -> Map Text TensorInfo -> f (Map Text TensorInfo))
-> (Map Text TensorInfo -> f (Map Text TensorInfo))
-> SignatureDef
-> f SignatureDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignatureDef -> Map Text TensorInfo)
-> (SignatureDef -> Map Text TensorInfo -> SignatureDef)
-> Lens
     SignatureDef
     SignatureDef
     (Map Text TensorInfo)
     (Map Text TensorInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignatureDef -> Map Text TensorInfo
_SignatureDef'outputs
           (\ x__ :: SignatureDef
x__ y__ :: Map Text TensorInfo
y__ -> SignatureDef
x__ {_SignatureDef'outputs :: Map Text TensorInfo
_SignatureDef'outputs = Map Text TensorInfo
y__}))
        (Map Text TensorInfo -> f (Map Text TensorInfo))
-> Map Text TensorInfo -> f (Map Text TensorInfo)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignatureDef "methodName" Data.Text.Text where
  fieldOf :: Proxy# "methodName"
-> (Text -> f Text) -> SignatureDef -> f SignatureDef
fieldOf _
    = ((Text -> f Text) -> SignatureDef -> f SignatureDef)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> SignatureDef
-> f SignatureDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignatureDef -> Text)
-> (SignatureDef -> Text -> SignatureDef)
-> Lens SignatureDef SignatureDef Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignatureDef -> Text
_SignatureDef'methodName
           (\ x__ :: SignatureDef
x__ y__ :: Text
y__ -> SignatureDef
x__ {_SignatureDef'methodName :: Text
_SignatureDef'methodName = Text
y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message SignatureDef where
  messageName :: Proxy SignatureDef -> Text
messageName _ = String -> Text
Data.Text.pack "tensorflow.SignatureDef"
  packedMessageDescriptor :: Proxy SignatureDef -> ByteString
packedMessageDescriptor _
    = "\n\
      \\fSignatureDef\DC2<\n\
      \\ACKinputs\CAN\SOH \ETX(\v2$.tensorflow.SignatureDef.InputsEntryR\ACKinputs\DC2?\n\
      \\aoutputs\CAN\STX \ETX(\v2%.tensorflow.SignatureDef.OutputsEntryR\aoutputs\DC2\US\n\
      \\vmethod_name\CAN\ETX \SOH(\tR\n\
      \methodName\SUBQ\n\
      \\vInputsEntry\DC2\DLE\n\
      \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2,\n\
      \\ENQvalue\CAN\STX \SOH(\v2\SYN.tensorflow.TensorInfoR\ENQvalue:\STX8\SOH\SUBR\n\
      \\fOutputsEntry\DC2\DLE\n\
      \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2,\n\
      \\ENQvalue\CAN\STX \SOH(\v2\SYN.tensorflow.TensorInfoR\ENQvalue:\STX8\SOH"
  packedFileDescriptor :: Proxy SignatureDef -> ByteString
packedFileDescriptor _ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor SignatureDef)
fieldsByTag
    = let
        inputs__field_descriptor :: FieldDescriptor SignatureDef
inputs__field_descriptor
          = String
-> FieldTypeDescriptor SignatureDef'InputsEntry
-> FieldAccessor SignatureDef SignatureDef'InputsEntry
-> FieldDescriptor SignatureDef
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "inputs"
              (MessageOrGroup -> FieldTypeDescriptor SignatureDef'InputsEntry
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor SignatureDef'InputsEntry)
              (Lens' SignatureDef'InputsEntry Text
-> Lens' SignatureDef'InputsEntry TensorInfo
-> Lens
     SignatureDef
     SignatureDef
     (Map Text TensorInfo)
     (Map Text TensorInfo)
-> FieldAccessor SignatureDef SignatureDef'InputsEntry
forall key value value1 msg.
(Ord key, Message value) =>
Lens' value key
-> Lens' value value1
-> Lens' msg (Map key value1)
-> FieldAccessor msg value
Data.ProtoLens.MapField
                 (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key")
                 (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value")
                 (forall s a (f :: * -> *).
(HasField s "inputs" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"inputs")) ::
              Data.ProtoLens.FieldDescriptor SignatureDef
        outputs__field_descriptor :: FieldDescriptor SignatureDef
outputs__field_descriptor
          = String
-> FieldTypeDescriptor SignatureDef'OutputsEntry
-> FieldAccessor SignatureDef SignatureDef'OutputsEntry
-> FieldDescriptor SignatureDef
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "outputs"
              (MessageOrGroup -> FieldTypeDescriptor SignatureDef'OutputsEntry
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor SignatureDef'OutputsEntry)
              (Lens' SignatureDef'OutputsEntry Text
-> Lens' SignatureDef'OutputsEntry TensorInfo
-> Lens
     SignatureDef
     SignatureDef
     (Map Text TensorInfo)
     (Map Text TensorInfo)
-> FieldAccessor SignatureDef SignatureDef'OutputsEntry
forall key value value1 msg.
(Ord key, Message value) =>
Lens' value key
-> Lens' value value1
-> Lens' msg (Map key value1)
-> FieldAccessor msg value
Data.ProtoLens.MapField
                 (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key")
                 (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value")
                 (forall s a (f :: * -> *).
(HasField s "outputs" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"outputs")) ::
              Data.ProtoLens.FieldDescriptor SignatureDef
        methodName__field_descriptor :: FieldDescriptor SignatureDef
methodName__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor SignatureDef Text
-> FieldDescriptor SignatureDef
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "method_name"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens SignatureDef SignatureDef Text Text
-> FieldAccessor SignatureDef Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "methodName" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"methodName")) ::
              Data.ProtoLens.FieldDescriptor SignatureDef
      in
        [(Tag, FieldDescriptor SignatureDef)]
-> Map Tag (FieldDescriptor SignatureDef)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag 1, FieldDescriptor SignatureDef
inputs__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 2, FieldDescriptor SignatureDef
outputs__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 3, FieldDescriptor SignatureDef
methodName__field_descriptor)]
  unknownFields :: LensLike' f SignatureDef FieldSet
unknownFields
    = (SignatureDef -> FieldSet)
-> (SignatureDef -> FieldSet -> SignatureDef)
-> Lens' SignatureDef FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        SignatureDef -> FieldSet
_SignatureDef'_unknownFields
        (\ x__ :: SignatureDef
x__ y__ :: FieldSet
y__ -> SignatureDef
x__ {_SignatureDef'_unknownFields :: FieldSet
_SignatureDef'_unknownFields = FieldSet
y__})
  defMessage :: SignatureDef
defMessage
    = $WSignatureDef'_constructor :: Map Text TensorInfo
-> Map Text TensorInfo -> Text -> FieldSet -> SignatureDef
SignatureDef'_constructor
        {_SignatureDef'inputs :: Map Text TensorInfo
_SignatureDef'inputs = Map Text TensorInfo
forall k a. Map k a
Data.Map.empty,
         _SignatureDef'outputs :: Map Text TensorInfo
_SignatureDef'outputs = Map Text TensorInfo
forall k a. Map k a
Data.Map.empty,
         _SignatureDef'methodName :: Text
_SignatureDef'methodName = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SignatureDef'_unknownFields :: FieldSet
_SignatureDef'_unknownFields = []}
  parseMessage :: Parser SignatureDef
parseMessage
    = let
        loop ::
          SignatureDef -> Data.ProtoLens.Encoding.Bytes.Parser SignatureDef
        loop :: SignatureDef -> Parser SignatureDef
loop x :: SignatureDef
x
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do (let missing :: [a]
missing = []
                       in
                         if [Any] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
                             () -> Parser ()
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
                         else
                             String -> Parser ()
forall (m :: * -> *) a. MonadFail m => String -> m a
Prelude.fail
                               (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
                                  "Missing required fields: "
                                  ([String] -> String
forall a. Show a => a -> String
Prelude.show ([String]
forall a. [a]
missing :: [Prelude.String]))))
                      SignatureDef -> Parser SignatureDef
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter SignatureDef SignatureDef FieldSet FieldSet
-> (FieldSet -> FieldSet) -> SignatureDef -> SignatureDef
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                           forall msg. Message msg => Lens' msg FieldSet
Setter SignatureDef SignatureDef FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) SignatureDef
x)
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        10
                          -> do !(SignatureDef'InputsEntry
entry :: SignatureDef'InputsEntry) <- Parser SignatureDef'InputsEntry
-> String -> Parser SignatureDef'InputsEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                                                          (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                                              Int
-> Parser SignatureDef'InputsEntry
-> Parser SignatureDef'InputsEntry
forall a. Int -> Parser a -> Parser a
Data.ProtoLens.Encoding.Bytes.isolate
                                                                                (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                                   Word64
len)
                                                                                Parser SignatureDef'InputsEntry
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                                                          "inputs"
                                (let
                                   key :: Text
key = FoldLike
  Text SignatureDef'InputsEntry SignatureDef'InputsEntry Text Text
-> SignatureDef'InputsEntry -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key") SignatureDef'InputsEntry
entry
                                   value :: TensorInfo
value
                                     = FoldLike
  TensorInfo
  SignatureDef'InputsEntry
  SignatureDef'InputsEntry
  TensorInfo
  TensorInfo
-> SignatureDef'InputsEntry -> TensorInfo
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value") SignatureDef'InputsEntry
entry
                                 in
                                   SignatureDef -> Parser SignatureDef
loop
                                     (Setter
  SignatureDef
  SignatureDef
  (Map Text TensorInfo)
  (Map Text TensorInfo)
-> (Map Text TensorInfo -> Map Text TensorInfo)
-> SignatureDef
-> SignatureDef
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                        (forall s a (f :: * -> *).
(HasField s "inputs" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"inputs")
                                        (\ !Map Text TensorInfo
t -> Text -> TensorInfo -> Map Text TensorInfo -> Map Text TensorInfo
forall k a. Ord k => k -> a -> Map k a -> Map k a
Data.Map.insert Text
key TensorInfo
value Map Text TensorInfo
t)
                                        SignatureDef
x))
                        18
                          -> do !(SignatureDef'OutputsEntry
entry :: SignatureDef'OutputsEntry) <- Parser SignatureDef'OutputsEntry
-> String -> Parser SignatureDef'OutputsEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                                                           (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                                               Int
-> Parser SignatureDef'OutputsEntry
-> Parser SignatureDef'OutputsEntry
forall a. Int -> Parser a -> Parser a
Data.ProtoLens.Encoding.Bytes.isolate
                                                                                 (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                                    Word64
len)
                                                                                 Parser SignatureDef'OutputsEntry
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                                                           "outputs"
                                (let
                                   key :: Text
key = FoldLike
  Text SignatureDef'OutputsEntry SignatureDef'OutputsEntry Text Text
-> SignatureDef'OutputsEntry -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key") SignatureDef'OutputsEntry
entry
                                   value :: TensorInfo
value
                                     = FoldLike
  TensorInfo
  SignatureDef'OutputsEntry
  SignatureDef'OutputsEntry
  TensorInfo
  TensorInfo
-> SignatureDef'OutputsEntry -> TensorInfo
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value") SignatureDef'OutputsEntry
entry
                                 in
                                   SignatureDef -> Parser SignatureDef
loop
                                     (Setter
  SignatureDef
  SignatureDef
  (Map Text TensorInfo)
  (Map Text TensorInfo)
-> (Map Text TensorInfo -> Map Text TensorInfo)
-> SignatureDef
-> SignatureDef
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                        (forall s a (f :: * -> *).
(HasField s "outputs" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"outputs")
                                        (\ !Map Text TensorInfo
t -> Text -> TensorInfo -> Map Text TensorInfo -> Map Text TensorInfo
forall k a. Ord k => k -> a -> Map k a -> Map k a
Data.Map.insert Text
key TensorInfo
value Map Text TensorInfo
t)
                                        SignatureDef
x))
                        26
                          -> do Text
y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do ByteString
value <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                       Int -> Parser ByteString
Data.ProtoLens.Encoding.Bytes.getBytes
                                                         (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
                                           Either String Text -> Parser Text
forall a. Either String a -> Parser a
Data.ProtoLens.Encoding.Bytes.runEither
                                             (case ByteString -> Either UnicodeException Text
Data.Text.Encoding.decodeUtf8' ByteString
value of
                                                (Prelude.Left err :: UnicodeException
err)
                                                  -> String -> Either String Text
forall a b. a -> Either a b
Prelude.Left (UnicodeException -> String
forall a. Show a => a -> String
Prelude.show UnicodeException
err)
                                                (Prelude.Right r :: Text
r) -> Text -> Either String Text
forall a b. b -> Either a b
Prelude.Right Text
r))
                                       "method_name"
                                SignatureDef -> Parser SignatureDef
loop
                                  (Setter SignatureDef SignatureDef Text Text
-> Text -> SignatureDef -> SignatureDef
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "methodName" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"methodName") Text
y SignatureDef
x)
                        wire :: Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                SignatureDef -> Parser SignatureDef
loop
                                  (Setter SignatureDef SignatureDef FieldSet FieldSet
-> (FieldSet -> FieldSet) -> SignatureDef -> SignatureDef
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                     forall msg. Message msg => Lens' msg FieldSet
Setter SignatureDef SignatureDef FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) SignatureDef
x)
      in
        Parser SignatureDef -> String -> Parser SignatureDef
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do SignatureDef -> Parser SignatureDef
loop SignatureDef
forall msg. Message msg => msg
Data.ProtoLens.defMessage) "SignatureDef"
  buildMessage :: SignatureDef -> Builder
buildMessage
    = \ _x :: SignatureDef
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             ([Builder] -> Builder
forall a. Monoid a => [a] -> a
Data.Monoid.mconcat
                (((Text, TensorInfo) -> Builder)
-> [(Text, TensorInfo)] -> [Builder]
forall a b. (a -> b) -> [a] -> [b]
Prelude.map
                   (\ _v :: (Text, TensorInfo)
_v
                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 10)
                           ((ByteString -> Builder)
-> (SignatureDef'InputsEntry -> ByteString)
-> SignatureDef'InputsEntry
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                              (\ bs :: ByteString
bs
                                 -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                         (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                      (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                              SignatureDef'InputsEntry -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                              (Setter SignatureDef'InputsEntry SignatureDef'InputsEntry Text Text
-> Text -> SignatureDef'InputsEntry -> SignatureDef'InputsEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                 (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key")
                                 ((Text, TensorInfo) -> Text
forall a b. (a, b) -> a
Prelude.fst (Text, TensorInfo)
_v)
                                 (Setter
  SignatureDef'InputsEntry
  SignatureDef'InputsEntry
  TensorInfo
  TensorInfo
-> TensorInfo
-> SignatureDef'InputsEntry
-> SignatureDef'InputsEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                    (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value")
                                    ((Text, TensorInfo) -> TensorInfo
forall a b. (a, b) -> b
Prelude.snd (Text, TensorInfo)
_v)
                                    (SignatureDef'InputsEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage :: SignatureDef'InputsEntry)))))
                   (Map Text TensorInfo -> [(Text, TensorInfo)]
forall k a. Map k a -> [(k, a)]
Data.Map.toList
                      (FoldLike
  (Map Text TensorInfo)
  SignatureDef
  SignatureDef
  (Map Text TensorInfo)
  (Map Text TensorInfo)
-> SignatureDef -> Map Text TensorInfo
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "inputs" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"inputs") SignatureDef
_x))))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                ([Builder] -> Builder
forall a. Monoid a => [a] -> a
Data.Monoid.mconcat
                   (((Text, TensorInfo) -> Builder)
-> [(Text, TensorInfo)] -> [Builder]
forall a b. (a -> b) -> [a] -> [b]
Prelude.map
                      (\ _v :: (Text, TensorInfo)
_v
                         -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                              (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 18)
                              ((ByteString -> Builder)
-> (SignatureDef'OutputsEntry -> ByteString)
-> SignatureDef'OutputsEntry
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                 (\ bs :: ByteString
bs
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                            (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                         (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                 SignatureDef'OutputsEntry -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                 (Setter
  SignatureDef'OutputsEntry SignatureDef'OutputsEntry Text Text
-> Text -> SignatureDef'OutputsEntry -> SignatureDef'OutputsEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                    (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key")
                                    ((Text, TensorInfo) -> Text
forall a b. (a, b) -> a
Prelude.fst (Text, TensorInfo)
_v)
                                    (Setter
  SignatureDef'OutputsEntry
  SignatureDef'OutputsEntry
  TensorInfo
  TensorInfo
-> TensorInfo
-> SignatureDef'OutputsEntry
-> SignatureDef'OutputsEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                       (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value")
                                       ((Text, TensorInfo) -> TensorInfo
forall a b. (a, b) -> b
Prelude.snd (Text, TensorInfo)
_v)
                                       (SignatureDef'OutputsEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage :: SignatureDef'OutputsEntry)))))
                      (Map Text TensorInfo -> [(Text, TensorInfo)]
forall k a. Map k a -> [(k, a)]
Data.Map.toList
                         (FoldLike
  (Map Text TensorInfo)
  SignatureDef
  SignatureDef
  (Map Text TensorInfo)
  (Map Text TensorInfo)
-> SignatureDef -> Map Text TensorInfo
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "outputs" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"outputs") SignatureDef
_x))))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: Text
_v
                        = FoldLike Text SignatureDef SignatureDef Text Text
-> SignatureDef -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "methodName" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"methodName") SignatureDef
_x
                    in
                      if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      else
                          Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 26)
                            ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                               (\ bs :: ByteString
bs
                                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                          (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                       (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                               Text -> ByteString
Data.Text.Encoding.encodeUtf8
                               Text
_v))
                   (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                      (FoldLike FieldSet SignatureDef SignatureDef FieldSet FieldSet
-> SignatureDef -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet SignatureDef SignatureDef FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields SignatureDef
_x))))
instance Control.DeepSeq.NFData SignatureDef where
  rnf :: SignatureDef -> ()
rnf
    = \ x__ :: SignatureDef
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (SignatureDef -> FieldSet
_SignatureDef'_unknownFields SignatureDef
x__)
             (Map Text TensorInfo -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (SignatureDef -> Map Text TensorInfo
_SignatureDef'inputs SignatureDef
x__)
                (Map Text TensorInfo -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (SignatureDef -> Map Text TensorInfo
_SignatureDef'outputs SignatureDef
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (SignatureDef -> Text
_SignatureDef'methodName SignatureDef
x__) ())))
{- | Fields :
     
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.key' @:: Lens' SignatureDef'InputsEntry Data.Text.Text@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.value' @:: Lens' SignatureDef'InputsEntry TensorInfo@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.maybe'value' @:: Lens' SignatureDef'InputsEntry (Prelude.Maybe TensorInfo)@ -}
data SignatureDef'InputsEntry
  = SignatureDef'InputsEntry'_constructor {SignatureDef'InputsEntry -> Text
_SignatureDef'InputsEntry'key :: !Data.Text.Text,
                                           SignatureDef'InputsEntry -> Maybe TensorInfo
_SignatureDef'InputsEntry'value :: !(Prelude.Maybe TensorInfo),
                                           SignatureDef'InputsEntry -> FieldSet
_SignatureDef'InputsEntry'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (SignatureDef'InputsEntry -> SignatureDef'InputsEntry -> Bool
(SignatureDef'InputsEntry -> SignatureDef'InputsEntry -> Bool)
-> (SignatureDef'InputsEntry -> SignatureDef'InputsEntry -> Bool)
-> Eq SignatureDef'InputsEntry
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: SignatureDef'InputsEntry -> SignatureDef'InputsEntry -> Bool
$c/= :: SignatureDef'InputsEntry -> SignatureDef'InputsEntry -> Bool
== :: SignatureDef'InputsEntry -> SignatureDef'InputsEntry -> Bool
$c== :: SignatureDef'InputsEntry -> SignatureDef'InputsEntry -> Bool
Prelude.Eq, Eq SignatureDef'InputsEntry
Eq SignatureDef'InputsEntry =>
(SignatureDef'InputsEntry -> SignatureDef'InputsEntry -> Ordering)
-> (SignatureDef'InputsEntry -> SignatureDef'InputsEntry -> Bool)
-> (SignatureDef'InputsEntry -> SignatureDef'InputsEntry -> Bool)
-> (SignatureDef'InputsEntry -> SignatureDef'InputsEntry -> Bool)
-> (SignatureDef'InputsEntry -> SignatureDef'InputsEntry -> Bool)
-> (SignatureDef'InputsEntry
    -> SignatureDef'InputsEntry -> SignatureDef'InputsEntry)
-> (SignatureDef'InputsEntry
    -> SignatureDef'InputsEntry -> SignatureDef'InputsEntry)
-> Ord SignatureDef'InputsEntry
SignatureDef'InputsEntry -> SignatureDef'InputsEntry -> Bool
SignatureDef'InputsEntry -> SignatureDef'InputsEntry -> Ordering
SignatureDef'InputsEntry
-> SignatureDef'InputsEntry -> SignatureDef'InputsEntry
forall a.
Eq a =>
(a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
min :: SignatureDef'InputsEntry
-> SignatureDef'InputsEntry -> SignatureDef'InputsEntry
$cmin :: SignatureDef'InputsEntry
-> SignatureDef'InputsEntry -> SignatureDef'InputsEntry
max :: SignatureDef'InputsEntry
-> SignatureDef'InputsEntry -> SignatureDef'InputsEntry
$cmax :: SignatureDef'InputsEntry
-> SignatureDef'InputsEntry -> SignatureDef'InputsEntry
>= :: SignatureDef'InputsEntry -> SignatureDef'InputsEntry -> Bool
$c>= :: SignatureDef'InputsEntry -> SignatureDef'InputsEntry -> Bool
> :: SignatureDef'InputsEntry -> SignatureDef'InputsEntry -> Bool
$c> :: SignatureDef'InputsEntry -> SignatureDef'InputsEntry -> Bool
<= :: SignatureDef'InputsEntry -> SignatureDef'InputsEntry -> Bool
$c<= :: SignatureDef'InputsEntry -> SignatureDef'InputsEntry -> Bool
< :: SignatureDef'InputsEntry -> SignatureDef'InputsEntry -> Bool
$c< :: SignatureDef'InputsEntry -> SignatureDef'InputsEntry -> Bool
compare :: SignatureDef'InputsEntry -> SignatureDef'InputsEntry -> Ordering
$ccompare :: SignatureDef'InputsEntry -> SignatureDef'InputsEntry -> Ordering
$cp1Ord :: Eq SignatureDef'InputsEntry
Prelude.Ord)
instance Prelude.Show SignatureDef'InputsEntry where
  showsPrec :: Int -> SignatureDef'InputsEntry -> ShowS
showsPrec _ __x :: SignatureDef'InputsEntry
__x __s :: String
__s
    = Char -> ShowS
Prelude.showChar
        '{'
        (String -> ShowS
Prelude.showString
           (SignatureDef'InputsEntry -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort SignatureDef'InputsEntry
__x) (Char -> ShowS
Prelude.showChar '}' String
__s))
instance Data.ProtoLens.Field.HasField SignatureDef'InputsEntry "key" Data.Text.Text where
  fieldOf :: Proxy# "key"
-> (Text -> f Text)
-> SignatureDef'InputsEntry
-> f SignatureDef'InputsEntry
fieldOf _
    = ((Text -> f Text)
 -> SignatureDef'InputsEntry -> f SignatureDef'InputsEntry)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> SignatureDef'InputsEntry
-> f SignatureDef'InputsEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignatureDef'InputsEntry -> Text)
-> (SignatureDef'InputsEntry -> Text -> SignatureDef'InputsEntry)
-> Lens' SignatureDef'InputsEntry Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignatureDef'InputsEntry -> Text
_SignatureDef'InputsEntry'key
           (\ x__ :: SignatureDef'InputsEntry
x__ y__ :: Text
y__ -> SignatureDef'InputsEntry
x__ {_SignatureDef'InputsEntry'key :: Text
_SignatureDef'InputsEntry'key = Text
y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignatureDef'InputsEntry "value" TensorInfo where
  fieldOf :: Proxy# "value"
-> (TensorInfo -> f TensorInfo)
-> SignatureDef'InputsEntry
-> f SignatureDef'InputsEntry
fieldOf _
    = ((Maybe TensorInfo -> f (Maybe TensorInfo))
 -> SignatureDef'InputsEntry -> f SignatureDef'InputsEntry)
-> ((TensorInfo -> f TensorInfo)
    -> Maybe TensorInfo -> f (Maybe TensorInfo))
-> (TensorInfo -> f TensorInfo)
-> SignatureDef'InputsEntry
-> f SignatureDef'InputsEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignatureDef'InputsEntry -> Maybe TensorInfo)
-> (SignatureDef'InputsEntry
    -> Maybe TensorInfo -> SignatureDef'InputsEntry)
-> Lens
     SignatureDef'InputsEntry
     SignatureDef'InputsEntry
     (Maybe TensorInfo)
     (Maybe TensorInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignatureDef'InputsEntry -> Maybe TensorInfo
_SignatureDef'InputsEntry'value
           (\ x__ :: SignatureDef'InputsEntry
x__ y__ :: Maybe TensorInfo
y__ -> SignatureDef'InputsEntry
x__ {_SignatureDef'InputsEntry'value :: Maybe TensorInfo
_SignatureDef'InputsEntry'value = Maybe TensorInfo
y__}))
        (TensorInfo -> Lens' (Maybe TensorInfo) TensorInfo
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens TensorInfo
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField SignatureDef'InputsEntry "maybe'value" (Prelude.Maybe TensorInfo) where
  fieldOf :: Proxy# "maybe'value"
-> (Maybe TensorInfo -> f (Maybe TensorInfo))
-> SignatureDef'InputsEntry
-> f SignatureDef'InputsEntry
fieldOf _
    = ((Maybe TensorInfo -> f (Maybe TensorInfo))
 -> SignatureDef'InputsEntry -> f SignatureDef'InputsEntry)
-> ((Maybe TensorInfo -> f (Maybe TensorInfo))
    -> Maybe TensorInfo -> f (Maybe TensorInfo))
-> (Maybe TensorInfo -> f (Maybe TensorInfo))
-> SignatureDef'InputsEntry
-> f SignatureDef'InputsEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignatureDef'InputsEntry -> Maybe TensorInfo)
-> (SignatureDef'InputsEntry
    -> Maybe TensorInfo -> SignatureDef'InputsEntry)
-> Lens
     SignatureDef'InputsEntry
     SignatureDef'InputsEntry
     (Maybe TensorInfo)
     (Maybe TensorInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignatureDef'InputsEntry -> Maybe TensorInfo
_SignatureDef'InputsEntry'value
           (\ x__ :: SignatureDef'InputsEntry
x__ y__ :: Maybe TensorInfo
y__ -> SignatureDef'InputsEntry
x__ {_SignatureDef'InputsEntry'value :: Maybe TensorInfo
_SignatureDef'InputsEntry'value = Maybe TensorInfo
y__}))
        (Maybe TensorInfo -> f (Maybe TensorInfo))
-> Maybe TensorInfo -> f (Maybe TensorInfo)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message SignatureDef'InputsEntry where
  messageName :: Proxy SignatureDef'InputsEntry -> Text
messageName _
    = String -> Text
Data.Text.pack "tensorflow.SignatureDef.InputsEntry"
  packedMessageDescriptor :: Proxy SignatureDef'InputsEntry -> ByteString
packedMessageDescriptor _
    = "\n\
      \\vInputsEntry\DC2\DLE\n\
      \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2,\n\
      \\ENQvalue\CAN\STX \SOH(\v2\SYN.tensorflow.TensorInfoR\ENQvalue:\STX8\SOH"
  packedFileDescriptor :: Proxy SignatureDef'InputsEntry -> ByteString
packedFileDescriptor _ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor SignatureDef'InputsEntry)
fieldsByTag
    = let
        key__field_descriptor :: FieldDescriptor SignatureDef'InputsEntry
key__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor SignatureDef'InputsEntry Text
-> FieldDescriptor SignatureDef'InputsEntry
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "key"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens' SignatureDef'InputsEntry Text
-> FieldAccessor SignatureDef'InputsEntry Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key")) ::
              Data.ProtoLens.FieldDescriptor SignatureDef'InputsEntry
        value__field_descriptor :: FieldDescriptor SignatureDef'InputsEntry
value__field_descriptor
          = String
-> FieldTypeDescriptor TensorInfo
-> FieldAccessor SignatureDef'InputsEntry TensorInfo
-> FieldDescriptor SignatureDef'InputsEntry
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "value"
              (MessageOrGroup -> FieldTypeDescriptor TensorInfo
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor TensorInfo)
              (Lens
  SignatureDef'InputsEntry
  SignatureDef'InputsEntry
  (Maybe TensorInfo)
  (Maybe TensorInfo)
-> FieldAccessor SignatureDef'InputsEntry TensorInfo
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall s a (f :: * -> *).
(HasField s "maybe'value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'value")) ::
              Data.ProtoLens.FieldDescriptor SignatureDef'InputsEntry
      in
        [(Tag, FieldDescriptor SignatureDef'InputsEntry)]
-> Map Tag (FieldDescriptor SignatureDef'InputsEntry)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag 1, FieldDescriptor SignatureDef'InputsEntry
key__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 2, FieldDescriptor SignatureDef'InputsEntry
value__field_descriptor)]
  unknownFields :: LensLike' f SignatureDef'InputsEntry FieldSet
unknownFields
    = (SignatureDef'InputsEntry -> FieldSet)
-> (SignatureDef'InputsEntry
    -> FieldSet -> SignatureDef'InputsEntry)
-> Lens' SignatureDef'InputsEntry FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        SignatureDef'InputsEntry -> FieldSet
_SignatureDef'InputsEntry'_unknownFields
        (\ x__ :: SignatureDef'InputsEntry
x__ y__ :: FieldSet
y__ -> SignatureDef'InputsEntry
x__ {_SignatureDef'InputsEntry'_unknownFields :: FieldSet
_SignatureDef'InputsEntry'_unknownFields = FieldSet
y__})
  defMessage :: SignatureDef'InputsEntry
defMessage
    = $WSignatureDef'InputsEntry'_constructor :: Text -> Maybe TensorInfo -> FieldSet -> SignatureDef'InputsEntry
SignatureDef'InputsEntry'_constructor
        {_SignatureDef'InputsEntry'key :: Text
_SignatureDef'InputsEntry'key = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SignatureDef'InputsEntry'value :: Maybe TensorInfo
_SignatureDef'InputsEntry'value = Maybe TensorInfo
forall a. Maybe a
Prelude.Nothing,
         _SignatureDef'InputsEntry'_unknownFields :: FieldSet
_SignatureDef'InputsEntry'_unknownFields = []}
  parseMessage :: Parser SignatureDef'InputsEntry
parseMessage
    = let
        loop ::
          SignatureDef'InputsEntry
          -> Data.ProtoLens.Encoding.Bytes.Parser SignatureDef'InputsEntry
        loop :: SignatureDef'InputsEntry -> Parser SignatureDef'InputsEntry
loop x :: SignatureDef'InputsEntry
x
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do (let missing :: [a]
missing = []
                       in
                         if [Any] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
                             () -> Parser ()
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
                         else
                             String -> Parser ()
forall (m :: * -> *) a. MonadFail m => String -> m a
Prelude.fail
                               (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
                                  "Missing required fields: "
                                  ([String] -> String
forall a. Show a => a -> String
Prelude.show ([String]
forall a. [a]
missing :: [Prelude.String]))))
                      SignatureDef'InputsEntry -> Parser SignatureDef'InputsEntry
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter
  SignatureDef'InputsEntry SignatureDef'InputsEntry FieldSet FieldSet
-> (FieldSet -> FieldSet)
-> SignatureDef'InputsEntry
-> SignatureDef'InputsEntry
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                           forall msg. Message msg => Lens' msg FieldSet
Setter
  SignatureDef'InputsEntry SignatureDef'InputsEntry FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) SignatureDef'InputsEntry
x)
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        10
                          -> do Text
y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do ByteString
value <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                       Int -> Parser ByteString
Data.ProtoLens.Encoding.Bytes.getBytes
                                                         (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
                                           Either String Text -> Parser Text
forall a. Either String a -> Parser a
Data.ProtoLens.Encoding.Bytes.runEither
                                             (case ByteString -> Either UnicodeException Text
Data.Text.Encoding.decodeUtf8' ByteString
value of
                                                (Prelude.Left err :: UnicodeException
err)
                                                  -> String -> Either String Text
forall a b. a -> Either a b
Prelude.Left (UnicodeException -> String
forall a. Show a => a -> String
Prelude.show UnicodeException
err)
                                                (Prelude.Right r :: Text
r) -> Text -> Either String Text
forall a b. b -> Either a b
Prelude.Right Text
r))
                                       "key"
                                SignatureDef'InputsEntry -> Parser SignatureDef'InputsEntry
loop (Setter SignatureDef'InputsEntry SignatureDef'InputsEntry Text Text
-> Text -> SignatureDef'InputsEntry -> SignatureDef'InputsEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key") Text
y SignatureDef'InputsEntry
x)
                        18
                          -> do TensorInfo
y <- Parser TensorInfo -> String -> Parser TensorInfo
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser TensorInfo -> Parser TensorInfo
forall a. Int -> Parser a -> Parser a
Data.ProtoLens.Encoding.Bytes.isolate
                                             (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len) Parser TensorInfo
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       "value"
                                SignatureDef'InputsEntry -> Parser SignatureDef'InputsEntry
loop (Setter
  SignatureDef'InputsEntry
  SignatureDef'InputsEntry
  TensorInfo
  TensorInfo
-> TensorInfo
-> SignatureDef'InputsEntry
-> SignatureDef'InputsEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value") TensorInfo
y SignatureDef'InputsEntry
x)
                        wire :: Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                SignatureDef'InputsEntry -> Parser SignatureDef'InputsEntry
loop
                                  (Setter
  SignatureDef'InputsEntry SignatureDef'InputsEntry FieldSet FieldSet
-> (FieldSet -> FieldSet)
-> SignatureDef'InputsEntry
-> SignatureDef'InputsEntry
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                     forall msg. Message msg => Lens' msg FieldSet
Setter
  SignatureDef'InputsEntry SignatureDef'InputsEntry FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) SignatureDef'InputsEntry
x)
      in
        Parser SignatureDef'InputsEntry
-> String -> Parser SignatureDef'InputsEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do SignatureDef'InputsEntry -> Parser SignatureDef'InputsEntry
loop SignatureDef'InputsEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage) "InputsEntry"
  buildMessage :: SignatureDef'InputsEntry -> Builder
buildMessage
    = \ _x :: SignatureDef'InputsEntry
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Text
_v = FoldLike
  Text SignatureDef'InputsEntry SignatureDef'InputsEntry Text Text
-> SignatureDef'InputsEntry -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key") SignatureDef'InputsEntry
_x
              in
                if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                    Builder
forall a. Monoid a => a
Data.Monoid.mempty
                else
                    Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 10)
                      ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                         (\ bs :: ByteString
bs
                            -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                 (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                    (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                 (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                         Text -> ByteString
Data.Text.Encoding.encodeUtf8
                         Text
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (case
                     FoldLike
  (Maybe TensorInfo)
  SignatureDef'InputsEntry
  SignatureDef'InputsEntry
  (Maybe TensorInfo)
  (Maybe TensorInfo)
-> SignatureDef'InputsEntry -> Maybe TensorInfo
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "maybe'value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'value") SignatureDef'InputsEntry
_x
                 of
                   Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just _v :: TensorInfo
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 18)
                          ((ByteString -> Builder)
-> (TensorInfo -> ByteString) -> TensorInfo -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ bs :: ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             TensorInfo -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                             TensorInfo
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  SignatureDef'InputsEntry
  SignatureDef'InputsEntry
  FieldSet
  FieldSet
-> SignatureDef'InputsEntry -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  SignatureDef'InputsEntry
  SignatureDef'InputsEntry
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields SignatureDef'InputsEntry
_x)))
instance Control.DeepSeq.NFData SignatureDef'InputsEntry where
  rnf :: SignatureDef'InputsEntry -> ()
rnf
    = \ x__ :: SignatureDef'InputsEntry
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (SignatureDef'InputsEntry -> FieldSet
_SignatureDef'InputsEntry'_unknownFields SignatureDef'InputsEntry
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (SignatureDef'InputsEntry -> Text
_SignatureDef'InputsEntry'key SignatureDef'InputsEntry
x__)
                (Maybe TensorInfo -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (SignatureDef'InputsEntry -> Maybe TensorInfo
_SignatureDef'InputsEntry'value SignatureDef'InputsEntry
x__) ()))
{- | Fields :
     
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.key' @:: Lens' SignatureDef'OutputsEntry Data.Text.Text@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.value' @:: Lens' SignatureDef'OutputsEntry TensorInfo@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.maybe'value' @:: Lens' SignatureDef'OutputsEntry (Prelude.Maybe TensorInfo)@ -}
data SignatureDef'OutputsEntry
  = SignatureDef'OutputsEntry'_constructor {SignatureDef'OutputsEntry -> Text
_SignatureDef'OutputsEntry'key :: !Data.Text.Text,
                                            SignatureDef'OutputsEntry -> Maybe TensorInfo
_SignatureDef'OutputsEntry'value :: !(Prelude.Maybe TensorInfo),
                                            SignatureDef'OutputsEntry -> FieldSet
_SignatureDef'OutputsEntry'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (SignatureDef'OutputsEntry -> SignatureDef'OutputsEntry -> Bool
(SignatureDef'OutputsEntry -> SignatureDef'OutputsEntry -> Bool)
-> (SignatureDef'OutputsEntry -> SignatureDef'OutputsEntry -> Bool)
-> Eq SignatureDef'OutputsEntry
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: SignatureDef'OutputsEntry -> SignatureDef'OutputsEntry -> Bool
$c/= :: SignatureDef'OutputsEntry -> SignatureDef'OutputsEntry -> Bool
== :: SignatureDef'OutputsEntry -> SignatureDef'OutputsEntry -> Bool
$c== :: SignatureDef'OutputsEntry -> SignatureDef'OutputsEntry -> Bool
Prelude.Eq, Eq SignatureDef'OutputsEntry
Eq SignatureDef'OutputsEntry =>
(SignatureDef'OutputsEntry
 -> SignatureDef'OutputsEntry -> Ordering)
-> (SignatureDef'OutputsEntry -> SignatureDef'OutputsEntry -> Bool)
-> (SignatureDef'OutputsEntry -> SignatureDef'OutputsEntry -> Bool)
-> (SignatureDef'OutputsEntry -> SignatureDef'OutputsEntry -> Bool)
-> (SignatureDef'OutputsEntry -> SignatureDef'OutputsEntry -> Bool)
-> (SignatureDef'OutputsEntry
    -> SignatureDef'OutputsEntry -> SignatureDef'OutputsEntry)
-> (SignatureDef'OutputsEntry
    -> SignatureDef'OutputsEntry -> SignatureDef'OutputsEntry)
-> Ord SignatureDef'OutputsEntry
SignatureDef'OutputsEntry -> SignatureDef'OutputsEntry -> Bool
SignatureDef'OutputsEntry -> SignatureDef'OutputsEntry -> Ordering
SignatureDef'OutputsEntry
-> SignatureDef'OutputsEntry -> SignatureDef'OutputsEntry
forall a.
Eq a =>
(a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
min :: SignatureDef'OutputsEntry
-> SignatureDef'OutputsEntry -> SignatureDef'OutputsEntry
$cmin :: SignatureDef'OutputsEntry
-> SignatureDef'OutputsEntry -> SignatureDef'OutputsEntry
max :: SignatureDef'OutputsEntry
-> SignatureDef'OutputsEntry -> SignatureDef'OutputsEntry
$cmax :: SignatureDef'OutputsEntry
-> SignatureDef'OutputsEntry -> SignatureDef'OutputsEntry
>= :: SignatureDef'OutputsEntry -> SignatureDef'OutputsEntry -> Bool
$c>= :: SignatureDef'OutputsEntry -> SignatureDef'OutputsEntry -> Bool
> :: SignatureDef'OutputsEntry -> SignatureDef'OutputsEntry -> Bool
$c> :: SignatureDef'OutputsEntry -> SignatureDef'OutputsEntry -> Bool
<= :: SignatureDef'OutputsEntry -> SignatureDef'OutputsEntry -> Bool
$c<= :: SignatureDef'OutputsEntry -> SignatureDef'OutputsEntry -> Bool
< :: SignatureDef'OutputsEntry -> SignatureDef'OutputsEntry -> Bool
$c< :: SignatureDef'OutputsEntry -> SignatureDef'OutputsEntry -> Bool
compare :: SignatureDef'OutputsEntry -> SignatureDef'OutputsEntry -> Ordering
$ccompare :: SignatureDef'OutputsEntry -> SignatureDef'OutputsEntry -> Ordering
$cp1Ord :: Eq SignatureDef'OutputsEntry
Prelude.Ord)
instance Prelude.Show SignatureDef'OutputsEntry where
  showsPrec :: Int -> SignatureDef'OutputsEntry -> ShowS
showsPrec _ __x :: SignatureDef'OutputsEntry
__x __s :: String
__s
    = Char -> ShowS
Prelude.showChar
        '{'
        (String -> ShowS
Prelude.showString
           (SignatureDef'OutputsEntry -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort SignatureDef'OutputsEntry
__x) (Char -> ShowS
Prelude.showChar '}' String
__s))
instance Data.ProtoLens.Field.HasField SignatureDef'OutputsEntry "key" Data.Text.Text where
  fieldOf :: Proxy# "key"
-> (Text -> f Text)
-> SignatureDef'OutputsEntry
-> f SignatureDef'OutputsEntry
fieldOf _
    = ((Text -> f Text)
 -> SignatureDef'OutputsEntry -> f SignatureDef'OutputsEntry)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> SignatureDef'OutputsEntry
-> f SignatureDef'OutputsEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignatureDef'OutputsEntry -> Text)
-> (SignatureDef'OutputsEntry -> Text -> SignatureDef'OutputsEntry)
-> Lens' SignatureDef'OutputsEntry Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignatureDef'OutputsEntry -> Text
_SignatureDef'OutputsEntry'key
           (\ x__ :: SignatureDef'OutputsEntry
x__ y__ :: Text
y__ -> SignatureDef'OutputsEntry
x__ {_SignatureDef'OutputsEntry'key :: Text
_SignatureDef'OutputsEntry'key = Text
y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignatureDef'OutputsEntry "value" TensorInfo where
  fieldOf :: Proxy# "value"
-> (TensorInfo -> f TensorInfo)
-> SignatureDef'OutputsEntry
-> f SignatureDef'OutputsEntry
fieldOf _
    = ((Maybe TensorInfo -> f (Maybe TensorInfo))
 -> SignatureDef'OutputsEntry -> f SignatureDef'OutputsEntry)
-> ((TensorInfo -> f TensorInfo)
    -> Maybe TensorInfo -> f (Maybe TensorInfo))
-> (TensorInfo -> f TensorInfo)
-> SignatureDef'OutputsEntry
-> f SignatureDef'OutputsEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignatureDef'OutputsEntry -> Maybe TensorInfo)
-> (SignatureDef'OutputsEntry
    -> Maybe TensorInfo -> SignatureDef'OutputsEntry)
-> Lens
     SignatureDef'OutputsEntry
     SignatureDef'OutputsEntry
     (Maybe TensorInfo)
     (Maybe TensorInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignatureDef'OutputsEntry -> Maybe TensorInfo
_SignatureDef'OutputsEntry'value
           (\ x__ :: SignatureDef'OutputsEntry
x__ y__ :: Maybe TensorInfo
y__ -> SignatureDef'OutputsEntry
x__ {_SignatureDef'OutputsEntry'value :: Maybe TensorInfo
_SignatureDef'OutputsEntry'value = Maybe TensorInfo
y__}))
        (TensorInfo -> Lens' (Maybe TensorInfo) TensorInfo
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens TensorInfo
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField SignatureDef'OutputsEntry "maybe'value" (Prelude.Maybe TensorInfo) where
  fieldOf :: Proxy# "maybe'value"
-> (Maybe TensorInfo -> f (Maybe TensorInfo))
-> SignatureDef'OutputsEntry
-> f SignatureDef'OutputsEntry
fieldOf _
    = ((Maybe TensorInfo -> f (Maybe TensorInfo))
 -> SignatureDef'OutputsEntry -> f SignatureDef'OutputsEntry)
-> ((Maybe TensorInfo -> f (Maybe TensorInfo))
    -> Maybe TensorInfo -> f (Maybe TensorInfo))
-> (Maybe TensorInfo -> f (Maybe TensorInfo))
-> SignatureDef'OutputsEntry
-> f SignatureDef'OutputsEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignatureDef'OutputsEntry -> Maybe TensorInfo)
-> (SignatureDef'OutputsEntry
    -> Maybe TensorInfo -> SignatureDef'OutputsEntry)
-> Lens
     SignatureDef'OutputsEntry
     SignatureDef'OutputsEntry
     (Maybe TensorInfo)
     (Maybe TensorInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignatureDef'OutputsEntry -> Maybe TensorInfo
_SignatureDef'OutputsEntry'value
           (\ x__ :: SignatureDef'OutputsEntry
x__ y__ :: Maybe TensorInfo
y__ -> SignatureDef'OutputsEntry
x__ {_SignatureDef'OutputsEntry'value :: Maybe TensorInfo
_SignatureDef'OutputsEntry'value = Maybe TensorInfo
y__}))
        (Maybe TensorInfo -> f (Maybe TensorInfo))
-> Maybe TensorInfo -> f (Maybe TensorInfo)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message SignatureDef'OutputsEntry where
  messageName :: Proxy SignatureDef'OutputsEntry -> Text
messageName _
    = String -> Text
Data.Text.pack "tensorflow.SignatureDef.OutputsEntry"
  packedMessageDescriptor :: Proxy SignatureDef'OutputsEntry -> ByteString
packedMessageDescriptor _
    = "\n\
      \\fOutputsEntry\DC2\DLE\n\
      \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2,\n\
      \\ENQvalue\CAN\STX \SOH(\v2\SYN.tensorflow.TensorInfoR\ENQvalue:\STX8\SOH"
  packedFileDescriptor :: Proxy SignatureDef'OutputsEntry -> ByteString
packedFileDescriptor _ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor SignatureDef'OutputsEntry)
fieldsByTag
    = let
        key__field_descriptor :: FieldDescriptor SignatureDef'OutputsEntry
key__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor SignatureDef'OutputsEntry Text
-> FieldDescriptor SignatureDef'OutputsEntry
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "key"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens' SignatureDef'OutputsEntry Text
-> FieldAccessor SignatureDef'OutputsEntry Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key")) ::
              Data.ProtoLens.FieldDescriptor SignatureDef'OutputsEntry
        value__field_descriptor :: FieldDescriptor SignatureDef'OutputsEntry
value__field_descriptor
          = String
-> FieldTypeDescriptor TensorInfo
-> FieldAccessor SignatureDef'OutputsEntry TensorInfo
-> FieldDescriptor SignatureDef'OutputsEntry
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "value"
              (MessageOrGroup -> FieldTypeDescriptor TensorInfo
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor TensorInfo)
              (Lens
  SignatureDef'OutputsEntry
  SignatureDef'OutputsEntry
  (Maybe TensorInfo)
  (Maybe TensorInfo)
-> FieldAccessor SignatureDef'OutputsEntry TensorInfo
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall s a (f :: * -> *).
(HasField s "maybe'value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'value")) ::
              Data.ProtoLens.FieldDescriptor SignatureDef'OutputsEntry
      in
        [(Tag, FieldDescriptor SignatureDef'OutputsEntry)]
-> Map Tag (FieldDescriptor SignatureDef'OutputsEntry)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag 1, FieldDescriptor SignatureDef'OutputsEntry
key__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 2, FieldDescriptor SignatureDef'OutputsEntry
value__field_descriptor)]
  unknownFields :: LensLike' f SignatureDef'OutputsEntry FieldSet
unknownFields
    = (SignatureDef'OutputsEntry -> FieldSet)
-> (SignatureDef'OutputsEntry
    -> FieldSet -> SignatureDef'OutputsEntry)
-> Lens' SignatureDef'OutputsEntry FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        SignatureDef'OutputsEntry -> FieldSet
_SignatureDef'OutputsEntry'_unknownFields
        (\ x__ :: SignatureDef'OutputsEntry
x__ y__ :: FieldSet
y__
           -> SignatureDef'OutputsEntry
x__ {_SignatureDef'OutputsEntry'_unknownFields :: FieldSet
_SignatureDef'OutputsEntry'_unknownFields = FieldSet
y__})
  defMessage :: SignatureDef'OutputsEntry
defMessage
    = $WSignatureDef'OutputsEntry'_constructor :: Text -> Maybe TensorInfo -> FieldSet -> SignatureDef'OutputsEntry
SignatureDef'OutputsEntry'_constructor
        {_SignatureDef'OutputsEntry'key :: Text
_SignatureDef'OutputsEntry'key = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SignatureDef'OutputsEntry'value :: Maybe TensorInfo
_SignatureDef'OutputsEntry'value = Maybe TensorInfo
forall a. Maybe a
Prelude.Nothing,
         _SignatureDef'OutputsEntry'_unknownFields :: FieldSet
_SignatureDef'OutputsEntry'_unknownFields = []}
  parseMessage :: Parser SignatureDef'OutputsEntry
parseMessage
    = let
        loop ::
          SignatureDef'OutputsEntry
          -> Data.ProtoLens.Encoding.Bytes.Parser SignatureDef'OutputsEntry
        loop :: SignatureDef'OutputsEntry -> Parser SignatureDef'OutputsEntry
loop x :: SignatureDef'OutputsEntry
x
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do (let missing :: [a]
missing = []
                       in
                         if [Any] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
                             () -> Parser ()
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
                         else
                             String -> Parser ()
forall (m :: * -> *) a. MonadFail m => String -> m a
Prelude.fail
                               (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
                                  "Missing required fields: "
                                  ([String] -> String
forall a. Show a => a -> String
Prelude.show ([String]
forall a. [a]
missing :: [Prelude.String]))))
                      SignatureDef'OutputsEntry -> Parser SignatureDef'OutputsEntry
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter
  SignatureDef'OutputsEntry
  SignatureDef'OutputsEntry
  FieldSet
  FieldSet
-> (FieldSet -> FieldSet)
-> SignatureDef'OutputsEntry
-> SignatureDef'OutputsEntry
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                           forall msg. Message msg => Lens' msg FieldSet
Setter
  SignatureDef'OutputsEntry
  SignatureDef'OutputsEntry
  FieldSet
  FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) SignatureDef'OutputsEntry
x)
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        10
                          -> do Text
y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do ByteString
value <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                       Int -> Parser ByteString
Data.ProtoLens.Encoding.Bytes.getBytes
                                                         (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
                                           Either String Text -> Parser Text
forall a. Either String a -> Parser a
Data.ProtoLens.Encoding.Bytes.runEither
                                             (case ByteString -> Either UnicodeException Text
Data.Text.Encoding.decodeUtf8' ByteString
value of
                                                (Prelude.Left err :: UnicodeException
err)
                                                  -> String -> Either String Text
forall a b. a -> Either a b
Prelude.Left (UnicodeException -> String
forall a. Show a => a -> String
Prelude.show UnicodeException
err)
                                                (Prelude.Right r :: Text
r) -> Text -> Either String Text
forall a b. b -> Either a b
Prelude.Right Text
r))
                                       "key"
                                SignatureDef'OutputsEntry -> Parser SignatureDef'OutputsEntry
loop (Setter
  SignatureDef'OutputsEntry SignatureDef'OutputsEntry Text Text
-> Text -> SignatureDef'OutputsEntry -> SignatureDef'OutputsEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key") Text
y SignatureDef'OutputsEntry
x)
                        18
                          -> do TensorInfo
y <- Parser TensorInfo -> String -> Parser TensorInfo
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser TensorInfo -> Parser TensorInfo
forall a. Int -> Parser a -> Parser a
Data.ProtoLens.Encoding.Bytes.isolate
                                             (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len) Parser TensorInfo
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       "value"
                                SignatureDef'OutputsEntry -> Parser SignatureDef'OutputsEntry
loop (Setter
  SignatureDef'OutputsEntry
  SignatureDef'OutputsEntry
  TensorInfo
  TensorInfo
-> TensorInfo
-> SignatureDef'OutputsEntry
-> SignatureDef'OutputsEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value") TensorInfo
y SignatureDef'OutputsEntry
x)
                        wire :: Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                SignatureDef'OutputsEntry -> Parser SignatureDef'OutputsEntry
loop
                                  (Setter
  SignatureDef'OutputsEntry
  SignatureDef'OutputsEntry
  FieldSet
  FieldSet
-> (FieldSet -> FieldSet)
-> SignatureDef'OutputsEntry
-> SignatureDef'OutputsEntry
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                     forall msg. Message msg => Lens' msg FieldSet
Setter
  SignatureDef'OutputsEntry
  SignatureDef'OutputsEntry
  FieldSet
  FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) SignatureDef'OutputsEntry
x)
      in
        Parser SignatureDef'OutputsEntry
-> String -> Parser SignatureDef'OutputsEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do SignatureDef'OutputsEntry -> Parser SignatureDef'OutputsEntry
loop SignatureDef'OutputsEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage) "OutputsEntry"
  buildMessage :: SignatureDef'OutputsEntry -> Builder
buildMessage
    = \ _x :: SignatureDef'OutputsEntry
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Text
_v = FoldLike
  Text SignatureDef'OutputsEntry SignatureDef'OutputsEntry Text Text
-> SignatureDef'OutputsEntry -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key") SignatureDef'OutputsEntry
_x
              in
                if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                    Builder
forall a. Monoid a => a
Data.Monoid.mempty
                else
                    Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 10)
                      ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                         (\ bs :: ByteString
bs
                            -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                 (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                    (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                 (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                         Text -> ByteString
Data.Text.Encoding.encodeUtf8
                         Text
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (case
                     FoldLike
  (Maybe TensorInfo)
  SignatureDef'OutputsEntry
  SignatureDef'OutputsEntry
  (Maybe TensorInfo)
  (Maybe TensorInfo)
-> SignatureDef'OutputsEntry -> Maybe TensorInfo
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "maybe'value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'value") SignatureDef'OutputsEntry
_x
                 of
                   Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just _v :: TensorInfo
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 18)
                          ((ByteString -> Builder)
-> (TensorInfo -> ByteString) -> TensorInfo -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ bs :: ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             TensorInfo -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                             TensorInfo
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  SignatureDef'OutputsEntry
  SignatureDef'OutputsEntry
  FieldSet
  FieldSet
-> SignatureDef'OutputsEntry -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  SignatureDef'OutputsEntry
  SignatureDef'OutputsEntry
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields SignatureDef'OutputsEntry
_x)))
instance Control.DeepSeq.NFData SignatureDef'OutputsEntry where
  rnf :: SignatureDef'OutputsEntry -> ()
rnf
    = \ x__ :: SignatureDef'OutputsEntry
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (SignatureDef'OutputsEntry -> FieldSet
_SignatureDef'OutputsEntry'_unknownFields SignatureDef'OutputsEntry
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (SignatureDef'OutputsEntry -> Text
_SignatureDef'OutputsEntry'key SignatureDef'OutputsEntry
x__)
                (Maybe TensorInfo -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (SignatureDef'OutputsEntry -> Maybe TensorInfo
_SignatureDef'OutputsEntry'value SignatureDef'OutputsEntry
x__) ()))
{- | Fields :
     
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.dtype' @:: Lens' TensorInfo Proto.Tensorflow.Core.Framework.Types.DataType@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.tensorShape' @:: Lens' TensorInfo Proto.Tensorflow.Core.Framework.TensorShape.TensorShapeProto@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.maybe'tensorShape' @:: Lens' TensorInfo (Prelude.Maybe Proto.Tensorflow.Core.Framework.TensorShape.TensorShapeProto)@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.maybe'encoding' @:: Lens' TensorInfo (Prelude.Maybe TensorInfo'Encoding)@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.maybe'name' @:: Lens' TensorInfo (Prelude.Maybe Data.Text.Text)@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.name' @:: Lens' TensorInfo Data.Text.Text@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.maybe'cooSparse' @:: Lens' TensorInfo (Prelude.Maybe TensorInfo'CooSparse)@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.cooSparse' @:: Lens' TensorInfo TensorInfo'CooSparse@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.maybe'compositeTensor' @:: Lens' TensorInfo (Prelude.Maybe TensorInfo'CompositeTensor)@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.compositeTensor' @:: Lens' TensorInfo TensorInfo'CompositeTensor@ -}
data TensorInfo
  = TensorInfo'_constructor {TensorInfo -> DataType
_TensorInfo'dtype :: !Proto.Tensorflow.Core.Framework.Types.DataType,
                             TensorInfo -> Maybe TensorShapeProto
_TensorInfo'tensorShape :: !(Prelude.Maybe Proto.Tensorflow.Core.Framework.TensorShape.TensorShapeProto),
                             TensorInfo -> Maybe TensorInfo'Encoding
_TensorInfo'encoding :: !(Prelude.Maybe TensorInfo'Encoding),
                             TensorInfo -> FieldSet
_TensorInfo'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (TensorInfo -> TensorInfo -> Bool
(TensorInfo -> TensorInfo -> Bool)
-> (TensorInfo -> TensorInfo -> Bool) -> Eq TensorInfo
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: TensorInfo -> TensorInfo -> Bool
$c/= :: TensorInfo -> TensorInfo -> Bool
== :: TensorInfo -> TensorInfo -> Bool
$c== :: TensorInfo -> TensorInfo -> Bool
Prelude.Eq, Eq TensorInfo
Eq TensorInfo =>
(TensorInfo -> TensorInfo -> Ordering)
-> (TensorInfo -> TensorInfo -> Bool)
-> (TensorInfo -> TensorInfo -> Bool)
-> (TensorInfo -> TensorInfo -> Bool)
-> (TensorInfo -> TensorInfo -> Bool)
-> (TensorInfo -> TensorInfo -> TensorInfo)
-> (TensorInfo -> TensorInfo -> TensorInfo)
-> Ord TensorInfo
TensorInfo -> TensorInfo -> Bool
TensorInfo -> TensorInfo -> Ordering
TensorInfo -> TensorInfo -> TensorInfo
forall a.
Eq a =>
(a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
min :: TensorInfo -> TensorInfo -> TensorInfo
$cmin :: TensorInfo -> TensorInfo -> TensorInfo
max :: TensorInfo -> TensorInfo -> TensorInfo
$cmax :: TensorInfo -> TensorInfo -> TensorInfo
>= :: TensorInfo -> TensorInfo -> Bool
$c>= :: TensorInfo -> TensorInfo -> Bool
> :: TensorInfo -> TensorInfo -> Bool
$c> :: TensorInfo -> TensorInfo -> Bool
<= :: TensorInfo -> TensorInfo -> Bool
$c<= :: TensorInfo -> TensorInfo -> Bool
< :: TensorInfo -> TensorInfo -> Bool
$c< :: TensorInfo -> TensorInfo -> Bool
compare :: TensorInfo -> TensorInfo -> Ordering
$ccompare :: TensorInfo -> TensorInfo -> Ordering
$cp1Ord :: Eq TensorInfo
Prelude.Ord)
instance Prelude.Show TensorInfo where
  showsPrec :: Int -> TensorInfo -> ShowS
showsPrec _ __x :: TensorInfo
__x __s :: String
__s
    = Char -> ShowS
Prelude.showChar
        '{'
        (String -> ShowS
Prelude.showString
           (TensorInfo -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort TensorInfo
__x) (Char -> ShowS
Prelude.showChar '}' String
__s))
data TensorInfo'Encoding
  = TensorInfo'Name !Data.Text.Text |
    TensorInfo'CooSparse' !TensorInfo'CooSparse |
    TensorInfo'CompositeTensor' !TensorInfo'CompositeTensor
  deriving stock (Int -> TensorInfo'Encoding -> ShowS
[TensorInfo'Encoding] -> ShowS
TensorInfo'Encoding -> String
(Int -> TensorInfo'Encoding -> ShowS)
-> (TensorInfo'Encoding -> String)
-> ([TensorInfo'Encoding] -> ShowS)
-> Show TensorInfo'Encoding
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [TensorInfo'Encoding] -> ShowS
$cshowList :: [TensorInfo'Encoding] -> ShowS
show :: TensorInfo'Encoding -> String
$cshow :: TensorInfo'Encoding -> String
showsPrec :: Int -> TensorInfo'Encoding -> ShowS
$cshowsPrec :: Int -> TensorInfo'Encoding -> ShowS
Prelude.Show, TensorInfo'Encoding -> TensorInfo'Encoding -> Bool
(TensorInfo'Encoding -> TensorInfo'Encoding -> Bool)
-> (TensorInfo'Encoding -> TensorInfo'Encoding -> Bool)
-> Eq TensorInfo'Encoding
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: TensorInfo'Encoding -> TensorInfo'Encoding -> Bool
$c/= :: TensorInfo'Encoding -> TensorInfo'Encoding -> Bool
== :: TensorInfo'Encoding -> TensorInfo'Encoding -> Bool
$c== :: TensorInfo'Encoding -> TensorInfo'Encoding -> Bool
Prelude.Eq, Eq TensorInfo'Encoding
Eq TensorInfo'Encoding =>
(TensorInfo'Encoding -> TensorInfo'Encoding -> Ordering)
-> (TensorInfo'Encoding -> TensorInfo'Encoding -> Bool)
-> (TensorInfo'Encoding -> TensorInfo'Encoding -> Bool)
-> (TensorInfo'Encoding -> TensorInfo'Encoding -> Bool)
-> (TensorInfo'Encoding -> TensorInfo'Encoding -> Bool)
-> (TensorInfo'Encoding
    -> TensorInfo'Encoding -> TensorInfo'Encoding)
-> (TensorInfo'Encoding
    -> TensorInfo'Encoding -> TensorInfo'Encoding)
-> Ord TensorInfo'Encoding
TensorInfo'Encoding -> TensorInfo'Encoding -> Bool
TensorInfo'Encoding -> TensorInfo'Encoding -> Ordering
TensorInfo'Encoding -> TensorInfo'Encoding -> TensorInfo'Encoding
forall a.
Eq a =>
(a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
min :: TensorInfo'Encoding -> TensorInfo'Encoding -> TensorInfo'Encoding
$cmin :: TensorInfo'Encoding -> TensorInfo'Encoding -> TensorInfo'Encoding
max :: TensorInfo'Encoding -> TensorInfo'Encoding -> TensorInfo'Encoding
$cmax :: TensorInfo'Encoding -> TensorInfo'Encoding -> TensorInfo'Encoding
>= :: TensorInfo'Encoding -> TensorInfo'Encoding -> Bool
$c>= :: TensorInfo'Encoding -> TensorInfo'Encoding -> Bool
> :: TensorInfo'Encoding -> TensorInfo'Encoding -> Bool
$c> :: TensorInfo'Encoding -> TensorInfo'Encoding -> Bool
<= :: TensorInfo'Encoding -> TensorInfo'Encoding -> Bool
$c<= :: TensorInfo'Encoding -> TensorInfo'Encoding -> Bool
< :: TensorInfo'Encoding -> TensorInfo'Encoding -> Bool
$c< :: TensorInfo'Encoding -> TensorInfo'Encoding -> Bool
compare :: TensorInfo'Encoding -> TensorInfo'Encoding -> Ordering
$ccompare :: TensorInfo'Encoding -> TensorInfo'Encoding -> Ordering
$cp1Ord :: Eq TensorInfo'Encoding
Prelude.Ord)
instance Data.ProtoLens.Field.HasField TensorInfo "dtype" Proto.Tensorflow.Core.Framework.Types.DataType where
  fieldOf :: Proxy# "dtype"
-> (DataType -> f DataType) -> TensorInfo -> f TensorInfo
fieldOf _
    = ((DataType -> f DataType) -> TensorInfo -> f TensorInfo)
-> ((DataType -> f DataType) -> DataType -> f DataType)
-> (DataType -> f DataType)
-> TensorInfo
-> f TensorInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorInfo -> DataType)
-> (TensorInfo -> DataType -> TensorInfo)
-> Lens TensorInfo TensorInfo DataType DataType
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorInfo -> DataType
_TensorInfo'dtype (\ x__ :: TensorInfo
x__ y__ :: DataType
y__ -> TensorInfo
x__ {_TensorInfo'dtype :: DataType
_TensorInfo'dtype = DataType
y__}))
        (DataType -> f DataType) -> DataType -> f DataType
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField TensorInfo "tensorShape" Proto.Tensorflow.Core.Framework.TensorShape.TensorShapeProto where
  fieldOf :: Proxy# "tensorShape"
-> (TensorShapeProto -> f TensorShapeProto)
-> TensorInfo
-> f TensorInfo
fieldOf _
    = ((Maybe TensorShapeProto -> f (Maybe TensorShapeProto))
 -> TensorInfo -> f TensorInfo)
-> ((TensorShapeProto -> f TensorShapeProto)
    -> Maybe TensorShapeProto -> f (Maybe TensorShapeProto))
-> (TensorShapeProto -> f TensorShapeProto)
-> TensorInfo
-> f TensorInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorInfo -> Maybe TensorShapeProto)
-> (TensorInfo -> Maybe TensorShapeProto -> TensorInfo)
-> Lens
     TensorInfo
     TensorInfo
     (Maybe TensorShapeProto)
     (Maybe TensorShapeProto)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorInfo -> Maybe TensorShapeProto
_TensorInfo'tensorShape
           (\ x__ :: TensorInfo
x__ y__ :: Maybe TensorShapeProto
y__ -> TensorInfo
x__ {_TensorInfo'tensorShape :: Maybe TensorShapeProto
_TensorInfo'tensorShape = Maybe TensorShapeProto
y__}))
        (TensorShapeProto -> Lens' (Maybe TensorShapeProto) TensorShapeProto
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens TensorShapeProto
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField TensorInfo "maybe'tensorShape" (Prelude.Maybe Proto.Tensorflow.Core.Framework.TensorShape.TensorShapeProto) where
  fieldOf :: Proxy# "maybe'tensorShape"
-> (Maybe TensorShapeProto -> f (Maybe TensorShapeProto))
-> TensorInfo
-> f TensorInfo
fieldOf _
    = ((Maybe TensorShapeProto -> f (Maybe TensorShapeProto))
 -> TensorInfo -> f TensorInfo)
-> ((Maybe TensorShapeProto -> f (Maybe TensorShapeProto))
    -> Maybe TensorShapeProto -> f (Maybe TensorShapeProto))
-> (Maybe TensorShapeProto -> f (Maybe TensorShapeProto))
-> TensorInfo
-> f TensorInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorInfo -> Maybe TensorShapeProto)
-> (TensorInfo -> Maybe TensorShapeProto -> TensorInfo)
-> Lens
     TensorInfo
     TensorInfo
     (Maybe TensorShapeProto)
     (Maybe TensorShapeProto)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorInfo -> Maybe TensorShapeProto
_TensorInfo'tensorShape
           (\ x__ :: TensorInfo
x__ y__ :: Maybe TensorShapeProto
y__ -> TensorInfo
x__ {_TensorInfo'tensorShape :: Maybe TensorShapeProto
_TensorInfo'tensorShape = Maybe TensorShapeProto
y__}))
        (Maybe TensorShapeProto -> f (Maybe TensorShapeProto))
-> Maybe TensorShapeProto -> f (Maybe TensorShapeProto)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField TensorInfo "maybe'encoding" (Prelude.Maybe TensorInfo'Encoding) where
  fieldOf :: Proxy# "maybe'encoding"
-> (Maybe TensorInfo'Encoding -> f (Maybe TensorInfo'Encoding))
-> TensorInfo
-> f TensorInfo
fieldOf _
    = ((Maybe TensorInfo'Encoding -> f (Maybe TensorInfo'Encoding))
 -> TensorInfo -> f TensorInfo)
-> ((Maybe TensorInfo'Encoding -> f (Maybe TensorInfo'Encoding))
    -> Maybe TensorInfo'Encoding -> f (Maybe TensorInfo'Encoding))
-> (Maybe TensorInfo'Encoding -> f (Maybe TensorInfo'Encoding))
-> TensorInfo
-> f TensorInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorInfo -> Maybe TensorInfo'Encoding)
-> (TensorInfo -> Maybe TensorInfo'Encoding -> TensorInfo)
-> Lens
     TensorInfo
     TensorInfo
     (Maybe TensorInfo'Encoding)
     (Maybe TensorInfo'Encoding)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorInfo -> Maybe TensorInfo'Encoding
_TensorInfo'encoding
           (\ x__ :: TensorInfo
x__ y__ :: Maybe TensorInfo'Encoding
y__ -> TensorInfo
x__ {_TensorInfo'encoding :: Maybe TensorInfo'Encoding
_TensorInfo'encoding = Maybe TensorInfo'Encoding
y__}))
        (Maybe TensorInfo'Encoding -> f (Maybe TensorInfo'Encoding))
-> Maybe TensorInfo'Encoding -> f (Maybe TensorInfo'Encoding)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField TensorInfo "maybe'name" (Prelude.Maybe Data.Text.Text) where
  fieldOf :: Proxy# "maybe'name"
-> (Maybe Text -> f (Maybe Text)) -> TensorInfo -> f TensorInfo
fieldOf _
    = ((Maybe TensorInfo'Encoding -> f (Maybe TensorInfo'Encoding))
 -> TensorInfo -> f TensorInfo)
-> ((Maybe Text -> f (Maybe Text))
    -> Maybe TensorInfo'Encoding -> f (Maybe TensorInfo'Encoding))
-> (Maybe Text -> f (Maybe Text))
-> TensorInfo
-> f TensorInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorInfo -> Maybe TensorInfo'Encoding)
-> (TensorInfo -> Maybe TensorInfo'Encoding -> TensorInfo)
-> Lens
     TensorInfo
     TensorInfo
     (Maybe TensorInfo'Encoding)
     (Maybe TensorInfo'Encoding)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorInfo -> Maybe TensorInfo'Encoding
_TensorInfo'encoding
           (\ x__ :: TensorInfo
x__ y__ :: Maybe TensorInfo'Encoding
y__ -> TensorInfo
x__ {_TensorInfo'encoding :: Maybe TensorInfo'Encoding
_TensorInfo'encoding = Maybe TensorInfo'Encoding
y__}))
        ((Maybe TensorInfo'Encoding -> Maybe Text)
-> (Maybe TensorInfo'Encoding
    -> Maybe Text -> Maybe TensorInfo'Encoding)
-> Lens
     (Maybe TensorInfo'Encoding)
     (Maybe TensorInfo'Encoding)
     (Maybe Text)
     (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ x__ :: Maybe TensorInfo'Encoding
x__
              -> case Maybe TensorInfo'Encoding
x__ of
                   (Prelude.Just (TensorInfo'Name x__val :: Text
x__val)) -> Text -> Maybe Text
forall a. a -> Maybe a
Prelude.Just Text
x__val
                   _otherwise :: Maybe TensorInfo'Encoding
_otherwise -> Maybe Text
forall a. Maybe a
Prelude.Nothing)
           (\ _ y__ :: Maybe Text
y__ -> (Text -> TensorInfo'Encoding)
-> Maybe Text -> Maybe TensorInfo'Encoding
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap Text -> TensorInfo'Encoding
TensorInfo'Name Maybe Text
y__))
instance Data.ProtoLens.Field.HasField TensorInfo "name" Data.Text.Text where
  fieldOf :: Proxy# "name" -> (Text -> f Text) -> TensorInfo -> f TensorInfo
fieldOf _
    = ((Maybe TensorInfo'Encoding -> f (Maybe TensorInfo'Encoding))
 -> TensorInfo -> f TensorInfo)
-> ((Text -> f Text)
    -> Maybe TensorInfo'Encoding -> f (Maybe TensorInfo'Encoding))
-> (Text -> f Text)
-> TensorInfo
-> f TensorInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorInfo -> Maybe TensorInfo'Encoding)
-> (TensorInfo -> Maybe TensorInfo'Encoding -> TensorInfo)
-> Lens
     TensorInfo
     TensorInfo
     (Maybe TensorInfo'Encoding)
     (Maybe TensorInfo'Encoding)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorInfo -> Maybe TensorInfo'Encoding
_TensorInfo'encoding
           (\ x__ :: TensorInfo
x__ y__ :: Maybe TensorInfo'Encoding
y__ -> TensorInfo
x__ {_TensorInfo'encoding :: Maybe TensorInfo'Encoding
_TensorInfo'encoding = Maybe TensorInfo'Encoding
y__}))
        (((Maybe Text -> f (Maybe Text))
 -> Maybe TensorInfo'Encoding -> f (Maybe TensorInfo'Encoding))
-> ((Text -> f Text) -> Maybe Text -> f (Maybe Text))
-> (Text -> f Text)
-> Maybe TensorInfo'Encoding
-> f (Maybe TensorInfo'Encoding)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe TensorInfo'Encoding -> Maybe Text)
-> (Maybe TensorInfo'Encoding
    -> Maybe Text -> Maybe TensorInfo'Encoding)
-> Lens
     (Maybe TensorInfo'Encoding)
     (Maybe TensorInfo'Encoding)
     (Maybe Text)
     (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ x__ :: Maybe TensorInfo'Encoding
x__
                 -> case Maybe TensorInfo'Encoding
x__ of
                      (Prelude.Just (TensorInfo'Name x__val :: Text
x__val)) -> Text -> Maybe Text
forall a. a -> Maybe a
Prelude.Just Text
x__val
                      _otherwise :: Maybe TensorInfo'Encoding
_otherwise -> Maybe Text
forall a. Maybe a
Prelude.Nothing)
              (\ _ y__ :: Maybe Text
y__ -> (Text -> TensorInfo'Encoding)
-> Maybe Text -> Maybe TensorInfo'Encoding
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap Text -> TensorInfo'Encoding
TensorInfo'Name Maybe Text
y__))
           (Text -> Lens' (Maybe Text) Text
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault))
instance Data.ProtoLens.Field.HasField TensorInfo "maybe'cooSparse" (Prelude.Maybe TensorInfo'CooSparse) where
  fieldOf :: Proxy# "maybe'cooSparse"
-> (Maybe TensorInfo'CooSparse -> f (Maybe TensorInfo'CooSparse))
-> TensorInfo
-> f TensorInfo
fieldOf _
    = ((Maybe TensorInfo'Encoding -> f (Maybe TensorInfo'Encoding))
 -> TensorInfo -> f TensorInfo)
-> ((Maybe TensorInfo'CooSparse -> f (Maybe TensorInfo'CooSparse))
    -> Maybe TensorInfo'Encoding -> f (Maybe TensorInfo'Encoding))
-> (Maybe TensorInfo'CooSparse -> f (Maybe TensorInfo'CooSparse))
-> TensorInfo
-> f TensorInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorInfo -> Maybe TensorInfo'Encoding)
-> (TensorInfo -> Maybe TensorInfo'Encoding -> TensorInfo)
-> Lens
     TensorInfo
     TensorInfo
     (Maybe TensorInfo'Encoding)
     (Maybe TensorInfo'Encoding)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorInfo -> Maybe TensorInfo'Encoding
_TensorInfo'encoding
           (\ x__ :: TensorInfo
x__ y__ :: Maybe TensorInfo'Encoding
y__ -> TensorInfo
x__ {_TensorInfo'encoding :: Maybe TensorInfo'Encoding
_TensorInfo'encoding = Maybe TensorInfo'Encoding
y__}))
        ((Maybe TensorInfo'Encoding -> Maybe TensorInfo'CooSparse)
-> (Maybe TensorInfo'Encoding
    -> Maybe TensorInfo'CooSparse -> Maybe TensorInfo'Encoding)
-> Lens
     (Maybe TensorInfo'Encoding)
     (Maybe TensorInfo'Encoding)
     (Maybe TensorInfo'CooSparse)
     (Maybe TensorInfo'CooSparse)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ x__ :: Maybe TensorInfo'Encoding
x__
              -> case Maybe TensorInfo'Encoding
x__ of
                   (Prelude.Just (TensorInfo'CooSparse' x__val :: TensorInfo'CooSparse
x__val))
                     -> TensorInfo'CooSparse -> Maybe TensorInfo'CooSparse
forall a. a -> Maybe a
Prelude.Just TensorInfo'CooSparse
x__val
                   _otherwise :: Maybe TensorInfo'Encoding
_otherwise -> Maybe TensorInfo'CooSparse
forall a. Maybe a
Prelude.Nothing)
           (\ _ y__ :: Maybe TensorInfo'CooSparse
y__ -> (TensorInfo'CooSparse -> TensorInfo'Encoding)
-> Maybe TensorInfo'CooSparse -> Maybe TensorInfo'Encoding
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap TensorInfo'CooSparse -> TensorInfo'Encoding
TensorInfo'CooSparse' Maybe TensorInfo'CooSparse
y__))
instance Data.ProtoLens.Field.HasField TensorInfo "cooSparse" TensorInfo'CooSparse where
  fieldOf :: Proxy# "cooSparse"
-> (TensorInfo'CooSparse -> f TensorInfo'CooSparse)
-> TensorInfo
-> f TensorInfo
fieldOf _
    = ((Maybe TensorInfo'Encoding -> f (Maybe TensorInfo'Encoding))
 -> TensorInfo -> f TensorInfo)
-> ((TensorInfo'CooSparse -> f TensorInfo'CooSparse)
    -> Maybe TensorInfo'Encoding -> f (Maybe TensorInfo'Encoding))
-> (TensorInfo'CooSparse -> f TensorInfo'CooSparse)
-> TensorInfo
-> f TensorInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorInfo -> Maybe TensorInfo'Encoding)
-> (TensorInfo -> Maybe TensorInfo'Encoding -> TensorInfo)
-> Lens
     TensorInfo
     TensorInfo
     (Maybe TensorInfo'Encoding)
     (Maybe TensorInfo'Encoding)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorInfo -> Maybe TensorInfo'Encoding
_TensorInfo'encoding
           (\ x__ :: TensorInfo
x__ y__ :: Maybe TensorInfo'Encoding
y__ -> TensorInfo
x__ {_TensorInfo'encoding :: Maybe TensorInfo'Encoding
_TensorInfo'encoding = Maybe TensorInfo'Encoding
y__}))
        (((Maybe TensorInfo'CooSparse -> f (Maybe TensorInfo'CooSparse))
 -> Maybe TensorInfo'Encoding -> f (Maybe TensorInfo'Encoding))
-> ((TensorInfo'CooSparse -> f TensorInfo'CooSparse)
    -> Maybe TensorInfo'CooSparse -> f (Maybe TensorInfo'CooSparse))
-> (TensorInfo'CooSparse -> f TensorInfo'CooSparse)
-> Maybe TensorInfo'Encoding
-> f (Maybe TensorInfo'Encoding)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe TensorInfo'Encoding -> Maybe TensorInfo'CooSparse)
-> (Maybe TensorInfo'Encoding
    -> Maybe TensorInfo'CooSparse -> Maybe TensorInfo'Encoding)
-> Lens
     (Maybe TensorInfo'Encoding)
     (Maybe TensorInfo'Encoding)
     (Maybe TensorInfo'CooSparse)
     (Maybe TensorInfo'CooSparse)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ x__ :: Maybe TensorInfo'Encoding
x__
                 -> case Maybe TensorInfo'Encoding
x__ of
                      (Prelude.Just (TensorInfo'CooSparse' x__val :: TensorInfo'CooSparse
x__val))
                        -> TensorInfo'CooSparse -> Maybe TensorInfo'CooSparse
forall a. a -> Maybe a
Prelude.Just TensorInfo'CooSparse
x__val
                      _otherwise :: Maybe TensorInfo'Encoding
_otherwise -> Maybe TensorInfo'CooSparse
forall a. Maybe a
Prelude.Nothing)
              (\ _ y__ :: Maybe TensorInfo'CooSparse
y__ -> (TensorInfo'CooSparse -> TensorInfo'Encoding)
-> Maybe TensorInfo'CooSparse -> Maybe TensorInfo'Encoding
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap TensorInfo'CooSparse -> TensorInfo'Encoding
TensorInfo'CooSparse' Maybe TensorInfo'CooSparse
y__))
           (TensorInfo'CooSparse
-> Lens' (Maybe TensorInfo'CooSparse) TensorInfo'CooSparse
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens TensorInfo'CooSparse
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField TensorInfo "maybe'compositeTensor" (Prelude.Maybe TensorInfo'CompositeTensor) where
  fieldOf :: Proxy# "maybe'compositeTensor"
-> (Maybe TensorInfo'CompositeTensor
    -> f (Maybe TensorInfo'CompositeTensor))
-> TensorInfo
-> f TensorInfo
fieldOf _
    = ((Maybe TensorInfo'Encoding -> f (Maybe TensorInfo'Encoding))
 -> TensorInfo -> f TensorInfo)
-> ((Maybe TensorInfo'CompositeTensor
     -> f (Maybe TensorInfo'CompositeTensor))
    -> Maybe TensorInfo'Encoding -> f (Maybe TensorInfo'Encoding))
-> (Maybe TensorInfo'CompositeTensor
    -> f (Maybe TensorInfo'CompositeTensor))
-> TensorInfo
-> f TensorInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorInfo -> Maybe TensorInfo'Encoding)
-> (TensorInfo -> Maybe TensorInfo'Encoding -> TensorInfo)
-> Lens
     TensorInfo
     TensorInfo
     (Maybe TensorInfo'Encoding)
     (Maybe TensorInfo'Encoding)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorInfo -> Maybe TensorInfo'Encoding
_TensorInfo'encoding
           (\ x__ :: TensorInfo
x__ y__ :: Maybe TensorInfo'Encoding
y__ -> TensorInfo
x__ {_TensorInfo'encoding :: Maybe TensorInfo'Encoding
_TensorInfo'encoding = Maybe TensorInfo'Encoding
y__}))
        ((Maybe TensorInfo'Encoding -> Maybe TensorInfo'CompositeTensor)
-> (Maybe TensorInfo'Encoding
    -> Maybe TensorInfo'CompositeTensor -> Maybe TensorInfo'Encoding)
-> Lens
     (Maybe TensorInfo'Encoding)
     (Maybe TensorInfo'Encoding)
     (Maybe TensorInfo'CompositeTensor)
     (Maybe TensorInfo'CompositeTensor)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ x__ :: Maybe TensorInfo'Encoding
x__
              -> case Maybe TensorInfo'Encoding
x__ of
                   (Prelude.Just (TensorInfo'CompositeTensor' x__val :: TensorInfo'CompositeTensor
x__val))
                     -> TensorInfo'CompositeTensor -> Maybe TensorInfo'CompositeTensor
forall a. a -> Maybe a
Prelude.Just TensorInfo'CompositeTensor
x__val
                   _otherwise :: Maybe TensorInfo'Encoding
_otherwise -> Maybe TensorInfo'CompositeTensor
forall a. Maybe a
Prelude.Nothing)
           (\ _ y__ :: Maybe TensorInfo'CompositeTensor
y__ -> (TensorInfo'CompositeTensor -> TensorInfo'Encoding)
-> Maybe TensorInfo'CompositeTensor -> Maybe TensorInfo'Encoding
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap TensorInfo'CompositeTensor -> TensorInfo'Encoding
TensorInfo'CompositeTensor' Maybe TensorInfo'CompositeTensor
y__))
instance Data.ProtoLens.Field.HasField TensorInfo "compositeTensor" TensorInfo'CompositeTensor where
  fieldOf :: Proxy# "compositeTensor"
-> (TensorInfo'CompositeTensor -> f TensorInfo'CompositeTensor)
-> TensorInfo
-> f TensorInfo
fieldOf _
    = ((Maybe TensorInfo'Encoding -> f (Maybe TensorInfo'Encoding))
 -> TensorInfo -> f TensorInfo)
-> ((TensorInfo'CompositeTensor -> f TensorInfo'CompositeTensor)
    -> Maybe TensorInfo'Encoding -> f (Maybe TensorInfo'Encoding))
-> (TensorInfo'CompositeTensor -> f TensorInfo'CompositeTensor)
-> TensorInfo
-> f TensorInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorInfo -> Maybe TensorInfo'Encoding)
-> (TensorInfo -> Maybe TensorInfo'Encoding -> TensorInfo)
-> Lens
     TensorInfo
     TensorInfo
     (Maybe TensorInfo'Encoding)
     (Maybe TensorInfo'Encoding)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorInfo -> Maybe TensorInfo'Encoding
_TensorInfo'encoding
           (\ x__ :: TensorInfo
x__ y__ :: Maybe TensorInfo'Encoding
y__ -> TensorInfo
x__ {_TensorInfo'encoding :: Maybe TensorInfo'Encoding
_TensorInfo'encoding = Maybe TensorInfo'Encoding
y__}))
        (((Maybe TensorInfo'CompositeTensor
  -> f (Maybe TensorInfo'CompositeTensor))
 -> Maybe TensorInfo'Encoding -> f (Maybe TensorInfo'Encoding))
-> ((TensorInfo'CompositeTensor -> f TensorInfo'CompositeTensor)
    -> Maybe TensorInfo'CompositeTensor
    -> f (Maybe TensorInfo'CompositeTensor))
-> (TensorInfo'CompositeTensor -> f TensorInfo'CompositeTensor)
-> Maybe TensorInfo'Encoding
-> f (Maybe TensorInfo'Encoding)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe TensorInfo'Encoding -> Maybe TensorInfo'CompositeTensor)
-> (Maybe TensorInfo'Encoding
    -> Maybe TensorInfo'CompositeTensor -> Maybe TensorInfo'Encoding)
-> Lens
     (Maybe TensorInfo'Encoding)
     (Maybe TensorInfo'Encoding)
     (Maybe TensorInfo'CompositeTensor)
     (Maybe TensorInfo'CompositeTensor)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ x__ :: Maybe TensorInfo'Encoding
x__
                 -> case Maybe TensorInfo'Encoding
x__ of
                      (Prelude.Just (TensorInfo'CompositeTensor' x__val :: TensorInfo'CompositeTensor
x__val))
                        -> TensorInfo'CompositeTensor -> Maybe TensorInfo'CompositeTensor
forall a. a -> Maybe a
Prelude.Just TensorInfo'CompositeTensor
x__val
                      _otherwise :: Maybe TensorInfo'Encoding
_otherwise -> Maybe TensorInfo'CompositeTensor
forall a. Maybe a
Prelude.Nothing)
              (\ _ y__ :: Maybe TensorInfo'CompositeTensor
y__ -> (TensorInfo'CompositeTensor -> TensorInfo'Encoding)
-> Maybe TensorInfo'CompositeTensor -> Maybe TensorInfo'Encoding
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap TensorInfo'CompositeTensor -> TensorInfo'Encoding
TensorInfo'CompositeTensor' Maybe TensorInfo'CompositeTensor
y__))
           (TensorInfo'CompositeTensor
-> Lens'
     (Maybe TensorInfo'CompositeTensor) TensorInfo'CompositeTensor
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens TensorInfo'CompositeTensor
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Message TensorInfo where
  messageName :: Proxy TensorInfo -> Text
messageName _ = String -> Text
Data.Text.pack "tensorflow.TensorInfo"
  packedMessageDescriptor :: Proxy TensorInfo -> ByteString
packedMessageDescriptor _
    = "\n\
      \\n\
      \TensorInfo\DC2\DC4\n\
      \\EOTname\CAN\SOH \SOH(\tH\NULR\EOTname\DC2A\n\
      \\n\
      \coo_sparse\CAN\EOT \SOH(\v2 .tensorflow.TensorInfo.CooSparseH\NULR\tcooSparse\DC2S\n\
      \\DLEcomposite_tensor\CAN\ENQ \SOH(\v2&.tensorflow.TensorInfo.CompositeTensorH\NULR\SIcompositeTensor\DC2*\n\
      \\ENQdtype\CAN\STX \SOH(\SO2\DC4.tensorflow.DataTypeR\ENQdtype\DC2?\n\
      \\ftensor_shape\CAN\ETX \SOH(\v2\FS.tensorflow.TensorShapeProtoR\vtensorShape\SUB\160\SOH\n\
      \\tCooSparse\DC2,\n\
      \\DC2values_tensor_name\CAN\SOH \SOH(\tR\DLEvaluesTensorName\DC2.\n\
      \\DC3indices_tensor_name\CAN\STX \SOH(\tR\DC1indicesTensorName\DC25\n\
      \\ETBdense_shape_tensor_name\CAN\ETX \SOH(\tR\DC4denseShapeTensorName\SUB\129\SOH\n\
      \\SICompositeTensor\DC26\n\
      \\ttype_spec\CAN\SOH \SOH(\v2\EM.tensorflow.TypeSpecProtoR\btypeSpec\DC26\n\
      \\n\
      \components\CAN\STX \ETX(\v2\SYN.tensorflow.TensorInfoR\n\
      \componentsB\n\
      \\n\
      \\bencoding"
  packedFileDescriptor :: Proxy TensorInfo -> ByteString
packedFileDescriptor _ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor TensorInfo)
fieldsByTag
    = let
        dtype__field_descriptor :: FieldDescriptor TensorInfo
dtype__field_descriptor
          = String
-> FieldTypeDescriptor DataType
-> FieldAccessor TensorInfo DataType
-> FieldDescriptor TensorInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "dtype"
              (ScalarField DataType -> FieldTypeDescriptor DataType
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField DataType
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Tensorflow.Core.Framework.Types.DataType)
              (WireDefault DataType
-> Lens TensorInfo TensorInfo DataType DataType
-> FieldAccessor TensorInfo DataType
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault DataType
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall s a (f :: * -> *).
(HasField s "dtype" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"dtype")) ::
              Data.ProtoLens.FieldDescriptor TensorInfo
        tensorShape__field_descriptor :: FieldDescriptor TensorInfo
tensorShape__field_descriptor
          = String
-> FieldTypeDescriptor TensorShapeProto
-> FieldAccessor TensorInfo TensorShapeProto
-> FieldDescriptor TensorInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "tensor_shape"
              (MessageOrGroup -> FieldTypeDescriptor TensorShapeProto
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Tensorflow.Core.Framework.TensorShape.TensorShapeProto)
              (Lens
  TensorInfo
  TensorInfo
  (Maybe TensorShapeProto)
  (Maybe TensorShapeProto)
-> FieldAccessor TensorInfo TensorShapeProto
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall s a (f :: * -> *).
(HasField s "maybe'tensorShape" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'tensorShape")) ::
              Data.ProtoLens.FieldDescriptor TensorInfo
        name__field_descriptor :: FieldDescriptor TensorInfo
name__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor TensorInfo Text
-> FieldDescriptor TensorInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "name"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (Lens' TensorInfo (Maybe Text) -> FieldAccessor TensorInfo Text
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall s a (f :: * -> *).
(HasField s "maybe'name" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'name")) ::
              Data.ProtoLens.FieldDescriptor TensorInfo
        cooSparse__field_descriptor :: FieldDescriptor TensorInfo
cooSparse__field_descriptor
          = String
-> FieldTypeDescriptor TensorInfo'CooSparse
-> FieldAccessor TensorInfo TensorInfo'CooSparse
-> FieldDescriptor TensorInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "coo_sparse"
              (MessageOrGroup -> FieldTypeDescriptor TensorInfo'CooSparse
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor TensorInfo'CooSparse)
              (Lens' TensorInfo (Maybe TensorInfo'CooSparse)
-> FieldAccessor TensorInfo TensorInfo'CooSparse
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall s a (f :: * -> *).
(HasField s "maybe'cooSparse" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'cooSparse")) ::
              Data.ProtoLens.FieldDescriptor TensorInfo
        compositeTensor__field_descriptor :: FieldDescriptor TensorInfo
compositeTensor__field_descriptor
          = String
-> FieldTypeDescriptor TensorInfo'CompositeTensor
-> FieldAccessor TensorInfo TensorInfo'CompositeTensor
-> FieldDescriptor TensorInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "composite_tensor"
              (MessageOrGroup -> FieldTypeDescriptor TensorInfo'CompositeTensor
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor TensorInfo'CompositeTensor)
              (Lens' TensorInfo (Maybe TensorInfo'CompositeTensor)
-> FieldAccessor TensorInfo TensorInfo'CompositeTensor
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall s a (f :: * -> *).
(HasField s "maybe'compositeTensor" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'compositeTensor")) ::
              Data.ProtoLens.FieldDescriptor TensorInfo
      in
        [(Tag, FieldDescriptor TensorInfo)]
-> Map Tag (FieldDescriptor TensorInfo)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag 2, FieldDescriptor TensorInfo
dtype__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 3, FieldDescriptor TensorInfo
tensorShape__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 1, FieldDescriptor TensorInfo
name__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 4, FieldDescriptor TensorInfo
cooSparse__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 5, FieldDescriptor TensorInfo
compositeTensor__field_descriptor)]
  unknownFields :: LensLike' f TensorInfo FieldSet
unknownFields
    = (TensorInfo -> FieldSet)
-> (TensorInfo -> FieldSet -> TensorInfo)
-> Lens' TensorInfo FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        TensorInfo -> FieldSet
_TensorInfo'_unknownFields
        (\ x__ :: TensorInfo
x__ y__ :: FieldSet
y__ -> TensorInfo
x__ {_TensorInfo'_unknownFields :: FieldSet
_TensorInfo'_unknownFields = FieldSet
y__})
  defMessage :: TensorInfo
defMessage
    = $WTensorInfo'_constructor :: DataType
-> Maybe TensorShapeProto
-> Maybe TensorInfo'Encoding
-> FieldSet
-> TensorInfo
TensorInfo'_constructor
        {_TensorInfo'dtype :: DataType
_TensorInfo'dtype = DataType
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _TensorInfo'tensorShape :: Maybe TensorShapeProto
_TensorInfo'tensorShape = Maybe TensorShapeProto
forall a. Maybe a
Prelude.Nothing,
         _TensorInfo'encoding :: Maybe TensorInfo'Encoding
_TensorInfo'encoding = Maybe TensorInfo'Encoding
forall a. Maybe a
Prelude.Nothing,
         _TensorInfo'_unknownFields :: FieldSet
_TensorInfo'_unknownFields = []}
  parseMessage :: Parser TensorInfo
parseMessage
    = let
        loop ::
          TensorInfo -> Data.ProtoLens.Encoding.Bytes.Parser TensorInfo
        loop :: TensorInfo -> Parser TensorInfo
loop x :: TensorInfo
x
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do (let missing :: [a]
missing = []
                       in
                         if [Any] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
                             () -> Parser ()
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
                         else
                             String -> Parser ()
forall (m :: * -> *) a. MonadFail m => String -> m a
Prelude.fail
                               (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
                                  "Missing required fields: "
                                  ([String] -> String
forall a. Show a => a -> String
Prelude.show ([String]
forall a. [a]
missing :: [Prelude.String]))))
                      TensorInfo -> Parser TensorInfo
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter TensorInfo TensorInfo FieldSet FieldSet
-> (FieldSet -> FieldSet) -> TensorInfo -> TensorInfo
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                           forall msg. Message msg => Lens' msg FieldSet
Setter TensorInfo TensorInfo FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) TensorInfo
x)
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        16
                          -> do DataType
y <- Parser DataType -> String -> Parser DataType
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> DataType) -> Parser Int -> Parser DataType
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> DataType
forall a. Enum a => Int -> a
Prelude.toEnum
                                          ((Word64 -> Int) -> Parser Word64 -> Parser Int
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                             Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                             Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt))
                                       "dtype"
                                TensorInfo -> Parser TensorInfo
loop (Setter TensorInfo TensorInfo DataType DataType
-> DataType -> TensorInfo -> TensorInfo
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "dtype" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"dtype") DataType
y TensorInfo
x)
                        26
                          -> do TensorShapeProto
y <- Parser TensorShapeProto -> String -> Parser TensorShapeProto
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser TensorShapeProto -> Parser TensorShapeProto
forall a. Int -> Parser a -> Parser a
Data.ProtoLens.Encoding.Bytes.isolate
                                             (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len) Parser TensorShapeProto
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       "tensor_shape"
                                TensorInfo -> Parser TensorInfo
loop
                                  (Setter TensorInfo TensorInfo TensorShapeProto TensorShapeProto
-> TensorShapeProto -> TensorInfo -> TensorInfo
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "tensorShape" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"tensorShape") TensorShapeProto
y TensorInfo
x)
                        10
                          -> do Text
y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do ByteString
value <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                       Int -> Parser ByteString
Data.ProtoLens.Encoding.Bytes.getBytes
                                                         (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
                                           Either String Text -> Parser Text
forall a. Either String a -> Parser a
Data.ProtoLens.Encoding.Bytes.runEither
                                             (case ByteString -> Either UnicodeException Text
Data.Text.Encoding.decodeUtf8' ByteString
value of
                                                (Prelude.Left err :: UnicodeException
err)
                                                  -> String -> Either String Text
forall a b. a -> Either a b
Prelude.Left (UnicodeException -> String
forall a. Show a => a -> String
Prelude.show UnicodeException
err)
                                                (Prelude.Right r :: Text
r) -> Text -> Either String Text
forall a b. b -> Either a b
Prelude.Right Text
r))
                                       "name"
                                TensorInfo -> Parser TensorInfo
loop (Setter TensorInfo TensorInfo Text Text
-> Text -> TensorInfo -> TensorInfo
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "name" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"name") Text
y TensorInfo
x)
                        34
                          -> do TensorInfo'CooSparse
y <- Parser TensorInfo'CooSparse
-> String -> Parser TensorInfo'CooSparse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser TensorInfo'CooSparse -> Parser TensorInfo'CooSparse
forall a. Int -> Parser a -> Parser a
Data.ProtoLens.Encoding.Bytes.isolate
                                             (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len) Parser TensorInfo'CooSparse
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       "coo_sparse"
                                TensorInfo -> Parser TensorInfo
loop
                                  (Setter
  TensorInfo TensorInfo TensorInfo'CooSparse TensorInfo'CooSparse
-> TensorInfo'CooSparse -> TensorInfo -> TensorInfo
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "cooSparse" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"cooSparse") TensorInfo'CooSparse
y TensorInfo
x)
                        42
                          -> do TensorInfo'CompositeTensor
y <- Parser TensorInfo'CompositeTensor
-> String -> Parser TensorInfo'CompositeTensor
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int
-> Parser TensorInfo'CompositeTensor
-> Parser TensorInfo'CompositeTensor
forall a. Int -> Parser a -> Parser a
Data.ProtoLens.Encoding.Bytes.isolate
                                             (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len) Parser TensorInfo'CompositeTensor
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       "composite_tensor"
                                TensorInfo -> Parser TensorInfo
loop
                                  (Setter
  TensorInfo
  TensorInfo
  TensorInfo'CompositeTensor
  TensorInfo'CompositeTensor
-> TensorInfo'CompositeTensor -> TensorInfo -> TensorInfo
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "compositeTensor" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"compositeTensor") TensorInfo'CompositeTensor
y TensorInfo
x)
                        wire :: Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                TensorInfo -> Parser TensorInfo
loop
                                  (Setter TensorInfo TensorInfo FieldSet FieldSet
-> (FieldSet -> FieldSet) -> TensorInfo -> TensorInfo
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                     forall msg. Message msg => Lens' msg FieldSet
Setter TensorInfo TensorInfo FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) TensorInfo
x)
      in
        Parser TensorInfo -> String -> Parser TensorInfo
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do TensorInfo -> Parser TensorInfo
loop TensorInfo
forall msg. Message msg => msg
Data.ProtoLens.defMessage) "TensorInfo"
  buildMessage :: TensorInfo -> Builder
buildMessage
    = \ _x :: TensorInfo
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: DataType
_v = FoldLike DataType TensorInfo TensorInfo DataType DataType
-> TensorInfo -> DataType
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "dtype" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"dtype") TensorInfo
_x
              in
                if DataType -> DataType -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) DataType
_v DataType
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                    Builder
forall a. Monoid a => a
Data.Monoid.mempty
                else
                    Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 16)
                      ((Int -> Builder) -> (DataType -> Int) -> DataType -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                         ((Word64 -> Builder) -> (Int -> Word64) -> Int -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral)
                         DataType -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum
                         DataType
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (case
                     FoldLike
  (Maybe TensorShapeProto)
  TensorInfo
  TensorInfo
  (Maybe TensorShapeProto)
  (Maybe TensorShapeProto)
-> TensorInfo -> Maybe TensorShapeProto
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                       (forall s a (f :: * -> *).
(HasField s "maybe'tensorShape" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'tensorShape") TensorInfo
_x
                 of
                   Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just _v :: TensorShapeProto
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 26)
                          ((ByteString -> Builder)
-> (TensorShapeProto -> ByteString) -> TensorShapeProto -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ bs :: ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             TensorShapeProto -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                             TensorShapeProto
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (case
                        FoldLike
  (Maybe TensorInfo'Encoding)
  TensorInfo
  TensorInfo
  (Maybe TensorInfo'Encoding)
  (Maybe TensorInfo'Encoding)
-> TensorInfo -> Maybe TensorInfo'Encoding
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "maybe'encoding" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'encoding") TensorInfo
_x
                    of
                      Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      (Prelude.Just (TensorInfo'Name v :: Text
v))
                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 10)
                             ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                (\ bs :: ByteString
bs
                                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                           (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                        (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                Text -> ByteString
Data.Text.Encoding.encodeUtf8
                                Text
v)
                      (Prelude.Just (TensorInfo'CooSparse' v :: TensorInfo'CooSparse
v))
                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 34)
                             ((ByteString -> Builder)
-> (TensorInfo'CooSparse -> ByteString)
-> TensorInfo'CooSparse
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                (\ bs :: ByteString
bs
                                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                           (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                        (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                TensorInfo'CooSparse -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                TensorInfo'CooSparse
v)
                      (Prelude.Just (TensorInfo'CompositeTensor' v :: TensorInfo'CompositeTensor
v))
                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 42)
                             ((ByteString -> Builder)
-> (TensorInfo'CompositeTensor -> ByteString)
-> TensorInfo'CompositeTensor
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                (\ bs :: ByteString
bs
                                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                           (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                        (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                TensorInfo'CompositeTensor -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                TensorInfo'CompositeTensor
v))
                   (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                      (FoldLike FieldSet TensorInfo TensorInfo FieldSet FieldSet
-> TensorInfo -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet TensorInfo TensorInfo FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields TensorInfo
_x))))
instance Control.DeepSeq.NFData TensorInfo where
  rnf :: TensorInfo -> ()
rnf
    = \ x__ :: TensorInfo
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (TensorInfo -> FieldSet
_TensorInfo'_unknownFields TensorInfo
x__)
             (DataType -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (TensorInfo -> DataType
_TensorInfo'dtype TensorInfo
x__)
                (Maybe TensorShapeProto -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (TensorInfo -> Maybe TensorShapeProto
_TensorInfo'tensorShape TensorInfo
x__)
                   (Maybe TensorInfo'Encoding -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (TensorInfo -> Maybe TensorInfo'Encoding
_TensorInfo'encoding TensorInfo
x__) ())))
instance Control.DeepSeq.NFData TensorInfo'Encoding where
  rnf :: TensorInfo'Encoding -> ()
rnf (TensorInfo'Name x__ :: Text
x__) = Text -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf Text
x__
  rnf (TensorInfo'CooSparse' x__ :: TensorInfo'CooSparse
x__) = TensorInfo'CooSparse -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf TensorInfo'CooSparse
x__
  rnf (TensorInfo'CompositeTensor' x__ :: TensorInfo'CompositeTensor
x__) = TensorInfo'CompositeTensor -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf TensorInfo'CompositeTensor
x__
_TensorInfo'Name ::
  Data.ProtoLens.Prism.Prism' TensorInfo'Encoding Data.Text.Text
_TensorInfo'Name :: p Text (f Text) -> p TensorInfo'Encoding (f TensorInfo'Encoding)
_TensorInfo'Name
  = (Text -> TensorInfo'Encoding)
-> (TensorInfo'Encoding -> Maybe Text)
-> Prism TensorInfo'Encoding TensorInfo'Encoding Text Text
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      Text -> TensorInfo'Encoding
TensorInfo'Name
      (\ p__ :: TensorInfo'Encoding
p__
         -> case TensorInfo'Encoding
p__ of
              (TensorInfo'Name p__val :: Text
p__val) -> Text -> Maybe Text
forall a. a -> Maybe a
Prelude.Just Text
p__val
              _otherwise :: TensorInfo'Encoding
_otherwise -> Maybe Text
forall a. Maybe a
Prelude.Nothing)
_TensorInfo'CooSparse' ::
  Data.ProtoLens.Prism.Prism' TensorInfo'Encoding TensorInfo'CooSparse
_TensorInfo'CooSparse' :: p TensorInfo'CooSparse (f TensorInfo'CooSparse)
-> p TensorInfo'Encoding (f TensorInfo'Encoding)
_TensorInfo'CooSparse'
  = (TensorInfo'CooSparse -> TensorInfo'Encoding)
-> (TensorInfo'Encoding -> Maybe TensorInfo'CooSparse)
-> Prism
     TensorInfo'Encoding
     TensorInfo'Encoding
     TensorInfo'CooSparse
     TensorInfo'CooSparse
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      TensorInfo'CooSparse -> TensorInfo'Encoding
TensorInfo'CooSparse'
      (\ p__ :: TensorInfo'Encoding
p__
         -> case TensorInfo'Encoding
p__ of
              (TensorInfo'CooSparse' p__val :: TensorInfo'CooSparse
p__val) -> TensorInfo'CooSparse -> Maybe TensorInfo'CooSparse
forall a. a -> Maybe a
Prelude.Just TensorInfo'CooSparse
p__val
              _otherwise :: TensorInfo'Encoding
_otherwise -> Maybe TensorInfo'CooSparse
forall a. Maybe a
Prelude.Nothing)
_TensorInfo'CompositeTensor' ::
  Data.ProtoLens.Prism.Prism' TensorInfo'Encoding TensorInfo'CompositeTensor
_TensorInfo'CompositeTensor' :: p TensorInfo'CompositeTensor (f TensorInfo'CompositeTensor)
-> p TensorInfo'Encoding (f TensorInfo'Encoding)
_TensorInfo'CompositeTensor'
  = (TensorInfo'CompositeTensor -> TensorInfo'Encoding)
-> (TensorInfo'Encoding -> Maybe TensorInfo'CompositeTensor)
-> Prism
     TensorInfo'Encoding
     TensorInfo'Encoding
     TensorInfo'CompositeTensor
     TensorInfo'CompositeTensor
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      TensorInfo'CompositeTensor -> TensorInfo'Encoding
TensorInfo'CompositeTensor'
      (\ p__ :: TensorInfo'Encoding
p__
         -> case TensorInfo'Encoding
p__ of
              (TensorInfo'CompositeTensor' p__val :: TensorInfo'CompositeTensor
p__val) -> TensorInfo'CompositeTensor -> Maybe TensorInfo'CompositeTensor
forall a. a -> Maybe a
Prelude.Just TensorInfo'CompositeTensor
p__val
              _otherwise :: TensorInfo'Encoding
_otherwise -> Maybe TensorInfo'CompositeTensor
forall a. Maybe a
Prelude.Nothing)
{- | Fields :
     
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.typeSpec' @:: Lens' TensorInfo'CompositeTensor Proto.Tensorflow.Core.Protobuf.Struct.TypeSpecProto@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.maybe'typeSpec' @:: Lens' TensorInfo'CompositeTensor (Prelude.Maybe Proto.Tensorflow.Core.Protobuf.Struct.TypeSpecProto)@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.components' @:: Lens' TensorInfo'CompositeTensor [TensorInfo]@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.vec'components' @:: Lens' TensorInfo'CompositeTensor (Data.Vector.Vector TensorInfo)@ -}
data TensorInfo'CompositeTensor
  = TensorInfo'CompositeTensor'_constructor {TensorInfo'CompositeTensor -> Maybe TypeSpecProto
_TensorInfo'CompositeTensor'typeSpec :: !(Prelude.Maybe Proto.Tensorflow.Core.Protobuf.Struct.TypeSpecProto),
                                             TensorInfo'CompositeTensor -> Vector TensorInfo
_TensorInfo'CompositeTensor'components :: !(Data.Vector.Vector TensorInfo),
                                             TensorInfo'CompositeTensor -> FieldSet
_TensorInfo'CompositeTensor'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (TensorInfo'CompositeTensor -> TensorInfo'CompositeTensor -> Bool
(TensorInfo'CompositeTensor -> TensorInfo'CompositeTensor -> Bool)
-> (TensorInfo'CompositeTensor
    -> TensorInfo'CompositeTensor -> Bool)
-> Eq TensorInfo'CompositeTensor
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: TensorInfo'CompositeTensor -> TensorInfo'CompositeTensor -> Bool
$c/= :: TensorInfo'CompositeTensor -> TensorInfo'CompositeTensor -> Bool
== :: TensorInfo'CompositeTensor -> TensorInfo'CompositeTensor -> Bool
$c== :: TensorInfo'CompositeTensor -> TensorInfo'CompositeTensor -> Bool
Prelude.Eq, Eq TensorInfo'CompositeTensor
Eq TensorInfo'CompositeTensor =>
(TensorInfo'CompositeTensor
 -> TensorInfo'CompositeTensor -> Ordering)
-> (TensorInfo'CompositeTensor
    -> TensorInfo'CompositeTensor -> Bool)
-> (TensorInfo'CompositeTensor
    -> TensorInfo'CompositeTensor -> Bool)
-> (TensorInfo'CompositeTensor
    -> TensorInfo'CompositeTensor -> Bool)
-> (TensorInfo'CompositeTensor
    -> TensorInfo'CompositeTensor -> Bool)
-> (TensorInfo'CompositeTensor
    -> TensorInfo'CompositeTensor -> TensorInfo'CompositeTensor)
-> (TensorInfo'CompositeTensor
    -> TensorInfo'CompositeTensor -> TensorInfo'CompositeTensor)
-> Ord TensorInfo'CompositeTensor
TensorInfo'CompositeTensor -> TensorInfo'CompositeTensor -> Bool
TensorInfo'CompositeTensor
-> TensorInfo'CompositeTensor -> Ordering
TensorInfo'CompositeTensor
-> TensorInfo'CompositeTensor -> TensorInfo'CompositeTensor
forall a.
Eq a =>
(a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
min :: TensorInfo'CompositeTensor
-> TensorInfo'CompositeTensor -> TensorInfo'CompositeTensor
$cmin :: TensorInfo'CompositeTensor
-> TensorInfo'CompositeTensor -> TensorInfo'CompositeTensor
max :: TensorInfo'CompositeTensor
-> TensorInfo'CompositeTensor -> TensorInfo'CompositeTensor
$cmax :: TensorInfo'CompositeTensor
-> TensorInfo'CompositeTensor -> TensorInfo'CompositeTensor
>= :: TensorInfo'CompositeTensor -> TensorInfo'CompositeTensor -> Bool
$c>= :: TensorInfo'CompositeTensor -> TensorInfo'CompositeTensor -> Bool
> :: TensorInfo'CompositeTensor -> TensorInfo'CompositeTensor -> Bool
$c> :: TensorInfo'CompositeTensor -> TensorInfo'CompositeTensor -> Bool
<= :: TensorInfo'CompositeTensor -> TensorInfo'CompositeTensor -> Bool
$c<= :: TensorInfo'CompositeTensor -> TensorInfo'CompositeTensor -> Bool
< :: TensorInfo'CompositeTensor -> TensorInfo'CompositeTensor -> Bool
$c< :: TensorInfo'CompositeTensor -> TensorInfo'CompositeTensor -> Bool
compare :: TensorInfo'CompositeTensor
-> TensorInfo'CompositeTensor -> Ordering
$ccompare :: TensorInfo'CompositeTensor
-> TensorInfo'CompositeTensor -> Ordering
$cp1Ord :: Eq TensorInfo'CompositeTensor
Prelude.Ord)
instance Prelude.Show TensorInfo'CompositeTensor where
  showsPrec :: Int -> TensorInfo'CompositeTensor -> ShowS
showsPrec _ __x :: TensorInfo'CompositeTensor
__x __s :: String
__s
    = Char -> ShowS
Prelude.showChar
        '{'
        (String -> ShowS
Prelude.showString
           (TensorInfo'CompositeTensor -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort TensorInfo'CompositeTensor
__x) (Char -> ShowS
Prelude.showChar '}' String
__s))
instance Data.ProtoLens.Field.HasField TensorInfo'CompositeTensor "typeSpec" Proto.Tensorflow.Core.Protobuf.Struct.TypeSpecProto where
  fieldOf :: Proxy# "typeSpec"
-> (TypeSpecProto -> f TypeSpecProto)
-> TensorInfo'CompositeTensor
-> f TensorInfo'CompositeTensor
fieldOf _
    = ((Maybe TypeSpecProto -> f (Maybe TypeSpecProto))
 -> TensorInfo'CompositeTensor -> f TensorInfo'CompositeTensor)
-> ((TypeSpecProto -> f TypeSpecProto)
    -> Maybe TypeSpecProto -> f (Maybe TypeSpecProto))
-> (TypeSpecProto -> f TypeSpecProto)
-> TensorInfo'CompositeTensor
-> f TensorInfo'CompositeTensor
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorInfo'CompositeTensor -> Maybe TypeSpecProto)
-> (TensorInfo'CompositeTensor
    -> Maybe TypeSpecProto -> TensorInfo'CompositeTensor)
-> Lens
     TensorInfo'CompositeTensor
     TensorInfo'CompositeTensor
     (Maybe TypeSpecProto)
     (Maybe TypeSpecProto)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorInfo'CompositeTensor -> Maybe TypeSpecProto
_TensorInfo'CompositeTensor'typeSpec
           (\ x__ :: TensorInfo'CompositeTensor
x__ y__ :: Maybe TypeSpecProto
y__ -> TensorInfo'CompositeTensor
x__ {_TensorInfo'CompositeTensor'typeSpec :: Maybe TypeSpecProto
_TensorInfo'CompositeTensor'typeSpec = Maybe TypeSpecProto
y__}))
        (TypeSpecProto -> Lens' (Maybe TypeSpecProto) TypeSpecProto
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens TypeSpecProto
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField TensorInfo'CompositeTensor "maybe'typeSpec" (Prelude.Maybe Proto.Tensorflow.Core.Protobuf.Struct.TypeSpecProto) where
  fieldOf :: Proxy# "maybe'typeSpec"
-> (Maybe TypeSpecProto -> f (Maybe TypeSpecProto))
-> TensorInfo'CompositeTensor
-> f TensorInfo'CompositeTensor
fieldOf _
    = ((Maybe TypeSpecProto -> f (Maybe TypeSpecProto))
 -> TensorInfo'CompositeTensor -> f TensorInfo'CompositeTensor)
-> ((Maybe TypeSpecProto -> f (Maybe TypeSpecProto))
    -> Maybe TypeSpecProto -> f (Maybe TypeSpecProto))
-> (Maybe TypeSpecProto -> f (Maybe TypeSpecProto))
-> TensorInfo'CompositeTensor
-> f TensorInfo'CompositeTensor
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorInfo'CompositeTensor -> Maybe TypeSpecProto)
-> (TensorInfo'CompositeTensor
    -> Maybe TypeSpecProto -> TensorInfo'CompositeTensor)
-> Lens
     TensorInfo'CompositeTensor
     TensorInfo'CompositeTensor
     (Maybe TypeSpecProto)
     (Maybe TypeSpecProto)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorInfo'CompositeTensor -> Maybe TypeSpecProto
_TensorInfo'CompositeTensor'typeSpec
           (\ x__ :: TensorInfo'CompositeTensor
x__ y__ :: Maybe TypeSpecProto
y__ -> TensorInfo'CompositeTensor
x__ {_TensorInfo'CompositeTensor'typeSpec :: Maybe TypeSpecProto
_TensorInfo'CompositeTensor'typeSpec = Maybe TypeSpecProto
y__}))
        (Maybe TypeSpecProto -> f (Maybe TypeSpecProto))
-> Maybe TypeSpecProto -> f (Maybe TypeSpecProto)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField TensorInfo'CompositeTensor "components" [TensorInfo] where
  fieldOf :: Proxy# "components"
-> ([TensorInfo] -> f [TensorInfo])
-> TensorInfo'CompositeTensor
-> f TensorInfo'CompositeTensor
fieldOf _
    = ((Vector TensorInfo -> f (Vector TensorInfo))
 -> TensorInfo'CompositeTensor -> f TensorInfo'CompositeTensor)
-> (([TensorInfo] -> f [TensorInfo])
    -> Vector TensorInfo -> f (Vector TensorInfo))
-> ([TensorInfo] -> f [TensorInfo])
-> TensorInfo'CompositeTensor
-> f TensorInfo'CompositeTensor
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorInfo'CompositeTensor -> Vector TensorInfo)
-> (TensorInfo'CompositeTensor
    -> Vector TensorInfo -> TensorInfo'CompositeTensor)
-> Lens
     TensorInfo'CompositeTensor
     TensorInfo'CompositeTensor
     (Vector TensorInfo)
     (Vector TensorInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorInfo'CompositeTensor -> Vector TensorInfo
_TensorInfo'CompositeTensor'components
           (\ x__ :: TensorInfo'CompositeTensor
x__ y__ :: Vector TensorInfo
y__ -> TensorInfo'CompositeTensor
x__ {_TensorInfo'CompositeTensor'components :: Vector TensorInfo
_TensorInfo'CompositeTensor'components = Vector TensorInfo
y__}))
        ((Vector TensorInfo -> [TensorInfo])
-> (Vector TensorInfo -> [TensorInfo] -> Vector TensorInfo)
-> Lens
     (Vector TensorInfo) (Vector TensorInfo) [TensorInfo] [TensorInfo]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector TensorInfo -> [TensorInfo]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ _ y__ :: [TensorInfo]
y__ -> [TensorInfo] -> Vector TensorInfo
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [TensorInfo]
y__))
instance Data.ProtoLens.Field.HasField TensorInfo'CompositeTensor "vec'components" (Data.Vector.Vector TensorInfo) where
  fieldOf :: Proxy# "vec'components"
-> (Vector TensorInfo -> f (Vector TensorInfo))
-> TensorInfo'CompositeTensor
-> f TensorInfo'CompositeTensor
fieldOf _
    = ((Vector TensorInfo -> f (Vector TensorInfo))
 -> TensorInfo'CompositeTensor -> f TensorInfo'CompositeTensor)
-> ((Vector TensorInfo -> f (Vector TensorInfo))
    -> Vector TensorInfo -> f (Vector TensorInfo))
-> (Vector TensorInfo -> f (Vector TensorInfo))
-> TensorInfo'CompositeTensor
-> f TensorInfo'CompositeTensor
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorInfo'CompositeTensor -> Vector TensorInfo)
-> (TensorInfo'CompositeTensor
    -> Vector TensorInfo -> TensorInfo'CompositeTensor)
-> Lens
     TensorInfo'CompositeTensor
     TensorInfo'CompositeTensor
     (Vector TensorInfo)
     (Vector TensorInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorInfo'CompositeTensor -> Vector TensorInfo
_TensorInfo'CompositeTensor'components
           (\ x__ :: TensorInfo'CompositeTensor
x__ y__ :: Vector TensorInfo
y__ -> TensorInfo'CompositeTensor
x__ {_TensorInfo'CompositeTensor'components :: Vector TensorInfo
_TensorInfo'CompositeTensor'components = Vector TensorInfo
y__}))
        (Vector TensorInfo -> f (Vector TensorInfo))
-> Vector TensorInfo -> f (Vector TensorInfo)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message TensorInfo'CompositeTensor where
  messageName :: Proxy TensorInfo'CompositeTensor -> Text
messageName _
    = String -> Text
Data.Text.pack "tensorflow.TensorInfo.CompositeTensor"
  packedMessageDescriptor :: Proxy TensorInfo'CompositeTensor -> ByteString
packedMessageDescriptor _
    = "\n\
      \\SICompositeTensor\DC26\n\
      \\ttype_spec\CAN\SOH \SOH(\v2\EM.tensorflow.TypeSpecProtoR\btypeSpec\DC26\n\
      \\n\
      \components\CAN\STX \ETX(\v2\SYN.tensorflow.TensorInfoR\n\
      \components"
  packedFileDescriptor :: Proxy TensorInfo'CompositeTensor -> ByteString
packedFileDescriptor _ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor TensorInfo'CompositeTensor)
fieldsByTag
    = let
        typeSpec__field_descriptor :: FieldDescriptor TensorInfo'CompositeTensor
typeSpec__field_descriptor
          = String
-> FieldTypeDescriptor TypeSpecProto
-> FieldAccessor TensorInfo'CompositeTensor TypeSpecProto
-> FieldDescriptor TensorInfo'CompositeTensor
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "type_spec"
              (MessageOrGroup -> FieldTypeDescriptor TypeSpecProto
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Tensorflow.Core.Protobuf.Struct.TypeSpecProto)
              (Lens
  TensorInfo'CompositeTensor
  TensorInfo'CompositeTensor
  (Maybe TypeSpecProto)
  (Maybe TypeSpecProto)
-> FieldAccessor TensorInfo'CompositeTensor TypeSpecProto
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall s a (f :: * -> *).
(HasField s "maybe'typeSpec" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'typeSpec")) ::
              Data.ProtoLens.FieldDescriptor TensorInfo'CompositeTensor
        components__field_descriptor :: FieldDescriptor TensorInfo'CompositeTensor
components__field_descriptor
          = String
-> FieldTypeDescriptor TensorInfo
-> FieldAccessor TensorInfo'CompositeTensor TensorInfo
-> FieldDescriptor TensorInfo'CompositeTensor
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "components"
              (MessageOrGroup -> FieldTypeDescriptor TensorInfo
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor TensorInfo)
              (Packing
-> Lens' TensorInfo'CompositeTensor [TensorInfo]
-> FieldAccessor TensorInfo'CompositeTensor TensorInfo
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Unpacked
                 (forall s a (f :: * -> *).
(HasField s "components" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"components")) ::
              Data.ProtoLens.FieldDescriptor TensorInfo'CompositeTensor
      in
        [(Tag, FieldDescriptor TensorInfo'CompositeTensor)]
-> Map Tag (FieldDescriptor TensorInfo'CompositeTensor)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag 1, FieldDescriptor TensorInfo'CompositeTensor
typeSpec__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 2, FieldDescriptor TensorInfo'CompositeTensor
components__field_descriptor)]
  unknownFields :: LensLike' f TensorInfo'CompositeTensor FieldSet
unknownFields
    = (TensorInfo'CompositeTensor -> FieldSet)
-> (TensorInfo'CompositeTensor
    -> FieldSet -> TensorInfo'CompositeTensor)
-> Lens' TensorInfo'CompositeTensor FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        TensorInfo'CompositeTensor -> FieldSet
_TensorInfo'CompositeTensor'_unknownFields
        (\ x__ :: TensorInfo'CompositeTensor
x__ y__ :: FieldSet
y__
           -> TensorInfo'CompositeTensor
x__ {_TensorInfo'CompositeTensor'_unknownFields :: FieldSet
_TensorInfo'CompositeTensor'_unknownFields = FieldSet
y__})
  defMessage :: TensorInfo'CompositeTensor
defMessage
    = $WTensorInfo'CompositeTensor'_constructor :: Maybe TypeSpecProto
-> Vector TensorInfo -> FieldSet -> TensorInfo'CompositeTensor
TensorInfo'CompositeTensor'_constructor
        {_TensorInfo'CompositeTensor'typeSpec :: Maybe TypeSpecProto
_TensorInfo'CompositeTensor'typeSpec = Maybe TypeSpecProto
forall a. Maybe a
Prelude.Nothing,
         _TensorInfo'CompositeTensor'components :: Vector TensorInfo
_TensorInfo'CompositeTensor'components = Vector TensorInfo
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _TensorInfo'CompositeTensor'_unknownFields :: FieldSet
_TensorInfo'CompositeTensor'_unknownFields = []}
  parseMessage :: Parser TensorInfo'CompositeTensor
parseMessage
    = let
        loop ::
          TensorInfo'CompositeTensor
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld TensorInfo
             -> Data.ProtoLens.Encoding.Bytes.Parser TensorInfo'CompositeTensor
        loop :: TensorInfo'CompositeTensor
-> Growing Vector RealWorld TensorInfo
-> Parser TensorInfo'CompositeTensor
loop x :: TensorInfo'CompositeTensor
x mutable'components :: Growing Vector RealWorld TensorInfo
mutable'components
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do Vector TensorInfo
frozen'components <- IO (Vector TensorInfo) -> Parser (Vector TensorInfo)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                             (Growing Vector (PrimState IO) TensorInfo -> IO (Vector TensorInfo)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> m (v a)
Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                                Growing Vector RealWorld TensorInfo
Growing Vector (PrimState IO) TensorInfo
mutable'components)
                      (let missing :: [a]
missing = []
                       in
                         if [Any] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
                             () -> Parser ()
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
                         else
                             String -> Parser ()
forall (m :: * -> *) a. MonadFail m => String -> m a
Prelude.fail
                               (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
                                  "Missing required fields: "
                                  ([String] -> String
forall a. Show a => a -> String
Prelude.show ([String]
forall a. [a]
missing :: [Prelude.String]))))
                      TensorInfo'CompositeTensor -> Parser TensorInfo'CompositeTensor
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter
  TensorInfo'CompositeTensor
  TensorInfo'CompositeTensor
  FieldSet
  FieldSet
-> (FieldSet -> FieldSet)
-> TensorInfo'CompositeTensor
-> TensorInfo'CompositeTensor
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                           forall msg. Message msg => Lens' msg FieldSet
Setter
  TensorInfo'CompositeTensor
  TensorInfo'CompositeTensor
  FieldSet
  FieldSet
Data.ProtoLens.unknownFields
                           (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t)
                           (Setter
  TensorInfo'CompositeTensor
  TensorInfo'CompositeTensor
  (Vector TensorInfo)
  (Vector TensorInfo)
-> Vector TensorInfo
-> TensorInfo'CompositeTensor
-> TensorInfo'CompositeTensor
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                              (forall s a (f :: * -> *).
(HasField s "vec'components" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'components")
                              Vector TensorInfo
frozen'components
                              TensorInfo'CompositeTensor
x))
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        10
                          -> do TypeSpecProto
y <- Parser TypeSpecProto -> String -> Parser TypeSpecProto
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser TypeSpecProto -> Parser TypeSpecProto
forall a. Int -> Parser a -> Parser a
Data.ProtoLens.Encoding.Bytes.isolate
                                             (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len) Parser TypeSpecProto
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       "type_spec"
                                TensorInfo'CompositeTensor
-> Growing Vector RealWorld TensorInfo
-> Parser TensorInfo'CompositeTensor
loop
                                  (Setter
  TensorInfo'CompositeTensor
  TensorInfo'CompositeTensor
  TypeSpecProto
  TypeSpecProto
-> TypeSpecProto
-> TensorInfo'CompositeTensor
-> TensorInfo'CompositeTensor
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "typeSpec" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"typeSpec") TypeSpecProto
y TensorInfo'CompositeTensor
x)
                                  Growing Vector RealWorld TensorInfo
mutable'components
                        18
                          -> do !TensorInfo
y <- Parser TensorInfo -> String -> Parser TensorInfo
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Int -> Parser TensorInfo -> Parser TensorInfo
forall a. Int -> Parser a -> Parser a
Data.ProtoLens.Encoding.Bytes.isolate
                                              (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
                                              Parser TensorInfo
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                        "components"
                                Growing Vector RealWorld TensorInfo
v <- IO (Growing Vector RealWorld TensorInfo)
-> Parser (Growing Vector RealWorld TensorInfo)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) TensorInfo
-> TensorInfo -> IO (Growing Vector (PrimState IO) TensorInfo)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> a -> m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.append Growing Vector RealWorld TensorInfo
Growing Vector (PrimState IO) TensorInfo
mutable'components TensorInfo
y)
                                TensorInfo'CompositeTensor
-> Growing Vector RealWorld TensorInfo
-> Parser TensorInfo'CompositeTensor
loop TensorInfo'CompositeTensor
x Growing Vector RealWorld TensorInfo
v
                        wire :: Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                TensorInfo'CompositeTensor
-> Growing Vector RealWorld TensorInfo
-> Parser TensorInfo'CompositeTensor
loop
                                  (Setter
  TensorInfo'CompositeTensor
  TensorInfo'CompositeTensor
  FieldSet
  FieldSet
-> (FieldSet -> FieldSet)
-> TensorInfo'CompositeTensor
-> TensorInfo'CompositeTensor
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                     forall msg. Message msg => Lens' msg FieldSet
Setter
  TensorInfo'CompositeTensor
  TensorInfo'CompositeTensor
  FieldSet
  FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) TensorInfo'CompositeTensor
x)
                                  Growing Vector RealWorld TensorInfo
mutable'components
      in
        Parser TensorInfo'CompositeTensor
-> String -> Parser TensorInfo'CompositeTensor
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do Growing Vector RealWorld TensorInfo
mutable'components <- IO (Growing Vector RealWorld TensorInfo)
-> Parser (Growing Vector RealWorld TensorInfo)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                      IO (Growing Vector RealWorld TensorInfo)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              TensorInfo'CompositeTensor
-> Growing Vector RealWorld TensorInfo
-> Parser TensorInfo'CompositeTensor
loop TensorInfo'CompositeTensor
forall msg. Message msg => msg
Data.ProtoLens.defMessage Growing Vector RealWorld TensorInfo
mutable'components)
          "CompositeTensor"
  buildMessage :: TensorInfo'CompositeTensor -> Builder
buildMessage
    = \ _x :: TensorInfo'CompositeTensor
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (case
                  FoldLike
  (Maybe TypeSpecProto)
  TensorInfo'CompositeTensor
  TensorInfo'CompositeTensor
  (Maybe TypeSpecProto)
  (Maybe TypeSpecProto)
-> TensorInfo'CompositeTensor -> Maybe TypeSpecProto
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "maybe'typeSpec" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'typeSpec") TensorInfo'CompositeTensor
_x
              of
                Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                (Prelude.Just _v :: TypeSpecProto
_v)
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 10)
                       ((ByteString -> Builder)
-> (TypeSpecProto -> ByteString) -> TypeSpecProto -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ bs :: ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          TypeSpecProto -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                          TypeSpecProto
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                ((TensorInfo -> Builder) -> Vector TensorInfo -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                   (\ _v :: TensorInfo
_v
                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 18)
                           ((ByteString -> Builder)
-> (TensorInfo -> ByteString) -> TensorInfo -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                              (\ bs :: ByteString
bs
                                 -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                         (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                      (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                              TensorInfo -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                              TensorInfo
_v))
                   (FoldLike
  (Vector TensorInfo)
  TensorInfo'CompositeTensor
  TensorInfo'CompositeTensor
  (Vector TensorInfo)
  (Vector TensorInfo)
-> TensorInfo'CompositeTensor -> Vector TensorInfo
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                      (forall s a (f :: * -> *).
(HasField s "vec'components" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'components") TensorInfo'CompositeTensor
_x))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  TensorInfo'CompositeTensor
  TensorInfo'CompositeTensor
  FieldSet
  FieldSet
-> TensorInfo'CompositeTensor -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  TensorInfo'CompositeTensor
  TensorInfo'CompositeTensor
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields TensorInfo'CompositeTensor
_x)))
instance Control.DeepSeq.NFData TensorInfo'CompositeTensor where
  rnf :: TensorInfo'CompositeTensor -> ()
rnf
    = \ x__ :: TensorInfo'CompositeTensor
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (TensorInfo'CompositeTensor -> FieldSet
_TensorInfo'CompositeTensor'_unknownFields TensorInfo'CompositeTensor
x__)
             (Maybe TypeSpecProto -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (TensorInfo'CompositeTensor -> Maybe TypeSpecProto
_TensorInfo'CompositeTensor'typeSpec TensorInfo'CompositeTensor
x__)
                (Vector TensorInfo -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (TensorInfo'CompositeTensor -> Vector TensorInfo
_TensorInfo'CompositeTensor'components TensorInfo'CompositeTensor
x__) ()))
{- | Fields :
     
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.valuesTensorName' @:: Lens' TensorInfo'CooSparse Data.Text.Text@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.indicesTensorName' @:: Lens' TensorInfo'CooSparse Data.Text.Text@
         * 'Proto.Tensorflow.Core.Protobuf.MetaGraph_Fields.denseShapeTensorName' @:: Lens' TensorInfo'CooSparse Data.Text.Text@ -}
data TensorInfo'CooSparse
  = TensorInfo'CooSparse'_constructor {TensorInfo'CooSparse -> Text
_TensorInfo'CooSparse'valuesTensorName :: !Data.Text.Text,
                                       TensorInfo'CooSparse -> Text
_TensorInfo'CooSparse'indicesTensorName :: !Data.Text.Text,
                                       TensorInfo'CooSparse -> Text
_TensorInfo'CooSparse'denseShapeTensorName :: !Data.Text.Text,
                                       TensorInfo'CooSparse -> FieldSet
_TensorInfo'CooSparse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (TensorInfo'CooSparse -> TensorInfo'CooSparse -> Bool
(TensorInfo'CooSparse -> TensorInfo'CooSparse -> Bool)
-> (TensorInfo'CooSparse -> TensorInfo'CooSparse -> Bool)
-> Eq TensorInfo'CooSparse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: TensorInfo'CooSparse -> TensorInfo'CooSparse -> Bool
$c/= :: TensorInfo'CooSparse -> TensorInfo'CooSparse -> Bool
== :: TensorInfo'CooSparse -> TensorInfo'CooSparse -> Bool
$c== :: TensorInfo'CooSparse -> TensorInfo'CooSparse -> Bool
Prelude.Eq, Eq TensorInfo'CooSparse
Eq TensorInfo'CooSparse =>
(TensorInfo'CooSparse -> TensorInfo'CooSparse -> Ordering)
-> (TensorInfo'CooSparse -> TensorInfo'CooSparse -> Bool)
-> (TensorInfo'CooSparse -> TensorInfo'CooSparse -> Bool)
-> (TensorInfo'CooSparse -> TensorInfo'CooSparse -> Bool)
-> (TensorInfo'CooSparse -> TensorInfo'CooSparse -> Bool)
-> (TensorInfo'CooSparse
    -> TensorInfo'CooSparse -> TensorInfo'CooSparse)
-> (TensorInfo'CooSparse
    -> TensorInfo'CooSparse -> TensorInfo'CooSparse)
-> Ord TensorInfo'CooSparse
TensorInfo'CooSparse -> TensorInfo'CooSparse -> Bool
TensorInfo'CooSparse -> TensorInfo'CooSparse -> Ordering
TensorInfo'CooSparse
-> TensorInfo'CooSparse -> TensorInfo'CooSparse
forall a.
Eq a =>
(a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
min :: TensorInfo'CooSparse
-> TensorInfo'CooSparse -> TensorInfo'CooSparse
$cmin :: TensorInfo'CooSparse
-> TensorInfo'CooSparse -> TensorInfo'CooSparse
max :: TensorInfo'CooSparse
-> TensorInfo'CooSparse -> TensorInfo'CooSparse
$cmax :: TensorInfo'CooSparse
-> TensorInfo'CooSparse -> TensorInfo'CooSparse
>= :: TensorInfo'CooSparse -> TensorInfo'CooSparse -> Bool
$c>= :: TensorInfo'CooSparse -> TensorInfo'CooSparse -> Bool
> :: TensorInfo'CooSparse -> TensorInfo'CooSparse -> Bool
$c> :: TensorInfo'CooSparse -> TensorInfo'CooSparse -> Bool
<= :: TensorInfo'CooSparse -> TensorInfo'CooSparse -> Bool
$c<= :: TensorInfo'CooSparse -> TensorInfo'CooSparse -> Bool
< :: TensorInfo'CooSparse -> TensorInfo'CooSparse -> Bool
$c< :: TensorInfo'CooSparse -> TensorInfo'CooSparse -> Bool
compare :: TensorInfo'CooSparse -> TensorInfo'CooSparse -> Ordering
$ccompare :: TensorInfo'CooSparse -> TensorInfo'CooSparse -> Ordering
$cp1Ord :: Eq TensorInfo'CooSparse
Prelude.Ord)
instance Prelude.Show TensorInfo'CooSparse where
  showsPrec :: Int -> TensorInfo'CooSparse -> ShowS
showsPrec _ __x :: TensorInfo'CooSparse
__x __s :: String
__s
    = Char -> ShowS
Prelude.showChar
        '{'
        (String -> ShowS
Prelude.showString
           (TensorInfo'CooSparse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort TensorInfo'CooSparse
__x) (Char -> ShowS
Prelude.showChar '}' String
__s))
instance Data.ProtoLens.Field.HasField TensorInfo'CooSparse "valuesTensorName" Data.Text.Text where
  fieldOf :: Proxy# "valuesTensorName"
-> (Text -> f Text)
-> TensorInfo'CooSparse
-> f TensorInfo'CooSparse
fieldOf _
    = ((Text -> f Text)
 -> TensorInfo'CooSparse -> f TensorInfo'CooSparse)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> TensorInfo'CooSparse
-> f TensorInfo'CooSparse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorInfo'CooSparse -> Text)
-> (TensorInfo'CooSparse -> Text -> TensorInfo'CooSparse)
-> Lens TensorInfo'CooSparse TensorInfo'CooSparse Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorInfo'CooSparse -> Text
_TensorInfo'CooSparse'valuesTensorName
           (\ x__ :: TensorInfo'CooSparse
x__ y__ :: Text
y__ -> TensorInfo'CooSparse
x__ {_TensorInfo'CooSparse'valuesTensorName :: Text
_TensorInfo'CooSparse'valuesTensorName = Text
y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField TensorInfo'CooSparse "indicesTensorName" Data.Text.Text where
  fieldOf :: Proxy# "indicesTensorName"
-> (Text -> f Text)
-> TensorInfo'CooSparse
-> f TensorInfo'CooSparse
fieldOf _
    = ((Text -> f Text)
 -> TensorInfo'CooSparse -> f TensorInfo'CooSparse)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> TensorInfo'CooSparse
-> f TensorInfo'CooSparse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorInfo'CooSparse -> Text)
-> (TensorInfo'CooSparse -> Text -> TensorInfo'CooSparse)
-> Lens TensorInfo'CooSparse TensorInfo'CooSparse Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorInfo'CooSparse -> Text
_TensorInfo'CooSparse'indicesTensorName
           (\ x__ :: TensorInfo'CooSparse
x__ y__ :: Text
y__ -> TensorInfo'CooSparse
x__ {_TensorInfo'CooSparse'indicesTensorName :: Text
_TensorInfo'CooSparse'indicesTensorName = Text
y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField TensorInfo'CooSparse "denseShapeTensorName" Data.Text.Text where
  fieldOf :: Proxy# "denseShapeTensorName"
-> (Text -> f Text)
-> TensorInfo'CooSparse
-> f TensorInfo'CooSparse
fieldOf _
    = ((Text -> f Text)
 -> TensorInfo'CooSparse -> f TensorInfo'CooSparse)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> TensorInfo'CooSparse
-> f TensorInfo'CooSparse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorInfo'CooSparse -> Text)
-> (TensorInfo'CooSparse -> Text -> TensorInfo'CooSparse)
-> Lens TensorInfo'CooSparse TensorInfo'CooSparse Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorInfo'CooSparse -> Text
_TensorInfo'CooSparse'denseShapeTensorName
           (\ x__ :: TensorInfo'CooSparse
x__ y__ :: Text
y__
              -> TensorInfo'CooSparse
x__ {_TensorInfo'CooSparse'denseShapeTensorName :: Text
_TensorInfo'CooSparse'denseShapeTensorName = Text
y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message TensorInfo'CooSparse where
  messageName :: Proxy TensorInfo'CooSparse -> Text
messageName _ = String -> Text
Data.Text.pack "tensorflow.TensorInfo.CooSparse"
  packedMessageDescriptor :: Proxy TensorInfo'CooSparse -> ByteString
packedMessageDescriptor _
    = "\n\
      \\tCooSparse\DC2,\n\
      \\DC2values_tensor_name\CAN\SOH \SOH(\tR\DLEvaluesTensorName\DC2.\n\
      \\DC3indices_tensor_name\CAN\STX \SOH(\tR\DC1indicesTensorName\DC25\n\
      \\ETBdense_shape_tensor_name\CAN\ETX \SOH(\tR\DC4denseShapeTensorName"
  packedFileDescriptor :: Proxy TensorInfo'CooSparse -> ByteString
packedFileDescriptor _ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor TensorInfo'CooSparse)
fieldsByTag
    = let
        valuesTensorName__field_descriptor :: FieldDescriptor TensorInfo'CooSparse
valuesTensorName__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor TensorInfo'CooSparse Text
-> FieldDescriptor TensorInfo'CooSparse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "values_tensor_name"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens TensorInfo'CooSparse TensorInfo'CooSparse Text Text
-> FieldAccessor TensorInfo'CooSparse Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "valuesTensorName" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"valuesTensorName")) ::
              Data.ProtoLens.FieldDescriptor TensorInfo'CooSparse
        indicesTensorName__field_descriptor :: FieldDescriptor TensorInfo'CooSparse
indicesTensorName__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor TensorInfo'CooSparse Text
-> FieldDescriptor TensorInfo'CooSparse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "indices_tensor_name"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens TensorInfo'CooSparse TensorInfo'CooSparse Text Text
-> FieldAccessor TensorInfo'CooSparse Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "indicesTensorName" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"indicesTensorName")) ::
              Data.ProtoLens.FieldDescriptor TensorInfo'CooSparse
        denseShapeTensorName__field_descriptor :: FieldDescriptor TensorInfo'CooSparse
denseShapeTensorName__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor TensorInfo'CooSparse Text
-> FieldDescriptor TensorInfo'CooSparse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "dense_shape_tensor_name"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens TensorInfo'CooSparse TensorInfo'CooSparse Text Text
-> FieldAccessor TensorInfo'CooSparse Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "denseShapeTensorName" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"denseShapeTensorName")) ::
              Data.ProtoLens.FieldDescriptor TensorInfo'CooSparse
      in
        [(Tag, FieldDescriptor TensorInfo'CooSparse)]
-> Map Tag (FieldDescriptor TensorInfo'CooSparse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag 1, FieldDescriptor TensorInfo'CooSparse
valuesTensorName__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 2, FieldDescriptor TensorInfo'CooSparse
indicesTensorName__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 3, FieldDescriptor TensorInfo'CooSparse
denseShapeTensorName__field_descriptor)]
  unknownFields :: LensLike' f TensorInfo'CooSparse FieldSet
unknownFields
    = (TensorInfo'CooSparse -> FieldSet)
-> (TensorInfo'CooSparse -> FieldSet -> TensorInfo'CooSparse)
-> Lens' TensorInfo'CooSparse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        TensorInfo'CooSparse -> FieldSet
_TensorInfo'CooSparse'_unknownFields
        (\ x__ :: TensorInfo'CooSparse
x__ y__ :: FieldSet
y__ -> TensorInfo'CooSparse
x__ {_TensorInfo'CooSparse'_unknownFields :: FieldSet
_TensorInfo'CooSparse'_unknownFields = FieldSet
y__})
  defMessage :: TensorInfo'CooSparse
defMessage
    = $WTensorInfo'CooSparse'_constructor :: Text -> Text -> Text -> FieldSet -> TensorInfo'CooSparse
TensorInfo'CooSparse'_constructor
        {_TensorInfo'CooSparse'valuesTensorName :: Text
_TensorInfo'CooSparse'valuesTensorName = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _TensorInfo'CooSparse'indicesTensorName :: Text
_TensorInfo'CooSparse'indicesTensorName = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _TensorInfo'CooSparse'denseShapeTensorName :: Text
_TensorInfo'CooSparse'denseShapeTensorName = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _TensorInfo'CooSparse'_unknownFields :: FieldSet
_TensorInfo'CooSparse'_unknownFields = []}
  parseMessage :: Parser TensorInfo'CooSparse
parseMessage
    = let
        loop ::
          TensorInfo'CooSparse
          -> Data.ProtoLens.Encoding.Bytes.Parser TensorInfo'CooSparse
        loop :: TensorInfo'CooSparse -> Parser TensorInfo'CooSparse
loop x :: TensorInfo'CooSparse
x
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do (let missing :: [a]
missing = []
                       in
                         if [Any] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
                             () -> Parser ()
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
                         else
                             String -> Parser ()
forall (m :: * -> *) a. MonadFail m => String -> m a
Prelude.fail
                               (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
                                  "Missing required fields: "
                                  ([String] -> String
forall a. Show a => a -> String
Prelude.show ([String]
forall a. [a]
missing :: [Prelude.String]))))
                      TensorInfo'CooSparse -> Parser TensorInfo'CooSparse
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter TensorInfo'CooSparse TensorInfo'CooSparse FieldSet FieldSet
-> (FieldSet -> FieldSet)
-> TensorInfo'CooSparse
-> TensorInfo'CooSparse
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                           forall msg. Message msg => Lens' msg FieldSet
Setter TensorInfo'CooSparse TensorInfo'CooSparse FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) TensorInfo'CooSparse
x)
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        10
                          -> do Text
y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do ByteString
value <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                       Int -> Parser ByteString
Data.ProtoLens.Encoding.Bytes.getBytes
                                                         (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
                                           Either String Text -> Parser Text
forall a. Either String a -> Parser a
Data.ProtoLens.Encoding.Bytes.runEither
                                             (case ByteString -> Either UnicodeException Text
Data.Text.Encoding.decodeUtf8' ByteString
value of
                                                (Prelude.Left err :: UnicodeException
err)
                                                  -> String -> Either String Text
forall a b. a -> Either a b
Prelude.Left (UnicodeException -> String
forall a. Show a => a -> String
Prelude.show UnicodeException
err)
                                                (Prelude.Right r :: Text
r) -> Text -> Either String Text
forall a b. b -> Either a b
Prelude.Right Text
r))
                                       "values_tensor_name"
                                TensorInfo'CooSparse -> Parser TensorInfo'CooSparse
loop
                                  (Setter TensorInfo'CooSparse TensorInfo'CooSparse Text Text
-> Text -> TensorInfo'CooSparse -> TensorInfo'CooSparse
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "valuesTensorName" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"valuesTensorName") Text
y TensorInfo'CooSparse
x)
                        18
                          -> do Text
y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do ByteString
value <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                       Int -> Parser ByteString
Data.ProtoLens.Encoding.Bytes.getBytes
                                                         (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
                                           Either String Text -> Parser Text
forall a. Either String a -> Parser a
Data.ProtoLens.Encoding.Bytes.runEither
                                             (case ByteString -> Either UnicodeException Text
Data.Text.Encoding.decodeUtf8' ByteString
value of
                                                (Prelude.Left err :: UnicodeException
err)
                                                  -> String -> Either String Text
forall a b. a -> Either a b
Prelude.Left (UnicodeException -> String
forall a. Show a => a -> String
Prelude.show UnicodeException
err)
                                                (Prelude.Right r :: Text
r) -> Text -> Either String Text
forall a b. b -> Either a b
Prelude.Right Text
r))
                                       "indices_tensor_name"
                                TensorInfo'CooSparse -> Parser TensorInfo'CooSparse
loop
                                  (Setter TensorInfo'CooSparse TensorInfo'CooSparse Text Text
-> Text -> TensorInfo'CooSparse -> TensorInfo'CooSparse
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "indicesTensorName" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"indicesTensorName") Text
y TensorInfo'CooSparse
x)
                        26
                          -> do Text
y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do ByteString
value <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                       Int -> Parser ByteString
Data.ProtoLens.Encoding.Bytes.getBytes
                                                         (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
                                           Either String Text -> Parser Text
forall a. Either String a -> Parser a
Data.ProtoLens.Encoding.Bytes.runEither
                                             (case ByteString -> Either UnicodeException Text
Data.Text.Encoding.decodeUtf8' ByteString
value of
                                                (Prelude.Left err :: UnicodeException
err)
                                                  -> String -> Either String Text
forall a b. a -> Either a b
Prelude.Left (UnicodeException -> String
forall a. Show a => a -> String
Prelude.show UnicodeException
err)
                                                (Prelude.Right r :: Text
r) -> Text -> Either String Text
forall a b. b -> Either a b
Prelude.Right Text
r))
                                       "dense_shape_tensor_name"
                                TensorInfo'CooSparse -> Parser TensorInfo'CooSparse
loop
                                  (Setter TensorInfo'CooSparse TensorInfo'CooSparse Text Text
-> Text -> TensorInfo'CooSparse -> TensorInfo'CooSparse
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "denseShapeTensorName" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"denseShapeTensorName") Text
y TensorInfo'CooSparse
x)
                        wire :: Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                TensorInfo'CooSparse -> Parser TensorInfo'CooSparse
loop
                                  (Setter TensorInfo'CooSparse TensorInfo'CooSparse FieldSet FieldSet
-> (FieldSet -> FieldSet)
-> TensorInfo'CooSparse
-> TensorInfo'CooSparse
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                     forall msg. Message msg => Lens' msg FieldSet
Setter TensorInfo'CooSparse TensorInfo'CooSparse FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) TensorInfo'CooSparse
x)
      in
        Parser TensorInfo'CooSparse
-> String -> Parser TensorInfo'CooSparse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do TensorInfo'CooSparse -> Parser TensorInfo'CooSparse
loop TensorInfo'CooSparse
forall msg. Message msg => msg
Data.ProtoLens.defMessage) "CooSparse"
  buildMessage :: TensorInfo'CooSparse -> Builder
buildMessage
    = \ _x :: TensorInfo'CooSparse
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v
                  = FoldLike Text TensorInfo'CooSparse TensorInfo'CooSparse Text Text
-> TensorInfo'CooSparse -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                      (forall s a (f :: * -> *).
(HasField s "valuesTensorName" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"valuesTensorName") TensorInfo'CooSparse
_x
              in
                if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                    Builder
forall a. Monoid a => a
Data.Monoid.mempty
                else
                    Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 10)
                      ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                         (\ bs :: ByteString
bs
                            -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                 (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                    (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                 (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                         Text -> ByteString
Data.Text.Encoding.encodeUtf8
                         Text
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   _v :: Text
_v
                     = FoldLike Text TensorInfo'CooSparse TensorInfo'CooSparse Text Text
-> TensorInfo'CooSparse -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                         (forall s a (f :: * -> *).
(HasField s "indicesTensorName" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"indicesTensorName") TensorInfo'CooSparse
_x
                 in
                   if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 18)
                         ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            (\ bs :: ByteString
bs
                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                       (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                    (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                            Text -> ByteString
Data.Text.Encoding.encodeUtf8
                            Text
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: Text
_v
                        = FoldLike Text TensorInfo'CooSparse TensorInfo'CooSparse Text Text
-> TensorInfo'CooSparse -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                            (forall s a (f :: * -> *).
(HasField s "denseShapeTensorName" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"denseShapeTensorName") TensorInfo'CooSparse
_x
                    in
                      if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      else
                          Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 26)
                            ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                               (\ bs :: ByteString
bs
                                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                          (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                       (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                               Text -> ByteString
Data.Text.Encoding.encodeUtf8
                               Text
_v))
                   (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                      (FoldLike
  FieldSet
  TensorInfo'CooSparse
  TensorInfo'CooSparse
  FieldSet
  FieldSet
-> TensorInfo'CooSparse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  TensorInfo'CooSparse
  TensorInfo'CooSparse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields TensorInfo'CooSparse
_x))))
instance Control.DeepSeq.NFData TensorInfo'CooSparse where
  rnf :: TensorInfo'CooSparse -> ()
rnf
    = \ x__ :: TensorInfo'CooSparse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (TensorInfo'CooSparse -> FieldSet
_TensorInfo'CooSparse'_unknownFields TensorInfo'CooSparse
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (TensorInfo'CooSparse -> Text
_TensorInfo'CooSparse'valuesTensorName TensorInfo'CooSparse
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (TensorInfo'CooSparse -> Text
_TensorInfo'CooSparse'indicesTensorName TensorInfo'CooSparse
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (TensorInfo'CooSparse -> Text
_TensorInfo'CooSparse'denseShapeTensorName TensorInfo'CooSparse
x__) ())))
packedFileDescriptor :: Data.ByteString.ByteString
packedFileDescriptor :: ByteString
packedFileDescriptor
  = "\n\
    \)tensorflow/core/protobuf/meta_graph.proto\DC2\n\
    \tensorflow\SUB\EMgoogle/protobuf/any.proto\SUB%tensorflow/core/framework/graph.proto\SUB&tensorflow/core/framework/op_def.proto\SUB,tensorflow/core/framework/tensor_shape.proto\SUB%tensorflow/core/framework/types.proto\SUB1tensorflow/core/protobuf/saved_object_graph.proto\SUB$tensorflow/core/protobuf/saver.proto\SUB%tensorflow/core/protobuf/struct.proto\"\169\t\n\
    \\fMetaGraphDef\DC2H\n\
    \\rmeta_info_def\CAN\SOH \SOH(\v2$.tensorflow.MetaGraphDef.MetaInfoDefR\vmetaInfoDef\DC21\n\
    \\tgraph_def\CAN\STX \SOH(\v2\DC4.tensorflow.GraphDefR\bgraphDef\DC21\n\
    \\tsaver_def\CAN\ETX \SOH(\v2\DC4.tensorflow.SaverDefR\bsaverDef\DC2R\n\
    \\SOcollection_def\CAN\EOT \ETX(\v2+.tensorflow.MetaGraphDef.CollectionDefEntryR\rcollectionDef\DC2O\n\
    \\rsignature_def\CAN\ENQ \ETX(\v2*.tensorflow.MetaGraphDef.SignatureDefEntryR\fsignatureDef\DC2>\n\
    \\SOasset_file_def\CAN\ACK \ETX(\v2\CAN.tensorflow.AssetFileDefR\fassetFileDef\DC2F\n\
    \\DLEobject_graph_def\CAN\a \SOH(\v2\FS.tensorflow.SavedObjectGraphR\SOobjectGraphDef\SUB\131\EOT\n\
    \\vMetaInfoDef\DC2,\n\
    \\DC2meta_graph_version\CAN\SOH \SOH(\tR\DLEmetaGraphVersion\DC2<\n\
    \\DLEstripped_op_list\CAN\STX \SOH(\v2\DC2.tensorflow.OpListR\SOstrippedOpList\DC2/\n\
    \\bany_info\CAN\ETX \SOH(\v2\DC4.google.protobuf.AnyR\aanyInfo\DC2\DC2\n\
    \\EOTtags\CAN\EOT \ETX(\tR\EOTtags\DC2-\n\
    \\DC2tensorflow_version\CAN\ENQ \SOH(\tR\DC1tensorflowVersion\DC24\n\
    \\SYNtensorflow_git_version\CAN\ACK \SOH(\tR\DC4tensorflowGitVersion\DC24\n\
    \\SYNstripped_default_attrs\CAN\a \SOH(\bR\DC4strippedDefaultAttrs\DC2d\n\
    \\DLEfunction_aliases\CAN\b \ETX(\v29.tensorflow.MetaGraphDef.MetaInfoDef.FunctionAliasesEntryR\SIfunctionAliases\SUBB\n\
    \\DC4FunctionAliasesEntry\DC2\DLE\n\
    \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2\DC4\n\
    \\ENQvalue\CAN\STX \SOH(\tR\ENQvalue:\STX8\SOH\SUB[\n\
    \\DC2CollectionDefEntry\DC2\DLE\n\
    \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2/\n\
    \\ENQvalue\CAN\STX \SOH(\v2\EM.tensorflow.CollectionDefR\ENQvalue:\STX8\SOH\SUBY\n\
    \\DC1SignatureDefEntry\DC2\DLE\n\
    \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2.\n\
    \\ENQvalue\CAN\STX \SOH(\v2\CAN.tensorflow.SignatureDefR\ENQvalue:\STX8\SOH\"\182\EOT\n\
    \\rCollectionDef\DC2A\n\
    \\tnode_list\CAN\SOH \SOH(\v2\".tensorflow.CollectionDef.NodeListH\NULR\bnodeList\DC2D\n\
    \\n\
    \bytes_list\CAN\STX \SOH(\v2#.tensorflow.CollectionDef.BytesListH\NULR\tbytesList\DC2D\n\
    \\n\
    \int64_list\CAN\ETX \SOH(\v2#.tensorflow.CollectionDef.Int64ListH\NULR\tint64List\DC2D\n\
    \\n\
    \float_list\CAN\EOT \SOH(\v2#.tensorflow.CollectionDef.FloatListH\NULR\tfloatList\DC2>\n\
    \\bany_list\CAN\ENQ \SOH(\v2!.tensorflow.CollectionDef.AnyListH\NULR\aanyList\SUB \n\
    \\bNodeList\DC2\DC4\n\
    \\ENQvalue\CAN\SOH \ETX(\tR\ENQvalue\SUB!\n\
    \\tBytesList\DC2\DC4\n\
    \\ENQvalue\CAN\SOH \ETX(\fR\ENQvalue\SUB%\n\
    \\tInt64List\DC2\CAN\n\
    \\ENQvalue\CAN\SOH \ETX(\ETXR\ENQvalueB\STX\DLE\SOH\SUB%\n\
    \\tFloatList\DC2\CAN\n\
    \\ENQvalue\CAN\SOH \ETX(\STXR\ENQvalueB\STX\DLE\SOH\SUB5\n\
    \\aAnyList\DC2*\n\
    \\ENQvalue\CAN\SOH \ETX(\v2\DC4.google.protobuf.AnyR\ENQvalueB\ACK\n\
    \\EOTkind\"\218\EOT\n\
    \\n\
    \TensorInfo\DC2\DC4\n\
    \\EOTname\CAN\SOH \SOH(\tH\NULR\EOTname\DC2A\n\
    \\n\
    \coo_sparse\CAN\EOT \SOH(\v2 .tensorflow.TensorInfo.CooSparseH\NULR\tcooSparse\DC2S\n\
    \\DLEcomposite_tensor\CAN\ENQ \SOH(\v2&.tensorflow.TensorInfo.CompositeTensorH\NULR\SIcompositeTensor\DC2*\n\
    \\ENQdtype\CAN\STX \SOH(\SO2\DC4.tensorflow.DataTypeR\ENQdtype\DC2?\n\
    \\ftensor_shape\CAN\ETX \SOH(\v2\FS.tensorflow.TensorShapeProtoR\vtensorShape\SUB\160\SOH\n\
    \\tCooSparse\DC2,\n\
    \\DC2values_tensor_name\CAN\SOH \SOH(\tR\DLEvaluesTensorName\DC2.\n\
    \\DC3indices_tensor_name\CAN\STX \SOH(\tR\DC1indicesTensorName\DC25\n\
    \\ETBdense_shape_tensor_name\CAN\ETX \SOH(\tR\DC4denseShapeTensorName\SUB\129\SOH\n\
    \\SICompositeTensor\DC26\n\
    \\ttype_spec\CAN\SOH \SOH(\v2\EM.tensorflow.TypeSpecProtoR\btypeSpec\DC26\n\
    \\n\
    \components\CAN\STX \ETX(\v2\SYN.tensorflow.TensorInfoR\n\
    \componentsB\n\
    \\n\
    \\bencoding\"\213\STX\n\
    \\fSignatureDef\DC2<\n\
    \\ACKinputs\CAN\SOH \ETX(\v2$.tensorflow.SignatureDef.InputsEntryR\ACKinputs\DC2?\n\
    \\aoutputs\CAN\STX \ETX(\v2%.tensorflow.SignatureDef.OutputsEntryR\aoutputs\DC2\US\n\
    \\vmethod_name\CAN\ETX \SOH(\tR\n\
    \methodName\SUBQ\n\
    \\vInputsEntry\DC2\DLE\n\
    \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2,\n\
    \\ENQvalue\CAN\STX \SOH(\v2\SYN.tensorflow.TensorInfoR\ENQvalue:\STX8\SOH\SUBR\n\
    \\fOutputsEntry\DC2\DLE\n\
    \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2,\n\
    \\ENQvalue\CAN\STX \SOH(\v2\SYN.tensorflow.TensorInfoR\ENQvalue:\STX8\SOH\"c\n\
    \\fAssetFileDef\DC27\n\
    \\vtensor_info\CAN\SOH \SOH(\v2\SYN.tensorflow.TensorInfoR\n\
    \tensorInfo\DC2\SUB\n\
    \\bfilename\CAN\STX \SOH(\tR\bfilenameBz\n\
    \\CANorg.tensorflow.frameworkB\SIMetaGraphProtosP\SOHZHgithub.com/tensorflow/tensorflow/tensorflow/go/core/core_protos_go_proto\248\SOH\SOHJ\168[\n\
    \\a\DC2\ENQ\NUL\NUL\213\STX\SOH\n\
    \\b\n\
    \\SOH\f\DC2\ETX\NUL\NUL\DC2\n\
    \\b\n\
    \\SOH\STX\DC2\ETX\STX\NUL\DC3\n\
    \\t\n\
    \\STX\ETX\NUL\DC2\ETX\EOT\NUL#\n\
    \\t\n\
    \\STX\ETX\SOH\DC2\ETX\ENQ\NUL/\n\
    \\t\n\
    \\STX\ETX\STX\DC2\ETX\ACK\NUL0\n\
    \\t\n\
    \\STX\ETX\ETX\DC2\ETX\a\NUL6\n\
    \\t\n\
    \\STX\ETX\EOT\DC2\ETX\b\NUL/\n\
    \\t\n\
    \\STX\ETX\ENQ\DC2\ETX\t\NUL;\n\
    \\t\n\
    \\STX\ETX\ACK\DC2\ETX\n\
    \\NUL.\n\
    \\t\n\
    \\STX\ETX\a\DC2\ETX\v\NUL/\n\
    \\b\n\
    \\SOH\b\DC2\ETX\r\NUL\US\n\
    \\t\n\
    \\STX\b\US\DC2\ETX\r\NUL\US\n\
    \\b\n\
    \\SOH\b\DC2\ETX\SO\NUL0\n\
    \\t\n\
    \\STX\b\b\DC2\ETX\SO\NUL0\n\
    \\b\n\
    \\SOH\b\DC2\ETX\SI\NUL\"\n\
    \\t\n\
    \\STX\b\n\
    \\DC2\ETX\SI\NUL\"\n\
    \\b\n\
    \\SOH\b\DC2\ETX\DLE\NUL1\n\
    \\t\n\
    \\STX\b\SOH\DC2\ETX\DLE\NUL1\n\
    \\b\n\
    \\SOH\b\DC2\ETX\DC1\NUL_\n\
    \\t\n\
    \\STX\b\v\DC2\ETX\DC1\NUL_\n\
    \\138\EOT\n\
    \\STX\EOT\NUL\DC2\EOT!\NUL_\SOH\SUB\253\ETX NOTE: This protocol buffer is evolving, and will go through revisions in the\n\
    \ coming months.\n\
    \\n\
    \ Protocol buffer containing the following which are necessary to restart\n\
    \ training, run inference. It can be used to serialize/de-serialize memory\n\
    \ objects necessary for running computation in a graph when crossing the\n\
    \ process boundary. It can be used for long term storage of graphs,\n\
    \ cross-language execution of graphs, etc.\n\
    \   MetaInfoDef\n\
    \   GraphDef\n\
    \   SaverDef\n\
    \   CollectionDef\n\
    \   TensorInfo\n\
    \   SignatureDef\n\
    \\n\
    \\n\
    \\n\
    \\ETX\EOT\NUL\SOH\DC2\ETX!\b\DC4\n\
    \\165\SOH\n\
    \\EOT\EOT\NUL\ETX\NUL\DC2\EOT$\STXI\ETX\SUB\150\SOH Meta information regarding the graph to be exported.  To be used by users\n\
    \ of this protocol buffer to encode information regarding their meta graph.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\ETX\NUL\SOH\DC2\ETX$\n\
    \\NAK\n\
    \\134\SOH\n\
    \\ACK\EOT\NUL\ETX\NUL\STX\NUL\DC2\ETX'\EOT\"\SUBw User specified Version string. Can be the name of the model and revision,\n\
    \ steps this model has been trained to, etc.\n\
    \\n\
    \\SO\n\
    \\a\EOT\NUL\ETX\NUL\STX\NUL\ENQ\DC2\ETX'\EOT\n\
    \\n\
    \\SO\n\
    \\a\EOT\NUL\ETX\NUL\STX\NUL\SOH\DC2\ETX'\v\GS\n\
    \\SO\n\
    \\a\EOT\NUL\ETX\NUL\STX\NUL\ETX\DC2\ETX' !\n\
    \\139\SOH\n\
    \\ACK\EOT\NUL\ETX\NUL\STX\SOH\DC2\ETX+\EOT \SUB| A copy of the OpDefs used by the producer of this graph_def.\n\
    \ Descriptions and Ops not used in graph_def are stripped out.\n\
    \\n\
    \\SO\n\
    \\a\EOT\NUL\ETX\NUL\STX\SOH\ACK\DC2\ETX+\EOT\n\
    \\n\
    \\SO\n\
    \\a\EOT\NUL\ETX\NUL\STX\SOH\SOH\DC2\ETX+\v\ESC\n\
    \\SO\n\
    \\a\EOT\NUL\ETX\NUL\STX\SOH\ETX\DC2\ETX+\RS\US\n\
    \w\n\
    \\ACK\EOT\NUL\ETX\NUL\STX\STX\DC2\ETX/\EOT%\SUBh A serialized protobuf. Can be the time this meta graph is created, or\n\
    \ modified, or name of the model.\n\
    \\n\
    \\SO\n\
    \\a\EOT\NUL\ETX\NUL\STX\STX\ACK\DC2\ETX/\EOT\ETB\n\
    \\SO\n\
    \\a\EOT\NUL\ETX\NUL\STX\STX\SOH\DC2\ETX/\CAN \n\
    \\SO\n\
    \\a\EOT\NUL\ETX\NUL\STX\STX\ETX\DC2\ETX/#$\n\
    \\186\STX\n\
    \\ACK\EOT\NUL\ETX\NUL\STX\ETX\DC2\ETX7\EOT\GS\SUB\170\STX User supplied tag(s) on the meta_graph and included graph_def.\n\
    \\n\
    \ MetaGraphDefs should be tagged with their capabilities or use-cases.\n\
    \ Examples: \"train\", \"serve\", \"gpu\", \"tpu\", etc.\n\
    \ These tags enable loaders to access the MetaGraph(s) appropriate for a\n\
    \ specific use-case or runtime environment.\n\
    \\n\
    \\SO\n\
    \\a\EOT\NUL\ETX\NUL\STX\ETX\EOT\DC2\ETX7\EOT\f\n\
    \\SO\n\
    \\a\EOT\NUL\ETX\NUL\STX\ETX\ENQ\DC2\ETX7\r\DC3\n\
    \\SO\n\
    \\a\EOT\NUL\ETX\NUL\STX\ETX\SOH\DC2\ETX7\DC4\CAN\n\
    \\SO\n\
    \\a\EOT\NUL\ETX\NUL\STX\ETX\ETX\DC2\ETX7\ESC\FS\n\
    \\179\SOH\n\
    \\ACK\EOT\NUL\ETX\NUL\STX\EOT\DC2\ETX<\EOT\"\SUB\163\SOH The __version__ string of the tensorflow build used to write this graph.\n\
    \ This will be populated by the framework, which will overwrite any user\n\
    \ supplied value.\n\
    \\n\
    \\SO\n\
    \\a\EOT\NUL\ETX\NUL\STX\EOT\ENQ\DC2\ETX<\EOT\n\
    \\n\
    \\SO\n\
    \\a\EOT\NUL\ETX\NUL\STX\EOT\SOH\DC2\ETX<\v\GS\n\
    \\SO\n\
    \\a\EOT\NUL\ETX\NUL\STX\EOT\ETX\DC2\ETX< !\n\
    \\183\SOH\n\
    \\ACK\EOT\NUL\ETX\NUL\STX\ENQ\DC2\ETXA\EOT&\SUB\167\SOH The __git_version__ string of the tensorflow build used to write this\n\
    \ graph. This will be populated by the framework, which will overwrite any\n\
    \ user supplied value.\n\
    \\n\
    \\SO\n\
    \\a\EOT\NUL\ETX\NUL\STX\ENQ\ENQ\DC2\ETXA\EOT\n\
    \\n\
    \\SO\n\
    \\a\EOT\NUL\ETX\NUL\STX\ENQ\SOH\DC2\ETXA\v!\n\
    \\SO\n\
    \\a\EOT\NUL\ETX\NUL\STX\ENQ\ETX\DC2\ETXA$%\n\
    \t\n\
    \\ACK\EOT\NUL\ETX\NUL\STX\ACK\DC2\ETXE\EOT$\SUBe A flag to denote whether default-valued attrs have been stripped from\n\
    \ the nodes in this graph_def.\n\
    \\n\
    \\SO\n\
    \\a\EOT\NUL\ETX\NUL\STX\ACK\ENQ\DC2\ETXE\EOT\b\n\
    \\SO\n\
    \\a\EOT\NUL\ETX\NUL\STX\ACK\SOH\DC2\ETXE\t\US\n\
    \\SO\n\
    \\a\EOT\NUL\ETX\NUL\STX\ACK\ETX\DC2\ETXE\"#\n\
    \5\n\
    \\ACK\EOT\NUL\ETX\NUL\STX\a\DC2\ETXH\EOT-\SUB& FunctionDef name to aliases mapping.\n\
    \\n\
    \\SO\n\
    \\a\EOT\NUL\ETX\NUL\STX\a\ACK\DC2\ETXH\EOT\ETB\n\
    \\SO\n\
    \\a\EOT\NUL\ETX\NUL\STX\a\SOH\DC2\ETXH\CAN(\n\
    \\SO\n\
    \\a\EOT\NUL\ETX\NUL\STX\a\ETX\DC2\ETXH+,\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\NUL\DC2\ETXJ\STX \n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\NUL\ACK\DC2\ETXJ\STX\r\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\NUL\SOH\DC2\ETXJ\SO\ESC\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\NUL\ETX\DC2\ETXJ\RS\US\n\
    \\CAN\n\
    \\EOT\EOT\NUL\STX\SOH\DC2\ETXM\STX\EM\SUB\v GraphDef.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SOH\ACK\DC2\ETXM\STX\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SOH\SOH\DC2\ETXM\v\DC4\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SOH\ETX\DC2\ETXM\ETB\CAN\n\
    \\CAN\n\
    \\EOT\EOT\NUL\STX\STX\DC2\ETXP\STX\EM\SUB\v SaverDef.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\STX\ACK\DC2\ETXP\STX\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\STX\SOH\DC2\ETXP\v\DC4\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\STX\ETX\DC2\ETXP\ETB\CAN\n\
    \o\n\
    \\EOT\EOT\NUL\STX\ETX\DC2\ETXT\STX0\SUBb collection_def: Map from collection name to collections.\n\
    \ See CollectionDef section for details.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ETX\ACK\DC2\ETXT\STX\FS\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ETX\SOH\DC2\ETXT\GS+\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ETX\ETX\DC2\ETXT./\n\
    \c\n\
    \\EOT\EOT\NUL\STX\EOT\DC2\ETXX\STX.\SUBV signature_def: Map from user supplied key for a signature to a single\n\
    \ SignatureDef.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\EOT\ACK\DC2\ETXX\STX\ESC\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\EOT\SOH\DC2\ETXX\FS)\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\EOT\ETX\DC2\ETXX,-\n\
    \@\n\
    \\EOT\EOT\NUL\STX\ENQ\DC2\ETX[\STX+\SUB3 Asset file def to be used with the defined graph.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ENQ\EOT\DC2\ETX[\STX\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ENQ\ACK\DC2\ETX[\v\ETB\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ENQ\SOH\DC2\ETX[\CAN&\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ENQ\ETX\DC2\ETX[)*\n\
    \W\n\
    \\EOT\EOT\NUL\STX\ACK\DC2\ETX^\STX(\SUBJ Extra information about the structure of functions and stateful objects.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ACK\ACK\DC2\ETX^\STX\DC2\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ACK\SOH\DC2\ETX^\DC3#\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ACK\ETX\DC2\ETX^&'\n\
    \\223\SI\n\
    \\STX\EOT\SOH\DC2\ACK\159\SOH\NUL\213\SOH\SOH\SUB\208\SI CollectionDef should cover most collections.\n\
    \ To add a user-defined collection, do one of the following:\n\
    \ 1. For simple data types, such as string, int, float:\n\
    \      tf.add_to_collection(\"your_collection_name\", your_simple_value)\n\
    \    strings will be stored as bytes_list.\n\
    \\n\
    \ 2. For Protobuf types, there are three ways to add them:\n\
    \    1) tf.add_to_collection(\"your_collection_name\",\n\
    \         your_proto.SerializeToString())\n\
    \\n\
    \       collection_def {\n\
    \         key: \"user_defined_bytes_collection\"\n\
    \         value {\n\
    \           bytes_list {\n\
    \             value: \"queue_name: \\\"test_queue\\\"\\n\"\n\
    \           }\n\
    \         }\n\
    \       }\n\
    \\n\
    \  or\n\
    \\n\
    \    2) tf.add_to_collection(\"your_collection_name\", str(your_proto))\n\
    \\n\
    \       collection_def {\n\
    \         key: \"user_defined_string_collection\"\n\
    \         value {\n\
    \          bytes_list {\n\
    \             value: \"\\n\\ntest_queue\"\n\
    \           }\n\
    \         }\n\
    \       }\n\
    \\n\
    \  or\n\
    \\n\
    \    3) any_buf = any_pb2.Any()\n\
    \       tf.add_to_collection(\"your_collection_name\",\n\
    \         any_buf.Pack(your_proto))\n\
    \\n\
    \       collection_def {\n\
    \         key: \"user_defined_any_collection\"\n\
    \         value {\n\
    \           any_list {\n\
    \             value {\n\
    \               type_url: \"type.googleapis.com/tensorflow.QueueRunnerDef\"\n\
    \               value: \"\\n\\ntest_queue\"\n\
    \             }\n\
    \           }\n\
    \         }\n\
    \       }\n\
    \\n\
    \ 3. For Python objects, implement to_proto() and from_proto(), and register\n\
    \    them in the following manner:\n\
    \    ops.register_proto_function(\"your_collection_name\",\n\
    \                                proto_type,\n\
    \                                to_proto=YourPythonObject.to_proto,\n\
    \                                from_proto=YourPythonObject.from_proto)\n\
    \    These functions will be invoked to serialize and de-serialize the\n\
    \    collection. For example,\n\
    \    ops.register_proto_function(ops.GraphKeys.GLOBAL_VARIABLES,\n\
    \                                proto_type=variable_pb2.VariableDef,\n\
    \                                to_proto=Variable.to_proto,\n\
    \                                from_proto=Variable.from_proto)\n\
    \\n\
    \\v\n\
    \\ETX\EOT\SOH\SOH\DC2\EOT\159\SOH\b\NAK\n\
    \\152\STX\n\
    \\EOT\EOT\SOH\ETX\NUL\DC2\ACK\170\SOH\STX\172\SOH\ETX\SUB\135\STX NodeList is used for collecting nodes in graph. For example\n\
    \ collection_def {\n\
    \   key: \"summaries\"\n\
    \   value {\n\
    \     node_list {\n\
    \       value: \"input_producer/ScalarSummary:0\"\n\
    \       value: \"shuffle_batch/ScalarSummary:0\"\n\
    \       value: \"ImageSummary:0\"\n\
    \     }\n\
    \   }\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SOH\ETX\NUL\SOH\DC2\EOT\170\SOH\n\
    \\DC2\n\
    \\SO\n\
    \\ACK\EOT\SOH\ETX\NUL\STX\NUL\DC2\EOT\171\SOH\EOT\RS\n\
    \\SI\n\
    \\a\EOT\SOH\ETX\NUL\STX\NUL\EOT\DC2\EOT\171\SOH\EOT\f\n\
    \\SI\n\
    \\a\EOT\SOH\ETX\NUL\STX\NUL\ENQ\DC2\EOT\171\SOH\r\DC3\n\
    \\SI\n\
    \\a\EOT\SOH\ETX\NUL\STX\NUL\SOH\DC2\EOT\171\SOH\DC4\EM\n\
    \\SI\n\
    \\a\EOT\SOH\ETX\NUL\STX\NUL\ETX\DC2\EOT\171\SOH\FS\GS\n\
    \\150\ETX\n\
    \\EOT\EOT\SOH\ETX\SOH\DC2\ACK\187\SOH\STX\189\SOH\ETX\SUB\133\ETX BytesList is used for collecting strings and serialized protobufs. For\n\
    \ example:\n\
    \ collection_def {\n\
    \   key: \"trainable_variables\"\n\
    \   value {\n\
    \     bytes_list {\n\
    \       value: \"\\n\\017conv1/weights:0\\022\\024conv1/weights/Assign\n\
    \              \\032\\024conv1/weights/read:0\"\n\
    \       value: \"\\n\\016conv1/biases:0\\022\\023conv1/biases/Assign\\032\n\
    \              \\023conv1/biases/read:0\"\n\
    \     }\n\
    \   }\n\
    \ }\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SOH\ETX\SOH\SOH\DC2\EOT\187\SOH\n\
    \\DC3\n\
    \\SO\n\
    \\ACK\EOT\SOH\ETX\SOH\STX\NUL\DC2\EOT\188\SOH\EOT\GS\n\
    \\SI\n\
    \\a\EOT\SOH\ETX\SOH\STX\NUL\EOT\DC2\EOT\188\SOH\EOT\f\n\
    \\SI\n\
    \\a\EOT\SOH\ETX\SOH\STX\NUL\ENQ\DC2\EOT\188\SOH\r\DC2\n\
    \\SI\n\
    \\a\EOT\SOH\ETX\SOH\STX\NUL\SOH\DC2\EOT\188\SOH\DC3\CAN\n\
    \\SI\n\
    \\a\EOT\SOH\ETX\SOH\STX\NUL\ETX\DC2\EOT\188\SOH\ESC\FS\n\
    \N\n\
    \\EOT\EOT\SOH\ETX\STX\DC2\ACK\192\SOH\STX\194\SOH\ETX\SUB> Int64List is used for collecting int, int64 and long values.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SOH\ETX\STX\SOH\DC2\EOT\192\SOH\n\
    \\DC3\n\
    \\SO\n\
    \\ACK\EOT\SOH\ETX\STX\STX\NUL\DC2\EOT\193\SOH\EOT-\n\
    \\SI\n\
    \\a\EOT\SOH\ETX\STX\STX\NUL\EOT\DC2\EOT\193\SOH\EOT\f\n\
    \\SI\n\
    \\a\EOT\SOH\ETX\STX\STX\NUL\ENQ\DC2\EOT\193\SOH\r\DC2\n\
    \\SI\n\
    \\a\EOT\SOH\ETX\STX\STX\NUL\SOH\DC2\EOT\193\SOH\DC3\CAN\n\
    \\SI\n\
    \\a\EOT\SOH\ETX\STX\STX\NUL\ETX\DC2\EOT\193\SOH\ESC\FS\n\
    \\SI\n\
    \\a\EOT\SOH\ETX\STX\STX\NUL\b\DC2\EOT\193\SOH\GS,\n\
    \\DLE\n\
    \\b\EOT\SOH\ETX\STX\STX\NUL\b\STX\DC2\EOT\193\SOH\RS+\n\
    \@\n\
    \\EOT\EOT\SOH\ETX\ETX\DC2\ACK\197\SOH\STX\199\SOH\ETX\SUB0 FloatList is used for collecting float values.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SOH\ETX\ETX\SOH\DC2\EOT\197\SOH\n\
    \\DC3\n\
    \\SO\n\
    \\ACK\EOT\SOH\ETX\ETX\STX\NUL\DC2\EOT\198\SOH\EOT-\n\
    \\SI\n\
    \\a\EOT\SOH\ETX\ETX\STX\NUL\EOT\DC2\EOT\198\SOH\EOT\f\n\
    \\SI\n\
    \\a\EOT\SOH\ETX\ETX\STX\NUL\ENQ\DC2\EOT\198\SOH\r\DC2\n\
    \\SI\n\
    \\a\EOT\SOH\ETX\ETX\STX\NUL\SOH\DC2\EOT\198\SOH\DC3\CAN\n\
    \\SI\n\
    \\a\EOT\SOH\ETX\ETX\STX\NUL\ETX\DC2\EOT\198\SOH\ESC\FS\n\
    \\SI\n\
    \\a\EOT\SOH\ETX\ETX\STX\NUL\b\DC2\EOT\198\SOH\GS,\n\
    \\DLE\n\
    \\b\EOT\SOH\ETX\ETX\STX\NUL\b\STX\DC2\EOT\198\SOH\RS+\n\
    \<\n\
    \\EOT\EOT\SOH\ETX\EOT\DC2\ACK\202\SOH\STX\204\SOH\ETX\SUB, AnyList is used for collecting Any protos.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SOH\ETX\EOT\SOH\DC2\EOT\202\SOH\n\
    \\DC1\n\
    \\SO\n\
    \\ACK\EOT\SOH\ETX\EOT\STX\NUL\DC2\EOT\203\SOH\EOT+\n\
    \\SI\n\
    \\a\EOT\SOH\ETX\EOT\STX\NUL\EOT\DC2\EOT\203\SOH\EOT\f\n\
    \\SI\n\
    \\a\EOT\SOH\ETX\EOT\STX\NUL\ACK\DC2\EOT\203\SOH\r \n\
    \\SI\n\
    \\a\EOT\SOH\ETX\EOT\STX\NUL\SOH\DC2\EOT\203\SOH!&\n\
    \\SI\n\
    \\a\EOT\SOH\ETX\EOT\STX\NUL\ETX\DC2\EOT\203\SOH)*\n\
    \\SO\n\
    \\EOT\EOT\SOH\b\NUL\DC2\ACK\206\SOH\STX\212\SOH\ETX\n\
    \\r\n\
    \\ENQ\EOT\SOH\b\NUL\SOH\DC2\EOT\206\SOH\b\f\n\
    \\f\n\
    \\EOT\EOT\SOH\STX\NUL\DC2\EOT\207\SOH\EOT\ESC\n\
    \\r\n\
    \\ENQ\EOT\SOH\STX\NUL\ACK\DC2\EOT\207\SOH\EOT\f\n\
    \\r\n\
    \\ENQ\EOT\SOH\STX\NUL\SOH\DC2\EOT\207\SOH\r\SYN\n\
    \\r\n\
    \\ENQ\EOT\SOH\STX\NUL\ETX\DC2\EOT\207\SOH\EM\SUB\n\
    \\f\n\
    \\EOT\EOT\SOH\STX\SOH\DC2\EOT\208\SOH\EOT\GS\n\
    \\r\n\
    \\ENQ\EOT\SOH\STX\SOH\ACK\DC2\EOT\208\SOH\EOT\r\n\
    \\r\n\
    \\ENQ\EOT\SOH\STX\SOH\SOH\DC2\EOT\208\SOH\SO\CAN\n\
    \\r\n\
    \\ENQ\EOT\SOH\STX\SOH\ETX\DC2\EOT\208\SOH\ESC\FS\n\
    \\f\n\
    \\EOT\EOT\SOH\STX\STX\DC2\EOT\209\SOH\EOT\GS\n\
    \\r\n\
    \\ENQ\EOT\SOH\STX\STX\ACK\DC2\EOT\209\SOH\EOT\r\n\
    \\r\n\
    \\ENQ\EOT\SOH\STX\STX\SOH\DC2\EOT\209\SOH\SO\CAN\n\
    \\r\n\
    \\ENQ\EOT\SOH\STX\STX\ETX\DC2\EOT\209\SOH\ESC\FS\n\
    \\f\n\
    \\EOT\EOT\SOH\STX\ETX\DC2\EOT\210\SOH\EOT\GS\n\
    \\r\n\
    \\ENQ\EOT\SOH\STX\ETX\ACK\DC2\EOT\210\SOH\EOT\r\n\
    \\r\n\
    \\ENQ\EOT\SOH\STX\ETX\SOH\DC2\EOT\210\SOH\SO\CAN\n\
    \\r\n\
    \\ENQ\EOT\SOH\STX\ETX\ETX\DC2\EOT\210\SOH\ESC\FS\n\
    \\f\n\
    \\EOT\EOT\SOH\STX\EOT\DC2\EOT\211\SOH\EOT\EM\n\
    \\r\n\
    \\ENQ\EOT\SOH\STX\EOT\ACK\DC2\EOT\211\SOH\EOT\v\n\
    \\r\n\
    \\ENQ\EOT\SOH\STX\EOT\SOH\DC2\EOT\211\SOH\f\DC4\n\
    \\r\n\
    \\ENQ\EOT\SOH\STX\EOT\ETX\DC2\EOT\211\SOH\ETB\CAN\n\
    \N\n\
    \\STX\EOT\STX\DC2\ACK\216\SOH\NUL\129\STX\SOH\SUB@ Information about a Tensor necessary for feeding or retrieval.\n\
    \\n\
    \\v\n\
    \\ETX\EOT\STX\SOH\DC2\EOT\216\SOH\b\DC2\n\
    \f\n\
    \\EOT\EOT\STX\ETX\NUL\DC2\ACK\219\SOH\STX\230\SOH\ETX\SUBV For sparse tensors, The COO encoding stores a triple of values, indices,\n\
    \ and shape.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\STX\ETX\NUL\SOH\DC2\EOT\219\SOH\n\
    \\DC3\n\
    \\154\SOH\n\
    \\ACK\EOT\STX\ETX\NUL\STX\NUL\DC2\EOT\222\SOH\EOT\"\SUB\137\SOH The shape of the values Tensor is [?].  Its dtype must be the dtype of\n\
    \ the SparseTensor as a whole, given in the enclosing TensorInfo.\n\
    \\n\
    \\SI\n\
    \\a\EOT\STX\ETX\NUL\STX\NUL\ENQ\DC2\EOT\222\SOH\EOT\n\
    \\n\
    \\SI\n\
    \\a\EOT\STX\ETX\NUL\STX\NUL\SOH\DC2\EOT\222\SOH\v\GS\n\
    \\SI\n\
    \\a\EOT\STX\ETX\NUL\STX\NUL\ETX\DC2\EOT\222\SOH !\n\
    \L\n\
    \\ACK\EOT\STX\ETX\NUL\STX\SOH\DC2\EOT\225\SOH\EOT#\SUB< The indices Tensor must have dtype int64 and shape [?, ?].\n\
    \\n\
    \\SI\n\
    \\a\EOT\STX\ETX\NUL\STX\SOH\ENQ\DC2\EOT\225\SOH\EOT\n\
    \\n\
    \\SI\n\
    \\a\EOT\STX\ETX\NUL\STX\SOH\SOH\DC2\EOT\225\SOH\v\RS\n\
    \\SI\n\
    \\a\EOT\STX\ETX\NUL\STX\SOH\ETX\DC2\EOT\225\SOH!\"\n\
    \\161\SOH\n\
    \\ACK\EOT\STX\ETX\NUL\STX\STX\DC2\EOT\229\SOH\EOT'\SUB\144\SOH The dynamic logical shape represented by the SparseTensor is recorded in\n\
    \ the Tensor referenced here.  It must have dtype int64 and shape [?].\n\
    \\n\
    \\SI\n\
    \\a\EOT\STX\ETX\NUL\STX\STX\ENQ\DC2\EOT\229\SOH\EOT\n\
    \\n\
    \\SI\n\
    \\a\EOT\STX\ETX\NUL\STX\STX\SOH\DC2\EOT\229\SOH\v\"\n\
    \\SI\n\
    \\a\EOT\STX\ETX\NUL\STX\STX\ETX\DC2\EOT\229\SOH%&\n\
    \9\n\
    \\EOT\EOT\STX\ETX\SOH\DC2\ACK\233\SOH\STX\239\SOH\ETX\SUB) Generic encoding for composite tensors.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\STX\ETX\SOH\SOH\DC2\EOT\233\SOH\n\
    \\EM\n\
    \C\n\
    \\ACK\EOT\STX\ETX\SOH\STX\NUL\DC2\EOT\235\SOH\EOT \SUB3 The serialized TypeSpec for the composite tensor.\n\
    \\n\
    \\SI\n\
    \\a\EOT\STX\ETX\SOH\STX\NUL\ACK\DC2\EOT\235\SOH\EOT\DC1\n\
    \\SI\n\
    \\a\EOT\STX\ETX\SOH\STX\NUL\SOH\DC2\EOT\235\SOH\DC2\ESC\n\
    \\SI\n\
    \\a\EOT\STX\ETX\SOH\STX\NUL\ETX\DC2\EOT\235\SOH\RS\US\n\
    \C\n\
    \\ACK\EOT\STX\ETX\SOH\STX\SOH\DC2\EOT\238\SOH\EOT'\SUB3 A TensorInfo for each flattened component tensor.\n\
    \\n\
    \\SI\n\
    \\a\EOT\STX\ETX\SOH\STX\SOH\EOT\DC2\EOT\238\SOH\EOT\f\n\
    \\SI\n\
    \\a\EOT\STX\ETX\SOH\STX\SOH\ACK\DC2\EOT\238\SOH\r\ETB\n\
    \\SI\n\
    \\a\EOT\STX\ETX\SOH\STX\SOH\SOH\DC2\EOT\238\SOH\CAN\"\n\
    \\SI\n\
    \\a\EOT\STX\ETX\SOH\STX\SOH\ETX\DC2\EOT\238\SOH%&\n\
    \\SO\n\
    \\EOT\EOT\STX\b\NUL\DC2\ACK\241\SOH\STX\251\SOH\ETX\n\
    \\r\n\
    \\ENQ\EOT\STX\b\NUL\SOH\DC2\EOT\241\SOH\b\DLE\n\
    \I\n\
    \\EOT\EOT\STX\STX\NUL\DC2\EOT\243\SOH\EOT\DC4\SUB; For dense `Tensor`s, the name of the tensor in the graph.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\NUL\ENQ\DC2\EOT\243\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\NUL\SOH\DC2\EOT\243\SOH\v\SI\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\NUL\ETX\DC2\EOT\243\SOH\DC2\DC3\n\
    \\238\SOH\n\
    \\EOT\EOT\STX\STX\SOH\DC2\EOT\248\SOH\EOT\GS\SUB\223\SOH There are many possible encodings of sparse matrices\n\
    \ (https://en.wikipedia.org/wiki/Sparse_matrix).  Currently, TensorFlow\n\
    \ uses only the COO encoding.  This is supported and documented in the\n\
    \ SparseTensor Python class.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\SOH\ACK\DC2\EOT\248\SOH\EOT\r\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\SOH\SOH\DC2\EOT\248\SOH\SO\CAN\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\SOH\ETX\DC2\EOT\248\SOH\ESC\FS\n\
    \6\n\
    \\EOT\EOT\STX\STX\STX\DC2\EOT\250\SOH\EOT)\SUB( Generic encoding for CompositeTensors.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\STX\ACK\DC2\EOT\250\SOH\EOT\DC3\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\STX\SOH\DC2\EOT\250\SOH\DC4$\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\STX\ETX\DC2\EOT\250\SOH'(\n\
    \\f\n\
    \\EOT\EOT\STX\STX\ETX\DC2\EOT\252\SOH\STX\NAK\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\ETX\ACK\DC2\EOT\252\SOH\STX\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\ETX\SOH\DC2\EOT\252\SOH\v\DLE\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\ETX\ETX\DC2\EOT\252\SOH\DC3\DC4\n\
    \\223\SOH\n\
    \\EOT\EOT\STX\STX\EOT\DC2\EOT\128\STX\STX$\SUB\208\SOH The static shape should be recorded here, to the extent that it can\n\
    \ be known in advance.  In the case of a SparseTensor, this field describes\n\
    \ the logical shape of the represented tensor (aka dense_shape).\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\EOT\ACK\DC2\EOT\128\STX\STX\DC2\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\EOT\SOH\DC2\EOT\128\STX\DC3\US\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\EOT\ETX\DC2\EOT\128\STX\"#\n\
    \\190\n\
    \\n\
    \\STX\EOT\ETX\DC2\ACK\188\STX\NUL\202\STX\SOH\SUB\175\n\
    \ SignatureDef defines the signature of a computation supported by a TensorFlow\n\
    \ graph.\n\
    \\n\
    \ For example, a model with two loss computations, sharing a single input,\n\
    \ might have the following signature_def map.\n\
    \\n\
    \ Note that across the two SignatureDefs \"loss_A\" and \"loss_B\", the input key,\n\
    \ output key, and method_name are identical, and will be used by system(s) that\n\
    \ implement or rely upon this particular loss method. The output tensor names\n\
    \ differ, demonstrating how different outputs can exist for the same method.\n\
    \\n\
    \ signature_def {\n\
    \   key: \"loss_A\"\n\
    \   value {\n\
    \     inputs {\n\
    \       key: \"input\"\n\
    \       value {\n\
    \         name: \"input:0\"\n\
    \         dtype: DT_STRING\n\
    \         tensor_shape: ...\n\
    \       }\n\
    \     }\n\
    \     outputs {\n\
    \       key: \"loss_output\"\n\
    \       value {\n\
    \         name: \"loss_output_A:0\"\n\
    \         dtype: DT_FLOAT\n\
    \         tensor_shape: ...\n\
    \       }\n\
    \     }\n\
    \   }\n\
    \   ...\n\
    \   method_name: \"some/package/compute_loss\"\n\
    \ }\n\
    \ signature_def {\n\
    \   key: \"loss_B\"\n\
    \   value {\n\
    \     inputs {\n\
    \       key: \"input\"\n\
    \       value {\n\
    \         name: \"input:0\"\n\
    \         dtype: DT_STRING\n\
    \         tensor_shape: ...\n\
    \       }\n\
    \     }\n\
    \     outputs {\n\
    \       key: \"loss_output\"\n\
    \       value {\n\
    \         name: \"loss_output_B:0\"\n\
    \         dtype: DT_FLOAT\n\
    \         tensor_shape: ...\n\
    \       }\n\
    \     }\n\
    \   }\n\
    \   ...\n\
    \   method_name: \"some/package/compute_loss\"\n\
    \ }\n\
    \\n\
    \\v\n\
    \\ETX\EOT\ETX\SOH\DC2\EOT\188\STX\b\DC4\n\
    \'\n\
    \\EOT\EOT\ETX\STX\NUL\DC2\EOT\190\STX\STX%\SUB\EM Named input parameters.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\NUL\ACK\DC2\EOT\190\STX\STX\EM\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\NUL\SOH\DC2\EOT\190\STX\SUB \n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\NUL\ETX\DC2\EOT\190\STX#$\n\
    \(\n\
    \\EOT\EOT\ETX\STX\SOH\DC2\EOT\192\STX\STX&\SUB\SUB Named output parameters.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\SOH\ACK\DC2\EOT\192\STX\STX\EM\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\SOH\SOH\DC2\EOT\192\STX\SUB!\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\SOH\ETX\DC2\EOT\192\STX$%\n\
    \\145\EOT\n\
    \\EOT\EOT\ETX\STX\STX\DC2\EOT\201\STX\STX\EM\SUB\130\EOT Extensible method_name information enabling third-party users to mark a\n\
    \ SignatureDef as supporting a particular method. This enables producers and\n\
    \ consumers of SignatureDefs, e.g. a model definition library and a serving\n\
    \ library to have a clear hand-off regarding the semantics of a computation.\n\
    \\n\
    \ Note that multiple SignatureDefs in a single MetaGraphDef may have the same\n\
    \ method_name. This is commonly used to support multi-headed computation,\n\
    \ where a single graph computation may return multiple results.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\STX\ENQ\DC2\EOT\201\STX\STX\b\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\STX\SOH\DC2\EOT\201\STX\t\DC4\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\STX\ETX\DC2\EOT\201\STX\ETB\CAN\n\
    \b\n\
    \\STX\EOT\EOT\DC2\ACK\206\STX\NUL\213\STX\SOH\SUBT An asset file def for a single file or a set of sharded files with the same\n\
    \ name.\n\
    \\n\
    \\v\n\
    \\ETX\EOT\EOT\SOH\DC2\EOT\206\STX\b\DC4\n\
    \9\n\
    \\EOT\EOT\EOT\STX\NUL\DC2\EOT\208\STX\STX\GS\SUB+ The tensor to bind the asset filename to.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\NUL\ACK\DC2\EOT\208\STX\STX\f\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\NUL\SOH\DC2\EOT\208\STX\r\CAN\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\NUL\ETX\DC2\EOT\208\STX\ESC\FS\n\
    \\189\SOH\n\
    \\EOT\EOT\EOT\STX\SOH\DC2\EOT\212\STX\STX\SYN\SUB\174\SOH The filename within an assets directory. Note: does not include the path\n\
    \ prefix, i.e. directories. For an asset at /tmp/path/vocab.txt, the filename\n\
    \ would be \"vocab.txt\".\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\SOH\ENQ\DC2\EOT\212\STX\STX\b\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\SOH\SOH\DC2\EOT\212\STX\t\DC1\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\SOH\ETX\DC2\EOT\212\STX\DC4\NAKb\ACKproto3"