{- This file was auto-generated from tensorflow/core/framework/tensor.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.Framework.Tensor (
        TensorProto(), VariantTensorDataProto()
    ) 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.Tensorflow.Core.Framework.ResourceHandle
import qualified Proto.Tensorflow.Core.Framework.TensorShape
import qualified Proto.Tensorflow.Core.Framework.Types
{- | Fields :
     
         * 'Proto.Tensorflow.Core.Framework.Tensor_Fields.dtype' @:: Lens' TensorProto Proto.Tensorflow.Core.Framework.Types.DataType@
         * 'Proto.Tensorflow.Core.Framework.Tensor_Fields.tensorShape' @:: Lens' TensorProto Proto.Tensorflow.Core.Framework.TensorShape.TensorShapeProto@
         * 'Proto.Tensorflow.Core.Framework.Tensor_Fields.maybe'tensorShape' @:: Lens' TensorProto (Prelude.Maybe Proto.Tensorflow.Core.Framework.TensorShape.TensorShapeProto)@
         * 'Proto.Tensorflow.Core.Framework.Tensor_Fields.versionNumber' @:: Lens' TensorProto Data.Int.Int32@
         * 'Proto.Tensorflow.Core.Framework.Tensor_Fields.tensorContent' @:: Lens' TensorProto Data.ByteString.ByteString@
         * 'Proto.Tensorflow.Core.Framework.Tensor_Fields.halfVal' @:: Lens' TensorProto [Data.Int.Int32]@
         * 'Proto.Tensorflow.Core.Framework.Tensor_Fields.vec'halfVal' @:: Lens' TensorProto (Data.Vector.Unboxed.Vector Data.Int.Int32)@
         * 'Proto.Tensorflow.Core.Framework.Tensor_Fields.floatVal' @:: Lens' TensorProto [Prelude.Float]@
         * 'Proto.Tensorflow.Core.Framework.Tensor_Fields.vec'floatVal' @:: Lens' TensorProto (Data.Vector.Unboxed.Vector Prelude.Float)@
         * 'Proto.Tensorflow.Core.Framework.Tensor_Fields.doubleVal' @:: Lens' TensorProto [Prelude.Double]@
         * 'Proto.Tensorflow.Core.Framework.Tensor_Fields.vec'doubleVal' @:: Lens' TensorProto (Data.Vector.Unboxed.Vector Prelude.Double)@
         * 'Proto.Tensorflow.Core.Framework.Tensor_Fields.intVal' @:: Lens' TensorProto [Data.Int.Int32]@
         * 'Proto.Tensorflow.Core.Framework.Tensor_Fields.vec'intVal' @:: Lens' TensorProto (Data.Vector.Unboxed.Vector Data.Int.Int32)@
         * 'Proto.Tensorflow.Core.Framework.Tensor_Fields.stringVal' @:: Lens' TensorProto [Data.ByteString.ByteString]@
         * 'Proto.Tensorflow.Core.Framework.Tensor_Fields.vec'stringVal' @:: Lens' TensorProto (Data.Vector.Vector Data.ByteString.ByteString)@
         * 'Proto.Tensorflow.Core.Framework.Tensor_Fields.scomplexVal' @:: Lens' TensorProto [Prelude.Float]@
         * 'Proto.Tensorflow.Core.Framework.Tensor_Fields.vec'scomplexVal' @:: Lens' TensorProto (Data.Vector.Unboxed.Vector Prelude.Float)@
         * 'Proto.Tensorflow.Core.Framework.Tensor_Fields.int64Val' @:: Lens' TensorProto [Data.Int.Int64]@
         * 'Proto.Tensorflow.Core.Framework.Tensor_Fields.vec'int64Val' @:: Lens' TensorProto (Data.Vector.Unboxed.Vector Data.Int.Int64)@
         * 'Proto.Tensorflow.Core.Framework.Tensor_Fields.boolVal' @:: Lens' TensorProto [Prelude.Bool]@
         * 'Proto.Tensorflow.Core.Framework.Tensor_Fields.vec'boolVal' @:: Lens' TensorProto (Data.Vector.Unboxed.Vector Prelude.Bool)@
         * 'Proto.Tensorflow.Core.Framework.Tensor_Fields.dcomplexVal' @:: Lens' TensorProto [Prelude.Double]@
         * 'Proto.Tensorflow.Core.Framework.Tensor_Fields.vec'dcomplexVal' @:: Lens' TensorProto (Data.Vector.Unboxed.Vector Prelude.Double)@
         * 'Proto.Tensorflow.Core.Framework.Tensor_Fields.resourceHandleVal' @:: Lens' TensorProto [Proto.Tensorflow.Core.Framework.ResourceHandle.ResourceHandleProto]@
         * 'Proto.Tensorflow.Core.Framework.Tensor_Fields.vec'resourceHandleVal' @:: Lens' TensorProto (Data.Vector.Vector Proto.Tensorflow.Core.Framework.ResourceHandle.ResourceHandleProto)@
         * 'Proto.Tensorflow.Core.Framework.Tensor_Fields.variantVal' @:: Lens' TensorProto [VariantTensorDataProto]@
         * 'Proto.Tensorflow.Core.Framework.Tensor_Fields.vec'variantVal' @:: Lens' TensorProto (Data.Vector.Vector VariantTensorDataProto)@
         * 'Proto.Tensorflow.Core.Framework.Tensor_Fields.uint32Val' @:: Lens' TensorProto [Data.Word.Word32]@
         * 'Proto.Tensorflow.Core.Framework.Tensor_Fields.vec'uint32Val' @:: Lens' TensorProto (Data.Vector.Unboxed.Vector Data.Word.Word32)@
         * 'Proto.Tensorflow.Core.Framework.Tensor_Fields.uint64Val' @:: Lens' TensorProto [Data.Word.Word64]@
         * 'Proto.Tensorflow.Core.Framework.Tensor_Fields.vec'uint64Val' @:: Lens' TensorProto (Data.Vector.Unboxed.Vector Data.Word.Word64)@ -}
data TensorProto
  = TensorProto'_constructor {TensorProto -> DataType
_TensorProto'dtype :: !Proto.Tensorflow.Core.Framework.Types.DataType,
                              TensorProto -> Maybe TensorShapeProto
_TensorProto'tensorShape :: !(Prelude.Maybe Proto.Tensorflow.Core.Framework.TensorShape.TensorShapeProto),
                              TensorProto -> Int32
_TensorProto'versionNumber :: !Data.Int.Int32,
                              TensorProto -> ByteString
_TensorProto'tensorContent :: !Data.ByteString.ByteString,
                              TensorProto -> Vector Int32
_TensorProto'halfVal :: !(Data.Vector.Unboxed.Vector Data.Int.Int32),
                              TensorProto -> Vector Float
_TensorProto'floatVal :: !(Data.Vector.Unboxed.Vector Prelude.Float),
                              TensorProto -> Vector Double
_TensorProto'doubleVal :: !(Data.Vector.Unboxed.Vector Prelude.Double),
                              TensorProto -> Vector Int32
_TensorProto'intVal :: !(Data.Vector.Unboxed.Vector Data.Int.Int32),
                              TensorProto -> Vector ByteString
_TensorProto'stringVal :: !(Data.Vector.Vector Data.ByteString.ByteString),
                              TensorProto -> Vector Float
_TensorProto'scomplexVal :: !(Data.Vector.Unboxed.Vector Prelude.Float),
                              TensorProto -> Vector Int64
_TensorProto'int64Val :: !(Data.Vector.Unboxed.Vector Data.Int.Int64),
                              TensorProto -> Vector Bool
_TensorProto'boolVal :: !(Data.Vector.Unboxed.Vector Prelude.Bool),
                              TensorProto -> Vector Double
_TensorProto'dcomplexVal :: !(Data.Vector.Unboxed.Vector Prelude.Double),
                              TensorProto -> Vector ResourceHandleProto
_TensorProto'resourceHandleVal :: !(Data.Vector.Vector Proto.Tensorflow.Core.Framework.ResourceHandle.ResourceHandleProto),
                              TensorProto -> Vector VariantTensorDataProto
_TensorProto'variantVal :: !(Data.Vector.Vector VariantTensorDataProto),
                              TensorProto -> Vector Word32
_TensorProto'uint32Val :: !(Data.Vector.Unboxed.Vector Data.Word.Word32),
                              TensorProto -> Vector Word64
_TensorProto'uint64Val :: !(Data.Vector.Unboxed.Vector Data.Word.Word64),
                              TensorProto -> FieldSet
_TensorProto'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (TensorProto -> TensorProto -> Bool
(TensorProto -> TensorProto -> Bool)
-> (TensorProto -> TensorProto -> Bool) -> Eq TensorProto
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: TensorProto -> TensorProto -> Bool
$c/= :: TensorProto -> TensorProto -> Bool
== :: TensorProto -> TensorProto -> Bool
$c== :: TensorProto -> TensorProto -> Bool
Prelude.Eq, Eq TensorProto
Eq TensorProto =>
(TensorProto -> TensorProto -> Ordering)
-> (TensorProto -> TensorProto -> Bool)
-> (TensorProto -> TensorProto -> Bool)
-> (TensorProto -> TensorProto -> Bool)
-> (TensorProto -> TensorProto -> Bool)
-> (TensorProto -> TensorProto -> TensorProto)
-> (TensorProto -> TensorProto -> TensorProto)
-> Ord TensorProto
TensorProto -> TensorProto -> Bool
TensorProto -> TensorProto -> Ordering
TensorProto -> TensorProto -> TensorProto
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 :: TensorProto -> TensorProto -> TensorProto
$cmin :: TensorProto -> TensorProto -> TensorProto
max :: TensorProto -> TensorProto -> TensorProto
$cmax :: TensorProto -> TensorProto -> TensorProto
>= :: TensorProto -> TensorProto -> Bool
$c>= :: TensorProto -> TensorProto -> Bool
> :: TensorProto -> TensorProto -> Bool
$c> :: TensorProto -> TensorProto -> Bool
<= :: TensorProto -> TensorProto -> Bool
$c<= :: TensorProto -> TensorProto -> Bool
< :: TensorProto -> TensorProto -> Bool
$c< :: TensorProto -> TensorProto -> Bool
compare :: TensorProto -> TensorProto -> Ordering
$ccompare :: TensorProto -> TensorProto -> Ordering
$cp1Ord :: Eq TensorProto
Prelude.Ord)
instance Prelude.Show TensorProto where
  showsPrec :: Int -> TensorProto -> ShowS
showsPrec _ __x :: TensorProto
__x __s :: String
__s
    = Char -> ShowS
Prelude.showChar
        '{'
        (String -> ShowS
Prelude.showString
           (TensorProto -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort TensorProto
__x) (Char -> ShowS
Prelude.showChar '}' String
__s))
instance Data.ProtoLens.Field.HasField TensorProto "dtype" Proto.Tensorflow.Core.Framework.Types.DataType where
  fieldOf :: Proxy# "dtype"
-> (DataType -> f DataType) -> TensorProto -> f TensorProto
fieldOf _
    = ((DataType -> f DataType) -> TensorProto -> f TensorProto)
-> ((DataType -> f DataType) -> DataType -> f DataType)
-> (DataType -> f DataType)
-> TensorProto
-> f TensorProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorProto -> DataType)
-> (TensorProto -> DataType -> TensorProto)
-> Lens TensorProto TensorProto DataType DataType
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorProto -> DataType
_TensorProto'dtype (\ x__ :: TensorProto
x__ y__ :: DataType
y__ -> TensorProto
x__ {_TensorProto'dtype :: DataType
_TensorProto'dtype = DataType
y__}))
        (DataType -> f DataType) -> DataType -> f DataType
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField TensorProto "tensorShape" Proto.Tensorflow.Core.Framework.TensorShape.TensorShapeProto where
  fieldOf :: Proxy# "tensorShape"
-> (TensorShapeProto -> f TensorShapeProto)
-> TensorProto
-> f TensorProto
fieldOf _
    = ((Maybe TensorShapeProto -> f (Maybe TensorShapeProto))
 -> TensorProto -> f TensorProto)
-> ((TensorShapeProto -> f TensorShapeProto)
    -> Maybe TensorShapeProto -> f (Maybe TensorShapeProto))
-> (TensorShapeProto -> f TensorShapeProto)
-> TensorProto
-> f TensorProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorProto -> Maybe TensorShapeProto)
-> (TensorProto -> Maybe TensorShapeProto -> TensorProto)
-> Lens
     TensorProto
     TensorProto
     (Maybe TensorShapeProto)
     (Maybe TensorShapeProto)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorProto -> Maybe TensorShapeProto
_TensorProto'tensorShape
           (\ x__ :: TensorProto
x__ y__ :: Maybe TensorShapeProto
y__ -> TensorProto
x__ {_TensorProto'tensorShape :: Maybe TensorShapeProto
_TensorProto'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 TensorProto "maybe'tensorShape" (Prelude.Maybe Proto.Tensorflow.Core.Framework.TensorShape.TensorShapeProto) where
  fieldOf :: Proxy# "maybe'tensorShape"
-> (Maybe TensorShapeProto -> f (Maybe TensorShapeProto))
-> TensorProto
-> f TensorProto
fieldOf _
    = ((Maybe TensorShapeProto -> f (Maybe TensorShapeProto))
 -> TensorProto -> f TensorProto)
-> ((Maybe TensorShapeProto -> f (Maybe TensorShapeProto))
    -> Maybe TensorShapeProto -> f (Maybe TensorShapeProto))
-> (Maybe TensorShapeProto -> f (Maybe TensorShapeProto))
-> TensorProto
-> f TensorProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorProto -> Maybe TensorShapeProto)
-> (TensorProto -> Maybe TensorShapeProto -> TensorProto)
-> Lens
     TensorProto
     TensorProto
     (Maybe TensorShapeProto)
     (Maybe TensorShapeProto)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorProto -> Maybe TensorShapeProto
_TensorProto'tensorShape
           (\ x__ :: TensorProto
x__ y__ :: Maybe TensorShapeProto
y__ -> TensorProto
x__ {_TensorProto'tensorShape :: Maybe TensorShapeProto
_TensorProto'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 TensorProto "versionNumber" Data.Int.Int32 where
  fieldOf :: Proxy# "versionNumber"
-> (Int32 -> f Int32) -> TensorProto -> f TensorProto
fieldOf _
    = ((Int32 -> f Int32) -> TensorProto -> f TensorProto)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> TensorProto
-> f TensorProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorProto -> Int32)
-> (TensorProto -> Int32 -> TensorProto)
-> Lens TensorProto TensorProto Int32 Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorProto -> Int32
_TensorProto'versionNumber
           (\ x__ :: TensorProto
x__ y__ :: Int32
y__ -> TensorProto
x__ {_TensorProto'versionNumber :: Int32
_TensorProto'versionNumber = Int32
y__}))
        (Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField TensorProto "tensorContent" Data.ByteString.ByteString where
  fieldOf :: Proxy# "tensorContent"
-> (ByteString -> f ByteString) -> TensorProto -> f TensorProto
fieldOf _
    = ((ByteString -> f ByteString) -> TensorProto -> f TensorProto)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> TensorProto
-> f TensorProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorProto -> ByteString)
-> (TensorProto -> ByteString -> TensorProto)
-> Lens TensorProto TensorProto ByteString ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorProto -> ByteString
_TensorProto'tensorContent
           (\ x__ :: TensorProto
x__ y__ :: ByteString
y__ -> TensorProto
x__ {_TensorProto'tensorContent :: ByteString
_TensorProto'tensorContent = ByteString
y__}))
        (ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField TensorProto "halfVal" [Data.Int.Int32] where
  fieldOf :: Proxy# "halfVal"
-> ([Int32] -> f [Int32]) -> TensorProto -> f TensorProto
fieldOf _
    = ((Vector Int32 -> f (Vector Int32))
 -> TensorProto -> f TensorProto)
-> (([Int32] -> f [Int32]) -> Vector Int32 -> f (Vector Int32))
-> ([Int32] -> f [Int32])
-> TensorProto
-> f TensorProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorProto -> Vector Int32)
-> (TensorProto -> Vector Int32 -> TensorProto)
-> Lens TensorProto TensorProto (Vector Int32) (Vector Int32)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorProto -> Vector Int32
_TensorProto'halfVal
           (\ x__ :: TensorProto
x__ y__ :: Vector Int32
y__ -> TensorProto
x__ {_TensorProto'halfVal :: Vector Int32
_TensorProto'halfVal = Vector Int32
y__}))
        ((Vector Int32 -> [Int32])
-> (Vector Int32 -> [Int32] -> Vector Int32)
-> Lens (Vector Int32) (Vector Int32) [Int32] [Int32]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Int32 -> [Int32]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ _ y__ :: [Int32]
y__ -> [Int32] -> Vector Int32
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Int32]
y__))
instance Data.ProtoLens.Field.HasField TensorProto "vec'halfVal" (Data.Vector.Unboxed.Vector Data.Int.Int32) where
  fieldOf :: Proxy# "vec'halfVal"
-> (Vector Int32 -> f (Vector Int32))
-> TensorProto
-> f TensorProto
fieldOf _
    = ((Vector Int32 -> f (Vector Int32))
 -> TensorProto -> f TensorProto)
-> ((Vector Int32 -> f (Vector Int32))
    -> Vector Int32 -> f (Vector Int32))
-> (Vector Int32 -> f (Vector Int32))
-> TensorProto
-> f TensorProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorProto -> Vector Int32)
-> (TensorProto -> Vector Int32 -> TensorProto)
-> Lens TensorProto TensorProto (Vector Int32) (Vector Int32)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorProto -> Vector Int32
_TensorProto'halfVal
           (\ x__ :: TensorProto
x__ y__ :: Vector Int32
y__ -> TensorProto
x__ {_TensorProto'halfVal :: Vector Int32
_TensorProto'halfVal = Vector Int32
y__}))
        (Vector Int32 -> f (Vector Int32))
-> Vector Int32 -> f (Vector Int32)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField TensorProto "floatVal" [Prelude.Float] where
  fieldOf :: Proxy# "floatVal"
-> ([Float] -> f [Float]) -> TensorProto -> f TensorProto
fieldOf _
    = ((Vector Float -> f (Vector Float))
 -> TensorProto -> f TensorProto)
-> (([Float] -> f [Float]) -> Vector Float -> f (Vector Float))
-> ([Float] -> f [Float])
-> TensorProto
-> f TensorProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorProto -> Vector Float)
-> (TensorProto -> Vector Float -> TensorProto)
-> Lens TensorProto TensorProto (Vector Float) (Vector Float)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorProto -> Vector Float
_TensorProto'floatVal
           (\ x__ :: TensorProto
x__ y__ :: Vector Float
y__ -> TensorProto
x__ {_TensorProto'floatVal :: Vector Float
_TensorProto'floatVal = 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 TensorProto "vec'floatVal" (Data.Vector.Unboxed.Vector Prelude.Float) where
  fieldOf :: Proxy# "vec'floatVal"
-> (Vector Float -> f (Vector Float))
-> TensorProto
-> f TensorProto
fieldOf _
    = ((Vector Float -> f (Vector Float))
 -> TensorProto -> f TensorProto)
-> ((Vector Float -> f (Vector Float))
    -> Vector Float -> f (Vector Float))
-> (Vector Float -> f (Vector Float))
-> TensorProto
-> f TensorProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorProto -> Vector Float)
-> (TensorProto -> Vector Float -> TensorProto)
-> Lens TensorProto TensorProto (Vector Float) (Vector Float)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorProto -> Vector Float
_TensorProto'floatVal
           (\ x__ :: TensorProto
x__ y__ :: Vector Float
y__ -> TensorProto
x__ {_TensorProto'floatVal :: Vector Float
_TensorProto'floatVal = Vector Float
y__}))
        (Vector Float -> f (Vector Float))
-> Vector Float -> f (Vector Float)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField TensorProto "doubleVal" [Prelude.Double] where
  fieldOf :: Proxy# "doubleVal"
-> ([Double] -> f [Double]) -> TensorProto -> f TensorProto
fieldOf _
    = ((Vector Double -> f (Vector Double))
 -> TensorProto -> f TensorProto)
-> (([Double] -> f [Double]) -> Vector Double -> f (Vector Double))
-> ([Double] -> f [Double])
-> TensorProto
-> f TensorProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorProto -> Vector Double)
-> (TensorProto -> Vector Double -> TensorProto)
-> Lens TensorProto TensorProto (Vector Double) (Vector Double)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorProto -> Vector Double
_TensorProto'doubleVal
           (\ x__ :: TensorProto
x__ y__ :: Vector Double
y__ -> TensorProto
x__ {_TensorProto'doubleVal :: Vector Double
_TensorProto'doubleVal = Vector Double
y__}))
        ((Vector Double -> [Double])
-> (Vector Double -> [Double] -> Vector Double)
-> Lens (Vector Double) (Vector Double) [Double] [Double]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Double -> [Double]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ _ y__ :: [Double]
y__ -> [Double] -> Vector Double
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Double]
y__))
instance Data.ProtoLens.Field.HasField TensorProto "vec'doubleVal" (Data.Vector.Unboxed.Vector Prelude.Double) where
  fieldOf :: Proxy# "vec'doubleVal"
-> (Vector Double -> f (Vector Double))
-> TensorProto
-> f TensorProto
fieldOf _
    = ((Vector Double -> f (Vector Double))
 -> TensorProto -> f TensorProto)
-> ((Vector Double -> f (Vector Double))
    -> Vector Double -> f (Vector Double))
-> (Vector Double -> f (Vector Double))
-> TensorProto
-> f TensorProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorProto -> Vector Double)
-> (TensorProto -> Vector Double -> TensorProto)
-> Lens TensorProto TensorProto (Vector Double) (Vector Double)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorProto -> Vector Double
_TensorProto'doubleVal
           (\ x__ :: TensorProto
x__ y__ :: Vector Double
y__ -> TensorProto
x__ {_TensorProto'doubleVal :: Vector Double
_TensorProto'doubleVal = Vector Double
y__}))
        (Vector Double -> f (Vector Double))
-> Vector Double -> f (Vector Double)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField TensorProto "intVal" [Data.Int.Int32] where
  fieldOf :: Proxy# "intVal"
-> ([Int32] -> f [Int32]) -> TensorProto -> f TensorProto
fieldOf _
    = ((Vector Int32 -> f (Vector Int32))
 -> TensorProto -> f TensorProto)
-> (([Int32] -> f [Int32]) -> Vector Int32 -> f (Vector Int32))
-> ([Int32] -> f [Int32])
-> TensorProto
-> f TensorProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorProto -> Vector Int32)
-> (TensorProto -> Vector Int32 -> TensorProto)
-> Lens TensorProto TensorProto (Vector Int32) (Vector Int32)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorProto -> Vector Int32
_TensorProto'intVal (\ x__ :: TensorProto
x__ y__ :: Vector Int32
y__ -> TensorProto
x__ {_TensorProto'intVal :: Vector Int32
_TensorProto'intVal = Vector Int32
y__}))
        ((Vector Int32 -> [Int32])
-> (Vector Int32 -> [Int32] -> Vector Int32)
-> Lens (Vector Int32) (Vector Int32) [Int32] [Int32]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Int32 -> [Int32]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ _ y__ :: [Int32]
y__ -> [Int32] -> Vector Int32
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Int32]
y__))
instance Data.ProtoLens.Field.HasField TensorProto "vec'intVal" (Data.Vector.Unboxed.Vector Data.Int.Int32) where
  fieldOf :: Proxy# "vec'intVal"
-> (Vector Int32 -> f (Vector Int32))
-> TensorProto
-> f TensorProto
fieldOf _
    = ((Vector Int32 -> f (Vector Int32))
 -> TensorProto -> f TensorProto)
-> ((Vector Int32 -> f (Vector Int32))
    -> Vector Int32 -> f (Vector Int32))
-> (Vector Int32 -> f (Vector Int32))
-> TensorProto
-> f TensorProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorProto -> Vector Int32)
-> (TensorProto -> Vector Int32 -> TensorProto)
-> Lens TensorProto TensorProto (Vector Int32) (Vector Int32)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorProto -> Vector Int32
_TensorProto'intVal (\ x__ :: TensorProto
x__ y__ :: Vector Int32
y__ -> TensorProto
x__ {_TensorProto'intVal :: Vector Int32
_TensorProto'intVal = Vector Int32
y__}))
        (Vector Int32 -> f (Vector Int32))
-> Vector Int32 -> f (Vector Int32)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField TensorProto "stringVal" [Data.ByteString.ByteString] where
  fieldOf :: Proxy# "stringVal"
-> ([ByteString] -> f [ByteString]) -> TensorProto -> f TensorProto
fieldOf _
    = ((Vector ByteString -> f (Vector ByteString))
 -> TensorProto -> f TensorProto)
-> (([ByteString] -> f [ByteString])
    -> Vector ByteString -> f (Vector ByteString))
-> ([ByteString] -> f [ByteString])
-> TensorProto
-> f TensorProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorProto -> Vector ByteString)
-> (TensorProto -> Vector ByteString -> TensorProto)
-> Lens
     TensorProto TensorProto (Vector ByteString) (Vector ByteString)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorProto -> Vector ByteString
_TensorProto'stringVal
           (\ x__ :: TensorProto
x__ y__ :: Vector ByteString
y__ -> TensorProto
x__ {_TensorProto'stringVal :: Vector ByteString
_TensorProto'stringVal = 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 TensorProto "vec'stringVal" (Data.Vector.Vector Data.ByteString.ByteString) where
  fieldOf :: Proxy# "vec'stringVal"
-> (Vector ByteString -> f (Vector ByteString))
-> TensorProto
-> f TensorProto
fieldOf _
    = ((Vector ByteString -> f (Vector ByteString))
 -> TensorProto -> f TensorProto)
-> ((Vector ByteString -> f (Vector ByteString))
    -> Vector ByteString -> f (Vector ByteString))
-> (Vector ByteString -> f (Vector ByteString))
-> TensorProto
-> f TensorProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorProto -> Vector ByteString)
-> (TensorProto -> Vector ByteString -> TensorProto)
-> Lens
     TensorProto TensorProto (Vector ByteString) (Vector ByteString)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorProto -> Vector ByteString
_TensorProto'stringVal
           (\ x__ :: TensorProto
x__ y__ :: Vector ByteString
y__ -> TensorProto
x__ {_TensorProto'stringVal :: Vector ByteString
_TensorProto'stringVal = Vector ByteString
y__}))
        (Vector ByteString -> f (Vector ByteString))
-> Vector ByteString -> f (Vector ByteString)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField TensorProto "scomplexVal" [Prelude.Float] where
  fieldOf :: Proxy# "scomplexVal"
-> ([Float] -> f [Float]) -> TensorProto -> f TensorProto
fieldOf _
    = ((Vector Float -> f (Vector Float))
 -> TensorProto -> f TensorProto)
-> (([Float] -> f [Float]) -> Vector Float -> f (Vector Float))
-> ([Float] -> f [Float])
-> TensorProto
-> f TensorProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorProto -> Vector Float)
-> (TensorProto -> Vector Float -> TensorProto)
-> Lens TensorProto TensorProto (Vector Float) (Vector Float)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorProto -> Vector Float
_TensorProto'scomplexVal
           (\ x__ :: TensorProto
x__ y__ :: Vector Float
y__ -> TensorProto
x__ {_TensorProto'scomplexVal :: Vector Float
_TensorProto'scomplexVal = 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 TensorProto "vec'scomplexVal" (Data.Vector.Unboxed.Vector Prelude.Float) where
  fieldOf :: Proxy# "vec'scomplexVal"
-> (Vector Float -> f (Vector Float))
-> TensorProto
-> f TensorProto
fieldOf _
    = ((Vector Float -> f (Vector Float))
 -> TensorProto -> f TensorProto)
-> ((Vector Float -> f (Vector Float))
    -> Vector Float -> f (Vector Float))
-> (Vector Float -> f (Vector Float))
-> TensorProto
-> f TensorProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorProto -> Vector Float)
-> (TensorProto -> Vector Float -> TensorProto)
-> Lens TensorProto TensorProto (Vector Float) (Vector Float)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorProto -> Vector Float
_TensorProto'scomplexVal
           (\ x__ :: TensorProto
x__ y__ :: Vector Float
y__ -> TensorProto
x__ {_TensorProto'scomplexVal :: Vector Float
_TensorProto'scomplexVal = Vector Float
y__}))
        (Vector Float -> f (Vector Float))
-> Vector Float -> f (Vector Float)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField TensorProto "int64Val" [Data.Int.Int64] where
  fieldOf :: Proxy# "int64Val"
-> ([Int64] -> f [Int64]) -> TensorProto -> f TensorProto
fieldOf _
    = ((Vector Int64 -> f (Vector Int64))
 -> TensorProto -> f TensorProto)
-> (([Int64] -> f [Int64]) -> Vector Int64 -> f (Vector Int64))
-> ([Int64] -> f [Int64])
-> TensorProto
-> f TensorProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorProto -> Vector Int64)
-> (TensorProto -> Vector Int64 -> TensorProto)
-> Lens TensorProto TensorProto (Vector Int64) (Vector Int64)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorProto -> Vector Int64
_TensorProto'int64Val
           (\ x__ :: TensorProto
x__ y__ :: Vector Int64
y__ -> TensorProto
x__ {_TensorProto'int64Val :: Vector Int64
_TensorProto'int64Val = 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 TensorProto "vec'int64Val" (Data.Vector.Unboxed.Vector Data.Int.Int64) where
  fieldOf :: Proxy# "vec'int64Val"
-> (Vector Int64 -> f (Vector Int64))
-> TensorProto
-> f TensorProto
fieldOf _
    = ((Vector Int64 -> f (Vector Int64))
 -> TensorProto -> f TensorProto)
-> ((Vector Int64 -> f (Vector Int64))
    -> Vector Int64 -> f (Vector Int64))
-> (Vector Int64 -> f (Vector Int64))
-> TensorProto
-> f TensorProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorProto -> Vector Int64)
-> (TensorProto -> Vector Int64 -> TensorProto)
-> Lens TensorProto TensorProto (Vector Int64) (Vector Int64)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorProto -> Vector Int64
_TensorProto'int64Val
           (\ x__ :: TensorProto
x__ y__ :: Vector Int64
y__ -> TensorProto
x__ {_TensorProto'int64Val :: Vector Int64
_TensorProto'int64Val = Vector Int64
y__}))
        (Vector Int64 -> f (Vector Int64))
-> Vector Int64 -> f (Vector Int64)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField TensorProto "boolVal" [Prelude.Bool] where
  fieldOf :: Proxy# "boolVal"
-> ([Bool] -> f [Bool]) -> TensorProto -> f TensorProto
fieldOf _
    = ((Vector Bool -> f (Vector Bool)) -> TensorProto -> f TensorProto)
-> (([Bool] -> f [Bool]) -> Vector Bool -> f (Vector Bool))
-> ([Bool] -> f [Bool])
-> TensorProto
-> f TensorProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorProto -> Vector Bool)
-> (TensorProto -> Vector Bool -> TensorProto)
-> Lens TensorProto TensorProto (Vector Bool) (Vector Bool)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorProto -> Vector Bool
_TensorProto'boolVal
           (\ x__ :: TensorProto
x__ y__ :: Vector Bool
y__ -> TensorProto
x__ {_TensorProto'boolVal :: Vector Bool
_TensorProto'boolVal = Vector Bool
y__}))
        ((Vector Bool -> [Bool])
-> (Vector Bool -> [Bool] -> Vector Bool)
-> Lens (Vector Bool) (Vector Bool) [Bool] [Bool]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Bool -> [Bool]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ _ y__ :: [Bool]
y__ -> [Bool] -> Vector Bool
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Bool]
y__))
instance Data.ProtoLens.Field.HasField TensorProto "vec'boolVal" (Data.Vector.Unboxed.Vector Prelude.Bool) where
  fieldOf :: Proxy# "vec'boolVal"
-> (Vector Bool -> f (Vector Bool)) -> TensorProto -> f TensorProto
fieldOf _
    = ((Vector Bool -> f (Vector Bool)) -> TensorProto -> f TensorProto)
-> ((Vector Bool -> f (Vector Bool))
    -> Vector Bool -> f (Vector Bool))
-> (Vector Bool -> f (Vector Bool))
-> TensorProto
-> f TensorProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorProto -> Vector Bool)
-> (TensorProto -> Vector Bool -> TensorProto)
-> Lens TensorProto TensorProto (Vector Bool) (Vector Bool)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorProto -> Vector Bool
_TensorProto'boolVal
           (\ x__ :: TensorProto
x__ y__ :: Vector Bool
y__ -> TensorProto
x__ {_TensorProto'boolVal :: Vector Bool
_TensorProto'boolVal = Vector Bool
y__}))
        (Vector Bool -> f (Vector Bool)) -> Vector Bool -> f (Vector Bool)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField TensorProto "dcomplexVal" [Prelude.Double] where
  fieldOf :: Proxy# "dcomplexVal"
-> ([Double] -> f [Double]) -> TensorProto -> f TensorProto
fieldOf _
    = ((Vector Double -> f (Vector Double))
 -> TensorProto -> f TensorProto)
-> (([Double] -> f [Double]) -> Vector Double -> f (Vector Double))
-> ([Double] -> f [Double])
-> TensorProto
-> f TensorProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorProto -> Vector Double)
-> (TensorProto -> Vector Double -> TensorProto)
-> Lens TensorProto TensorProto (Vector Double) (Vector Double)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorProto -> Vector Double
_TensorProto'dcomplexVal
           (\ x__ :: TensorProto
x__ y__ :: Vector Double
y__ -> TensorProto
x__ {_TensorProto'dcomplexVal :: Vector Double
_TensorProto'dcomplexVal = Vector Double
y__}))
        ((Vector Double -> [Double])
-> (Vector Double -> [Double] -> Vector Double)
-> Lens (Vector Double) (Vector Double) [Double] [Double]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Double -> [Double]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ _ y__ :: [Double]
y__ -> [Double] -> Vector Double
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Double]
y__))
instance Data.ProtoLens.Field.HasField TensorProto "vec'dcomplexVal" (Data.Vector.Unboxed.Vector Prelude.Double) where
  fieldOf :: Proxy# "vec'dcomplexVal"
-> (Vector Double -> f (Vector Double))
-> TensorProto
-> f TensorProto
fieldOf _
    = ((Vector Double -> f (Vector Double))
 -> TensorProto -> f TensorProto)
-> ((Vector Double -> f (Vector Double))
    -> Vector Double -> f (Vector Double))
-> (Vector Double -> f (Vector Double))
-> TensorProto
-> f TensorProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorProto -> Vector Double)
-> (TensorProto -> Vector Double -> TensorProto)
-> Lens TensorProto TensorProto (Vector Double) (Vector Double)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorProto -> Vector Double
_TensorProto'dcomplexVal
           (\ x__ :: TensorProto
x__ y__ :: Vector Double
y__ -> TensorProto
x__ {_TensorProto'dcomplexVal :: Vector Double
_TensorProto'dcomplexVal = Vector Double
y__}))
        (Vector Double -> f (Vector Double))
-> Vector Double -> f (Vector Double)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField TensorProto "resourceHandleVal" [Proto.Tensorflow.Core.Framework.ResourceHandle.ResourceHandleProto] where
  fieldOf :: Proxy# "resourceHandleVal"
-> ([ResourceHandleProto] -> f [ResourceHandleProto])
-> TensorProto
-> f TensorProto
fieldOf _
    = ((Vector ResourceHandleProto -> f (Vector ResourceHandleProto))
 -> TensorProto -> f TensorProto)
-> (([ResourceHandleProto] -> f [ResourceHandleProto])
    -> Vector ResourceHandleProto -> f (Vector ResourceHandleProto))
-> ([ResourceHandleProto] -> f [ResourceHandleProto])
-> TensorProto
-> f TensorProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorProto -> Vector ResourceHandleProto)
-> (TensorProto -> Vector ResourceHandleProto -> TensorProto)
-> Lens
     TensorProto
     TensorProto
     (Vector ResourceHandleProto)
     (Vector ResourceHandleProto)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorProto -> Vector ResourceHandleProto
_TensorProto'resourceHandleVal
           (\ x__ :: TensorProto
x__ y__ :: Vector ResourceHandleProto
y__ -> TensorProto
x__ {_TensorProto'resourceHandleVal :: Vector ResourceHandleProto
_TensorProto'resourceHandleVal = Vector ResourceHandleProto
y__}))
        ((Vector ResourceHandleProto -> [ResourceHandleProto])
-> (Vector ResourceHandleProto
    -> [ResourceHandleProto] -> Vector ResourceHandleProto)
-> Lens
     (Vector ResourceHandleProto)
     (Vector ResourceHandleProto)
     [ResourceHandleProto]
     [ResourceHandleProto]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector ResourceHandleProto -> [ResourceHandleProto]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ _ y__ :: [ResourceHandleProto]
y__ -> [ResourceHandleProto] -> Vector ResourceHandleProto
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [ResourceHandleProto]
y__))
instance Data.ProtoLens.Field.HasField TensorProto "vec'resourceHandleVal" (Data.Vector.Vector Proto.Tensorflow.Core.Framework.ResourceHandle.ResourceHandleProto) where
  fieldOf :: Proxy# "vec'resourceHandleVal"
-> (Vector ResourceHandleProto -> f (Vector ResourceHandleProto))
-> TensorProto
-> f TensorProto
fieldOf _
    = ((Vector ResourceHandleProto -> f (Vector ResourceHandleProto))
 -> TensorProto -> f TensorProto)
-> ((Vector ResourceHandleProto -> f (Vector ResourceHandleProto))
    -> Vector ResourceHandleProto -> f (Vector ResourceHandleProto))
-> (Vector ResourceHandleProto -> f (Vector ResourceHandleProto))
-> TensorProto
-> f TensorProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorProto -> Vector ResourceHandleProto)
-> (TensorProto -> Vector ResourceHandleProto -> TensorProto)
-> Lens
     TensorProto
     TensorProto
     (Vector ResourceHandleProto)
     (Vector ResourceHandleProto)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorProto -> Vector ResourceHandleProto
_TensorProto'resourceHandleVal
           (\ x__ :: TensorProto
x__ y__ :: Vector ResourceHandleProto
y__ -> TensorProto
x__ {_TensorProto'resourceHandleVal :: Vector ResourceHandleProto
_TensorProto'resourceHandleVal = Vector ResourceHandleProto
y__}))
        (Vector ResourceHandleProto -> f (Vector ResourceHandleProto))
-> Vector ResourceHandleProto -> f (Vector ResourceHandleProto)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField TensorProto "variantVal" [VariantTensorDataProto] where
  fieldOf :: Proxy# "variantVal"
-> ([VariantTensorDataProto] -> f [VariantTensorDataProto])
-> TensorProto
-> f TensorProto
fieldOf _
    = ((Vector VariantTensorDataProto
  -> f (Vector VariantTensorDataProto))
 -> TensorProto -> f TensorProto)
-> (([VariantTensorDataProto] -> f [VariantTensorDataProto])
    -> Vector VariantTensorDataProto
    -> f (Vector VariantTensorDataProto))
-> ([VariantTensorDataProto] -> f [VariantTensorDataProto])
-> TensorProto
-> f TensorProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorProto -> Vector VariantTensorDataProto)
-> (TensorProto -> Vector VariantTensorDataProto -> TensorProto)
-> Lens
     TensorProto
     TensorProto
     (Vector VariantTensorDataProto)
     (Vector VariantTensorDataProto)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorProto -> Vector VariantTensorDataProto
_TensorProto'variantVal
           (\ x__ :: TensorProto
x__ y__ :: Vector VariantTensorDataProto
y__ -> TensorProto
x__ {_TensorProto'variantVal :: Vector VariantTensorDataProto
_TensorProto'variantVal = Vector VariantTensorDataProto
y__}))
        ((Vector VariantTensorDataProto -> [VariantTensorDataProto])
-> (Vector VariantTensorDataProto
    -> [VariantTensorDataProto] -> Vector VariantTensorDataProto)
-> Lens
     (Vector VariantTensorDataProto)
     (Vector VariantTensorDataProto)
     [VariantTensorDataProto]
     [VariantTensorDataProto]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector VariantTensorDataProto -> [VariantTensorDataProto]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ _ y__ :: [VariantTensorDataProto]
y__ -> [VariantTensorDataProto] -> Vector VariantTensorDataProto
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [VariantTensorDataProto]
y__))
instance Data.ProtoLens.Field.HasField TensorProto "vec'variantVal" (Data.Vector.Vector VariantTensorDataProto) where
  fieldOf :: Proxy# "vec'variantVal"
-> (Vector VariantTensorDataProto
    -> f (Vector VariantTensorDataProto))
-> TensorProto
-> f TensorProto
fieldOf _
    = ((Vector VariantTensorDataProto
  -> f (Vector VariantTensorDataProto))
 -> TensorProto -> f TensorProto)
-> ((Vector VariantTensorDataProto
     -> f (Vector VariantTensorDataProto))
    -> Vector VariantTensorDataProto
    -> f (Vector VariantTensorDataProto))
-> (Vector VariantTensorDataProto
    -> f (Vector VariantTensorDataProto))
-> TensorProto
-> f TensorProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorProto -> Vector VariantTensorDataProto)
-> (TensorProto -> Vector VariantTensorDataProto -> TensorProto)
-> Lens
     TensorProto
     TensorProto
     (Vector VariantTensorDataProto)
     (Vector VariantTensorDataProto)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorProto -> Vector VariantTensorDataProto
_TensorProto'variantVal
           (\ x__ :: TensorProto
x__ y__ :: Vector VariantTensorDataProto
y__ -> TensorProto
x__ {_TensorProto'variantVal :: Vector VariantTensorDataProto
_TensorProto'variantVal = Vector VariantTensorDataProto
y__}))
        (Vector VariantTensorDataProto
 -> f (Vector VariantTensorDataProto))
-> Vector VariantTensorDataProto
-> f (Vector VariantTensorDataProto)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField TensorProto "uint32Val" [Data.Word.Word32] where
  fieldOf :: Proxy# "uint32Val"
-> ([Word32] -> f [Word32]) -> TensorProto -> f TensorProto
fieldOf _
    = ((Vector Word32 -> f (Vector Word32))
 -> TensorProto -> f TensorProto)
-> (([Word32] -> f [Word32]) -> Vector Word32 -> f (Vector Word32))
-> ([Word32] -> f [Word32])
-> TensorProto
-> f TensorProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorProto -> Vector Word32)
-> (TensorProto -> Vector Word32 -> TensorProto)
-> Lens TensorProto TensorProto (Vector Word32) (Vector Word32)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorProto -> Vector Word32
_TensorProto'uint32Val
           (\ x__ :: TensorProto
x__ y__ :: Vector Word32
y__ -> TensorProto
x__ {_TensorProto'uint32Val :: Vector Word32
_TensorProto'uint32Val = Vector Word32
y__}))
        ((Vector Word32 -> [Word32])
-> (Vector Word32 -> [Word32] -> Vector Word32)
-> Lens (Vector Word32) (Vector Word32) [Word32] [Word32]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Word32 -> [Word32]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ _ y__ :: [Word32]
y__ -> [Word32] -> Vector Word32
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Word32]
y__))
instance Data.ProtoLens.Field.HasField TensorProto "vec'uint32Val" (Data.Vector.Unboxed.Vector Data.Word.Word32) where
  fieldOf :: Proxy# "vec'uint32Val"
-> (Vector Word32 -> f (Vector Word32))
-> TensorProto
-> f TensorProto
fieldOf _
    = ((Vector Word32 -> f (Vector Word32))
 -> TensorProto -> f TensorProto)
-> ((Vector Word32 -> f (Vector Word32))
    -> Vector Word32 -> f (Vector Word32))
-> (Vector Word32 -> f (Vector Word32))
-> TensorProto
-> f TensorProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorProto -> Vector Word32)
-> (TensorProto -> Vector Word32 -> TensorProto)
-> Lens TensorProto TensorProto (Vector Word32) (Vector Word32)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorProto -> Vector Word32
_TensorProto'uint32Val
           (\ x__ :: TensorProto
x__ y__ :: Vector Word32
y__ -> TensorProto
x__ {_TensorProto'uint32Val :: Vector Word32
_TensorProto'uint32Val = Vector Word32
y__}))
        (Vector Word32 -> f (Vector Word32))
-> Vector Word32 -> f (Vector Word32)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField TensorProto "uint64Val" [Data.Word.Word64] where
  fieldOf :: Proxy# "uint64Val"
-> ([Word64] -> f [Word64]) -> TensorProto -> f TensorProto
fieldOf _
    = ((Vector Word64 -> f (Vector Word64))
 -> TensorProto -> f TensorProto)
-> (([Word64] -> f [Word64]) -> Vector Word64 -> f (Vector Word64))
-> ([Word64] -> f [Word64])
-> TensorProto
-> f TensorProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorProto -> Vector Word64)
-> (TensorProto -> Vector Word64 -> TensorProto)
-> Lens TensorProto TensorProto (Vector Word64) (Vector Word64)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorProto -> Vector Word64
_TensorProto'uint64Val
           (\ x__ :: TensorProto
x__ y__ :: Vector Word64
y__ -> TensorProto
x__ {_TensorProto'uint64Val :: Vector Word64
_TensorProto'uint64Val = Vector Word64
y__}))
        ((Vector Word64 -> [Word64])
-> (Vector Word64 -> [Word64] -> Vector Word64)
-> Lens (Vector Word64) (Vector Word64) [Word64] [Word64]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Word64 -> [Word64]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ _ y__ :: [Word64]
y__ -> [Word64] -> Vector Word64
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Word64]
y__))
instance Data.ProtoLens.Field.HasField TensorProto "vec'uint64Val" (Data.Vector.Unboxed.Vector Data.Word.Word64) where
  fieldOf :: Proxy# "vec'uint64Val"
-> (Vector Word64 -> f (Vector Word64))
-> TensorProto
-> f TensorProto
fieldOf _
    = ((Vector Word64 -> f (Vector Word64))
 -> TensorProto -> f TensorProto)
-> ((Vector Word64 -> f (Vector Word64))
    -> Vector Word64 -> f (Vector Word64))
-> (Vector Word64 -> f (Vector Word64))
-> TensorProto
-> f TensorProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorProto -> Vector Word64)
-> (TensorProto -> Vector Word64 -> TensorProto)
-> Lens TensorProto TensorProto (Vector Word64) (Vector Word64)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorProto -> Vector Word64
_TensorProto'uint64Val
           (\ x__ :: TensorProto
x__ y__ :: Vector Word64
y__ -> TensorProto
x__ {_TensorProto'uint64Val :: Vector Word64
_TensorProto'uint64Val = Vector Word64
y__}))
        (Vector Word64 -> f (Vector Word64))
-> Vector Word64 -> f (Vector Word64)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message TensorProto where
  messageName :: Proxy TensorProto -> Text
messageName _ = String -> Text
Data.Text.pack "tensorflow.TensorProto"
  packedMessageDescriptor :: Proxy TensorProto -> ByteString
packedMessageDescriptor _
    = "\n\
      \\vTensorProto\DC2*\n\
      \\ENQdtype\CAN\SOH \SOH(\SO2\DC4.tensorflow.DataTypeR\ENQdtype\DC2?\n\
      \\ftensor_shape\CAN\STX \SOH(\v2\FS.tensorflow.TensorShapeProtoR\vtensorShape\DC2%\n\
      \\SOversion_number\CAN\ETX \SOH(\ENQR\rversionNumber\DC2%\n\
      \\SOtensor_content\CAN\EOT \SOH(\fR\rtensorContent\DC2\GS\n\
      \\bhalf_val\CAN\r \ETX(\ENQR\ahalfValB\STX\DLE\SOH\DC2\US\n\
      \\tfloat_val\CAN\ENQ \ETX(\STXR\bfloatValB\STX\DLE\SOH\DC2!\n\
      \\n\
      \double_val\CAN\ACK \ETX(\SOHR\tdoubleValB\STX\DLE\SOH\DC2\ESC\n\
      \\aint_val\CAN\a \ETX(\ENQR\ACKintValB\STX\DLE\SOH\DC2\GS\n\
      \\n\
      \string_val\CAN\b \ETX(\fR\tstringVal\DC2%\n\
      \\fscomplex_val\CAN\t \ETX(\STXR\vscomplexValB\STX\DLE\SOH\DC2\US\n\
      \\tint64_val\CAN\n\
      \ \ETX(\ETXR\bint64ValB\STX\DLE\SOH\DC2\GS\n\
      \\bbool_val\CAN\v \ETX(\bR\aboolValB\STX\DLE\SOH\DC2%\n\
      \\fdcomplex_val\CAN\f \ETX(\SOHR\vdcomplexValB\STX\DLE\SOH\DC2O\n\
      \\DC3resource_handle_val\CAN\SO \ETX(\v2\US.tensorflow.ResourceHandleProtoR\DC1resourceHandleVal\DC2C\n\
      \\vvariant_val\CAN\SI \ETX(\v2\".tensorflow.VariantTensorDataProtoR\n\
      \variantVal\DC2!\n\
      \\n\
      \uint32_val\CAN\DLE \ETX(\rR\tuint32ValB\STX\DLE\SOH\DC2!\n\
      \\n\
      \uint64_val\CAN\DC1 \ETX(\EOTR\tuint64ValB\STX\DLE\SOH"
  packedFileDescriptor :: Proxy TensorProto -> ByteString
packedFileDescriptor _ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor TensorProto)
fieldsByTag
    = let
        dtype__field_descriptor :: FieldDescriptor TensorProto
dtype__field_descriptor
          = String
-> FieldTypeDescriptor DataType
-> FieldAccessor TensorProto DataType
-> FieldDescriptor TensorProto
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 TensorProto TensorProto DataType DataType
-> FieldAccessor TensorProto 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 TensorProto
        tensorShape__field_descriptor :: FieldDescriptor TensorProto
tensorShape__field_descriptor
          = String
-> FieldTypeDescriptor TensorShapeProto
-> FieldAccessor TensorProto TensorShapeProto
-> FieldDescriptor TensorProto
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
  TensorProto
  TensorProto
  (Maybe TensorShapeProto)
  (Maybe TensorShapeProto)
-> FieldAccessor TensorProto 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 TensorProto
        versionNumber__field_descriptor :: FieldDescriptor TensorProto
versionNumber__field_descriptor
          = String
-> FieldTypeDescriptor Int32
-> FieldAccessor TensorProto Int32
-> FieldDescriptor TensorProto
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "version_number"
              (ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.Int32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
              (WireDefault Int32
-> Lens TensorProto TensorProto Int32 Int32
-> FieldAccessor TensorProto Int32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "versionNumber" 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 @"versionNumber")) ::
              Data.ProtoLens.FieldDescriptor TensorProto
        tensorContent__field_descriptor :: FieldDescriptor TensorProto
tensorContent__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor TensorProto ByteString
-> FieldDescriptor TensorProto
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "tensor_content"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (WireDefault ByteString
-> Lens TensorProto TensorProto ByteString ByteString
-> FieldAccessor TensorProto ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "tensorContent" 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 @"tensorContent")) ::
              Data.ProtoLens.FieldDescriptor TensorProto
        halfVal__field_descriptor :: FieldDescriptor TensorProto
halfVal__field_descriptor
          = String
-> FieldTypeDescriptor Int32
-> FieldAccessor TensorProto Int32
-> FieldDescriptor TensorProto
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "half_val"
              (ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.Int32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
              (Packing
-> Lens' TensorProto [Int32] -> FieldAccessor TensorProto Int32
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Packed (forall s a (f :: * -> *).
(HasField s "halfVal" 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 @"halfVal")) ::
              Data.ProtoLens.FieldDescriptor TensorProto
        floatVal__field_descriptor :: FieldDescriptor TensorProto
floatVal__field_descriptor
          = String
-> FieldTypeDescriptor Float
-> FieldAccessor TensorProto Float
-> FieldDescriptor TensorProto
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "float_val"
              (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' TensorProto [Float] -> FieldAccessor TensorProto Float
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Packed (forall s a (f :: * -> *).
(HasField s "floatVal" 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 @"floatVal")) ::
              Data.ProtoLens.FieldDescriptor TensorProto
        doubleVal__field_descriptor :: FieldDescriptor TensorProto
doubleVal__field_descriptor
          = String
-> FieldTypeDescriptor Double
-> FieldAccessor TensorProto Double
-> FieldDescriptor TensorProto
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "double_val"
              (ScalarField Double -> FieldTypeDescriptor Double
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Double
Data.ProtoLens.DoubleField ::
                 Data.ProtoLens.FieldTypeDescriptor Prelude.Double)
              (Packing
-> Lens' TensorProto [Double] -> FieldAccessor TensorProto Double
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Packed (forall s a (f :: * -> *).
(HasField s "doubleVal" 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 @"doubleVal")) ::
              Data.ProtoLens.FieldDescriptor TensorProto
        intVal__field_descriptor :: FieldDescriptor TensorProto
intVal__field_descriptor
          = String
-> FieldTypeDescriptor Int32
-> FieldAccessor TensorProto Int32
-> FieldDescriptor TensorProto
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "int_val"
              (ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.Int32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
              (Packing
-> Lens' TensorProto [Int32] -> FieldAccessor TensorProto Int32
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Packed (forall s a (f :: * -> *).
(HasField s "intVal" 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 @"intVal")) ::
              Data.ProtoLens.FieldDescriptor TensorProto
        stringVal__field_descriptor :: FieldDescriptor TensorProto
stringVal__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor TensorProto ByteString
-> FieldDescriptor TensorProto
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "string_val"
              (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' TensorProto [ByteString]
-> FieldAccessor TensorProto ByteString
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Unpacked
                 (forall s a (f :: * -> *).
(HasField s "stringVal" 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 @"stringVal")) ::
              Data.ProtoLens.FieldDescriptor TensorProto
        scomplexVal__field_descriptor :: FieldDescriptor TensorProto
scomplexVal__field_descriptor
          = String
-> FieldTypeDescriptor Float
-> FieldAccessor TensorProto Float
-> FieldDescriptor TensorProto
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "scomplex_val"
              (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' TensorProto [Float] -> FieldAccessor TensorProto Float
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Packed
                 (forall s a (f :: * -> *).
(HasField s "scomplexVal" 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 @"scomplexVal")) ::
              Data.ProtoLens.FieldDescriptor TensorProto
        int64Val__field_descriptor :: FieldDescriptor TensorProto
int64Val__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor TensorProto Int64
-> FieldDescriptor TensorProto
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "int64_val"
              (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' TensorProto [Int64] -> FieldAccessor TensorProto Int64
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Packed (forall s a (f :: * -> *).
(HasField s "int64Val" 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 @"int64Val")) ::
              Data.ProtoLens.FieldDescriptor TensorProto
        boolVal__field_descriptor :: FieldDescriptor TensorProto
boolVal__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor TensorProto Bool
-> FieldDescriptor TensorProto
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "bool_val"
              (ScalarField Bool -> FieldTypeDescriptor Bool
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Bool
Data.ProtoLens.BoolField ::
                 Data.ProtoLens.FieldTypeDescriptor Prelude.Bool)
              (Packing
-> Lens' TensorProto [Bool] -> FieldAccessor TensorProto Bool
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Packed (forall s a (f :: * -> *).
(HasField s "boolVal" 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 @"boolVal")) ::
              Data.ProtoLens.FieldDescriptor TensorProto
        dcomplexVal__field_descriptor :: FieldDescriptor TensorProto
dcomplexVal__field_descriptor
          = String
-> FieldTypeDescriptor Double
-> FieldAccessor TensorProto Double
-> FieldDescriptor TensorProto
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "dcomplex_val"
              (ScalarField Double -> FieldTypeDescriptor Double
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Double
Data.ProtoLens.DoubleField ::
                 Data.ProtoLens.FieldTypeDescriptor Prelude.Double)
              (Packing
-> Lens' TensorProto [Double] -> FieldAccessor TensorProto Double
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Packed
                 (forall s a (f :: * -> *).
(HasField s "dcomplexVal" 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 @"dcomplexVal")) ::
              Data.ProtoLens.FieldDescriptor TensorProto
        resourceHandleVal__field_descriptor :: FieldDescriptor TensorProto
resourceHandleVal__field_descriptor
          = String
-> FieldTypeDescriptor ResourceHandleProto
-> FieldAccessor TensorProto ResourceHandleProto
-> FieldDescriptor TensorProto
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "resource_handle_val"
              (MessageOrGroup -> FieldTypeDescriptor ResourceHandleProto
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Tensorflow.Core.Framework.ResourceHandle.ResourceHandleProto)
              (Packing
-> Lens' TensorProto [ResourceHandleProto]
-> FieldAccessor TensorProto ResourceHandleProto
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Unpacked
                 (forall s a (f :: * -> *).
(HasField s "resourceHandleVal" 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 @"resourceHandleVal")) ::
              Data.ProtoLens.FieldDescriptor TensorProto
        variantVal__field_descriptor :: FieldDescriptor TensorProto
variantVal__field_descriptor
          = String
-> FieldTypeDescriptor VariantTensorDataProto
-> FieldAccessor TensorProto VariantTensorDataProto
-> FieldDescriptor TensorProto
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "variant_val"
              (MessageOrGroup -> FieldTypeDescriptor VariantTensorDataProto
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor VariantTensorDataProto)
              (Packing
-> Lens' TensorProto [VariantTensorDataProto]
-> FieldAccessor TensorProto VariantTensorDataProto
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Unpacked
                 (forall s a (f :: * -> *).
(HasField s "variantVal" 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 @"variantVal")) ::
              Data.ProtoLens.FieldDescriptor TensorProto
        uint32Val__field_descriptor :: FieldDescriptor TensorProto
uint32Val__field_descriptor
          = String
-> FieldTypeDescriptor Word32
-> FieldAccessor TensorProto Word32
-> FieldDescriptor TensorProto
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "uint32_val"
              (ScalarField Word32 -> FieldTypeDescriptor Word32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Word32
Data.ProtoLens.UInt32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32)
              (Packing
-> Lens' TensorProto [Word32] -> FieldAccessor TensorProto Word32
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Packed (forall s a (f :: * -> *).
(HasField s "uint32Val" 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 @"uint32Val")) ::
              Data.ProtoLens.FieldDescriptor TensorProto
        uint64Val__field_descriptor :: FieldDescriptor TensorProto
uint64Val__field_descriptor
          = String
-> FieldTypeDescriptor Word64
-> FieldAccessor TensorProto Word64
-> FieldDescriptor TensorProto
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "uint64_val"
              (ScalarField Word64 -> FieldTypeDescriptor Word64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Word64
Data.ProtoLens.UInt64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64)
              (Packing
-> Lens' TensorProto [Word64] -> FieldAccessor TensorProto Word64
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Packed (forall s a (f :: * -> *).
(HasField s "uint64Val" 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 @"uint64Val")) ::
              Data.ProtoLens.FieldDescriptor TensorProto
      in
        [(Tag, FieldDescriptor TensorProto)]
-> Map Tag (FieldDescriptor TensorProto)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag 1, FieldDescriptor TensorProto
dtype__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 2, FieldDescriptor TensorProto
tensorShape__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 3, FieldDescriptor TensorProto
versionNumber__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 4, FieldDescriptor TensorProto
tensorContent__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 13, FieldDescriptor TensorProto
halfVal__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 5, FieldDescriptor TensorProto
floatVal__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 6, FieldDescriptor TensorProto
doubleVal__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 7, FieldDescriptor TensorProto
intVal__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 8, FieldDescriptor TensorProto
stringVal__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 9, FieldDescriptor TensorProto
scomplexVal__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 10, FieldDescriptor TensorProto
int64Val__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 11, FieldDescriptor TensorProto
boolVal__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 12, FieldDescriptor TensorProto
dcomplexVal__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 14, FieldDescriptor TensorProto
resourceHandleVal__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 15, FieldDescriptor TensorProto
variantVal__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 16, FieldDescriptor TensorProto
uint32Val__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 17, FieldDescriptor TensorProto
uint64Val__field_descriptor)]
  unknownFields :: LensLike' f TensorProto FieldSet
unknownFields
    = (TensorProto -> FieldSet)
-> (TensorProto -> FieldSet -> TensorProto)
-> Lens' TensorProto FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        TensorProto -> FieldSet
_TensorProto'_unknownFields
        (\ x__ :: TensorProto
x__ y__ :: FieldSet
y__ -> TensorProto
x__ {_TensorProto'_unknownFields :: FieldSet
_TensorProto'_unknownFields = FieldSet
y__})
  defMessage :: TensorProto
defMessage
    = $WTensorProto'_constructor :: DataType
-> Maybe TensorShapeProto
-> Int32
-> ByteString
-> Vector Int32
-> Vector Float
-> Vector Double
-> Vector Int32
-> Vector ByteString
-> Vector Float
-> Vector Int64
-> Vector Bool
-> Vector Double
-> Vector ResourceHandleProto
-> Vector VariantTensorDataProto
-> Vector Word32
-> Vector Word64
-> FieldSet
-> TensorProto
TensorProto'_constructor
        {_TensorProto'dtype :: DataType
_TensorProto'dtype = DataType
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _TensorProto'tensorShape :: Maybe TensorShapeProto
_TensorProto'tensorShape = Maybe TensorShapeProto
forall a. Maybe a
Prelude.Nothing,
         _TensorProto'versionNumber :: Int32
_TensorProto'versionNumber = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _TensorProto'tensorContent :: ByteString
_TensorProto'tensorContent = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _TensorProto'halfVal :: Vector Int32
_TensorProto'halfVal = Vector Int32
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _TensorProto'floatVal :: Vector Float
_TensorProto'floatVal = Vector Float
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _TensorProto'doubleVal :: Vector Double
_TensorProto'doubleVal = Vector Double
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _TensorProto'intVal :: Vector Int32
_TensorProto'intVal = Vector Int32
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _TensorProto'stringVal :: Vector ByteString
_TensorProto'stringVal = Vector ByteString
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _TensorProto'scomplexVal :: Vector Float
_TensorProto'scomplexVal = Vector Float
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _TensorProto'int64Val :: Vector Int64
_TensorProto'int64Val = Vector Int64
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _TensorProto'boolVal :: Vector Bool
_TensorProto'boolVal = Vector Bool
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _TensorProto'dcomplexVal :: Vector Double
_TensorProto'dcomplexVal = Vector Double
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _TensorProto'resourceHandleVal :: Vector ResourceHandleProto
_TensorProto'resourceHandleVal = Vector ResourceHandleProto
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _TensorProto'variantVal :: Vector VariantTensorDataProto
_TensorProto'variantVal = Vector VariantTensorDataProto
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _TensorProto'uint32Val :: Vector Word32
_TensorProto'uint32Val = Vector Word32
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _TensorProto'uint64Val :: Vector Word64
_TensorProto'uint64Val = Vector Word64
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _TensorProto'_unknownFields :: FieldSet
_TensorProto'_unknownFields = []}
  parseMessage :: Parser TensorProto
parseMessage
    = let
        loop ::
          TensorProto
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Prelude.Bool
             -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Prelude.Double
                -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Prelude.Double
                   -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Prelude.Float
                      -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Int.Int32
                         -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Int.Int64
                            -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Int.Int32
                               -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Tensorflow.Core.Framework.ResourceHandle.ResourceHandleProto
                                  -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Prelude.Float
                                     -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.ByteString.ByteString
                                        -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Word.Word32
                                           -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Word.Word64
                                              -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld VariantTensorDataProto
                                                 -> Data.ProtoLens.Encoding.Bytes.Parser TensorProto
        loop :: TensorProto
-> Growing Vector RealWorld Bool
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld ResourceHandleProto
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld ByteString
-> Growing Vector RealWorld Word32
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld VariantTensorDataProto
-> Parser TensorProto
loop
          x :: TensorProto
x
          mutable'boolVal :: Growing Vector RealWorld Bool
mutable'boolVal
          mutable'dcomplexVal :: Growing Vector RealWorld Double
mutable'dcomplexVal
          mutable'doubleVal :: Growing Vector RealWorld Double
mutable'doubleVal
          mutable'floatVal :: Growing Vector RealWorld Float
mutable'floatVal
          mutable'halfVal :: Growing Vector RealWorld Int32
mutable'halfVal
          mutable'int64Val :: Growing Vector RealWorld Int64
mutable'int64Val
          mutable'intVal :: Growing Vector RealWorld Int32
mutable'intVal
          mutable'resourceHandleVal :: Growing Vector RealWorld ResourceHandleProto
mutable'resourceHandleVal
          mutable'scomplexVal :: Growing Vector RealWorld Float
mutable'scomplexVal
          mutable'stringVal :: Growing Vector RealWorld ByteString
mutable'stringVal
          mutable'uint32Val :: Growing Vector RealWorld Word32
mutable'uint32Val
          mutable'uint64Val :: Growing Vector RealWorld Word64
mutable'uint64Val
          mutable'variantVal :: Growing Vector RealWorld VariantTensorDataProto
mutable'variantVal
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do Vector Bool
frozen'boolVal <- IO (Vector Bool) -> Parser (Vector Bool)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                          (Growing Vector (PrimState IO) Bool -> IO (Vector Bool)
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 Bool
Growing Vector (PrimState IO) Bool
mutable'boolVal)
                      Vector Double
frozen'dcomplexVal <- IO (Vector Double) -> Parser (Vector Double)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                              (Growing Vector (PrimState IO) Double -> IO (Vector Double)
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 Double
Growing Vector (PrimState IO) Double
mutable'dcomplexVal)
                      Vector Double
frozen'doubleVal <- IO (Vector Double) -> Parser (Vector Double)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                            (Growing Vector (PrimState IO) Double -> IO (Vector Double)
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 Double
Growing Vector (PrimState IO) Double
mutable'doubleVal)
                      Vector Float
frozen'floatVal <- 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'floatVal)
                      Vector Int32
frozen'halfVal <- IO (Vector Int32) -> Parser (Vector Int32)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                          (Growing Vector (PrimState IO) Int32 -> IO (Vector Int32)
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 Int32
Growing Vector (PrimState IO) Int32
mutable'halfVal)
                      Vector Int64
frozen'int64Val <- 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'int64Val)
                      Vector Int32
frozen'intVal <- IO (Vector Int32) -> Parser (Vector Int32)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                         (Growing Vector (PrimState IO) Int32 -> IO (Vector Int32)
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 Int32
Growing Vector (PrimState IO) Int32
mutable'intVal)
                      Vector ResourceHandleProto
frozen'resourceHandleVal <- IO (Vector ResourceHandleProto)
-> Parser (Vector ResourceHandleProto)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                    (Growing Vector (PrimState IO) ResourceHandleProto
-> IO (Vector ResourceHandleProto)
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 ResourceHandleProto
Growing Vector (PrimState IO) ResourceHandleProto
mutable'resourceHandleVal)
                      Vector Float
frozen'scomplexVal <- 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'scomplexVal)
                      Vector ByteString
frozen'stringVal <- 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'stringVal)
                      Vector Word32
frozen'uint32Val <- IO (Vector Word32) -> Parser (Vector Word32)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                            (Growing Vector (PrimState IO) Word32 -> IO (Vector Word32)
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 Word32
Growing Vector (PrimState IO) Word32
mutable'uint32Val)
                      Vector Word64
frozen'uint64Val <- IO (Vector Word64) -> Parser (Vector Word64)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                            (Growing Vector (PrimState IO) Word64 -> IO (Vector Word64)
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 Word64
Growing Vector (PrimState IO) Word64
mutable'uint64Val)
                      Vector VariantTensorDataProto
frozen'variantVal <- IO (Vector VariantTensorDataProto)
-> Parser (Vector VariantTensorDataProto)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                             (Growing Vector (PrimState IO) VariantTensorDataProto
-> IO (Vector VariantTensorDataProto)
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 VariantTensorDataProto
Growing Vector (PrimState IO) VariantTensorDataProto
mutable'variantVal)
                      (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]))))
                      TensorProto -> Parser TensorProto
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter TensorProto TensorProto FieldSet FieldSet
-> (FieldSet -> FieldSet) -> TensorProto -> TensorProto
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 TensorProto TensorProto FieldSet FieldSet
Data.ProtoLens.unknownFields
                           (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t)
                           (Setter TensorProto TensorProto (Vector Bool) (Vector Bool)
-> Vector Bool -> TensorProto -> TensorProto
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                              (forall s a (f :: * -> *).
(HasField s "vec'boolVal" 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'boolVal")
                              Vector Bool
frozen'boolVal
                              (Setter TensorProto TensorProto (Vector Double) (Vector Double)
-> Vector Double -> TensorProto -> TensorProto
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                 (forall s a (f :: * -> *).
(HasField s "vec'dcomplexVal" 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'dcomplexVal")
                                 Vector Double
frozen'dcomplexVal
                                 (Setter TensorProto TensorProto (Vector Double) (Vector Double)
-> Vector Double -> TensorProto -> TensorProto
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                    (forall s a (f :: * -> *).
(HasField s "vec'doubleVal" 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'doubleVal")
                                    Vector Double
frozen'doubleVal
                                    (Setter TensorProto TensorProto (Vector Float) (Vector Float)
-> Vector Float -> TensorProto -> TensorProto
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                       (forall s a (f :: * -> *).
(HasField s "vec'floatVal" 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'floatVal")
                                       Vector Float
frozen'floatVal
                                       (Setter TensorProto TensorProto (Vector Int32) (Vector Int32)
-> Vector Int32 -> TensorProto -> TensorProto
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                          (forall s a (f :: * -> *).
(HasField s "vec'halfVal" 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'halfVal")
                                          Vector Int32
frozen'halfVal
                                          (Setter TensorProto TensorProto (Vector Int64) (Vector Int64)
-> Vector Int64 -> TensorProto -> TensorProto
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                             (forall s a (f :: * -> *).
(HasField s "vec'int64Val" 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'int64Val")
                                             Vector Int64
frozen'int64Val
                                             (Setter TensorProto TensorProto (Vector Int32) (Vector Int32)
-> Vector Int32 -> TensorProto -> TensorProto
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                                (forall s a (f :: * -> *).
(HasField s "vec'intVal" 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'intVal")
                                                Vector Int32
frozen'intVal
                                                (Setter
  TensorProto
  TensorProto
  (Vector ResourceHandleProto)
  (Vector ResourceHandleProto)
-> Vector ResourceHandleProto -> TensorProto -> TensorProto
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                                   (forall s a (f :: * -> *).
(HasField s "vec'resourceHandleVal" 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'resourceHandleVal")
                                                   Vector ResourceHandleProto
frozen'resourceHandleVal
                                                   (Setter TensorProto TensorProto (Vector Float) (Vector Float)
-> Vector Float -> TensorProto -> TensorProto
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                                      (forall s a (f :: * -> *).
(HasField s "vec'scomplexVal" 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'scomplexVal")
                                                      Vector Float
frozen'scomplexVal
                                                      (Setter
  TensorProto TensorProto (Vector ByteString) (Vector ByteString)
-> Vector ByteString -> TensorProto -> TensorProto
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                                         (forall s a (f :: * -> *).
(HasField s "vec'stringVal" 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'stringVal")
                                                         Vector ByteString
frozen'stringVal
                                                         (Setter TensorProto TensorProto (Vector Word32) (Vector Word32)
-> Vector Word32 -> TensorProto -> TensorProto
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                                            (forall s a (f :: * -> *).
(HasField s "vec'uint32Val" 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'uint32Val")
                                                            Vector Word32
frozen'uint32Val
                                                            (Setter TensorProto TensorProto (Vector Word64) (Vector Word64)
-> Vector Word64 -> TensorProto -> TensorProto
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                                               (forall s a (f :: * -> *).
(HasField s "vec'uint64Val" 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'uint64Val")
                                                               Vector Word64
frozen'uint64Val
                                                               (Setter
  TensorProto
  TensorProto
  (Vector VariantTensorDataProto)
  (Vector VariantTensorDataProto)
-> Vector VariantTensorDataProto -> TensorProto -> TensorProto
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                                                  (forall s a (f :: * -> *).
(HasField s "vec'variantVal" 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'variantVal")
                                                                  Vector VariantTensorDataProto
frozen'variantVal
                                                                  TensorProto
x))))))))))))))
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        8 -> 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"
                                TensorProto
-> Growing Vector RealWorld Bool
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld ResourceHandleProto
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld ByteString
-> Growing Vector RealWorld Word32
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld VariantTensorDataProto
-> Parser TensorProto
loop
                                  (Setter TensorProto TensorProto DataType DataType
-> DataType -> TensorProto -> TensorProto
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 TensorProto
x)
                                  Growing Vector RealWorld Bool
mutable'boolVal
                                  Growing Vector RealWorld Double
mutable'dcomplexVal
                                  Growing Vector RealWorld Double
mutable'doubleVal
                                  Growing Vector RealWorld Float
mutable'floatVal
                                  Growing Vector RealWorld Int32
mutable'halfVal
                                  Growing Vector RealWorld Int64
mutable'int64Val
                                  Growing Vector RealWorld Int32
mutable'intVal
                                  Growing Vector RealWorld ResourceHandleProto
mutable'resourceHandleVal
                                  Growing Vector RealWorld Float
mutable'scomplexVal
                                  Growing Vector RealWorld ByteString
mutable'stringVal
                                  Growing Vector RealWorld Word32
mutable'uint32Val
                                  Growing Vector RealWorld Word64
mutable'uint64Val
                                  Growing Vector RealWorld VariantTensorDataProto
mutable'variantVal
                        18
                          -> 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"
                                TensorProto
-> Growing Vector RealWorld Bool
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld ResourceHandleProto
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld ByteString
-> Growing Vector RealWorld Word32
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld VariantTensorDataProto
-> Parser TensorProto
loop
                                  (Setter TensorProto TensorProto TensorShapeProto TensorShapeProto
-> TensorShapeProto -> TensorProto -> TensorProto
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 TensorProto
x)
                                  Growing Vector RealWorld Bool
mutable'boolVal
                                  Growing Vector RealWorld Double
mutable'dcomplexVal
                                  Growing Vector RealWorld Double
mutable'doubleVal
                                  Growing Vector RealWorld Float
mutable'floatVal
                                  Growing Vector RealWorld Int32
mutable'halfVal
                                  Growing Vector RealWorld Int64
mutable'int64Val
                                  Growing Vector RealWorld Int32
mutable'intVal
                                  Growing Vector RealWorld ResourceHandleProto
mutable'resourceHandleVal
                                  Growing Vector RealWorld Float
mutable'scomplexVal
                                  Growing Vector RealWorld ByteString
mutable'stringVal
                                  Growing Vector RealWorld Word32
mutable'uint32Val
                                  Growing Vector RealWorld Word64
mutable'uint64Val
                                  Growing Vector RealWorld VariantTensorDataProto
mutable'variantVal
                        24
                          -> do Int32
y <- Parser Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int32) -> Parser Word64 -> Parser Int32
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       "version_number"
                                TensorProto
-> Growing Vector RealWorld Bool
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld ResourceHandleProto
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld ByteString
-> Growing Vector RealWorld Word32
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld VariantTensorDataProto
-> Parser TensorProto
loop
                                  (Setter TensorProto TensorProto Int32 Int32
-> Int32 -> TensorProto -> TensorProto
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "versionNumber" 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 @"versionNumber") Int32
y TensorProto
x)
                                  Growing Vector RealWorld Bool
mutable'boolVal
                                  Growing Vector RealWorld Double
mutable'dcomplexVal
                                  Growing Vector RealWorld Double
mutable'doubleVal
                                  Growing Vector RealWorld Float
mutable'floatVal
                                  Growing Vector RealWorld Int32
mutable'halfVal
                                  Growing Vector RealWorld Int64
mutable'int64Val
                                  Growing Vector RealWorld Int32
mutable'intVal
                                  Growing Vector RealWorld ResourceHandleProto
mutable'resourceHandleVal
                                  Growing Vector RealWorld Float
mutable'scomplexVal
                                  Growing Vector RealWorld ByteString
mutable'stringVal
                                  Growing Vector RealWorld Word32
mutable'uint32Val
                                  Growing Vector RealWorld Word64
mutable'uint64Val
                                  Growing Vector RealWorld VariantTensorDataProto
mutable'variantVal
                        34
                          -> 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))
                                       "tensor_content"
                                TensorProto
-> Growing Vector RealWorld Bool
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld ResourceHandleProto
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld ByteString
-> Growing Vector RealWorld Word32
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld VariantTensorDataProto
-> Parser TensorProto
loop
                                  (Setter TensorProto TensorProto ByteString ByteString
-> ByteString -> TensorProto -> TensorProto
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "tensorContent" 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 @"tensorContent") ByteString
y TensorProto
x)
                                  Growing Vector RealWorld Bool
mutable'boolVal
                                  Growing Vector RealWorld Double
mutable'dcomplexVal
                                  Growing Vector RealWorld Double
mutable'doubleVal
                                  Growing Vector RealWorld Float
mutable'floatVal
                                  Growing Vector RealWorld Int32
mutable'halfVal
                                  Growing Vector RealWorld Int64
mutable'int64Val
                                  Growing Vector RealWorld Int32
mutable'intVal
                                  Growing Vector RealWorld ResourceHandleProto
mutable'resourceHandleVal
                                  Growing Vector RealWorld Float
mutable'scomplexVal
                                  Growing Vector RealWorld ByteString
mutable'stringVal
                                  Growing Vector RealWorld Word32
mutable'uint32Val
                                  Growing Vector RealWorld Word64
mutable'uint64Val
                                  Growing Vector RealWorld VariantTensorDataProto
mutable'variantVal
                        104
                          -> do !Int32
y <- Parser Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        ((Word64 -> Int32) -> Parser Word64 -> Parser Int32
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                           Word64 -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                           Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                        "half_val"
                                Growing Vector RealWorld Int32
v <- IO (Growing Vector RealWorld Int32)
-> Parser (Growing Vector RealWorld Int32)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) Int32
-> Int32 -> IO (Growing Vector (PrimState IO) Int32)
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 Int32
Growing Vector (PrimState IO) Int32
mutable'halfVal Int32
y)
                                TensorProto
-> Growing Vector RealWorld Bool
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld ResourceHandleProto
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld ByteString
-> Growing Vector RealWorld Word32
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld VariantTensorDataProto
-> Parser TensorProto
loop
                                  TensorProto
x
                                  Growing Vector RealWorld Bool
mutable'boolVal
                                  Growing Vector RealWorld Double
mutable'dcomplexVal
                                  Growing Vector RealWorld Double
mutable'doubleVal
                                  Growing Vector RealWorld Float
mutable'floatVal
                                  Growing Vector RealWorld Int32
v
                                  Growing Vector RealWorld Int64
mutable'int64Val
                                  Growing Vector RealWorld Int32
mutable'intVal
                                  Growing Vector RealWorld ResourceHandleProto
mutable'resourceHandleVal
                                  Growing Vector RealWorld Float
mutable'scomplexVal
                                  Growing Vector RealWorld ByteString
mutable'stringVal
                                  Growing Vector RealWorld Word32
mutable'uint32Val
                                  Growing Vector RealWorld Word64
mutable'uint64Val
                                  Growing Vector RealWorld VariantTensorDataProto
mutable'variantVal
                        106
                          -> do Growing Vector RealWorld Int32
y <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                        Int
-> Parser (Growing Vector RealWorld Int32)
-> Parser (Growing Vector RealWorld Int32)
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)
                                                                    "half_val"
                                                            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 Int32
mutable'halfVal)
                                TensorProto
-> Growing Vector RealWorld Bool
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld ResourceHandleProto
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld ByteString
-> Growing Vector RealWorld Word32
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld VariantTensorDataProto
-> Parser TensorProto
loop
                                  TensorProto
x
                                  Growing Vector RealWorld Bool
mutable'boolVal
                                  Growing Vector RealWorld Double
mutable'dcomplexVal
                                  Growing Vector RealWorld Double
mutable'doubleVal
                                  Growing Vector RealWorld Float
mutable'floatVal
                                  Growing Vector RealWorld Int32
y
                                  Growing Vector RealWorld Int64
mutable'int64Val
                                  Growing Vector RealWorld Int32
mutable'intVal
                                  Growing Vector RealWorld ResourceHandleProto
mutable'resourceHandleVal
                                  Growing Vector RealWorld Float
mutable'scomplexVal
                                  Growing Vector RealWorld ByteString
mutable'stringVal
                                  Growing Vector RealWorld Word32
mutable'uint32Val
                                  Growing Vector RealWorld Word64
mutable'uint64Val
                                  Growing Vector RealWorld VariantTensorDataProto
mutable'variantVal
                        45
                          -> 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)
                                        "float_val"
                                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'floatVal Float
y)
                                TensorProto
-> Growing Vector RealWorld Bool
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld ResourceHandleProto
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld ByteString
-> Growing Vector RealWorld Word32
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld VariantTensorDataProto
-> Parser TensorProto
loop
                                  TensorProto
x
                                  Growing Vector RealWorld Bool
mutable'boolVal
                                  Growing Vector RealWorld Double
mutable'dcomplexVal
                                  Growing Vector RealWorld Double
mutable'doubleVal
                                  Growing Vector RealWorld Float
v
                                  Growing Vector RealWorld Int32
mutable'halfVal
                                  Growing Vector RealWorld Int64
mutable'int64Val
                                  Growing Vector RealWorld Int32
mutable'intVal
                                  Growing Vector RealWorld ResourceHandleProto
mutable'resourceHandleVal
                                  Growing Vector RealWorld Float
mutable'scomplexVal
                                  Growing Vector RealWorld ByteString
mutable'stringVal
                                  Growing Vector RealWorld Word32
mutable'uint32Val
                                  Growing Vector RealWorld Word64
mutable'uint64Val
                                  Growing Vector RealWorld VariantTensorDataProto
mutable'variantVal
                        42
                          -> 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)
                                                                    "float_val"
                                                            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'floatVal)
                                TensorProto
-> Growing Vector RealWorld Bool
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld ResourceHandleProto
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld ByteString
-> Growing Vector RealWorld Word32
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld VariantTensorDataProto
-> Parser TensorProto
loop
                                  TensorProto
x
                                  Growing Vector RealWorld Bool
mutable'boolVal
                                  Growing Vector RealWorld Double
mutable'dcomplexVal
                                  Growing Vector RealWorld Double
mutable'doubleVal
                                  Growing Vector RealWorld Float
y
                                  Growing Vector RealWorld Int32
mutable'halfVal
                                  Growing Vector RealWorld Int64
mutable'int64Val
                                  Growing Vector RealWorld Int32
mutable'intVal
                                  Growing Vector RealWorld ResourceHandleProto
mutable'resourceHandleVal
                                  Growing Vector RealWorld Float
mutable'scomplexVal
                                  Growing Vector RealWorld ByteString
mutable'stringVal
                                  Growing Vector RealWorld Word32
mutable'uint32Val
                                  Growing Vector RealWorld Word64
mutable'uint64Val
                                  Growing Vector RealWorld VariantTensorDataProto
mutable'variantVal
                        49
                          -> do !Double
y <- Parser Double -> String -> Parser Double
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        ((Word64 -> Double) -> Parser Word64 -> Parser Double
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                           Word64 -> Double
Data.ProtoLens.Encoding.Bytes.wordToDouble
                                           Parser Word64
Data.ProtoLens.Encoding.Bytes.getFixed64)
                                        "double_val"
                                Growing Vector RealWorld Double
v <- IO (Growing Vector RealWorld Double)
-> Parser (Growing Vector RealWorld Double)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) Double
-> Double -> IO (Growing Vector (PrimState IO) Double)
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 Double
Growing Vector (PrimState IO) Double
mutable'doubleVal Double
y)
                                TensorProto
-> Growing Vector RealWorld Bool
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld ResourceHandleProto
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld ByteString
-> Growing Vector RealWorld Word32
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld VariantTensorDataProto
-> Parser TensorProto
loop
                                  TensorProto
x
                                  Growing Vector RealWorld Bool
mutable'boolVal
                                  Growing Vector RealWorld Double
mutable'dcomplexVal
                                  Growing Vector RealWorld Double
v
                                  Growing Vector RealWorld Float
mutable'floatVal
                                  Growing Vector RealWorld Int32
mutable'halfVal
                                  Growing Vector RealWorld Int64
mutable'int64Val
                                  Growing Vector RealWorld Int32
mutable'intVal
                                  Growing Vector RealWorld ResourceHandleProto
mutable'resourceHandleVal
                                  Growing Vector RealWorld Float
mutable'scomplexVal
                                  Growing Vector RealWorld ByteString
mutable'stringVal
                                  Growing Vector RealWorld Word32
mutable'uint32Val
                                  Growing Vector RealWorld Word64
mutable'uint64Val
                                  Growing Vector RealWorld VariantTensorDataProto
mutable'variantVal
                        50
                          -> do Growing Vector RealWorld Double
y <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                        Int
-> Parser (Growing Vector RealWorld Double)
-> Parser (Growing Vector RealWorld Double)
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 Double -> Parser (Growing v RealWorld Double)
ploop qs :: Growing v RealWorld Double
qs
                                                = do Bool
packedEnd <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
                                                     if Bool
packedEnd then
                                                         Growing v RealWorld Double -> Parser (Growing v RealWorld Double)
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return Growing v RealWorld Double
qs
                                                     else
                                                         do !Double
q <- Parser Double -> String -> Parser Double
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                                                    ((Word64 -> Double) -> Parser Word64 -> Parser Double
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                                                       Word64 -> Double
Data.ProtoLens.Encoding.Bytes.wordToDouble
                                                                       Parser Word64
Data.ProtoLens.Encoding.Bytes.getFixed64)
                                                                    "double_val"
                                                            Growing v RealWorld Double
qs' <- IO (Growing v RealWorld Double)
-> Parser (Growing v RealWorld Double)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                                     (Growing v (PrimState IO) Double
-> Double -> IO (Growing v (PrimState IO) Double)
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 Double
Growing v (PrimState IO) Double
qs Double
q)
                                                            Growing v RealWorld Double -> Parser (Growing v RealWorld Double)
ploop Growing v RealWorld Double
qs'
                                            in forall (v :: * -> *).
Vector v Double =>
Growing v RealWorld Double -> Parser (Growing v RealWorld Double)
ploop)
                                             Growing Vector RealWorld Double
mutable'doubleVal)
                                TensorProto
-> Growing Vector RealWorld Bool
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld ResourceHandleProto
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld ByteString
-> Growing Vector RealWorld Word32
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld VariantTensorDataProto
-> Parser TensorProto
loop
                                  TensorProto
x
                                  Growing Vector RealWorld Bool
mutable'boolVal
                                  Growing Vector RealWorld Double
mutable'dcomplexVal
                                  Growing Vector RealWorld Double
y
                                  Growing Vector RealWorld Float
mutable'floatVal
                                  Growing Vector RealWorld Int32
mutable'halfVal
                                  Growing Vector RealWorld Int64
mutable'int64Val
                                  Growing Vector RealWorld Int32
mutable'intVal
                                  Growing Vector RealWorld ResourceHandleProto
mutable'resourceHandleVal
                                  Growing Vector RealWorld Float
mutable'scomplexVal
                                  Growing Vector RealWorld ByteString
mutable'stringVal
                                  Growing Vector RealWorld Word32
mutable'uint32Val
                                  Growing Vector RealWorld Word64
mutable'uint64Val
                                  Growing Vector RealWorld VariantTensorDataProto
mutable'variantVal
                        56
                          -> do !Int32
y <- Parser Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        ((Word64 -> Int32) -> Parser Word64 -> Parser Int32
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                           Word64 -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                           Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                        "int_val"
                                Growing Vector RealWorld Int32
v <- IO (Growing Vector RealWorld Int32)
-> Parser (Growing Vector RealWorld Int32)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) Int32
-> Int32 -> IO (Growing Vector (PrimState IO) Int32)
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 Int32
Growing Vector (PrimState IO) Int32
mutable'intVal Int32
y)
                                TensorProto
-> Growing Vector RealWorld Bool
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld ResourceHandleProto
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld ByteString
-> Growing Vector RealWorld Word32
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld VariantTensorDataProto
-> Parser TensorProto
loop
                                  TensorProto
x
                                  Growing Vector RealWorld Bool
mutable'boolVal
                                  Growing Vector RealWorld Double
mutable'dcomplexVal
                                  Growing Vector RealWorld Double
mutable'doubleVal
                                  Growing Vector RealWorld Float
mutable'floatVal
                                  Growing Vector RealWorld Int32
mutable'halfVal
                                  Growing Vector RealWorld Int64
mutable'int64Val
                                  Growing Vector RealWorld Int32
v
                                  Growing Vector RealWorld ResourceHandleProto
mutable'resourceHandleVal
                                  Growing Vector RealWorld Float
mutable'scomplexVal
                                  Growing Vector RealWorld ByteString
mutable'stringVal
                                  Growing Vector RealWorld Word32
mutable'uint32Val
                                  Growing Vector RealWorld Word64
mutable'uint64Val
                                  Growing Vector RealWorld VariantTensorDataProto
mutable'variantVal
                        58
                          -> do Growing Vector RealWorld Int32
y <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                        Int
-> Parser (Growing Vector RealWorld Int32)
-> Parser (Growing Vector RealWorld Int32)
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)
                                                                    "int_val"
                                                            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 Int32
mutable'intVal)
                                TensorProto
-> Growing Vector RealWorld Bool
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld ResourceHandleProto
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld ByteString
-> Growing Vector RealWorld Word32
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld VariantTensorDataProto
-> Parser TensorProto
loop
                                  TensorProto
x
                                  Growing Vector RealWorld Bool
mutable'boolVal
                                  Growing Vector RealWorld Double
mutable'dcomplexVal
                                  Growing Vector RealWorld Double
mutable'doubleVal
                                  Growing Vector RealWorld Float
mutable'floatVal
                                  Growing Vector RealWorld Int32
mutable'halfVal
                                  Growing Vector RealWorld Int64
mutable'int64Val
                                  Growing Vector RealWorld Int32
y
                                  Growing Vector RealWorld ResourceHandleProto
mutable'resourceHandleVal
                                  Growing Vector RealWorld Float
mutable'scomplexVal
                                  Growing Vector RealWorld ByteString
mutable'stringVal
                                  Growing Vector RealWorld Word32
mutable'uint32Val
                                  Growing Vector RealWorld Word64
mutable'uint64Val
                                  Growing Vector RealWorld VariantTensorDataProto
mutable'variantVal
                        66
                          -> 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))
                                        "string_val"
                                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'stringVal ByteString
y)
                                TensorProto
-> Growing Vector RealWorld Bool
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld ResourceHandleProto
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld ByteString
-> Growing Vector RealWorld Word32
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld VariantTensorDataProto
-> Parser TensorProto
loop
                                  TensorProto
x
                                  Growing Vector RealWorld Bool
mutable'boolVal
                                  Growing Vector RealWorld Double
mutable'dcomplexVal
                                  Growing Vector RealWorld Double
mutable'doubleVal
                                  Growing Vector RealWorld Float
mutable'floatVal
                                  Growing Vector RealWorld Int32
mutable'halfVal
                                  Growing Vector RealWorld Int64
mutable'int64Val
                                  Growing Vector RealWorld Int32
mutable'intVal
                                  Growing Vector RealWorld ResourceHandleProto
mutable'resourceHandleVal
                                  Growing Vector RealWorld Float
mutable'scomplexVal
                                  Growing Vector RealWorld ByteString
v
                                  Growing Vector RealWorld Word32
mutable'uint32Val
                                  Growing Vector RealWorld Word64
mutable'uint64Val
                                  Growing Vector RealWorld VariantTensorDataProto
mutable'variantVal
                        77
                          -> 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)
                                        "scomplex_val"
                                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'scomplexVal Float
y)
                                TensorProto
-> Growing Vector RealWorld Bool
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld ResourceHandleProto
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld ByteString
-> Growing Vector RealWorld Word32
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld VariantTensorDataProto
-> Parser TensorProto
loop
                                  TensorProto
x
                                  Growing Vector RealWorld Bool
mutable'boolVal
                                  Growing Vector RealWorld Double
mutable'dcomplexVal
                                  Growing Vector RealWorld Double
mutable'doubleVal
                                  Growing Vector RealWorld Float
mutable'floatVal
                                  Growing Vector RealWorld Int32
mutable'halfVal
                                  Growing Vector RealWorld Int64
mutable'int64Val
                                  Growing Vector RealWorld Int32
mutable'intVal
                                  Growing Vector RealWorld ResourceHandleProto
mutable'resourceHandleVal
                                  Growing Vector RealWorld Float
v
                                  Growing Vector RealWorld ByteString
mutable'stringVal
                                  Growing Vector RealWorld Word32
mutable'uint32Val
                                  Growing Vector RealWorld Word64
mutable'uint64Val
                                  Growing Vector RealWorld VariantTensorDataProto
mutable'variantVal
                        74
                          -> 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)
                                                                    "scomplex_val"
                                                            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'scomplexVal)
                                TensorProto
-> Growing Vector RealWorld Bool
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld ResourceHandleProto
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld ByteString
-> Growing Vector RealWorld Word32
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld VariantTensorDataProto
-> Parser TensorProto
loop
                                  TensorProto
x
                                  Growing Vector RealWorld Bool
mutable'boolVal
                                  Growing Vector RealWorld Double
mutable'dcomplexVal
                                  Growing Vector RealWorld Double
mutable'doubleVal
                                  Growing Vector RealWorld Float
mutable'floatVal
                                  Growing Vector RealWorld Int32
mutable'halfVal
                                  Growing Vector RealWorld Int64
mutable'int64Val
                                  Growing Vector RealWorld Int32
mutable'intVal
                                  Growing Vector RealWorld ResourceHandleProto
mutable'resourceHandleVal
                                  Growing Vector RealWorld Float
y
                                  Growing Vector RealWorld ByteString
mutable'stringVal
                                  Growing Vector RealWorld Word32
mutable'uint32Val
                                  Growing Vector RealWorld Word64
mutable'uint64Val
                                  Growing Vector RealWorld VariantTensorDataProto
mutable'variantVal
                        80
                          -> 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)
                                        "int64_val"
                                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'int64Val Int64
y)
                                TensorProto
-> Growing Vector RealWorld Bool
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld ResourceHandleProto
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld ByteString
-> Growing Vector RealWorld Word32
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld VariantTensorDataProto
-> Parser TensorProto
loop
                                  TensorProto
x
                                  Growing Vector RealWorld Bool
mutable'boolVal
                                  Growing Vector RealWorld Double
mutable'dcomplexVal
                                  Growing Vector RealWorld Double
mutable'doubleVal
                                  Growing Vector RealWorld Float
mutable'floatVal
                                  Growing Vector RealWorld Int32
mutable'halfVal
                                  Growing Vector RealWorld Int64
v
                                  Growing Vector RealWorld Int32
mutable'intVal
                                  Growing Vector RealWorld ResourceHandleProto
mutable'resourceHandleVal
                                  Growing Vector RealWorld Float
mutable'scomplexVal
                                  Growing Vector RealWorld ByteString
mutable'stringVal
                                  Growing Vector RealWorld Word32
mutable'uint32Val
                                  Growing Vector RealWorld Word64
mutable'uint64Val
                                  Growing Vector RealWorld VariantTensorDataProto
mutable'variantVal
                        82
                          -> 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)
                                                                    "int64_val"
                                                            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'int64Val)
                                TensorProto
-> Growing Vector RealWorld Bool
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld ResourceHandleProto
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld ByteString
-> Growing Vector RealWorld Word32
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld VariantTensorDataProto
-> Parser TensorProto
loop
                                  TensorProto
x
                                  Growing Vector RealWorld Bool
mutable'boolVal
                                  Growing Vector RealWorld Double
mutable'dcomplexVal
                                  Growing Vector RealWorld Double
mutable'doubleVal
                                  Growing Vector RealWorld Float
mutable'floatVal
                                  Growing Vector RealWorld Int32
mutable'halfVal
                                  Growing Vector RealWorld Int64
y
                                  Growing Vector RealWorld Int32
mutable'intVal
                                  Growing Vector RealWorld ResourceHandleProto
mutable'resourceHandleVal
                                  Growing Vector RealWorld Float
mutable'scomplexVal
                                  Growing Vector RealWorld ByteString
mutable'stringVal
                                  Growing Vector RealWorld Word32
mutable'uint32Val
                                  Growing Vector RealWorld Word64
mutable'uint64Val
                                  Growing Vector RealWorld VariantTensorDataProto
mutable'variantVal
                        88
                          -> 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)
                                        "bool_val"
                                Growing Vector RealWorld Bool
v <- IO (Growing Vector RealWorld Bool)
-> Parser (Growing Vector RealWorld Bool)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) Bool
-> Bool -> IO (Growing Vector (PrimState IO) Bool)
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 Bool
Growing Vector (PrimState IO) Bool
mutable'boolVal Bool
y)
                                TensorProto
-> Growing Vector RealWorld Bool
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld ResourceHandleProto
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld ByteString
-> Growing Vector RealWorld Word32
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld VariantTensorDataProto
-> Parser TensorProto
loop
                                  TensorProto
x
                                  Growing Vector RealWorld Bool
v
                                  Growing Vector RealWorld Double
mutable'dcomplexVal
                                  Growing Vector RealWorld Double
mutable'doubleVal
                                  Growing Vector RealWorld Float
mutable'floatVal
                                  Growing Vector RealWorld Int32
mutable'halfVal
                                  Growing Vector RealWorld Int64
mutable'int64Val
                                  Growing Vector RealWorld Int32
mutable'intVal
                                  Growing Vector RealWorld ResourceHandleProto
mutable'resourceHandleVal
                                  Growing Vector RealWorld Float
mutable'scomplexVal
                                  Growing Vector RealWorld ByteString
mutable'stringVal
                                  Growing Vector RealWorld Word32
mutable'uint32Val
                                  Growing Vector RealWorld Word64
mutable'uint64Val
                                  Growing Vector RealWorld VariantTensorDataProto
mutable'variantVal
                        90
                          -> do Growing Vector RealWorld Bool
y <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                        Int
-> Parser (Growing Vector RealWorld Bool)
-> Parser (Growing Vector RealWorld Bool)
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 Bool -> Parser (Growing v RealWorld Bool)
ploop qs :: Growing v RealWorld Bool
qs
                                                = do Bool
packedEnd <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
                                                     if Bool
packedEnd then
                                                         Growing v RealWorld Bool -> Parser (Growing v RealWorld Bool)
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return Growing v RealWorld Bool
qs
                                                     else
                                                         do !Bool
q <- 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)
                                                                    "bool_val"
                                                            Growing v RealWorld Bool
qs' <- IO (Growing v RealWorld Bool) -> Parser (Growing v RealWorld Bool)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                                     (Growing v (PrimState IO) Bool
-> Bool -> IO (Growing v (PrimState IO) Bool)
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 Bool
Growing v (PrimState IO) Bool
qs Bool
q)
                                                            Growing v RealWorld Bool -> Parser (Growing v RealWorld Bool)
ploop Growing v RealWorld Bool
qs'
                                            in forall (v :: * -> *).
Vector v Bool =>
Growing v RealWorld Bool -> Parser (Growing v RealWorld Bool)
ploop)
                                             Growing Vector RealWorld Bool
mutable'boolVal)
                                TensorProto
-> Growing Vector RealWorld Bool
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld ResourceHandleProto
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld ByteString
-> Growing Vector RealWorld Word32
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld VariantTensorDataProto
-> Parser TensorProto
loop
                                  TensorProto
x
                                  Growing Vector RealWorld Bool
y
                                  Growing Vector RealWorld Double
mutable'dcomplexVal
                                  Growing Vector RealWorld Double
mutable'doubleVal
                                  Growing Vector RealWorld Float
mutable'floatVal
                                  Growing Vector RealWorld Int32
mutable'halfVal
                                  Growing Vector RealWorld Int64
mutable'int64Val
                                  Growing Vector RealWorld Int32
mutable'intVal
                                  Growing Vector RealWorld ResourceHandleProto
mutable'resourceHandleVal
                                  Growing Vector RealWorld Float
mutable'scomplexVal
                                  Growing Vector RealWorld ByteString
mutable'stringVal
                                  Growing Vector RealWorld Word32
mutable'uint32Val
                                  Growing Vector RealWorld Word64
mutable'uint64Val
                                  Growing Vector RealWorld VariantTensorDataProto
mutable'variantVal
                        97
                          -> do !Double
y <- Parser Double -> String -> Parser Double
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        ((Word64 -> Double) -> Parser Word64 -> Parser Double
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                           Word64 -> Double
Data.ProtoLens.Encoding.Bytes.wordToDouble
                                           Parser Word64
Data.ProtoLens.Encoding.Bytes.getFixed64)
                                        "dcomplex_val"
                                Growing Vector RealWorld Double
v <- IO (Growing Vector RealWorld Double)
-> Parser (Growing Vector RealWorld Double)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) Double
-> Double -> IO (Growing Vector (PrimState IO) Double)
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 Double
Growing Vector (PrimState IO) Double
mutable'dcomplexVal Double
y)
                                TensorProto
-> Growing Vector RealWorld Bool
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld ResourceHandleProto
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld ByteString
-> Growing Vector RealWorld Word32
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld VariantTensorDataProto
-> Parser TensorProto
loop
                                  TensorProto
x
                                  Growing Vector RealWorld Bool
mutable'boolVal
                                  Growing Vector RealWorld Double
v
                                  Growing Vector RealWorld Double
mutable'doubleVal
                                  Growing Vector RealWorld Float
mutable'floatVal
                                  Growing Vector RealWorld Int32
mutable'halfVal
                                  Growing Vector RealWorld Int64
mutable'int64Val
                                  Growing Vector RealWorld Int32
mutable'intVal
                                  Growing Vector RealWorld ResourceHandleProto
mutable'resourceHandleVal
                                  Growing Vector RealWorld Float
mutable'scomplexVal
                                  Growing Vector RealWorld ByteString
mutable'stringVal
                                  Growing Vector RealWorld Word32
mutable'uint32Val
                                  Growing Vector RealWorld Word64
mutable'uint64Val
                                  Growing Vector RealWorld VariantTensorDataProto
mutable'variantVal
                        98
                          -> do Growing Vector RealWorld Double
y <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                        Int
-> Parser (Growing Vector RealWorld Double)
-> Parser (Growing Vector RealWorld Double)
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 Double -> Parser (Growing v RealWorld Double)
ploop qs :: Growing v RealWorld Double
qs
                                                = do Bool
packedEnd <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
                                                     if Bool
packedEnd then
                                                         Growing v RealWorld Double -> Parser (Growing v RealWorld Double)
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return Growing v RealWorld Double
qs
                                                     else
                                                         do !Double
q <- Parser Double -> String -> Parser Double
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                                                    ((Word64 -> Double) -> Parser Word64 -> Parser Double
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                                                       Word64 -> Double
Data.ProtoLens.Encoding.Bytes.wordToDouble
                                                                       Parser Word64
Data.ProtoLens.Encoding.Bytes.getFixed64)
                                                                    "dcomplex_val"
                                                            Growing v RealWorld Double
qs' <- IO (Growing v RealWorld Double)
-> Parser (Growing v RealWorld Double)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                                     (Growing v (PrimState IO) Double
-> Double -> IO (Growing v (PrimState IO) Double)
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 Double
Growing v (PrimState IO) Double
qs Double
q)
                                                            Growing v RealWorld Double -> Parser (Growing v RealWorld Double)
ploop Growing v RealWorld Double
qs'
                                            in forall (v :: * -> *).
Vector v Double =>
Growing v RealWorld Double -> Parser (Growing v RealWorld Double)
ploop)
                                             Growing Vector RealWorld Double
mutable'dcomplexVal)
                                TensorProto
-> Growing Vector RealWorld Bool
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld ResourceHandleProto
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld ByteString
-> Growing Vector RealWorld Word32
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld VariantTensorDataProto
-> Parser TensorProto
loop
                                  TensorProto
x
                                  Growing Vector RealWorld Bool
mutable'boolVal
                                  Growing Vector RealWorld Double
y
                                  Growing Vector RealWorld Double
mutable'doubleVal
                                  Growing Vector RealWorld Float
mutable'floatVal
                                  Growing Vector RealWorld Int32
mutable'halfVal
                                  Growing Vector RealWorld Int64
mutable'int64Val
                                  Growing Vector RealWorld Int32
mutable'intVal
                                  Growing Vector RealWorld ResourceHandleProto
mutable'resourceHandleVal
                                  Growing Vector RealWorld Float
mutable'scomplexVal
                                  Growing Vector RealWorld ByteString
mutable'stringVal
                                  Growing Vector RealWorld Word32
mutable'uint32Val
                                  Growing Vector RealWorld Word64
mutable'uint64Val
                                  Growing Vector RealWorld VariantTensorDataProto
mutable'variantVal
                        114
                          -> do !ResourceHandleProto
y <- Parser ResourceHandleProto -> String -> Parser ResourceHandleProto
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Int -> Parser ResourceHandleProto -> Parser ResourceHandleProto
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 ResourceHandleProto
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                        "resource_handle_val"
                                Growing Vector RealWorld ResourceHandleProto
v <- IO (Growing Vector RealWorld ResourceHandleProto)
-> Parser (Growing Vector RealWorld ResourceHandleProto)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) ResourceHandleProto
-> ResourceHandleProto
-> IO (Growing Vector (PrimState IO) ResourceHandleProto)
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 ResourceHandleProto
Growing Vector (PrimState IO) ResourceHandleProto
mutable'resourceHandleVal ResourceHandleProto
y)
                                TensorProto
-> Growing Vector RealWorld Bool
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld ResourceHandleProto
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld ByteString
-> Growing Vector RealWorld Word32
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld VariantTensorDataProto
-> Parser TensorProto
loop
                                  TensorProto
x
                                  Growing Vector RealWorld Bool
mutable'boolVal
                                  Growing Vector RealWorld Double
mutable'dcomplexVal
                                  Growing Vector RealWorld Double
mutable'doubleVal
                                  Growing Vector RealWorld Float
mutable'floatVal
                                  Growing Vector RealWorld Int32
mutable'halfVal
                                  Growing Vector RealWorld Int64
mutable'int64Val
                                  Growing Vector RealWorld Int32
mutable'intVal
                                  Growing Vector RealWorld ResourceHandleProto
v
                                  Growing Vector RealWorld Float
mutable'scomplexVal
                                  Growing Vector RealWorld ByteString
mutable'stringVal
                                  Growing Vector RealWorld Word32
mutable'uint32Val
                                  Growing Vector RealWorld Word64
mutable'uint64Val
                                  Growing Vector RealWorld VariantTensorDataProto
mutable'variantVal
                        122
                          -> do !VariantTensorDataProto
y <- Parser VariantTensorDataProto
-> String -> Parser VariantTensorDataProto
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Int
-> Parser VariantTensorDataProto -> Parser VariantTensorDataProto
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 VariantTensorDataProto
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                        "variant_val"
                                Growing Vector RealWorld VariantTensorDataProto
v <- IO (Growing Vector RealWorld VariantTensorDataProto)
-> Parser (Growing Vector RealWorld VariantTensorDataProto)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) VariantTensorDataProto
-> VariantTensorDataProto
-> IO (Growing Vector (PrimState IO) VariantTensorDataProto)
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 VariantTensorDataProto
Growing Vector (PrimState IO) VariantTensorDataProto
mutable'variantVal VariantTensorDataProto
y)
                                TensorProto
-> Growing Vector RealWorld Bool
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld ResourceHandleProto
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld ByteString
-> Growing Vector RealWorld Word32
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld VariantTensorDataProto
-> Parser TensorProto
loop
                                  TensorProto
x
                                  Growing Vector RealWorld Bool
mutable'boolVal
                                  Growing Vector RealWorld Double
mutable'dcomplexVal
                                  Growing Vector RealWorld Double
mutable'doubleVal
                                  Growing Vector RealWorld Float
mutable'floatVal
                                  Growing Vector RealWorld Int32
mutable'halfVal
                                  Growing Vector RealWorld Int64
mutable'int64Val
                                  Growing Vector RealWorld Int32
mutable'intVal
                                  Growing Vector RealWorld ResourceHandleProto
mutable'resourceHandleVal
                                  Growing Vector RealWorld Float
mutable'scomplexVal
                                  Growing Vector RealWorld ByteString
mutable'stringVal
                                  Growing Vector RealWorld Word32
mutable'uint32Val
                                  Growing Vector RealWorld Word64
mutable'uint64Val
                                  Growing Vector RealWorld VariantTensorDataProto
v
                        128
                          -> do !Word32
y <- Parser Word32 -> String -> Parser Word32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        ((Word64 -> Word32) -> Parser Word64 -> Parser Word32
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                           Word64 -> Word32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                           Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                        "uint32_val"
                                Growing Vector RealWorld Word32
v <- IO (Growing Vector RealWorld Word32)
-> Parser (Growing Vector RealWorld Word32)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) Word32
-> Word32 -> IO (Growing Vector (PrimState IO) Word32)
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 Word32
Growing Vector (PrimState IO) Word32
mutable'uint32Val Word32
y)
                                TensorProto
-> Growing Vector RealWorld Bool
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld ResourceHandleProto
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld ByteString
-> Growing Vector RealWorld Word32
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld VariantTensorDataProto
-> Parser TensorProto
loop
                                  TensorProto
x
                                  Growing Vector RealWorld Bool
mutable'boolVal
                                  Growing Vector RealWorld Double
mutable'dcomplexVal
                                  Growing Vector RealWorld Double
mutable'doubleVal
                                  Growing Vector RealWorld Float
mutable'floatVal
                                  Growing Vector RealWorld Int32
mutable'halfVal
                                  Growing Vector RealWorld Int64
mutable'int64Val
                                  Growing Vector RealWorld Int32
mutable'intVal
                                  Growing Vector RealWorld ResourceHandleProto
mutable'resourceHandleVal
                                  Growing Vector RealWorld Float
mutable'scomplexVal
                                  Growing Vector RealWorld ByteString
mutable'stringVal
                                  Growing Vector RealWorld Word32
v
                                  Growing Vector RealWorld Word64
mutable'uint64Val
                                  Growing Vector RealWorld VariantTensorDataProto
mutable'variantVal
                        130
                          -> do Growing Vector RealWorld Word32
y <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                        Int
-> Parser (Growing Vector RealWorld Word32)
-> Parser (Growing Vector RealWorld Word32)
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)
                                                                    "uint32_val"
                                                            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 Word32
mutable'uint32Val)
                                TensorProto
-> Growing Vector RealWorld Bool
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld ResourceHandleProto
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld ByteString
-> Growing Vector RealWorld Word32
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld VariantTensorDataProto
-> Parser TensorProto
loop
                                  TensorProto
x
                                  Growing Vector RealWorld Bool
mutable'boolVal
                                  Growing Vector RealWorld Double
mutable'dcomplexVal
                                  Growing Vector RealWorld Double
mutable'doubleVal
                                  Growing Vector RealWorld Float
mutable'floatVal
                                  Growing Vector RealWorld Int32
mutable'halfVal
                                  Growing Vector RealWorld Int64
mutable'int64Val
                                  Growing Vector RealWorld Int32
mutable'intVal
                                  Growing Vector RealWorld ResourceHandleProto
mutable'resourceHandleVal
                                  Growing Vector RealWorld Float
mutable'scomplexVal
                                  Growing Vector RealWorld ByteString
mutable'stringVal
                                  Growing Vector RealWorld Word32
y
                                  Growing Vector RealWorld Word64
mutable'uint64Val
                                  Growing Vector RealWorld VariantTensorDataProto
mutable'variantVal
                        136
                          -> do !Word64
y <- Parser Word64 -> String -> Parser Word64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt "uint64_val"
                                Growing Vector RealWorld Word64
v <- IO (Growing Vector RealWorld Word64)
-> Parser (Growing Vector RealWorld Word64)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) Word64
-> Word64 -> IO (Growing Vector (PrimState IO) Word64)
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 Word64
Growing Vector (PrimState IO) Word64
mutable'uint64Val Word64
y)
                                TensorProto
-> Growing Vector RealWorld Bool
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld ResourceHandleProto
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld ByteString
-> Growing Vector RealWorld Word32
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld VariantTensorDataProto
-> Parser TensorProto
loop
                                  TensorProto
x
                                  Growing Vector RealWorld Bool
mutable'boolVal
                                  Growing Vector RealWorld Double
mutable'dcomplexVal
                                  Growing Vector RealWorld Double
mutable'doubleVal
                                  Growing Vector RealWorld Float
mutable'floatVal
                                  Growing Vector RealWorld Int32
mutable'halfVal
                                  Growing Vector RealWorld Int64
mutable'int64Val
                                  Growing Vector RealWorld Int32
mutable'intVal
                                  Growing Vector RealWorld ResourceHandleProto
mutable'resourceHandleVal
                                  Growing Vector RealWorld Float
mutable'scomplexVal
                                  Growing Vector RealWorld ByteString
mutable'stringVal
                                  Growing Vector RealWorld Word32
mutable'uint32Val
                                  Growing Vector RealWorld Word64
v
                                  Growing Vector RealWorld VariantTensorDataProto
mutable'variantVal
                        138
                          -> do Growing Vector RealWorld Word64
y <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                        Int
-> Parser (Growing Vector RealWorld Word64)
-> Parser (Growing Vector RealWorld Word64)
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 Word64 -> Parser (Growing v RealWorld Word64)
ploop qs :: Growing v RealWorld Word64
qs
                                                = do Bool
packedEnd <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
                                                     if Bool
packedEnd then
                                                         Growing v RealWorld Word64 -> Parser (Growing v RealWorld Word64)
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return Growing v RealWorld Word64
qs
                                                     else
                                                         do !Word64
q <- Parser Word64 -> String -> Parser Word64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                                                    Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                                    "uint64_val"
                                                            Growing v RealWorld Word64
qs' <- IO (Growing v RealWorld Word64)
-> Parser (Growing v RealWorld Word64)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                                     (Growing v (PrimState IO) Word64
-> Word64 -> IO (Growing v (PrimState IO) Word64)
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 Word64
Growing v (PrimState IO) Word64
qs Word64
q)
                                                            Growing v RealWorld Word64 -> Parser (Growing v RealWorld Word64)
ploop Growing v RealWorld Word64
qs'
                                            in forall (v :: * -> *).
Vector v Word64 =>
Growing v RealWorld Word64 -> Parser (Growing v RealWorld Word64)
ploop)
                                             Growing Vector RealWorld Word64
mutable'uint64Val)
                                TensorProto
-> Growing Vector RealWorld Bool
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld ResourceHandleProto
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld ByteString
-> Growing Vector RealWorld Word32
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld VariantTensorDataProto
-> Parser TensorProto
loop
                                  TensorProto
x
                                  Growing Vector RealWorld Bool
mutable'boolVal
                                  Growing Vector RealWorld Double
mutable'dcomplexVal
                                  Growing Vector RealWorld Double
mutable'doubleVal
                                  Growing Vector RealWorld Float
mutable'floatVal
                                  Growing Vector RealWorld Int32
mutable'halfVal
                                  Growing Vector RealWorld Int64
mutable'int64Val
                                  Growing Vector RealWorld Int32
mutable'intVal
                                  Growing Vector RealWorld ResourceHandleProto
mutable'resourceHandleVal
                                  Growing Vector RealWorld Float
mutable'scomplexVal
                                  Growing Vector RealWorld ByteString
mutable'stringVal
                                  Growing Vector RealWorld Word32
mutable'uint32Val
                                  Growing Vector RealWorld Word64
y
                                  Growing Vector RealWorld VariantTensorDataProto
mutable'variantVal
                        wire :: Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                TensorProto
-> Growing Vector RealWorld Bool
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld ResourceHandleProto
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld ByteString
-> Growing Vector RealWorld Word32
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld VariantTensorDataProto
-> Parser TensorProto
loop
                                  (Setter TensorProto TensorProto FieldSet FieldSet
-> (FieldSet -> FieldSet) -> TensorProto -> TensorProto
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 TensorProto TensorProto FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) TensorProto
x)
                                  Growing Vector RealWorld Bool
mutable'boolVal
                                  Growing Vector RealWorld Double
mutable'dcomplexVal
                                  Growing Vector RealWorld Double
mutable'doubleVal
                                  Growing Vector RealWorld Float
mutable'floatVal
                                  Growing Vector RealWorld Int32
mutable'halfVal
                                  Growing Vector RealWorld Int64
mutable'int64Val
                                  Growing Vector RealWorld Int32
mutable'intVal
                                  Growing Vector RealWorld ResourceHandleProto
mutable'resourceHandleVal
                                  Growing Vector RealWorld Float
mutable'scomplexVal
                                  Growing Vector RealWorld ByteString
mutable'stringVal
                                  Growing Vector RealWorld Word32
mutable'uint32Val
                                  Growing Vector RealWorld Word64
mutable'uint64Val
                                  Growing Vector RealWorld VariantTensorDataProto
mutable'variantVal
      in
        Parser TensorProto -> String -> Parser TensorProto
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do Growing Vector RealWorld Bool
mutable'boolVal <- IO (Growing Vector RealWorld Bool)
-> Parser (Growing Vector RealWorld Bool)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                   IO (Growing Vector RealWorld Bool)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              Growing Vector RealWorld Double
mutable'dcomplexVal <- IO (Growing Vector RealWorld Double)
-> Parser (Growing Vector RealWorld Double)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       IO (Growing Vector RealWorld Double)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              Growing Vector RealWorld Double
mutable'doubleVal <- IO (Growing Vector RealWorld Double)
-> Parser (Growing Vector RealWorld Double)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                     IO (Growing Vector RealWorld Double)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              Growing Vector RealWorld Float
mutable'floatVal <- 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
              Growing Vector RealWorld Int32
mutable'halfVal <- IO (Growing Vector RealWorld Int32)
-> Parser (Growing Vector RealWorld Int32)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                   IO (Growing Vector RealWorld Int32)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              Growing Vector RealWorld Int64
mutable'int64Val <- 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
              Growing Vector RealWorld Int32
mutable'intVal <- IO (Growing Vector RealWorld Int32)
-> Parser (Growing Vector RealWorld Int32)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                  IO (Growing Vector RealWorld Int32)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              Growing Vector RealWorld ResourceHandleProto
mutable'resourceHandleVal <- IO (Growing Vector RealWorld ResourceHandleProto)
-> Parser (Growing Vector RealWorld ResourceHandleProto)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                             IO (Growing Vector RealWorld ResourceHandleProto)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              Growing Vector RealWorld Float
mutable'scomplexVal <- 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
              Growing Vector RealWorld ByteString
mutable'stringVal <- 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
              Growing Vector RealWorld Word32
mutable'uint32Val <- IO (Growing Vector RealWorld Word32)
-> Parser (Growing Vector RealWorld Word32)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                     IO (Growing Vector RealWorld Word32)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              Growing Vector RealWorld Word64
mutable'uint64Val <- IO (Growing Vector RealWorld Word64)
-> Parser (Growing Vector RealWorld Word64)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                     IO (Growing Vector RealWorld Word64)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              Growing Vector RealWorld VariantTensorDataProto
mutable'variantVal <- IO (Growing Vector RealWorld VariantTensorDataProto)
-> Parser (Growing Vector RealWorld VariantTensorDataProto)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                      IO (Growing Vector RealWorld VariantTensorDataProto)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              TensorProto
-> Growing Vector RealWorld Bool
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Double
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int32
-> Growing Vector RealWorld ResourceHandleProto
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld ByteString
-> Growing Vector RealWorld Word32
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld VariantTensorDataProto
-> Parser TensorProto
loop
                TensorProto
forall msg. Message msg => msg
Data.ProtoLens.defMessage
                Growing Vector RealWorld Bool
mutable'boolVal
                Growing Vector RealWorld Double
mutable'dcomplexVal
                Growing Vector RealWorld Double
mutable'doubleVal
                Growing Vector RealWorld Float
mutable'floatVal
                Growing Vector RealWorld Int32
mutable'halfVal
                Growing Vector RealWorld Int64
mutable'int64Val
                Growing Vector RealWorld Int32
mutable'intVal
                Growing Vector RealWorld ResourceHandleProto
mutable'resourceHandleVal
                Growing Vector RealWorld Float
mutable'scomplexVal
                Growing Vector RealWorld ByteString
mutable'stringVal
                Growing Vector RealWorld Word32
mutable'uint32Val
                Growing Vector RealWorld Word64
mutable'uint64Val
                Growing Vector RealWorld VariantTensorDataProto
mutable'variantVal)
          "TensorProto"
  buildMessage :: TensorProto -> Builder
buildMessage
    = \ _x :: TensorProto
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: DataType
_v = FoldLike DataType TensorProto TensorProto DataType DataType
-> TensorProto -> 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") TensorProto
_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 8)
                      ((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)
  TensorProto
  TensorProto
  (Maybe TensorShapeProto)
  (Maybe TensorShapeProto)
-> TensorProto -> 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") TensorProto
_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 18)
                          ((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.<>)
                   (let
                      _v :: Int32
_v
                        = FoldLike Int32 TensorProto TensorProto Int32 Int32
-> TensorProto -> Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                            (forall s a (f :: * -> *).
(HasField s "versionNumber" 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 @"versionNumber") TensorProto
_x
                    in
                      if Int32 -> Int32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int32
_v Int32
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 24)
                            ((Word64 -> Builder) -> (Int32 -> Word64) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                               Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (let
                         _v :: ByteString
_v
                           = FoldLike ByteString TensorProto TensorProto ByteString ByteString
-> TensorProto -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                               (forall s a (f :: * -> *).
(HasField s "tensorContent" 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 @"tensorContent") TensorProto
_x
                       in
                         if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
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 34)
                               ((\ 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))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (let
                            p :: Vector Int32
p = FoldLike
  (Vector Int32)
  TensorProto
  TensorProto
  (Vector Int32)
  (Vector Int32)
-> TensorProto -> Vector Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                  (forall s a (f :: * -> *).
(HasField s "vec'halfVal" 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'halfVal") TensorProto
_x
                          in
                            if Vector Int32 -> Bool
forall (v :: * -> *) a. Vector v a => v a -> Bool
Data.Vector.Generic.null Vector Int32
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 106)
                                  ((\ 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
                                        ((Int32 -> Builder) -> Vector Int32 -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                                           ((Word64 -> Builder) -> (Int32 -> Word64) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                              Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                              Int32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral)
                                           Vector Int32
p))))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (let
                               p :: Vector Float
p = FoldLike
  (Vector Float)
  TensorProto
  TensorProto
  (Vector Float)
  (Vector Float)
-> TensorProto -> 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'floatVal" 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'floatVal") TensorProto
_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 42)
                                     ((\ 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))))
                            (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (let
                                  p :: Vector Double
p = FoldLike
  (Vector Double)
  TensorProto
  TensorProto
  (Vector Double)
  (Vector Double)
-> TensorProto -> Vector Double
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                        (forall s a (f :: * -> *).
(HasField s "vec'doubleVal" 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'doubleVal") TensorProto
_x
                                in
                                  if Vector Double -> Bool
forall (v :: * -> *) a. Vector v a => v a -> Bool
Data.Vector.Generic.null Vector Double
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 50)
                                        ((\ 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
                                              ((Double -> Builder) -> Vector Double -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                                                 ((Word64 -> Builder) -> (Double -> Word64) -> Double -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                    Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putFixed64
                                                    Double -> Word64
Data.ProtoLens.Encoding.Bytes.doubleToWord)
                                                 Vector Double
p))))
                               (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (let
                                     p :: Vector Int32
p = FoldLike
  (Vector Int32)
  TensorProto
  TensorProto
  (Vector Int32)
  (Vector Int32)
-> TensorProto -> Vector Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                           (forall s a (f :: * -> *).
(HasField s "vec'intVal" 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'intVal") TensorProto
_x
                                   in
                                     if Vector Int32 -> Bool
forall (v :: * -> *) a. Vector v a => v a -> Bool
Data.Vector.Generic.null Vector Int32
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 58)
                                           ((\ 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
                                                 ((Int32 -> Builder) -> Vector Int32 -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                                                    ((Word64 -> Builder) -> (Int32 -> Word64) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                       Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                       Int32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral)
                                                    Vector Int32
p))))
                                  (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 66)
                                                ((\ 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)
  TensorProto
  TensorProto
  (Vector ByteString)
  (Vector ByteString)
-> TensorProto -> 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'stringVal" 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'stringVal") TensorProto
_x))
                                     (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (let
                                           p :: Vector Float
p = FoldLike
  (Vector Float)
  TensorProto
  TensorProto
  (Vector Float)
  (Vector Float)
-> TensorProto -> 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'scomplexVal" 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'scomplexVal") TensorProto
_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 74)
                                                 ((\ 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))))
                                        (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (let
                                              p :: Vector Int64
p = FoldLike
  (Vector Int64)
  TensorProto
  TensorProto
  (Vector Int64)
  (Vector Int64)
-> TensorProto -> 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'int64Val" 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'int64Val") TensorProto
_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 82)
                                                    ((\ 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))))
                                           (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                              (let
                                                 p :: Vector Bool
p = FoldLike
  (Vector Bool) TensorProto TensorProto (Vector Bool) (Vector Bool)
-> TensorProto -> Vector Bool
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                       (forall s a (f :: * -> *).
(HasField s "vec'boolVal" 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'boolVal")
                                                       TensorProto
_x
                                               in
                                                 if Vector Bool -> Bool
forall (v :: * -> *) a. Vector v a => v a -> Bool
Data.Vector.Generic.null Vector Bool
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 90)
                                                       ((\ 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
                                                             ((Bool -> Builder) -> Vector Bool -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                                                                ((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))
                                                                Vector Bool
p))))
                                              (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                 (let
                                                    p :: Vector Double
p = FoldLike
  (Vector Double)
  TensorProto
  TensorProto
  (Vector Double)
  (Vector Double)
-> TensorProto -> Vector Double
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                          (forall s a (f :: * -> *).
(HasField s "vec'dcomplexVal" 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'dcomplexVal")
                                                          TensorProto
_x
                                                  in
                                                    if Vector Double -> Bool
forall (v :: * -> *) a. Vector v a => v a -> Bool
Data.Vector.Generic.null Vector Double
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
                                                             98)
                                                          ((\ 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
                                                                ((Double -> Builder) -> Vector Double -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                                                                   ((Word64 -> Builder) -> (Double -> Word64) -> Double -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                                      Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putFixed64
                                                                      Double -> Word64
Data.ProtoLens.Encoding.Bytes.doubleToWord)
                                                                   Vector Double
p))))
                                                 (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                    ((ResourceHandleProto -> Builder)
-> Vector ResourceHandleProto -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                                                       (\ _v :: ResourceHandleProto
_v
                                                          -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                  114)
                                                               ((ByteString -> Builder)
-> (ResourceHandleProto -> ByteString)
-> ResourceHandleProto
-> 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))
                                                                  ResourceHandleProto -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                                                  ResourceHandleProto
_v))
                                                       (FoldLike
  (Vector ResourceHandleProto)
  TensorProto
  TensorProto
  (Vector ResourceHandleProto)
  (Vector ResourceHandleProto)
-> TensorProto -> Vector ResourceHandleProto
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                          (forall s a (f :: * -> *).
(HasField s "vec'resourceHandleVal" 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'resourceHandleVal")
                                                          TensorProto
_x))
                                                    (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                       ((VariantTensorDataProto -> Builder)
-> Vector VariantTensorDataProto -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                                                          (\ _v :: VariantTensorDataProto
_v
                                                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                     122)
                                                                  ((ByteString -> Builder)
-> (VariantTensorDataProto -> ByteString)
-> VariantTensorDataProto
-> 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))
                                                                     VariantTensorDataProto -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                                                     VariantTensorDataProto
_v))
                                                          (FoldLike
  (Vector VariantTensorDataProto)
  TensorProto
  TensorProto
  (Vector VariantTensorDataProto)
  (Vector VariantTensorDataProto)
-> TensorProto -> Vector VariantTensorDataProto
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                             (forall s a (f :: * -> *).
(HasField s "vec'variantVal" 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'variantVal")
                                                             TensorProto
_x))
                                                       (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                          (let
                                                             p :: Vector Word32
p = FoldLike
  (Vector Word32)
  TensorProto
  TensorProto
  (Vector Word32)
  (Vector Word32)
-> TensorProto -> Vector Word32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                                   (forall s a (f :: * -> *).
(HasField s "vec'uint32Val" 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'uint32Val")
                                                                   TensorProto
_x
                                                           in
                                                             if Vector Word32 -> Bool
forall (v :: * -> *) a. Vector v a => v a -> Bool
Data.Vector.Generic.null Vector Word32
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
                                                                      130)
                                                                   ((\ 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
                                                                         ((Word32 -> Builder) -> Vector Word32 -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                                                                            ((Word64 -> Builder) -> (Word32 -> Word64) -> Word32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                                               Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                               Word32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral)
                                                                            Vector Word32
p))))
                                                          (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                             (let
                                                                p :: Vector Word64
p = FoldLike
  (Vector Word64)
  TensorProto
  TensorProto
  (Vector Word64)
  (Vector Word64)
-> TensorProto -> Vector Word64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                                      (forall s a (f :: * -> *).
(HasField s "vec'uint64Val" 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'uint64Val")
                                                                      TensorProto
_x
                                                              in
                                                                if Vector Word64 -> Bool
forall (v :: * -> *) a. Vector v a => v a -> Bool
Data.Vector.Generic.null Vector Word64
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
                                                                         138)
                                                                      ((\ 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
                                                                            ((Word64 -> Builder) -> Vector Word64 -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                                                                               Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                               Vector Word64
p))))
                                                             (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                                                (FoldLike FieldSet TensorProto TensorProto FieldSet FieldSet
-> TensorProto -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                                   FoldLike FieldSet TensorProto TensorProto FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields
                                                                   TensorProto
_x))))))))))))))))))
instance Control.DeepSeq.NFData TensorProto where
  rnf :: TensorProto -> ()
rnf
    = \ x__ :: TensorProto
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (TensorProto -> FieldSet
_TensorProto'_unknownFields TensorProto
x__)
             (DataType -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (TensorProto -> DataType
_TensorProto'dtype TensorProto
x__)
                (Maybe TensorShapeProto -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (TensorProto -> Maybe TensorShapeProto
_TensorProto'tensorShape TensorProto
x__)
                   (Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (TensorProto -> Int32
_TensorProto'versionNumber TensorProto
x__)
                      (ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (TensorProto -> ByteString
_TensorProto'tensorContent TensorProto
x__)
                         (Vector Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (TensorProto -> Vector Int32
_TensorProto'halfVal TensorProto
x__)
                            (Vector Float -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (TensorProto -> Vector Float
_TensorProto'floatVal TensorProto
x__)
                               (Vector Double -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (TensorProto -> Vector Double
_TensorProto'doubleVal TensorProto
x__)
                                  (Vector Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                     (TensorProto -> Vector Int32
_TensorProto'intVal TensorProto
x__)
                                     (Vector ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                        (TensorProto -> Vector ByteString
_TensorProto'stringVal TensorProto
x__)
                                        (Vector Float -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                           (TensorProto -> Vector Float
_TensorProto'scomplexVal TensorProto
x__)
                                           (Vector Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                              (TensorProto -> Vector Int64
_TensorProto'int64Val TensorProto
x__)
                                              (Vector Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                 (TensorProto -> Vector Bool
_TensorProto'boolVal TensorProto
x__)
                                                 (Vector Double -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                    (TensorProto -> Vector Double
_TensorProto'dcomplexVal TensorProto
x__)
                                                    (Vector ResourceHandleProto -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                       (TensorProto -> Vector ResourceHandleProto
_TensorProto'resourceHandleVal TensorProto
x__)
                                                       (Vector VariantTensorDataProto -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                          (TensorProto -> Vector VariantTensorDataProto
_TensorProto'variantVal TensorProto
x__)
                                                          (Vector Word32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                             (TensorProto -> Vector Word32
_TensorProto'uint32Val TensorProto
x__)
                                                             (Vector Word64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                                (TensorProto -> Vector Word64
_TensorProto'uint64Val TensorProto
x__)
                                                                ())))))))))))))))))
{- | Fields :
     
         * 'Proto.Tensorflow.Core.Framework.Tensor_Fields.typeName' @:: Lens' VariantTensorDataProto Data.Text.Text@
         * 'Proto.Tensorflow.Core.Framework.Tensor_Fields.metadata' @:: Lens' VariantTensorDataProto Data.ByteString.ByteString@
         * 'Proto.Tensorflow.Core.Framework.Tensor_Fields.tensors' @:: Lens' VariantTensorDataProto [TensorProto]@
         * 'Proto.Tensorflow.Core.Framework.Tensor_Fields.vec'tensors' @:: Lens' VariantTensorDataProto (Data.Vector.Vector TensorProto)@ -}
data VariantTensorDataProto
  = VariantTensorDataProto'_constructor {VariantTensorDataProto -> Text
_VariantTensorDataProto'typeName :: !Data.Text.Text,
                                         VariantTensorDataProto -> ByteString
_VariantTensorDataProto'metadata :: !Data.ByteString.ByteString,
                                         VariantTensorDataProto -> Vector TensorProto
_VariantTensorDataProto'tensors :: !(Data.Vector.Vector TensorProto),
                                         VariantTensorDataProto -> FieldSet
_VariantTensorDataProto'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (VariantTensorDataProto -> VariantTensorDataProto -> Bool
(VariantTensorDataProto -> VariantTensorDataProto -> Bool)
-> (VariantTensorDataProto -> VariantTensorDataProto -> Bool)
-> Eq VariantTensorDataProto
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: VariantTensorDataProto -> VariantTensorDataProto -> Bool
$c/= :: VariantTensorDataProto -> VariantTensorDataProto -> Bool
== :: VariantTensorDataProto -> VariantTensorDataProto -> Bool
$c== :: VariantTensorDataProto -> VariantTensorDataProto -> Bool
Prelude.Eq, Eq VariantTensorDataProto
Eq VariantTensorDataProto =>
(VariantTensorDataProto -> VariantTensorDataProto -> Ordering)
-> (VariantTensorDataProto -> VariantTensorDataProto -> Bool)
-> (VariantTensorDataProto -> VariantTensorDataProto -> Bool)
-> (VariantTensorDataProto -> VariantTensorDataProto -> Bool)
-> (VariantTensorDataProto -> VariantTensorDataProto -> Bool)
-> (VariantTensorDataProto
    -> VariantTensorDataProto -> VariantTensorDataProto)
-> (VariantTensorDataProto
    -> VariantTensorDataProto -> VariantTensorDataProto)
-> Ord VariantTensorDataProto
VariantTensorDataProto -> VariantTensorDataProto -> Bool
VariantTensorDataProto -> VariantTensorDataProto -> Ordering
VariantTensorDataProto
-> VariantTensorDataProto -> VariantTensorDataProto
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 :: VariantTensorDataProto
-> VariantTensorDataProto -> VariantTensorDataProto
$cmin :: VariantTensorDataProto
-> VariantTensorDataProto -> VariantTensorDataProto
max :: VariantTensorDataProto
-> VariantTensorDataProto -> VariantTensorDataProto
$cmax :: VariantTensorDataProto
-> VariantTensorDataProto -> VariantTensorDataProto
>= :: VariantTensorDataProto -> VariantTensorDataProto -> Bool
$c>= :: VariantTensorDataProto -> VariantTensorDataProto -> Bool
> :: VariantTensorDataProto -> VariantTensorDataProto -> Bool
$c> :: VariantTensorDataProto -> VariantTensorDataProto -> Bool
<= :: VariantTensorDataProto -> VariantTensorDataProto -> Bool
$c<= :: VariantTensorDataProto -> VariantTensorDataProto -> Bool
< :: VariantTensorDataProto -> VariantTensorDataProto -> Bool
$c< :: VariantTensorDataProto -> VariantTensorDataProto -> Bool
compare :: VariantTensorDataProto -> VariantTensorDataProto -> Ordering
$ccompare :: VariantTensorDataProto -> VariantTensorDataProto -> Ordering
$cp1Ord :: Eq VariantTensorDataProto
Prelude.Ord)
instance Prelude.Show VariantTensorDataProto where
  showsPrec :: Int -> VariantTensorDataProto -> ShowS
showsPrec _ __x :: VariantTensorDataProto
__x __s :: String
__s
    = Char -> ShowS
Prelude.showChar
        '{'
        (String -> ShowS
Prelude.showString
           (VariantTensorDataProto -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort VariantTensorDataProto
__x) (Char -> ShowS
Prelude.showChar '}' String
__s))
instance Data.ProtoLens.Field.HasField VariantTensorDataProto "typeName" Data.Text.Text where
  fieldOf :: Proxy# "typeName"
-> (Text -> f Text)
-> VariantTensorDataProto
-> f VariantTensorDataProto
fieldOf _
    = ((Text -> f Text)
 -> VariantTensorDataProto -> f VariantTensorDataProto)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> VariantTensorDataProto
-> f VariantTensorDataProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((VariantTensorDataProto -> Text)
-> (VariantTensorDataProto -> Text -> VariantTensorDataProto)
-> Lens VariantTensorDataProto VariantTensorDataProto Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           VariantTensorDataProto -> Text
_VariantTensorDataProto'typeName
           (\ x__ :: VariantTensorDataProto
x__ y__ :: Text
y__ -> VariantTensorDataProto
x__ {_VariantTensorDataProto'typeName :: Text
_VariantTensorDataProto'typeName = Text
y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField VariantTensorDataProto "metadata" Data.ByteString.ByteString where
  fieldOf :: Proxy# "metadata"
-> (ByteString -> f ByteString)
-> VariantTensorDataProto
-> f VariantTensorDataProto
fieldOf _
    = ((ByteString -> f ByteString)
 -> VariantTensorDataProto -> f VariantTensorDataProto)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> VariantTensorDataProto
-> f VariantTensorDataProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((VariantTensorDataProto -> ByteString)
-> (VariantTensorDataProto -> ByteString -> VariantTensorDataProto)
-> Lens
     VariantTensorDataProto VariantTensorDataProto ByteString ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           VariantTensorDataProto -> ByteString
_VariantTensorDataProto'metadata
           (\ x__ :: VariantTensorDataProto
x__ y__ :: ByteString
y__ -> VariantTensorDataProto
x__ {_VariantTensorDataProto'metadata :: ByteString
_VariantTensorDataProto'metadata = ByteString
y__}))
        (ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField VariantTensorDataProto "tensors" [TensorProto] where
  fieldOf :: Proxy# "tensors"
-> ([TensorProto] -> f [TensorProto])
-> VariantTensorDataProto
-> f VariantTensorDataProto
fieldOf _
    = ((Vector TensorProto -> f (Vector TensorProto))
 -> VariantTensorDataProto -> f VariantTensorDataProto)
-> (([TensorProto] -> f [TensorProto])
    -> Vector TensorProto -> f (Vector TensorProto))
-> ([TensorProto] -> f [TensorProto])
-> VariantTensorDataProto
-> f VariantTensorDataProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((VariantTensorDataProto -> Vector TensorProto)
-> (VariantTensorDataProto
    -> Vector TensorProto -> VariantTensorDataProto)
-> Lens
     VariantTensorDataProto
     VariantTensorDataProto
     (Vector TensorProto)
     (Vector TensorProto)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           VariantTensorDataProto -> Vector TensorProto
_VariantTensorDataProto'tensors
           (\ x__ :: VariantTensorDataProto
x__ y__ :: Vector TensorProto
y__ -> VariantTensorDataProto
x__ {_VariantTensorDataProto'tensors :: Vector TensorProto
_VariantTensorDataProto'tensors = Vector TensorProto
y__}))
        ((Vector TensorProto -> [TensorProto])
-> (Vector TensorProto -> [TensorProto] -> Vector TensorProto)
-> Lens
     (Vector TensorProto)
     (Vector TensorProto)
     [TensorProto]
     [TensorProto]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector TensorProto -> [TensorProto]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ _ y__ :: [TensorProto]
y__ -> [TensorProto] -> Vector TensorProto
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [TensorProto]
y__))
instance Data.ProtoLens.Field.HasField VariantTensorDataProto "vec'tensors" (Data.Vector.Vector TensorProto) where
  fieldOf :: Proxy# "vec'tensors"
-> (Vector TensorProto -> f (Vector TensorProto))
-> VariantTensorDataProto
-> f VariantTensorDataProto
fieldOf _
    = ((Vector TensorProto -> f (Vector TensorProto))
 -> VariantTensorDataProto -> f VariantTensorDataProto)
-> ((Vector TensorProto -> f (Vector TensorProto))
    -> Vector TensorProto -> f (Vector TensorProto))
-> (Vector TensorProto -> f (Vector TensorProto))
-> VariantTensorDataProto
-> f VariantTensorDataProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((VariantTensorDataProto -> Vector TensorProto)
-> (VariantTensorDataProto
    -> Vector TensorProto -> VariantTensorDataProto)
-> Lens
     VariantTensorDataProto
     VariantTensorDataProto
     (Vector TensorProto)
     (Vector TensorProto)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           VariantTensorDataProto -> Vector TensorProto
_VariantTensorDataProto'tensors
           (\ x__ :: VariantTensorDataProto
x__ y__ :: Vector TensorProto
y__ -> VariantTensorDataProto
x__ {_VariantTensorDataProto'tensors :: Vector TensorProto
_VariantTensorDataProto'tensors = Vector TensorProto
y__}))
        (Vector TensorProto -> f (Vector TensorProto))
-> Vector TensorProto -> f (Vector TensorProto)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message VariantTensorDataProto where
  messageName :: Proxy VariantTensorDataProto -> Text
messageName _ = String -> Text
Data.Text.pack "tensorflow.VariantTensorDataProto"
  packedMessageDescriptor :: Proxy VariantTensorDataProto -> ByteString
packedMessageDescriptor _
    = "\n\
      \\SYNVariantTensorDataProto\DC2\ESC\n\
      \\ttype_name\CAN\SOH \SOH(\tR\btypeName\DC2\SUB\n\
      \\bmetadata\CAN\STX \SOH(\fR\bmetadata\DC21\n\
      \\atensors\CAN\ETX \ETX(\v2\ETB.tensorflow.TensorProtoR\atensors"
  packedFileDescriptor :: Proxy VariantTensorDataProto -> ByteString
packedFileDescriptor _ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor VariantTensorDataProto)
fieldsByTag
    = let
        typeName__field_descriptor :: FieldDescriptor VariantTensorDataProto
typeName__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor VariantTensorDataProto Text
-> FieldDescriptor VariantTensorDataProto
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "type_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 VariantTensorDataProto VariantTensorDataProto Text Text
-> FieldAccessor VariantTensorDataProto 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 "typeName" 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 @"typeName")) ::
              Data.ProtoLens.FieldDescriptor VariantTensorDataProto
        metadata__field_descriptor :: FieldDescriptor VariantTensorDataProto
metadata__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor VariantTensorDataProto ByteString
-> FieldDescriptor VariantTensorDataProto
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "metadata"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (WireDefault ByteString
-> Lens
     VariantTensorDataProto VariantTensorDataProto ByteString ByteString
-> FieldAccessor VariantTensorDataProto ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "metadata" 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 @"metadata")) ::
              Data.ProtoLens.FieldDescriptor VariantTensorDataProto
        tensors__field_descriptor :: FieldDescriptor VariantTensorDataProto
tensors__field_descriptor
          = String
-> FieldTypeDescriptor TensorProto
-> FieldAccessor VariantTensorDataProto TensorProto
-> FieldDescriptor VariantTensorDataProto
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "tensors"
              (MessageOrGroup -> FieldTypeDescriptor TensorProto
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor TensorProto)
              (Packing
-> Lens' VariantTensorDataProto [TensorProto]
-> FieldAccessor VariantTensorDataProto TensorProto
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Unpacked (forall s a (f :: * -> *).
(HasField s "tensors" 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 @"tensors")) ::
              Data.ProtoLens.FieldDescriptor VariantTensorDataProto
      in
        [(Tag, FieldDescriptor VariantTensorDataProto)]
-> Map Tag (FieldDescriptor VariantTensorDataProto)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag 1, FieldDescriptor VariantTensorDataProto
typeName__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 2, FieldDescriptor VariantTensorDataProto
metadata__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 3, FieldDescriptor VariantTensorDataProto
tensors__field_descriptor)]
  unknownFields :: LensLike' f VariantTensorDataProto FieldSet
unknownFields
    = (VariantTensorDataProto -> FieldSet)
-> (VariantTensorDataProto -> FieldSet -> VariantTensorDataProto)
-> Lens' VariantTensorDataProto FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        VariantTensorDataProto -> FieldSet
_VariantTensorDataProto'_unknownFields
        (\ x__ :: VariantTensorDataProto
x__ y__ :: FieldSet
y__ -> VariantTensorDataProto
x__ {_VariantTensorDataProto'_unknownFields :: FieldSet
_VariantTensorDataProto'_unknownFields = FieldSet
y__})
  defMessage :: VariantTensorDataProto
defMessage
    = $WVariantTensorDataProto'_constructor :: Text
-> ByteString
-> Vector TensorProto
-> FieldSet
-> VariantTensorDataProto
VariantTensorDataProto'_constructor
        {_VariantTensorDataProto'typeName :: Text
_VariantTensorDataProto'typeName = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _VariantTensorDataProto'metadata :: ByteString
_VariantTensorDataProto'metadata = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _VariantTensorDataProto'tensors :: Vector TensorProto
_VariantTensorDataProto'tensors = Vector TensorProto
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _VariantTensorDataProto'_unknownFields :: FieldSet
_VariantTensorDataProto'_unknownFields = []}
  parseMessage :: Parser VariantTensorDataProto
parseMessage
    = let
        loop ::
          VariantTensorDataProto
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld TensorProto
             -> Data.ProtoLens.Encoding.Bytes.Parser VariantTensorDataProto
        loop :: VariantTensorDataProto
-> Growing Vector RealWorld TensorProto
-> Parser VariantTensorDataProto
loop x :: VariantTensorDataProto
x mutable'tensors :: Growing Vector RealWorld TensorProto
mutable'tensors
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do Vector TensorProto
frozen'tensors <- IO (Vector TensorProto) -> Parser (Vector TensorProto)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                          (Growing Vector (PrimState IO) TensorProto
-> IO (Vector TensorProto)
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 TensorProto
Growing Vector (PrimState IO) TensorProto
mutable'tensors)
                      (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]))))
                      VariantTensorDataProto -> Parser VariantTensorDataProto
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter
  VariantTensorDataProto VariantTensorDataProto FieldSet FieldSet
-> (FieldSet -> FieldSet)
-> VariantTensorDataProto
-> VariantTensorDataProto
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
  VariantTensorDataProto VariantTensorDataProto FieldSet FieldSet
Data.ProtoLens.unknownFields
                           (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t)
                           (Setter
  VariantTensorDataProto
  VariantTensorDataProto
  (Vector TensorProto)
  (Vector TensorProto)
-> Vector TensorProto
-> VariantTensorDataProto
-> VariantTensorDataProto
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                              (forall s a (f :: * -> *).
(HasField s "vec'tensors" 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'tensors") Vector TensorProto
frozen'tensors VariantTensorDataProto
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))
                                       "type_name"
                                VariantTensorDataProto
-> Growing Vector RealWorld TensorProto
-> Parser VariantTensorDataProto
loop
                                  (Setter VariantTensorDataProto VariantTensorDataProto Text Text
-> Text -> VariantTensorDataProto -> VariantTensorDataProto
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "typeName" 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 @"typeName") Text
y VariantTensorDataProto
x)
                                  Growing Vector RealWorld TensorProto
mutable'tensors
                        18
                          -> 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))
                                       "metadata"
                                VariantTensorDataProto
-> Growing Vector RealWorld TensorProto
-> Parser VariantTensorDataProto
loop
                                  (Setter
  VariantTensorDataProto VariantTensorDataProto ByteString ByteString
-> ByteString -> VariantTensorDataProto -> VariantTensorDataProto
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "metadata" 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 @"metadata") ByteString
y VariantTensorDataProto
x)
                                  Growing Vector RealWorld TensorProto
mutable'tensors
                        26
                          -> do !TensorProto
y <- Parser TensorProto -> String -> Parser TensorProto
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Int -> Parser TensorProto -> Parser TensorProto
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 TensorProto
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                        "tensors"
                                Growing Vector RealWorld TensorProto
v <- IO (Growing Vector RealWorld TensorProto)
-> Parser (Growing Vector RealWorld TensorProto)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) TensorProto
-> TensorProto -> IO (Growing Vector (PrimState IO) TensorProto)
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 TensorProto
Growing Vector (PrimState IO) TensorProto
mutable'tensors TensorProto
y)
                                VariantTensorDataProto
-> Growing Vector RealWorld TensorProto
-> Parser VariantTensorDataProto
loop VariantTensorDataProto
x Growing Vector RealWorld TensorProto
v
                        wire :: Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                VariantTensorDataProto
-> Growing Vector RealWorld TensorProto
-> Parser VariantTensorDataProto
loop
                                  (Setter
  VariantTensorDataProto VariantTensorDataProto FieldSet FieldSet
-> (FieldSet -> FieldSet)
-> VariantTensorDataProto
-> VariantTensorDataProto
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
  VariantTensorDataProto VariantTensorDataProto FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) VariantTensorDataProto
x)
                                  Growing Vector RealWorld TensorProto
mutable'tensors
      in
        Parser VariantTensorDataProto
-> String -> Parser VariantTensorDataProto
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do Growing Vector RealWorld TensorProto
mutable'tensors <- IO (Growing Vector RealWorld TensorProto)
-> Parser (Growing Vector RealWorld TensorProto)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                   IO (Growing Vector RealWorld TensorProto)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              VariantTensorDataProto
-> Growing Vector RealWorld TensorProto
-> Parser VariantTensorDataProto
loop VariantTensorDataProto
forall msg. Message msg => msg
Data.ProtoLens.defMessage Growing Vector RealWorld TensorProto
mutable'tensors)
          "VariantTensorDataProto"
  buildMessage :: VariantTensorDataProto -> Builder
buildMessage
    = \ _x :: VariantTensorDataProto
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text VariantTensorDataProto VariantTensorDataProto Text Text
-> VariantTensorDataProto -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "typeName" 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 @"typeName") VariantTensorDataProto
_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 :: ByteString
_v = FoldLike
  ByteString
  VariantTensorDataProto
  VariantTensorDataProto
  ByteString
  ByteString
-> VariantTensorDataProto -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "metadata" 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 @"metadata") VariantTensorDataProto
_x
                 in
                   if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
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)
                         ((\ 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))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   ((TensorProto -> Builder) -> Vector TensorProto -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                      (\ _v :: TensorProto
_v
                         -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                              (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 26)
                              ((ByteString -> Builder)
-> (TensorProto -> ByteString) -> TensorProto -> 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))
                                 TensorProto -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                 TensorProto
_v))
                      (FoldLike
  (Vector TensorProto)
  VariantTensorDataProto
  VariantTensorDataProto
  (Vector TensorProto)
  (Vector TensorProto)
-> VariantTensorDataProto -> Vector TensorProto
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "vec'tensors" 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'tensors") VariantTensorDataProto
_x))
                   (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                      (FoldLike
  FieldSet
  VariantTensorDataProto
  VariantTensorDataProto
  FieldSet
  FieldSet
-> VariantTensorDataProto -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  VariantTensorDataProto
  VariantTensorDataProto
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields VariantTensorDataProto
_x))))
instance Control.DeepSeq.NFData VariantTensorDataProto where
  rnf :: VariantTensorDataProto -> ()
rnf
    = \ x__ :: VariantTensorDataProto
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (VariantTensorDataProto -> FieldSet
_VariantTensorDataProto'_unknownFields VariantTensorDataProto
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (VariantTensorDataProto -> Text
_VariantTensorDataProto'typeName VariantTensorDataProto
x__)
                (ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (VariantTensorDataProto -> ByteString
_VariantTensorDataProto'metadata VariantTensorDataProto
x__)
                   (Vector TensorProto -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (VariantTensorDataProto -> Vector TensorProto
_VariantTensorDataProto'tensors VariantTensorDataProto
x__) ())))
packedFileDescriptor :: Data.ByteString.ByteString
packedFileDescriptor :: ByteString
packedFileDescriptor
  = "\n\
    \&tensorflow/core/framework/tensor.proto\DC2\n\
    \tensorflow\SUB/tensorflow/core/framework/resource_handle.proto\SUB,tensorflow/core/framework/tensor_shape.proto\SUB%tensorflow/core/framework/types.proto\"\209\ENQ\n\
    \\vTensorProto\DC2*\n\
    \\ENQdtype\CAN\SOH \SOH(\SO2\DC4.tensorflow.DataTypeR\ENQdtype\DC2?\n\
    \\ftensor_shape\CAN\STX \SOH(\v2\FS.tensorflow.TensorShapeProtoR\vtensorShape\DC2%\n\
    \\SOversion_number\CAN\ETX \SOH(\ENQR\rversionNumber\DC2%\n\
    \\SOtensor_content\CAN\EOT \SOH(\fR\rtensorContent\DC2\GS\n\
    \\bhalf_val\CAN\r \ETX(\ENQR\ahalfValB\STX\DLE\SOH\DC2\US\n\
    \\tfloat_val\CAN\ENQ \ETX(\STXR\bfloatValB\STX\DLE\SOH\DC2!\n\
    \\n\
    \double_val\CAN\ACK \ETX(\SOHR\tdoubleValB\STX\DLE\SOH\DC2\ESC\n\
    \\aint_val\CAN\a \ETX(\ENQR\ACKintValB\STX\DLE\SOH\DC2\GS\n\
    \\n\
    \string_val\CAN\b \ETX(\fR\tstringVal\DC2%\n\
    \\fscomplex_val\CAN\t \ETX(\STXR\vscomplexValB\STX\DLE\SOH\DC2\US\n\
    \\tint64_val\CAN\n\
    \ \ETX(\ETXR\bint64ValB\STX\DLE\SOH\DC2\GS\n\
    \\bbool_val\CAN\v \ETX(\bR\aboolValB\STX\DLE\SOH\DC2%\n\
    \\fdcomplex_val\CAN\f \ETX(\SOHR\vdcomplexValB\STX\DLE\SOH\DC2O\n\
    \\DC3resource_handle_val\CAN\SO \ETX(\v2\US.tensorflow.ResourceHandleProtoR\DC1resourceHandleVal\DC2C\n\
    \\vvariant_val\CAN\SI \ETX(\v2\".tensorflow.VariantTensorDataProtoR\n\
    \variantVal\DC2!\n\
    \\n\
    \uint32_val\CAN\DLE \ETX(\rR\tuint32ValB\STX\DLE\SOH\DC2!\n\
    \\n\
    \uint64_val\CAN\DC1 \ETX(\EOTR\tuint64ValB\STX\DLE\SOH\"\132\SOH\n\
    \\SYNVariantTensorDataProto\DC2\ESC\n\
    \\ttype_name\CAN\SOH \SOH(\tR\btypeName\DC2\SUB\n\
    \\bmetadata\CAN\STX \SOH(\fR\bmetadata\DC21\n\
    \\atensors\CAN\ETX \ETX(\v2\ETB.tensorflow.TensorProtoR\atensorsB|\n\
    \\CANorg.tensorflow.frameworkB\fTensorProtosP\SOHZMgithub.com/tensorflow/tensorflow/tensorflow/go/core/framework/tensor_go_proto\248\SOH\SOHJ\244\FS\n\
    \\ACK\DC2\EOT\NUL\NUL_\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\NUL9\n\
    \\t\n\
    \\STX\ETX\SOH\DC2\ETX\ENQ\NUL6\n\
    \\t\n\
    \\STX\ETX\STX\DC2\ETX\ACK\NUL/\n\
    \\b\n\
    \\SOH\b\DC2\ETX\b\NUL\US\n\
    \\t\n\
    \\STX\b\US\DC2\ETX\b\NUL\US\n\
    \\b\n\
    \\SOH\b\DC2\ETX\t\NUL-\n\
    \\t\n\
    \\STX\b\b\DC2\ETX\t\NUL-\n\
    \\b\n\
    \\SOH\b\DC2\ETX\n\
    \\NUL\"\n\
    \\t\n\
    \\STX\b\n\
    \\DC2\ETX\n\
    \\NUL\"\n\
    \\b\n\
    \\SOH\b\DC2\ETX\v\NUL1\n\
    \\t\n\
    \\STX\b\SOH\DC2\ETX\v\NUL1\n\
    \\b\n\
    \\SOH\b\DC2\ETX\f\NULd\n\
    \\t\n\
    \\STX\b\v\DC2\ETX\f\NULd\n\
    \4\n\
    \\STX\EOT\NUL\DC2\EOT\SI\NULU\SOH\SUB( Protocol buffer representing a tensor.\n\
    \\n\
    \\n\
    \\n\
    \\ETX\EOT\NUL\SOH\DC2\ETX\SI\b\DC3\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\NUL\DC2\ETX\DLE\STX\NAK\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\NUL\ACK\DC2\ETX\DLE\STX\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\NUL\SOH\DC2\ETX\DLE\v\DLE\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\NUL\ETX\DC2\ETX\DLE\DC3\DC4\n\
    \M\n\
    \\EOT\EOT\NUL\STX\SOH\DC2\ETX\DC3\STX$\SUB@ Shape of the tensor.  TODO(touts): sort out the 0-rank issues.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SOH\ACK\DC2\ETX\DC3\STX\DC2\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SOH\SOH\DC2\ETX\DC3\DC3\US\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SOH\ETX\DC2\ETX\DC3\"#\n\
    \\201\ETX\n\
    \\EOT\EOT\NUL\STX\STX\DC2\ETX\RS\STX\ESC\SUB\215\SOH Version number.\n\
    \\n\
    \ In version 0, if the \"repeated xxx\" representations contain only one\n\
    \ element, that element is repeated to fill the shape.  This makes it easy\n\
    \ to represent a constant Tensor with a single value.\n\
    \2\225\SOH Only one of the representations below is set, one of \"tensor_contents\" and\n\
    \ the \"xxx_val\" attributes.  We are not using oneof because as oneofs cannot\n\
    \ contain repeated fields it would require another extra set of messages.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\STX\ENQ\DC2\ETX\RS\STX\a\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\STX\SOH\DC2\ETX\RS\b\SYN\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\STX\ETX\DC2\ETX\RS\EM\SUB\n\
    \\216\STX\n\
    \\EOT\EOT\NUL\STX\ETX\DC2\ETX%\STX\ESC\SUB\202\STX Serialized raw tensor content from either Tensor::AsProtoTensorContent or\n\
    \ memcpy in tensorflow::grpc::EncodeTensorToByteBuffer. This representation\n\
    \ can be used for all tensor types. The purpose of this representation is to\n\
    \ reduce serialization overhead during RPC call by avoiding serialization of\n\
    \ many repeated small items.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ETX\ENQ\DC2\ETX%\STX\a\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ETX\SOH\DC2\ETX%\b\SYN\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ETX\ETX\DC2\ETX%\EM\SUB\n\
    \\253\STX\n\
    \\EOT\EOT\NUL\STX\EOT\DC2\ETX.\STX/\SUB\128\SOH DT_HALF, DT_BFLOAT16. Note that since protobuf has no int16 type, we'll\n\
    \ have some pointless zero padding for each value here.\n\
    \2\236\SOH Type specific representations that make it easy to create tensor protos in\n\
    \ all languages.  Only the representation corresponding to \"dtype\" can\n\
    \ be set.  The values hold the flattened representation of the tensor in\n\
    \ row major order.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\EOT\EOT\DC2\ETX.\STX\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\EOT\ENQ\DC2\ETX.\v\DLE\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\EOT\SOH\DC2\ETX.\DC1\EM\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\EOT\ETX\DC2\ETX.\FS\RS\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\EOT\b\DC2\ETX.\US.\n\
    \\r\n\
    \\ACK\EOT\NUL\STX\EOT\b\STX\DC2\ETX. -\n\
    \\CAN\n\
    \\EOT\EOT\NUL\STX\ENQ\DC2\ETX1\STX/\SUB\v DT_FLOAT.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ENQ\EOT\DC2\ETX1\STX\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ENQ\ENQ\DC2\ETX1\v\DLE\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ENQ\SOH\DC2\ETX1\DC1\SUB\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ENQ\ETX\DC2\ETX1\GS\RS\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ENQ\b\DC2\ETX1\US.\n\
    \\r\n\
    \\ACK\EOT\NUL\STX\ENQ\b\STX\DC2\ETX1 -\n\
    \\EM\n\
    \\EOT\EOT\NUL\STX\ACK\DC2\ETX4\STX1\SUB\f DT_DOUBLE.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ACK\EOT\DC2\ETX4\STX\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ACK\ENQ\DC2\ETX4\v\DC1\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ACK\SOH\DC2\ETX4\DC2\FS\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ACK\ETX\DC2\ETX4\US \n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ACK\b\DC2\ETX4!0\n\
    \\r\n\
    \\ACK\EOT\NUL\STX\ACK\b\STX\DC2\ETX4\"/\n\
    \5\n\
    \\EOT\EOT\NUL\STX\a\DC2\ETX7\STX-\SUB( DT_INT32, DT_INT16, DT_INT8, DT_UINT8.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\a\EOT\DC2\ETX7\STX\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\a\ENQ\DC2\ETX7\v\DLE\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\a\SOH\DC2\ETX7\DC1\CAN\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\a\ETX\DC2\ETX7\ESC\FS\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\a\b\DC2\ETX7\GS,\n\
    \\r\n\
    \\ACK\EOT\NUL\STX\a\b\STX\DC2\ETX7\RS+\n\
    \\CAN\n\
    \\EOT\EOT\NUL\STX\b\DC2\ETX:\STX \SUB\v DT_STRING\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\b\EOT\DC2\ETX:\STX\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\b\ENQ\DC2\ETX:\v\DLE\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\b\SOH\DC2\ETX:\DC1\ESC\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\b\ETX\DC2\ETX:\RS\US\n\
    \\134\SOH\n\
    \\EOT\EOT\NUL\STX\t\DC2\ETX>\STX2\SUBy DT_COMPLEX64. scomplex_val(2*i) and scomplex_val(2*i+1) are real\n\
    \ and imaginary parts of i-th single precision complex.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\t\EOT\DC2\ETX>\STX\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\t\ENQ\DC2\ETX>\v\DLE\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\t\SOH\DC2\ETX>\DC1\GS\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\t\ETX\DC2\ETX> !\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\t\b\DC2\ETX>\"1\n\
    \\r\n\
    \\ACK\EOT\NUL\STX\t\b\STX\DC2\ETX>#0\n\
    \\ETB\n\
    \\EOT\EOT\NUL\STX\n\
    \\DC2\ETXA\STX0\SUB\n\
    \ DT_INT64\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\n\
    \\EOT\DC2\ETXA\STX\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\n\
    \\ENQ\DC2\ETXA\v\DLE\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\n\
    \\SOH\DC2\ETXA\DC1\SUB\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\n\
    \\ETX\DC2\ETXA\GS\US\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\n\
    \\b\DC2\ETXA /\n\
    \\r\n\
    \\ACK\EOT\NUL\STX\n\
    \\b\STX\DC2\ETXA!.\n\
    \\SYN\n\
    \\EOT\EOT\NUL\STX\v\DC2\ETXD\STX.\SUB\t DT_BOOL\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\v\EOT\DC2\ETXD\STX\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\v\ENQ\DC2\ETXD\v\SI\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\v\SOH\DC2\ETXD\DLE\CAN\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\v\ETX\DC2\ETXD\ESC\GS\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\v\b\DC2\ETXD\RS-\n\
    \\r\n\
    \\ACK\EOT\NUL\STX\v\b\STX\DC2\ETXD\US,\n\
    \\135\SOH\n\
    \\EOT\EOT\NUL\STX\f\DC2\ETXH\STX4\SUBz DT_COMPLEX128. dcomplex_val(2*i) and dcomplex_val(2*i+1) are real\n\
    \ and imaginary parts of i-th double precision complex.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\f\EOT\DC2\ETXH\STX\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\f\ENQ\DC2\ETXH\v\DC1\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\f\SOH\DC2\ETXH\DC2\RS\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\f\ETX\DC2\ETXH!#\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\f\b\DC2\ETXH$3\n\
    \\r\n\
    \\ACK\EOT\NUL\STX\f\b\STX\DC2\ETXH%2\n\
    \\SUB\n\
    \\EOT\EOT\NUL\STX\r\DC2\ETXK\STX8\SUB\r DT_RESOURCE\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\r\EOT\DC2\ETXK\STX\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\r\ACK\DC2\ETXK\v\RS\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\r\SOH\DC2\ETXK\US2\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\r\ETX\DC2\ETXK57\n\
    \\EM\n\
    \\EOT\EOT\NUL\STX\SO\DC2\ETXN\STX3\SUB\f DT_VARIANT\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SO\EOT\DC2\ETXN\STX\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SO\ACK\DC2\ETXN\v!\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SO\SOH\DC2\ETXN\"-\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SO\ETX\DC2\ETXN02\n\
    \\CAN\n\
    \\EOT\EOT\NUL\STX\SI\DC2\ETXQ\STX2\SUB\v DT_UINT32\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SI\EOT\DC2\ETXQ\STX\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SI\ENQ\DC2\ETXQ\v\DC1\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SI\SOH\DC2\ETXQ\DC2\FS\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SI\ETX\DC2\ETXQ\US!\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SI\b\DC2\ETXQ\"1\n\
    \\r\n\
    \\ACK\EOT\NUL\STX\SI\b\STX\DC2\ETXQ#0\n\
    \\CAN\n\
    \\EOT\EOT\NUL\STX\DLE\DC2\ETXT\STX2\SUB\v DT_UINT64\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\DLE\EOT\DC2\ETXT\STX\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\DLE\ENQ\DC2\ETXT\v\DC1\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\DLE\SOH\DC2\ETXT\DC2\FS\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\DLE\ETX\DC2\ETXT\US!\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\DLE\b\DC2\ETXT\"1\n\
    \\r\n\
    \\ACK\EOT\NUL\STX\DLE\b\STX\DC2\ETXT#0\n\
    \Z\n\
    \\STX\EOT\SOH\DC2\EOTX\NUL_\SOH\SUBN Protocol buffer representing the serialization format of DT_VARIANT tensors.\n\
    \\n\
    \\n\
    \\n\
    \\ETX\EOT\SOH\SOH\DC2\ETXX\b\RS\n\
    \<\n\
    \\EOT\EOT\SOH\STX\NUL\DC2\ETXZ\STX\ETB\SUB/ Name of the type of objects being serialized.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\NUL\ENQ\DC2\ETXZ\STX\b\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\NUL\SOH\DC2\ETXZ\t\DC2\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\NUL\ETX\DC2\ETXZ\NAK\SYN\n\
    \;\n\
    \\EOT\EOT\SOH\STX\SOH\DC2\ETX\\\STX\NAK\SUB. Portions of the object that are not Tensors.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\SOH\ENQ\DC2\ETX\\\STX\a\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\SOH\SOH\DC2\ETX\\\b\DLE\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\SOH\ETX\DC2\ETX\\\DC3\DC4\n\
    \A\n\
    \\EOT\EOT\SOH\STX\STX\DC2\ETX^\STX#\SUB4 Tensors contained within objects being serialized.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\STX\EOT\DC2\ETX^\STX\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\STX\ACK\DC2\ETX^\v\SYN\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\STX\SOH\DC2\ETX^\ETB\RS\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\STX\ETX\DC2\ETX^!\"b\ACKproto3"