{-# 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.Variable (
SaveSliceInfoDef(), VariableAggregation(..), VariableAggregation(),
VariableAggregation'UnrecognizedValue, VariableDef(),
VariableSynchronization(..), VariableSynchronization(),
VariableSynchronization'UnrecognizedValue
) 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
data SaveSliceInfoDef
= SaveSliceInfoDef'_constructor {SaveSliceInfoDef -> Text
_SaveSliceInfoDef'fullName :: !Data.Text.Text,
SaveSliceInfoDef -> Vector Int64
_SaveSliceInfoDef'fullShape :: !(Data.Vector.Unboxed.Vector Data.Int.Int64),
SaveSliceInfoDef -> Vector Int64
_SaveSliceInfoDef'varOffset :: !(Data.Vector.Unboxed.Vector Data.Int.Int64),
SaveSliceInfoDef -> Vector Int64
_SaveSliceInfoDef'varShape :: !(Data.Vector.Unboxed.Vector Data.Int.Int64),
SaveSliceInfoDef -> FieldSet
_SaveSliceInfoDef'_unknownFields :: !Data.ProtoLens.FieldSet}
deriving stock (SaveSliceInfoDef -> SaveSliceInfoDef -> Bool
(SaveSliceInfoDef -> SaveSliceInfoDef -> Bool)
-> (SaveSliceInfoDef -> SaveSliceInfoDef -> Bool)
-> Eq SaveSliceInfoDef
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: SaveSliceInfoDef -> SaveSliceInfoDef -> Bool
$c/= :: SaveSliceInfoDef -> SaveSliceInfoDef -> Bool
== :: SaveSliceInfoDef -> SaveSliceInfoDef -> Bool
$c== :: SaveSliceInfoDef -> SaveSliceInfoDef -> Bool
Prelude.Eq, Eq SaveSliceInfoDef
Eq SaveSliceInfoDef =>
(SaveSliceInfoDef -> SaveSliceInfoDef -> Ordering)
-> (SaveSliceInfoDef -> SaveSliceInfoDef -> Bool)
-> (SaveSliceInfoDef -> SaveSliceInfoDef -> Bool)
-> (SaveSliceInfoDef -> SaveSliceInfoDef -> Bool)
-> (SaveSliceInfoDef -> SaveSliceInfoDef -> Bool)
-> (SaveSliceInfoDef -> SaveSliceInfoDef -> SaveSliceInfoDef)
-> (SaveSliceInfoDef -> SaveSliceInfoDef -> SaveSliceInfoDef)
-> Ord SaveSliceInfoDef
SaveSliceInfoDef -> SaveSliceInfoDef -> Bool
SaveSliceInfoDef -> SaveSliceInfoDef -> Ordering
SaveSliceInfoDef -> SaveSliceInfoDef -> SaveSliceInfoDef
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 :: SaveSliceInfoDef -> SaveSliceInfoDef -> SaveSliceInfoDef
$cmin :: SaveSliceInfoDef -> SaveSliceInfoDef -> SaveSliceInfoDef
max :: SaveSliceInfoDef -> SaveSliceInfoDef -> SaveSliceInfoDef
$cmax :: SaveSliceInfoDef -> SaveSliceInfoDef -> SaveSliceInfoDef
>= :: SaveSliceInfoDef -> SaveSliceInfoDef -> Bool
$c>= :: SaveSliceInfoDef -> SaveSliceInfoDef -> Bool
> :: SaveSliceInfoDef -> SaveSliceInfoDef -> Bool
$c> :: SaveSliceInfoDef -> SaveSliceInfoDef -> Bool
<= :: SaveSliceInfoDef -> SaveSliceInfoDef -> Bool
$c<= :: SaveSliceInfoDef -> SaveSliceInfoDef -> Bool
< :: SaveSliceInfoDef -> SaveSliceInfoDef -> Bool
$c< :: SaveSliceInfoDef -> SaveSliceInfoDef -> Bool
compare :: SaveSliceInfoDef -> SaveSliceInfoDef -> Ordering
$ccompare :: SaveSliceInfoDef -> SaveSliceInfoDef -> Ordering
$cp1Ord :: Eq SaveSliceInfoDef
Prelude.Ord)
instance Prelude.Show SaveSliceInfoDef where
showsPrec :: Int -> SaveSliceInfoDef -> ShowS
showsPrec _ __x :: SaveSliceInfoDef
__x __s :: String
__s
= Char -> ShowS
Prelude.showChar
'{'
(String -> ShowS
Prelude.showString
(SaveSliceInfoDef -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort SaveSliceInfoDef
__x) (Char -> ShowS
Prelude.showChar '}' String
__s))
instance Data.ProtoLens.Field.HasField SaveSliceInfoDef "fullName" Data.Text.Text where
fieldOf :: Proxy# "fullName"
-> (Text -> f Text) -> SaveSliceInfoDef -> f SaveSliceInfoDef
fieldOf _
= ((Text -> f Text) -> SaveSliceInfoDef -> f SaveSliceInfoDef)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> SaveSliceInfoDef
-> f SaveSliceInfoDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((SaveSliceInfoDef -> Text)
-> (SaveSliceInfoDef -> Text -> SaveSliceInfoDef)
-> Lens SaveSliceInfoDef SaveSliceInfoDef Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
SaveSliceInfoDef -> Text
_SaveSliceInfoDef'fullName
(\ x__ :: SaveSliceInfoDef
x__ y__ :: Text
y__ -> SaveSliceInfoDef
x__ {_SaveSliceInfoDef'fullName :: Text
_SaveSliceInfoDef'fullName = Text
y__}))
(Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SaveSliceInfoDef "fullShape" [Data.Int.Int64] where
fieldOf :: Proxy# "fullShape"
-> ([Int64] -> f [Int64]) -> SaveSliceInfoDef -> f SaveSliceInfoDef
fieldOf _
= ((Vector Int64 -> f (Vector Int64))
-> SaveSliceInfoDef -> f SaveSliceInfoDef)
-> (([Int64] -> f [Int64]) -> Vector Int64 -> f (Vector Int64))
-> ([Int64] -> f [Int64])
-> SaveSliceInfoDef
-> f SaveSliceInfoDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((SaveSliceInfoDef -> Vector Int64)
-> (SaveSliceInfoDef -> Vector Int64 -> SaveSliceInfoDef)
-> Lens
SaveSliceInfoDef SaveSliceInfoDef (Vector Int64) (Vector Int64)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
SaveSliceInfoDef -> Vector Int64
_SaveSliceInfoDef'fullShape
(\ x__ :: SaveSliceInfoDef
x__ y__ :: Vector Int64
y__ -> SaveSliceInfoDef
x__ {_SaveSliceInfoDef'fullShape :: Vector Int64
_SaveSliceInfoDef'fullShape = 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 SaveSliceInfoDef "vec'fullShape" (Data.Vector.Unboxed.Vector Data.Int.Int64) where
fieldOf :: Proxy# "vec'fullShape"
-> (Vector Int64 -> f (Vector Int64))
-> SaveSliceInfoDef
-> f SaveSliceInfoDef
fieldOf _
= ((Vector Int64 -> f (Vector Int64))
-> SaveSliceInfoDef -> f SaveSliceInfoDef)
-> ((Vector Int64 -> f (Vector Int64))
-> Vector Int64 -> f (Vector Int64))
-> (Vector Int64 -> f (Vector Int64))
-> SaveSliceInfoDef
-> f SaveSliceInfoDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((SaveSliceInfoDef -> Vector Int64)
-> (SaveSliceInfoDef -> Vector Int64 -> SaveSliceInfoDef)
-> Lens
SaveSliceInfoDef SaveSliceInfoDef (Vector Int64) (Vector Int64)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
SaveSliceInfoDef -> Vector Int64
_SaveSliceInfoDef'fullShape
(\ x__ :: SaveSliceInfoDef
x__ y__ :: Vector Int64
y__ -> SaveSliceInfoDef
x__ {_SaveSliceInfoDef'fullShape :: Vector Int64
_SaveSliceInfoDef'fullShape = Vector Int64
y__}))
(Vector Int64 -> f (Vector Int64))
-> Vector Int64 -> f (Vector Int64)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SaveSliceInfoDef "varOffset" [Data.Int.Int64] where
fieldOf :: Proxy# "varOffset"
-> ([Int64] -> f [Int64]) -> SaveSliceInfoDef -> f SaveSliceInfoDef
fieldOf _
= ((Vector Int64 -> f (Vector Int64))
-> SaveSliceInfoDef -> f SaveSliceInfoDef)
-> (([Int64] -> f [Int64]) -> Vector Int64 -> f (Vector Int64))
-> ([Int64] -> f [Int64])
-> SaveSliceInfoDef
-> f SaveSliceInfoDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((SaveSliceInfoDef -> Vector Int64)
-> (SaveSliceInfoDef -> Vector Int64 -> SaveSliceInfoDef)
-> Lens
SaveSliceInfoDef SaveSliceInfoDef (Vector Int64) (Vector Int64)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
SaveSliceInfoDef -> Vector Int64
_SaveSliceInfoDef'varOffset
(\ x__ :: SaveSliceInfoDef
x__ y__ :: Vector Int64
y__ -> SaveSliceInfoDef
x__ {_SaveSliceInfoDef'varOffset :: Vector Int64
_SaveSliceInfoDef'varOffset = 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 SaveSliceInfoDef "vec'varOffset" (Data.Vector.Unboxed.Vector Data.Int.Int64) where
fieldOf :: Proxy# "vec'varOffset"
-> (Vector Int64 -> f (Vector Int64))
-> SaveSliceInfoDef
-> f SaveSliceInfoDef
fieldOf _
= ((Vector Int64 -> f (Vector Int64))
-> SaveSliceInfoDef -> f SaveSliceInfoDef)
-> ((Vector Int64 -> f (Vector Int64))
-> Vector Int64 -> f (Vector Int64))
-> (Vector Int64 -> f (Vector Int64))
-> SaveSliceInfoDef
-> f SaveSliceInfoDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((SaveSliceInfoDef -> Vector Int64)
-> (SaveSliceInfoDef -> Vector Int64 -> SaveSliceInfoDef)
-> Lens
SaveSliceInfoDef SaveSliceInfoDef (Vector Int64) (Vector Int64)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
SaveSliceInfoDef -> Vector Int64
_SaveSliceInfoDef'varOffset
(\ x__ :: SaveSliceInfoDef
x__ y__ :: Vector Int64
y__ -> SaveSliceInfoDef
x__ {_SaveSliceInfoDef'varOffset :: Vector Int64
_SaveSliceInfoDef'varOffset = Vector Int64
y__}))
(Vector Int64 -> f (Vector Int64))
-> Vector Int64 -> f (Vector Int64)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SaveSliceInfoDef "varShape" [Data.Int.Int64] where
fieldOf :: Proxy# "varShape"
-> ([Int64] -> f [Int64]) -> SaveSliceInfoDef -> f SaveSliceInfoDef
fieldOf _
= ((Vector Int64 -> f (Vector Int64))
-> SaveSliceInfoDef -> f SaveSliceInfoDef)
-> (([Int64] -> f [Int64]) -> Vector Int64 -> f (Vector Int64))
-> ([Int64] -> f [Int64])
-> SaveSliceInfoDef
-> f SaveSliceInfoDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((SaveSliceInfoDef -> Vector Int64)
-> (SaveSliceInfoDef -> Vector Int64 -> SaveSliceInfoDef)
-> Lens
SaveSliceInfoDef SaveSliceInfoDef (Vector Int64) (Vector Int64)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
SaveSliceInfoDef -> Vector Int64
_SaveSliceInfoDef'varShape
(\ x__ :: SaveSliceInfoDef
x__ y__ :: Vector Int64
y__ -> SaveSliceInfoDef
x__ {_SaveSliceInfoDef'varShape :: Vector Int64
_SaveSliceInfoDef'varShape = 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 SaveSliceInfoDef "vec'varShape" (Data.Vector.Unboxed.Vector Data.Int.Int64) where
fieldOf :: Proxy# "vec'varShape"
-> (Vector Int64 -> f (Vector Int64))
-> SaveSliceInfoDef
-> f SaveSliceInfoDef
fieldOf _
= ((Vector Int64 -> f (Vector Int64))
-> SaveSliceInfoDef -> f SaveSliceInfoDef)
-> ((Vector Int64 -> f (Vector Int64))
-> Vector Int64 -> f (Vector Int64))
-> (Vector Int64 -> f (Vector Int64))
-> SaveSliceInfoDef
-> f SaveSliceInfoDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((SaveSliceInfoDef -> Vector Int64)
-> (SaveSliceInfoDef -> Vector Int64 -> SaveSliceInfoDef)
-> Lens
SaveSliceInfoDef SaveSliceInfoDef (Vector Int64) (Vector Int64)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
SaveSliceInfoDef -> Vector Int64
_SaveSliceInfoDef'varShape
(\ x__ :: SaveSliceInfoDef
x__ y__ :: Vector Int64
y__ -> SaveSliceInfoDef
x__ {_SaveSliceInfoDef'varShape :: Vector Int64
_SaveSliceInfoDef'varShape = Vector Int64
y__}))
(Vector Int64 -> f (Vector Int64))
-> Vector Int64 -> f (Vector Int64)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message SaveSliceInfoDef where
messageName :: Proxy SaveSliceInfoDef -> Text
messageName _ = String -> Text
Data.Text.pack "tensorflow.SaveSliceInfoDef"
packedMessageDescriptor :: Proxy SaveSliceInfoDef -> ByteString
packedMessageDescriptor _
= "\n\
\\DLESaveSliceInfoDef\DC2\ESC\n\
\\tfull_name\CAN\SOH \SOH(\tR\bfullName\DC2\GS\n\
\\n\
\full_shape\CAN\STX \ETX(\ETXR\tfullShape\DC2\GS\n\
\\n\
\var_offset\CAN\ETX \ETX(\ETXR\tvarOffset\DC2\ESC\n\
\\tvar_shape\CAN\EOT \ETX(\ETXR\bvarShape"
packedFileDescriptor :: Proxy SaveSliceInfoDef -> ByteString
packedFileDescriptor _ = ByteString
packedFileDescriptor
fieldsByTag :: Map Tag (FieldDescriptor SaveSliceInfoDef)
fieldsByTag
= let
fullName__field_descriptor :: FieldDescriptor SaveSliceInfoDef
fullName__field_descriptor
= String
-> FieldTypeDescriptor Text
-> FieldAccessor SaveSliceInfoDef Text
-> FieldDescriptor SaveSliceInfoDef
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
"full_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 SaveSliceInfoDef SaveSliceInfoDef Text Text
-> FieldAccessor SaveSliceInfoDef 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 "fullName" 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 @"fullName")) ::
Data.ProtoLens.FieldDescriptor SaveSliceInfoDef
fullShape__field_descriptor :: FieldDescriptor SaveSliceInfoDef
fullShape__field_descriptor
= String
-> FieldTypeDescriptor Int64
-> FieldAccessor SaveSliceInfoDef Int64
-> FieldDescriptor SaveSliceInfoDef
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
"full_shape"
(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' SaveSliceInfoDef [Int64]
-> FieldAccessor SaveSliceInfoDef Int64
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
Packing
Data.ProtoLens.Packed (forall s a (f :: * -> *).
(HasField s "fullShape" 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 @"fullShape")) ::
Data.ProtoLens.FieldDescriptor SaveSliceInfoDef
varOffset__field_descriptor :: FieldDescriptor SaveSliceInfoDef
varOffset__field_descriptor
= String
-> FieldTypeDescriptor Int64
-> FieldAccessor SaveSliceInfoDef Int64
-> FieldDescriptor SaveSliceInfoDef
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
"var_offset"
(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' SaveSliceInfoDef [Int64]
-> FieldAccessor SaveSliceInfoDef Int64
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
Packing
Data.ProtoLens.Packed (forall s a (f :: * -> *).
(HasField s "varOffset" 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 @"varOffset")) ::
Data.ProtoLens.FieldDescriptor SaveSliceInfoDef
varShape__field_descriptor :: FieldDescriptor SaveSliceInfoDef
varShape__field_descriptor
= String
-> FieldTypeDescriptor Int64
-> FieldAccessor SaveSliceInfoDef Int64
-> FieldDescriptor SaveSliceInfoDef
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
"var_shape"
(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' SaveSliceInfoDef [Int64]
-> FieldAccessor SaveSliceInfoDef Int64
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
Packing
Data.ProtoLens.Packed (forall s a (f :: * -> *).
(HasField s "varShape" 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 @"varShape")) ::
Data.ProtoLens.FieldDescriptor SaveSliceInfoDef
in
[(Tag, FieldDescriptor SaveSliceInfoDef)]
-> Map Tag (FieldDescriptor SaveSliceInfoDef)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
[(Int -> Tag
Data.ProtoLens.Tag 1, FieldDescriptor SaveSliceInfoDef
fullName__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag 2, FieldDescriptor SaveSliceInfoDef
fullShape__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag 3, FieldDescriptor SaveSliceInfoDef
varOffset__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag 4, FieldDescriptor SaveSliceInfoDef
varShape__field_descriptor)]
unknownFields :: LensLike' f SaveSliceInfoDef FieldSet
unknownFields
= (SaveSliceInfoDef -> FieldSet)
-> (SaveSliceInfoDef -> FieldSet -> SaveSliceInfoDef)
-> Lens' SaveSliceInfoDef FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
SaveSliceInfoDef -> FieldSet
_SaveSliceInfoDef'_unknownFields
(\ x__ :: SaveSliceInfoDef
x__ y__ :: FieldSet
y__ -> SaveSliceInfoDef
x__ {_SaveSliceInfoDef'_unknownFields :: FieldSet
_SaveSliceInfoDef'_unknownFields = FieldSet
y__})
defMessage :: SaveSliceInfoDef
defMessage
= $WSaveSliceInfoDef'_constructor :: Text
-> Vector Int64
-> Vector Int64
-> Vector Int64
-> FieldSet
-> SaveSliceInfoDef
SaveSliceInfoDef'_constructor
{_SaveSliceInfoDef'fullName :: Text
_SaveSliceInfoDef'fullName = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_SaveSliceInfoDef'fullShape :: Vector Int64
_SaveSliceInfoDef'fullShape = Vector Int64
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
_SaveSliceInfoDef'varOffset :: Vector Int64
_SaveSliceInfoDef'varOffset = Vector Int64
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
_SaveSliceInfoDef'varShape :: Vector Int64
_SaveSliceInfoDef'varShape = Vector Int64
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
_SaveSliceInfoDef'_unknownFields :: FieldSet
_SaveSliceInfoDef'_unknownFields = []}
parseMessage :: Parser SaveSliceInfoDef
parseMessage
= let
loop ::
SaveSliceInfoDef
-> 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.Int64
-> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Int.Int64
-> Data.ProtoLens.Encoding.Bytes.Parser SaveSliceInfoDef
loop :: SaveSliceInfoDef
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int64
-> Parser SaveSliceInfoDef
loop x :: SaveSliceInfoDef
x mutable'fullShape :: Growing Vector RealWorld Int64
mutable'fullShape mutable'varOffset :: Growing Vector RealWorld Int64
mutable'varOffset mutable'varShape :: Growing Vector RealWorld Int64
mutable'varShape
= do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
if Bool
end then
do Vector Int64
frozen'fullShape <- 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'fullShape)
Vector Int64
frozen'varOffset <- 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'varOffset)
Vector Int64
frozen'varShape <- 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'varShape)
(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]))))
SaveSliceInfoDef -> Parser SaveSliceInfoDef
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
(Setter SaveSliceInfoDef SaveSliceInfoDef FieldSet FieldSet
-> (FieldSet -> FieldSet) -> SaveSliceInfoDef -> SaveSliceInfoDef
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 SaveSliceInfoDef SaveSliceInfoDef FieldSet FieldSet
Data.ProtoLens.unknownFields
(\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t)
(Setter
SaveSliceInfoDef SaveSliceInfoDef (Vector Int64) (Vector Int64)
-> Vector Int64 -> SaveSliceInfoDef -> SaveSliceInfoDef
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
(forall s a (f :: * -> *).
(HasField s "vec'fullShape" 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'fullShape")
Vector Int64
frozen'fullShape
(Setter
SaveSliceInfoDef SaveSliceInfoDef (Vector Int64) (Vector Int64)
-> Vector Int64 -> SaveSliceInfoDef -> SaveSliceInfoDef
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
(forall s a (f :: * -> *).
(HasField s "vec'varOffset" 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'varOffset")
Vector Int64
frozen'varOffset
(Setter
SaveSliceInfoDef SaveSliceInfoDef (Vector Int64) (Vector Int64)
-> Vector Int64 -> SaveSliceInfoDef -> SaveSliceInfoDef
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
(forall s a (f :: * -> *).
(HasField s "vec'varShape" 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'varShape")
Vector Int64
frozen'varShape
SaveSliceInfoDef
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))
"full_name"
SaveSliceInfoDef
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int64
-> Parser SaveSliceInfoDef
loop
(Setter SaveSliceInfoDef SaveSliceInfoDef Text Text
-> Text -> SaveSliceInfoDef -> SaveSliceInfoDef
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "fullName" 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 @"fullName") Text
y SaveSliceInfoDef
x)
Growing Vector RealWorld Int64
mutable'fullShape
Growing Vector RealWorld Int64
mutable'varOffset
Growing Vector RealWorld Int64
mutable'varShape
16
-> 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)
"full_shape"
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'fullShape Int64
y)
SaveSliceInfoDef
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int64
-> Parser SaveSliceInfoDef
loop SaveSliceInfoDef
x Growing Vector RealWorld Int64
v Growing Vector RealWorld Int64
mutable'varOffset Growing Vector RealWorld Int64
mutable'varShape
18
-> 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)
"full_shape"
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'fullShape)
SaveSliceInfoDef
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int64
-> Parser SaveSliceInfoDef
loop SaveSliceInfoDef
x Growing Vector RealWorld Int64
y Growing Vector RealWorld Int64
mutable'varOffset Growing Vector RealWorld Int64
mutable'varShape
24
-> 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)
"var_offset"
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'varOffset Int64
y)
SaveSliceInfoDef
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int64
-> Parser SaveSliceInfoDef
loop SaveSliceInfoDef
x Growing Vector RealWorld Int64
mutable'fullShape Growing Vector RealWorld Int64
v Growing Vector RealWorld Int64
mutable'varShape
26
-> 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)
"var_offset"
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'varOffset)
SaveSliceInfoDef
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int64
-> Parser SaveSliceInfoDef
loop SaveSliceInfoDef
x Growing Vector RealWorld Int64
mutable'fullShape Growing Vector RealWorld Int64
y Growing Vector RealWorld Int64
mutable'varShape
32
-> 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)
"var_shape"
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'varShape Int64
y)
SaveSliceInfoDef
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int64
-> Parser SaveSliceInfoDef
loop SaveSliceInfoDef
x Growing Vector RealWorld Int64
mutable'fullShape Growing Vector RealWorld Int64
mutable'varOffset Growing Vector RealWorld Int64
v
34
-> 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)
"var_shape"
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'varShape)
SaveSliceInfoDef
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int64
-> Parser SaveSliceInfoDef
loop SaveSliceInfoDef
x Growing Vector RealWorld Int64
mutable'fullShape Growing Vector RealWorld Int64
mutable'varOffset Growing Vector RealWorld Int64
y
wire :: Word64
wire
-> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
Word64
wire
SaveSliceInfoDef
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int64
-> Parser SaveSliceInfoDef
loop
(Setter SaveSliceInfoDef SaveSliceInfoDef FieldSet FieldSet
-> (FieldSet -> FieldSet) -> SaveSliceInfoDef -> SaveSliceInfoDef
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 SaveSliceInfoDef SaveSliceInfoDef FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) SaveSliceInfoDef
x)
Growing Vector RealWorld Int64
mutable'fullShape
Growing Vector RealWorld Int64
mutable'varOffset
Growing Vector RealWorld Int64
mutable'varShape
in
Parser SaveSliceInfoDef -> String -> Parser SaveSliceInfoDef
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do Growing Vector RealWorld Int64
mutable'fullShape <- 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 Int64
mutable'varOffset <- 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 Int64
mutable'varShape <- 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
SaveSliceInfoDef
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int64
-> Growing Vector RealWorld Int64
-> Parser SaveSliceInfoDef
loop
SaveSliceInfoDef
forall msg. Message msg => msg
Data.ProtoLens.defMessage
Growing Vector RealWorld Int64
mutable'fullShape
Growing Vector RealWorld Int64
mutable'varOffset
Growing Vector RealWorld Int64
mutable'varShape)
"SaveSliceInfoDef"
buildMessage :: SaveSliceInfoDef -> Builder
buildMessage
= \ _x :: SaveSliceInfoDef
_x
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Text
_v = FoldLike Text SaveSliceInfoDef SaveSliceInfoDef Text Text
-> SaveSliceInfoDef -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "fullName" 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 @"fullName") SaveSliceInfoDef
_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
p :: Vector Int64
p = FoldLike
(Vector Int64)
SaveSliceInfoDef
SaveSliceInfoDef
(Vector Int64)
(Vector Int64)
-> SaveSliceInfoDef -> 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'fullShape" 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'fullShape") SaveSliceInfoDef
_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 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))
(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 Int64
p = FoldLike
(Vector Int64)
SaveSliceInfoDef
SaveSliceInfoDef
(Vector Int64)
(Vector Int64)
-> SaveSliceInfoDef -> 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'varOffset" 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'varOffset") SaveSliceInfoDef
_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 26)
((\ 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 Int64
p = FoldLike
(Vector Int64)
SaveSliceInfoDef
SaveSliceInfoDef
(Vector Int64)
(Vector Int64)
-> SaveSliceInfoDef -> 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'varShape" 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'varShape") SaveSliceInfoDef
_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 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))
(Builder -> ByteString
Data.ProtoLens.Encoding.Bytes.runBuilder
((Int64 -> Builder) -> Vector Int64 -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
((Word64 -> Builder) -> (Int64 -> Word64) -> Int64 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
Int64 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral)
Vector Int64
p))))
(FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
(FoldLike
FieldSet SaveSliceInfoDef SaveSliceInfoDef FieldSet FieldSet
-> SaveSliceInfoDef -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
FieldSet SaveSliceInfoDef SaveSliceInfoDef FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields SaveSliceInfoDef
_x)))))
instance Control.DeepSeq.NFData SaveSliceInfoDef where
rnf :: SaveSliceInfoDef -> ()
rnf
= \ x__ :: SaveSliceInfoDef
x__
-> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(SaveSliceInfoDef -> FieldSet
_SaveSliceInfoDef'_unknownFields SaveSliceInfoDef
x__)
(Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(SaveSliceInfoDef -> Text
_SaveSliceInfoDef'fullName SaveSliceInfoDef
x__)
(Vector Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(SaveSliceInfoDef -> Vector Int64
_SaveSliceInfoDef'fullShape SaveSliceInfoDef
x__)
(Vector Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(SaveSliceInfoDef -> Vector Int64
_SaveSliceInfoDef'varOffset SaveSliceInfoDef
x__)
(Vector Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (SaveSliceInfoDef -> Vector Int64
_SaveSliceInfoDef'varShape SaveSliceInfoDef
x__) ()))))
newtype VariableAggregation'UnrecognizedValue
= VariableAggregation'UnrecognizedValue Data.Int.Int32
deriving stock (VariableAggregation'UnrecognizedValue
-> VariableAggregation'UnrecognizedValue -> Bool
(VariableAggregation'UnrecognizedValue
-> VariableAggregation'UnrecognizedValue -> Bool)
-> (VariableAggregation'UnrecognizedValue
-> VariableAggregation'UnrecognizedValue -> Bool)
-> Eq VariableAggregation'UnrecognizedValue
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: VariableAggregation'UnrecognizedValue
-> VariableAggregation'UnrecognizedValue -> Bool
$c/= :: VariableAggregation'UnrecognizedValue
-> VariableAggregation'UnrecognizedValue -> Bool
== :: VariableAggregation'UnrecognizedValue
-> VariableAggregation'UnrecognizedValue -> Bool
$c== :: VariableAggregation'UnrecognizedValue
-> VariableAggregation'UnrecognizedValue -> Bool
Prelude.Eq, Eq VariableAggregation'UnrecognizedValue
Eq VariableAggregation'UnrecognizedValue =>
(VariableAggregation'UnrecognizedValue
-> VariableAggregation'UnrecognizedValue -> Ordering)
-> (VariableAggregation'UnrecognizedValue
-> VariableAggregation'UnrecognizedValue -> Bool)
-> (VariableAggregation'UnrecognizedValue
-> VariableAggregation'UnrecognizedValue -> Bool)
-> (VariableAggregation'UnrecognizedValue
-> VariableAggregation'UnrecognizedValue -> Bool)
-> (VariableAggregation'UnrecognizedValue
-> VariableAggregation'UnrecognizedValue -> Bool)
-> (VariableAggregation'UnrecognizedValue
-> VariableAggregation'UnrecognizedValue
-> VariableAggregation'UnrecognizedValue)
-> (VariableAggregation'UnrecognizedValue
-> VariableAggregation'UnrecognizedValue
-> VariableAggregation'UnrecognizedValue)
-> Ord VariableAggregation'UnrecognizedValue
VariableAggregation'UnrecognizedValue
-> VariableAggregation'UnrecognizedValue -> Bool
VariableAggregation'UnrecognizedValue
-> VariableAggregation'UnrecognizedValue -> Ordering
VariableAggregation'UnrecognizedValue
-> VariableAggregation'UnrecognizedValue
-> VariableAggregation'UnrecognizedValue
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 :: VariableAggregation'UnrecognizedValue
-> VariableAggregation'UnrecognizedValue
-> VariableAggregation'UnrecognizedValue
$cmin :: VariableAggregation'UnrecognizedValue
-> VariableAggregation'UnrecognizedValue
-> VariableAggregation'UnrecognizedValue
max :: VariableAggregation'UnrecognizedValue
-> VariableAggregation'UnrecognizedValue
-> VariableAggregation'UnrecognizedValue
$cmax :: VariableAggregation'UnrecognizedValue
-> VariableAggregation'UnrecognizedValue
-> VariableAggregation'UnrecognizedValue
>= :: VariableAggregation'UnrecognizedValue
-> VariableAggregation'UnrecognizedValue -> Bool
$c>= :: VariableAggregation'UnrecognizedValue
-> VariableAggregation'UnrecognizedValue -> Bool
> :: VariableAggregation'UnrecognizedValue
-> VariableAggregation'UnrecognizedValue -> Bool
$c> :: VariableAggregation'UnrecognizedValue
-> VariableAggregation'UnrecognizedValue -> Bool
<= :: VariableAggregation'UnrecognizedValue
-> VariableAggregation'UnrecognizedValue -> Bool
$c<= :: VariableAggregation'UnrecognizedValue
-> VariableAggregation'UnrecognizedValue -> Bool
< :: VariableAggregation'UnrecognizedValue
-> VariableAggregation'UnrecognizedValue -> Bool
$c< :: VariableAggregation'UnrecognizedValue
-> VariableAggregation'UnrecognizedValue -> Bool
compare :: VariableAggregation'UnrecognizedValue
-> VariableAggregation'UnrecognizedValue -> Ordering
$ccompare :: VariableAggregation'UnrecognizedValue
-> VariableAggregation'UnrecognizedValue -> Ordering
$cp1Ord :: Eq VariableAggregation'UnrecognizedValue
Prelude.Ord, Int -> VariableAggregation'UnrecognizedValue -> ShowS
[VariableAggregation'UnrecognizedValue] -> ShowS
VariableAggregation'UnrecognizedValue -> String
(Int -> VariableAggregation'UnrecognizedValue -> ShowS)
-> (VariableAggregation'UnrecognizedValue -> String)
-> ([VariableAggregation'UnrecognizedValue] -> ShowS)
-> Show VariableAggregation'UnrecognizedValue
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [VariableAggregation'UnrecognizedValue] -> ShowS
$cshowList :: [VariableAggregation'UnrecognizedValue] -> ShowS
show :: VariableAggregation'UnrecognizedValue -> String
$cshow :: VariableAggregation'UnrecognizedValue -> String
showsPrec :: Int -> VariableAggregation'UnrecognizedValue -> ShowS
$cshowsPrec :: Int -> VariableAggregation'UnrecognizedValue -> ShowS
Prelude.Show)
data VariableAggregation
= VARIABLE_AGGREGATION_NONE |
VARIABLE_AGGREGATION_SUM |
VARIABLE_AGGREGATION_MEAN |
VARIABLE_AGGREGATION_ONLY_FIRST_REPLICA |
VariableAggregation'Unrecognized !VariableAggregation'UnrecognizedValue
deriving stock (Int -> VariableAggregation -> ShowS
[VariableAggregation] -> ShowS
VariableAggregation -> String
(Int -> VariableAggregation -> ShowS)
-> (VariableAggregation -> String)
-> ([VariableAggregation] -> ShowS)
-> Show VariableAggregation
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [VariableAggregation] -> ShowS
$cshowList :: [VariableAggregation] -> ShowS
show :: VariableAggregation -> String
$cshow :: VariableAggregation -> String
showsPrec :: Int -> VariableAggregation -> ShowS
$cshowsPrec :: Int -> VariableAggregation -> ShowS
Prelude.Show, VariableAggregation -> VariableAggregation -> Bool
(VariableAggregation -> VariableAggregation -> Bool)
-> (VariableAggregation -> VariableAggregation -> Bool)
-> Eq VariableAggregation
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: VariableAggregation -> VariableAggregation -> Bool
$c/= :: VariableAggregation -> VariableAggregation -> Bool
== :: VariableAggregation -> VariableAggregation -> Bool
$c== :: VariableAggregation -> VariableAggregation -> Bool
Prelude.Eq, Eq VariableAggregation
Eq VariableAggregation =>
(VariableAggregation -> VariableAggregation -> Ordering)
-> (VariableAggregation -> VariableAggregation -> Bool)
-> (VariableAggregation -> VariableAggregation -> Bool)
-> (VariableAggregation -> VariableAggregation -> Bool)
-> (VariableAggregation -> VariableAggregation -> Bool)
-> (VariableAggregation
-> VariableAggregation -> VariableAggregation)
-> (VariableAggregation
-> VariableAggregation -> VariableAggregation)
-> Ord VariableAggregation
VariableAggregation -> VariableAggregation -> Bool
VariableAggregation -> VariableAggregation -> Ordering
VariableAggregation -> VariableAggregation -> VariableAggregation
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 :: VariableAggregation -> VariableAggregation -> VariableAggregation
$cmin :: VariableAggregation -> VariableAggregation -> VariableAggregation
max :: VariableAggregation -> VariableAggregation -> VariableAggregation
$cmax :: VariableAggregation -> VariableAggregation -> VariableAggregation
>= :: VariableAggregation -> VariableAggregation -> Bool
$c>= :: VariableAggregation -> VariableAggregation -> Bool
> :: VariableAggregation -> VariableAggregation -> Bool
$c> :: VariableAggregation -> VariableAggregation -> Bool
<= :: VariableAggregation -> VariableAggregation -> Bool
$c<= :: VariableAggregation -> VariableAggregation -> Bool
< :: VariableAggregation -> VariableAggregation -> Bool
$c< :: VariableAggregation -> VariableAggregation -> Bool
compare :: VariableAggregation -> VariableAggregation -> Ordering
$ccompare :: VariableAggregation -> VariableAggregation -> Ordering
$cp1Ord :: Eq VariableAggregation
Prelude.Ord)
instance Data.ProtoLens.MessageEnum VariableAggregation where
maybeToEnum :: Int -> Maybe VariableAggregation
maybeToEnum 0 = VariableAggregation -> Maybe VariableAggregation
forall a. a -> Maybe a
Prelude.Just VariableAggregation
VARIABLE_AGGREGATION_NONE
maybeToEnum 1 = VariableAggregation -> Maybe VariableAggregation
forall a. a -> Maybe a
Prelude.Just VariableAggregation
VARIABLE_AGGREGATION_SUM
maybeToEnum 2 = VariableAggregation -> Maybe VariableAggregation
forall a. a -> Maybe a
Prelude.Just VariableAggregation
VARIABLE_AGGREGATION_MEAN
maybeToEnum 3
= VariableAggregation -> Maybe VariableAggregation
forall a. a -> Maybe a
Prelude.Just VariableAggregation
VARIABLE_AGGREGATION_ONLY_FIRST_REPLICA
maybeToEnum k :: Int
k
= VariableAggregation -> Maybe VariableAggregation
forall a. a -> Maybe a
Prelude.Just
(VariableAggregation'UnrecognizedValue -> VariableAggregation
VariableAggregation'Unrecognized
(Int32 -> VariableAggregation'UnrecognizedValue
VariableAggregation'UnrecognizedValue (Int -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int
k)))
showEnum :: VariableAggregation -> String
showEnum VARIABLE_AGGREGATION_NONE = "VARIABLE_AGGREGATION_NONE"
showEnum VARIABLE_AGGREGATION_SUM = "VARIABLE_AGGREGATION_SUM"
showEnum VARIABLE_AGGREGATION_MEAN = "VARIABLE_AGGREGATION_MEAN"
showEnum VARIABLE_AGGREGATION_ONLY_FIRST_REPLICA
= "VARIABLE_AGGREGATION_ONLY_FIRST_REPLICA"
showEnum
(VariableAggregation'Unrecognized (VariableAggregation'UnrecognizedValue k :: Int32
k))
= Int32 -> String
forall a. Show a => a -> String
Prelude.show Int32
k
readEnum :: String -> Maybe VariableAggregation
readEnum k :: String
k
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k "VARIABLE_AGGREGATION_NONE"
= VariableAggregation -> Maybe VariableAggregation
forall a. a -> Maybe a
Prelude.Just VariableAggregation
VARIABLE_AGGREGATION_NONE
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k "VARIABLE_AGGREGATION_SUM"
= VariableAggregation -> Maybe VariableAggregation
forall a. a -> Maybe a
Prelude.Just VariableAggregation
VARIABLE_AGGREGATION_SUM
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k "VARIABLE_AGGREGATION_MEAN"
= VariableAggregation -> Maybe VariableAggregation
forall a. a -> Maybe a
Prelude.Just VariableAggregation
VARIABLE_AGGREGATION_MEAN
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k "VARIABLE_AGGREGATION_ONLY_FIRST_REPLICA"
= VariableAggregation -> Maybe VariableAggregation
forall a. a -> Maybe a
Prelude.Just VariableAggregation
VARIABLE_AGGREGATION_ONLY_FIRST_REPLICA
| Bool
Prelude.otherwise
= Maybe Int
-> (Int -> Maybe VariableAggregation) -> Maybe VariableAggregation
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
(Prelude.>>=) (String -> Maybe Int
forall a. Read a => String -> Maybe a
Text.Read.readMaybe String
k) Int -> Maybe VariableAggregation
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum
instance Prelude.Bounded VariableAggregation where
minBound :: VariableAggregation
minBound = VariableAggregation
VARIABLE_AGGREGATION_NONE
maxBound :: VariableAggregation
maxBound = VariableAggregation
VARIABLE_AGGREGATION_ONLY_FIRST_REPLICA
instance Prelude.Enum VariableAggregation where
toEnum :: Int -> VariableAggregation
toEnum k__ :: Int
k__
= VariableAggregation
-> (VariableAggregation -> VariableAggregation)
-> Maybe VariableAggregation
-> VariableAggregation
forall b a. b -> (a -> b) -> Maybe a -> b
Prelude.maybe
(String -> VariableAggregation
forall a. HasCallStack => String -> a
Prelude.error
(String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
"toEnum: unknown value for enum VariableAggregation: "
(Int -> String
forall a. Show a => a -> String
Prelude.show Int
k__)))
VariableAggregation -> VariableAggregation
forall a. a -> a
Prelude.id
(Int -> Maybe VariableAggregation
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum Int
k__)
fromEnum :: VariableAggregation -> Int
fromEnum VARIABLE_AGGREGATION_NONE = 0
fromEnum VARIABLE_AGGREGATION_SUM = 1
fromEnum VARIABLE_AGGREGATION_MEAN = 2
fromEnum VARIABLE_AGGREGATION_ONLY_FIRST_REPLICA = 3
fromEnum
(VariableAggregation'Unrecognized (VariableAggregation'UnrecognizedValue k :: Int32
k))
= Int32 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
k
succ :: VariableAggregation -> VariableAggregation
succ VARIABLE_AGGREGATION_ONLY_FIRST_REPLICA
= String -> VariableAggregation
forall a. HasCallStack => String -> a
Prelude.error
"VariableAggregation.succ: bad argument VARIABLE_AGGREGATION_ONLY_FIRST_REPLICA. This value would be out of bounds."
succ VARIABLE_AGGREGATION_NONE = VariableAggregation
VARIABLE_AGGREGATION_SUM
succ VARIABLE_AGGREGATION_SUM = VariableAggregation
VARIABLE_AGGREGATION_MEAN
succ VARIABLE_AGGREGATION_MEAN
= VariableAggregation
VARIABLE_AGGREGATION_ONLY_FIRST_REPLICA
succ (VariableAggregation'Unrecognized _)
= String -> VariableAggregation
forall a. HasCallStack => String -> a
Prelude.error
"VariableAggregation.succ: bad argument: unrecognized value"
pred :: VariableAggregation -> VariableAggregation
pred VARIABLE_AGGREGATION_NONE
= String -> VariableAggregation
forall a. HasCallStack => String -> a
Prelude.error
"VariableAggregation.pred: bad argument VARIABLE_AGGREGATION_NONE. This value would be out of bounds."
pred VARIABLE_AGGREGATION_SUM = VariableAggregation
VARIABLE_AGGREGATION_NONE
pred VARIABLE_AGGREGATION_MEAN = VariableAggregation
VARIABLE_AGGREGATION_SUM
pred VARIABLE_AGGREGATION_ONLY_FIRST_REPLICA
= VariableAggregation
VARIABLE_AGGREGATION_MEAN
pred (VariableAggregation'Unrecognized _)
= String -> VariableAggregation
forall a. HasCallStack => String -> a
Prelude.error
"VariableAggregation.pred: bad argument: unrecognized value"
enumFrom :: VariableAggregation -> [VariableAggregation]
enumFrom = VariableAggregation -> [VariableAggregation]
forall a. (Enum a, Bounded a) => a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFrom
enumFromTo :: VariableAggregation -> VariableAggregation -> [VariableAggregation]
enumFromTo = VariableAggregation -> VariableAggregation -> [VariableAggregation]
forall a. Enum a => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromTo
enumFromThen :: VariableAggregation -> VariableAggregation -> [VariableAggregation]
enumFromThen = VariableAggregation -> VariableAggregation -> [VariableAggregation]
forall a. (Enum a, Bounded a) => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThen
enumFromThenTo :: VariableAggregation
-> VariableAggregation
-> VariableAggregation
-> [VariableAggregation]
enumFromThenTo = VariableAggregation
-> VariableAggregation
-> VariableAggregation
-> [VariableAggregation]
forall a. Enum a => a -> a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThenTo
instance Data.ProtoLens.FieldDefault VariableAggregation where
fieldDefault :: VariableAggregation
fieldDefault = VariableAggregation
VARIABLE_AGGREGATION_NONE
instance Control.DeepSeq.NFData VariableAggregation where
rnf :: VariableAggregation -> ()
rnf x__ :: VariableAggregation
x__ = VariableAggregation -> () -> ()
forall a b. a -> b -> b
Prelude.seq VariableAggregation
x__ ()
data VariableDef
= VariableDef'_constructor {VariableDef -> Text
_VariableDef'variableName :: !Data.Text.Text,
VariableDef -> Text
_VariableDef'initialValueName :: !Data.Text.Text,
VariableDef -> Text
_VariableDef'initializerName :: !Data.Text.Text,
VariableDef -> Text
_VariableDef'snapshotName :: !Data.Text.Text,
VariableDef -> Maybe SaveSliceInfoDef
_VariableDef'saveSliceInfoDef :: !(Prelude.Maybe SaveSliceInfoDef),
VariableDef -> Bool
_VariableDef'isResource :: !Prelude.Bool,
VariableDef -> Bool
_VariableDef'trainable :: !Prelude.Bool,
VariableDef -> VariableSynchronization
_VariableDef'synchronization :: !VariableSynchronization,
VariableDef -> VariableAggregation
_VariableDef'aggregation :: !VariableAggregation,
VariableDef -> FieldSet
_VariableDef'_unknownFields :: !Data.ProtoLens.FieldSet}
deriving stock (VariableDef -> VariableDef -> Bool
(VariableDef -> VariableDef -> Bool)
-> (VariableDef -> VariableDef -> Bool) -> Eq VariableDef
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: VariableDef -> VariableDef -> Bool
$c/= :: VariableDef -> VariableDef -> Bool
== :: VariableDef -> VariableDef -> Bool
$c== :: VariableDef -> VariableDef -> Bool
Prelude.Eq, Eq VariableDef
Eq VariableDef =>
(VariableDef -> VariableDef -> Ordering)
-> (VariableDef -> VariableDef -> Bool)
-> (VariableDef -> VariableDef -> Bool)
-> (VariableDef -> VariableDef -> Bool)
-> (VariableDef -> VariableDef -> Bool)
-> (VariableDef -> VariableDef -> VariableDef)
-> (VariableDef -> VariableDef -> VariableDef)
-> Ord VariableDef
VariableDef -> VariableDef -> Bool
VariableDef -> VariableDef -> Ordering
VariableDef -> VariableDef -> VariableDef
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 :: VariableDef -> VariableDef -> VariableDef
$cmin :: VariableDef -> VariableDef -> VariableDef
max :: VariableDef -> VariableDef -> VariableDef
$cmax :: VariableDef -> VariableDef -> VariableDef
>= :: VariableDef -> VariableDef -> Bool
$c>= :: VariableDef -> VariableDef -> Bool
> :: VariableDef -> VariableDef -> Bool
$c> :: VariableDef -> VariableDef -> Bool
<= :: VariableDef -> VariableDef -> Bool
$c<= :: VariableDef -> VariableDef -> Bool
< :: VariableDef -> VariableDef -> Bool
$c< :: VariableDef -> VariableDef -> Bool
compare :: VariableDef -> VariableDef -> Ordering
$ccompare :: VariableDef -> VariableDef -> Ordering
$cp1Ord :: Eq VariableDef
Prelude.Ord)
instance Prelude.Show VariableDef where
showsPrec :: Int -> VariableDef -> ShowS
showsPrec _ __x :: VariableDef
__x __s :: String
__s
= Char -> ShowS
Prelude.showChar
'{'
(String -> ShowS
Prelude.showString
(VariableDef -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort VariableDef
__x) (Char -> ShowS
Prelude.showChar '}' String
__s))
instance Data.ProtoLens.Field.HasField VariableDef "variableName" Data.Text.Text where
fieldOf :: Proxy# "variableName"
-> (Text -> f Text) -> VariableDef -> f VariableDef
fieldOf _
= ((Text -> f Text) -> VariableDef -> f VariableDef)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> VariableDef
-> f VariableDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((VariableDef -> Text)
-> (VariableDef -> Text -> VariableDef)
-> Lens VariableDef VariableDef Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
VariableDef -> Text
_VariableDef'variableName
(\ x__ :: VariableDef
x__ y__ :: Text
y__ -> VariableDef
x__ {_VariableDef'variableName :: Text
_VariableDef'variableName = Text
y__}))
(Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField VariableDef "initialValueName" Data.Text.Text where
fieldOf :: Proxy# "initialValueName"
-> (Text -> f Text) -> VariableDef -> f VariableDef
fieldOf _
= ((Text -> f Text) -> VariableDef -> f VariableDef)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> VariableDef
-> f VariableDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((VariableDef -> Text)
-> (VariableDef -> Text -> VariableDef)
-> Lens VariableDef VariableDef Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
VariableDef -> Text
_VariableDef'initialValueName
(\ x__ :: VariableDef
x__ y__ :: Text
y__ -> VariableDef
x__ {_VariableDef'initialValueName :: Text
_VariableDef'initialValueName = Text
y__}))
(Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField VariableDef "initializerName" Data.Text.Text where
fieldOf :: Proxy# "initializerName"
-> (Text -> f Text) -> VariableDef -> f VariableDef
fieldOf _
= ((Text -> f Text) -> VariableDef -> f VariableDef)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> VariableDef
-> f VariableDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((VariableDef -> Text)
-> (VariableDef -> Text -> VariableDef)
-> Lens VariableDef VariableDef Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
VariableDef -> Text
_VariableDef'initializerName
(\ x__ :: VariableDef
x__ y__ :: Text
y__ -> VariableDef
x__ {_VariableDef'initializerName :: Text
_VariableDef'initializerName = Text
y__}))
(Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField VariableDef "snapshotName" Data.Text.Text where
fieldOf :: Proxy# "snapshotName"
-> (Text -> f Text) -> VariableDef -> f VariableDef
fieldOf _
= ((Text -> f Text) -> VariableDef -> f VariableDef)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> VariableDef
-> f VariableDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((VariableDef -> Text)
-> (VariableDef -> Text -> VariableDef)
-> Lens VariableDef VariableDef Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
VariableDef -> Text
_VariableDef'snapshotName
(\ x__ :: VariableDef
x__ y__ :: Text
y__ -> VariableDef
x__ {_VariableDef'snapshotName :: Text
_VariableDef'snapshotName = Text
y__}))
(Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField VariableDef "saveSliceInfoDef" SaveSliceInfoDef where
fieldOf :: Proxy# "saveSliceInfoDef"
-> (SaveSliceInfoDef -> f SaveSliceInfoDef)
-> VariableDef
-> f VariableDef
fieldOf _
= ((Maybe SaveSliceInfoDef -> f (Maybe SaveSliceInfoDef))
-> VariableDef -> f VariableDef)
-> ((SaveSliceInfoDef -> f SaveSliceInfoDef)
-> Maybe SaveSliceInfoDef -> f (Maybe SaveSliceInfoDef))
-> (SaveSliceInfoDef -> f SaveSliceInfoDef)
-> VariableDef
-> f VariableDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((VariableDef -> Maybe SaveSliceInfoDef)
-> (VariableDef -> Maybe SaveSliceInfoDef -> VariableDef)
-> Lens
VariableDef
VariableDef
(Maybe SaveSliceInfoDef)
(Maybe SaveSliceInfoDef)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
VariableDef -> Maybe SaveSliceInfoDef
_VariableDef'saveSliceInfoDef
(\ x__ :: VariableDef
x__ y__ :: Maybe SaveSliceInfoDef
y__ -> VariableDef
x__ {_VariableDef'saveSliceInfoDef :: Maybe SaveSliceInfoDef
_VariableDef'saveSliceInfoDef = Maybe SaveSliceInfoDef
y__}))
(SaveSliceInfoDef -> Lens' (Maybe SaveSliceInfoDef) SaveSliceInfoDef
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens SaveSliceInfoDef
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField VariableDef "maybe'saveSliceInfoDef" (Prelude.Maybe SaveSliceInfoDef) where
fieldOf :: Proxy# "maybe'saveSliceInfoDef"
-> (Maybe SaveSliceInfoDef -> f (Maybe SaveSliceInfoDef))
-> VariableDef
-> f VariableDef
fieldOf _
= ((Maybe SaveSliceInfoDef -> f (Maybe SaveSliceInfoDef))
-> VariableDef -> f VariableDef)
-> ((Maybe SaveSliceInfoDef -> f (Maybe SaveSliceInfoDef))
-> Maybe SaveSliceInfoDef -> f (Maybe SaveSliceInfoDef))
-> (Maybe SaveSliceInfoDef -> f (Maybe SaveSliceInfoDef))
-> VariableDef
-> f VariableDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((VariableDef -> Maybe SaveSliceInfoDef)
-> (VariableDef -> Maybe SaveSliceInfoDef -> VariableDef)
-> Lens
VariableDef
VariableDef
(Maybe SaveSliceInfoDef)
(Maybe SaveSliceInfoDef)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
VariableDef -> Maybe SaveSliceInfoDef
_VariableDef'saveSliceInfoDef
(\ x__ :: VariableDef
x__ y__ :: Maybe SaveSliceInfoDef
y__ -> VariableDef
x__ {_VariableDef'saveSliceInfoDef :: Maybe SaveSliceInfoDef
_VariableDef'saveSliceInfoDef = Maybe SaveSliceInfoDef
y__}))
(Maybe SaveSliceInfoDef -> f (Maybe SaveSliceInfoDef))
-> Maybe SaveSliceInfoDef -> f (Maybe SaveSliceInfoDef)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField VariableDef "isResource" Prelude.Bool where
fieldOf :: Proxy# "isResource"
-> (Bool -> f Bool) -> VariableDef -> f VariableDef
fieldOf _
= ((Bool -> f Bool) -> VariableDef -> f VariableDef)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> VariableDef
-> f VariableDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((VariableDef -> Bool)
-> (VariableDef -> Bool -> VariableDef)
-> Lens VariableDef VariableDef Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
VariableDef -> Bool
_VariableDef'isResource
(\ x__ :: VariableDef
x__ y__ :: Bool
y__ -> VariableDef
x__ {_VariableDef'isResource :: Bool
_VariableDef'isResource = Bool
y__}))
(Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField VariableDef "trainable" Prelude.Bool where
fieldOf :: Proxy# "trainable"
-> (Bool -> f Bool) -> VariableDef -> f VariableDef
fieldOf _
= ((Bool -> f Bool) -> VariableDef -> f VariableDef)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> VariableDef
-> f VariableDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((VariableDef -> Bool)
-> (VariableDef -> Bool -> VariableDef)
-> Lens VariableDef VariableDef Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
VariableDef -> Bool
_VariableDef'trainable
(\ x__ :: VariableDef
x__ y__ :: Bool
y__ -> VariableDef
x__ {_VariableDef'trainable :: Bool
_VariableDef'trainable = Bool
y__}))
(Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField VariableDef "synchronization" VariableSynchronization where
fieldOf :: Proxy# "synchronization"
-> (VariableSynchronization -> f VariableSynchronization)
-> VariableDef
-> f VariableDef
fieldOf _
= ((VariableSynchronization -> f VariableSynchronization)
-> VariableDef -> f VariableDef)
-> ((VariableSynchronization -> f VariableSynchronization)
-> VariableSynchronization -> f VariableSynchronization)
-> (VariableSynchronization -> f VariableSynchronization)
-> VariableDef
-> f VariableDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((VariableDef -> VariableSynchronization)
-> (VariableDef -> VariableSynchronization -> VariableDef)
-> Lens
VariableDef
VariableDef
VariableSynchronization
VariableSynchronization
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
VariableDef -> VariableSynchronization
_VariableDef'synchronization
(\ x__ :: VariableDef
x__ y__ :: VariableSynchronization
y__ -> VariableDef
x__ {_VariableDef'synchronization :: VariableSynchronization
_VariableDef'synchronization = VariableSynchronization
y__}))
(VariableSynchronization -> f VariableSynchronization)
-> VariableSynchronization -> f VariableSynchronization
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField VariableDef "aggregation" VariableAggregation where
fieldOf :: Proxy# "aggregation"
-> (VariableAggregation -> f VariableAggregation)
-> VariableDef
-> f VariableDef
fieldOf _
= ((VariableAggregation -> f VariableAggregation)
-> VariableDef -> f VariableDef)
-> ((VariableAggregation -> f VariableAggregation)
-> VariableAggregation -> f VariableAggregation)
-> (VariableAggregation -> f VariableAggregation)
-> VariableDef
-> f VariableDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((VariableDef -> VariableAggregation)
-> (VariableDef -> VariableAggregation -> VariableDef)
-> Lens
VariableDef VariableDef VariableAggregation VariableAggregation
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
VariableDef -> VariableAggregation
_VariableDef'aggregation
(\ x__ :: VariableDef
x__ y__ :: VariableAggregation
y__ -> VariableDef
x__ {_VariableDef'aggregation :: VariableAggregation
_VariableDef'aggregation = VariableAggregation
y__}))
(VariableAggregation -> f VariableAggregation)
-> VariableAggregation -> f VariableAggregation
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message VariableDef where
messageName :: Proxy VariableDef -> Text
messageName _ = String -> Text
Data.Text.pack "tensorflow.VariableDef"
packedMessageDescriptor :: Proxy VariableDef -> ByteString
packedMessageDescriptor _
= "\n\
\\vVariableDef\DC2#\n\
\\rvariable_name\CAN\SOH \SOH(\tR\fvariableName\DC2,\n\
\\DC2initial_value_name\CAN\ACK \SOH(\tR\DLEinitialValueName\DC2)\n\
\\DLEinitializer_name\CAN\STX \SOH(\tR\SIinitializerName\DC2#\n\
\\rsnapshot_name\CAN\ETX \SOH(\tR\fsnapshotName\DC2K\n\
\\DC3save_slice_info_def\CAN\EOT \SOH(\v2\FS.tensorflow.SaveSliceInfoDefR\DLEsaveSliceInfoDef\DC2\US\n\
\\vis_resource\CAN\ENQ \SOH(\bR\n\
\isResource\DC2\FS\n\
\\ttrainable\CAN\a \SOH(\bR\ttrainable\DC2M\n\
\\SIsynchronization\CAN\b \SOH(\SO2#.tensorflow.VariableSynchronizationR\SIsynchronization\DC2A\n\
\\vaggregation\CAN\t \SOH(\SO2\US.tensorflow.VariableAggregationR\vaggregation"
packedFileDescriptor :: Proxy VariableDef -> ByteString
packedFileDescriptor _ = ByteString
packedFileDescriptor
fieldsByTag :: Map Tag (FieldDescriptor VariableDef)
fieldsByTag
= let
variableName__field_descriptor :: FieldDescriptor VariableDef
variableName__field_descriptor
= String
-> FieldTypeDescriptor Text
-> FieldAccessor VariableDef Text
-> FieldDescriptor VariableDef
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
"variable_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 VariableDef VariableDef Text Text
-> FieldAccessor VariableDef 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 "variableName" 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 @"variableName")) ::
Data.ProtoLens.FieldDescriptor VariableDef
initialValueName__field_descriptor :: FieldDescriptor VariableDef
initialValueName__field_descriptor
= String
-> FieldTypeDescriptor Text
-> FieldAccessor VariableDef Text
-> FieldDescriptor VariableDef
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
"initial_value_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 VariableDef VariableDef Text Text
-> FieldAccessor VariableDef 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 "initialValueName" 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 @"initialValueName")) ::
Data.ProtoLens.FieldDescriptor VariableDef
initializerName__field_descriptor :: FieldDescriptor VariableDef
initializerName__field_descriptor
= String
-> FieldTypeDescriptor Text
-> FieldAccessor VariableDef Text
-> FieldDescriptor VariableDef
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
"initializer_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 VariableDef VariableDef Text Text
-> FieldAccessor VariableDef 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 "initializerName" 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 @"initializerName")) ::
Data.ProtoLens.FieldDescriptor VariableDef
snapshotName__field_descriptor :: FieldDescriptor VariableDef
snapshotName__field_descriptor
= String
-> FieldTypeDescriptor Text
-> FieldAccessor VariableDef Text
-> FieldDescriptor VariableDef
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
"snapshot_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 VariableDef VariableDef Text Text
-> FieldAccessor VariableDef 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 "snapshotName" 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 @"snapshotName")) ::
Data.ProtoLens.FieldDescriptor VariableDef
saveSliceInfoDef__field_descriptor :: FieldDescriptor VariableDef
saveSliceInfoDef__field_descriptor
= String
-> FieldTypeDescriptor SaveSliceInfoDef
-> FieldAccessor VariableDef SaveSliceInfoDef
-> FieldDescriptor VariableDef
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
"save_slice_info_def"
(MessageOrGroup -> FieldTypeDescriptor SaveSliceInfoDef
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor SaveSliceInfoDef)
(Lens
VariableDef
VariableDef
(Maybe SaveSliceInfoDef)
(Maybe SaveSliceInfoDef)
-> FieldAccessor VariableDef SaveSliceInfoDef
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall s a (f :: * -> *).
(HasField s "maybe'saveSliceInfoDef" 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'saveSliceInfoDef")) ::
Data.ProtoLens.FieldDescriptor VariableDef
isResource__field_descriptor :: FieldDescriptor VariableDef
isResource__field_descriptor
= String
-> FieldTypeDescriptor Bool
-> FieldAccessor VariableDef Bool
-> FieldDescriptor VariableDef
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
"is_resource"
(ScalarField Bool -> FieldTypeDescriptor Bool
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Bool
Data.ProtoLens.BoolField ::
Data.ProtoLens.FieldTypeDescriptor Prelude.Bool)
(WireDefault Bool
-> Lens VariableDef VariableDef Bool Bool
-> FieldAccessor VariableDef Bool
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Bool
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
(forall s a (f :: * -> *).
(HasField s "isResource" 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 @"isResource")) ::
Data.ProtoLens.FieldDescriptor VariableDef
trainable__field_descriptor :: FieldDescriptor VariableDef
trainable__field_descriptor
= String
-> FieldTypeDescriptor Bool
-> FieldAccessor VariableDef Bool
-> FieldDescriptor VariableDef
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
"trainable"
(ScalarField Bool -> FieldTypeDescriptor Bool
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Bool
Data.ProtoLens.BoolField ::
Data.ProtoLens.FieldTypeDescriptor Prelude.Bool)
(WireDefault Bool
-> Lens VariableDef VariableDef Bool Bool
-> FieldAccessor VariableDef Bool
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Bool
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
(forall s a (f :: * -> *).
(HasField s "trainable" 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 @"trainable")) ::
Data.ProtoLens.FieldDescriptor VariableDef
synchronization__field_descriptor :: FieldDescriptor VariableDef
synchronization__field_descriptor
= String
-> FieldTypeDescriptor VariableSynchronization
-> FieldAccessor VariableDef VariableSynchronization
-> FieldDescriptor VariableDef
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
"synchronization"
(ScalarField VariableSynchronization
-> FieldTypeDescriptor VariableSynchronization
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField VariableSynchronization
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
Data.ProtoLens.FieldTypeDescriptor VariableSynchronization)
(WireDefault VariableSynchronization
-> Lens
VariableDef
VariableDef
VariableSynchronization
VariableSynchronization
-> FieldAccessor VariableDef VariableSynchronization
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault VariableSynchronization
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
(forall s a (f :: * -> *).
(HasField s "synchronization" 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 @"synchronization")) ::
Data.ProtoLens.FieldDescriptor VariableDef
aggregation__field_descriptor :: FieldDescriptor VariableDef
aggregation__field_descriptor
= String
-> FieldTypeDescriptor VariableAggregation
-> FieldAccessor VariableDef VariableAggregation
-> FieldDescriptor VariableDef
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
"aggregation"
(ScalarField VariableAggregation
-> FieldTypeDescriptor VariableAggregation
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField VariableAggregation
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
Data.ProtoLens.FieldTypeDescriptor VariableAggregation)
(WireDefault VariableAggregation
-> Lens
VariableDef VariableDef VariableAggregation VariableAggregation
-> FieldAccessor VariableDef VariableAggregation
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault VariableAggregation
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
(forall s a (f :: * -> *).
(HasField s "aggregation" 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 @"aggregation")) ::
Data.ProtoLens.FieldDescriptor VariableDef
in
[(Tag, FieldDescriptor VariableDef)]
-> Map Tag (FieldDescriptor VariableDef)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
[(Int -> Tag
Data.ProtoLens.Tag 1, FieldDescriptor VariableDef
variableName__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag 6, FieldDescriptor VariableDef
initialValueName__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag 2, FieldDescriptor VariableDef
initializerName__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag 3, FieldDescriptor VariableDef
snapshotName__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag 4, FieldDescriptor VariableDef
saveSliceInfoDef__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag 5, FieldDescriptor VariableDef
isResource__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag 7, FieldDescriptor VariableDef
trainable__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag 8, FieldDescriptor VariableDef
synchronization__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag 9, FieldDescriptor VariableDef
aggregation__field_descriptor)]
unknownFields :: LensLike' f VariableDef FieldSet
unknownFields
= (VariableDef -> FieldSet)
-> (VariableDef -> FieldSet -> VariableDef)
-> Lens' VariableDef FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
VariableDef -> FieldSet
_VariableDef'_unknownFields
(\ x__ :: VariableDef
x__ y__ :: FieldSet
y__ -> VariableDef
x__ {_VariableDef'_unknownFields :: FieldSet
_VariableDef'_unknownFields = FieldSet
y__})
defMessage :: VariableDef
defMessage
= $WVariableDef'_constructor :: Text
-> Text
-> Text
-> Text
-> Maybe SaveSliceInfoDef
-> Bool
-> Bool
-> VariableSynchronization
-> VariableAggregation
-> FieldSet
-> VariableDef
VariableDef'_constructor
{_VariableDef'variableName :: Text
_VariableDef'variableName = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_VariableDef'initialValueName :: Text
_VariableDef'initialValueName = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_VariableDef'initializerName :: Text
_VariableDef'initializerName = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_VariableDef'snapshotName :: Text
_VariableDef'snapshotName = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_VariableDef'saveSliceInfoDef :: Maybe SaveSliceInfoDef
_VariableDef'saveSliceInfoDef = Maybe SaveSliceInfoDef
forall a. Maybe a
Prelude.Nothing,
_VariableDef'isResource :: Bool
_VariableDef'isResource = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_VariableDef'trainable :: Bool
_VariableDef'trainable = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_VariableDef'synchronization :: VariableSynchronization
_VariableDef'synchronization = VariableSynchronization
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_VariableDef'aggregation :: VariableAggregation
_VariableDef'aggregation = VariableAggregation
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_VariableDef'_unknownFields :: FieldSet
_VariableDef'_unknownFields = []}
parseMessage :: Parser VariableDef
parseMessage
= let
loop ::
VariableDef -> Data.ProtoLens.Encoding.Bytes.Parser VariableDef
loop :: VariableDef -> Parser VariableDef
loop x :: VariableDef
x
= do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
if Bool
end then
do (let missing :: [a]
missing = []
in
if [Any] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
() -> Parser ()
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
else
String -> Parser ()
forall (m :: * -> *) a. MonadFail m => String -> m a
Prelude.fail
(String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
"Missing required fields: "
([String] -> String
forall a. Show a => a -> String
Prelude.show ([String]
forall a. [a]
missing :: [Prelude.String]))))
VariableDef -> Parser VariableDef
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
(Setter VariableDef VariableDef FieldSet FieldSet
-> (FieldSet -> FieldSet) -> VariableDef -> VariableDef
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 VariableDef VariableDef FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) VariableDef
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))
"variable_name"
VariableDef -> Parser VariableDef
loop
(Setter VariableDef VariableDef Text Text
-> Text -> VariableDef -> VariableDef
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
(forall s a (f :: * -> *).
(HasField s "variableName" 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 @"variableName") Text
y VariableDef
x)
50
-> do Text
y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do ByteString
value <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Int -> Parser ByteString
Data.ProtoLens.Encoding.Bytes.getBytes
(Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
Either String Text -> Parser Text
forall a. Either String a -> Parser a
Data.ProtoLens.Encoding.Bytes.runEither
(case ByteString -> Either UnicodeException Text
Data.Text.Encoding.decodeUtf8' ByteString
value of
(Prelude.Left err :: UnicodeException
err)
-> String -> Either String Text
forall a b. a -> Either a b
Prelude.Left (UnicodeException -> String
forall a. Show a => a -> String
Prelude.show UnicodeException
err)
(Prelude.Right r :: Text
r) -> Text -> Either String Text
forall a b. b -> Either a b
Prelude.Right Text
r))
"initial_value_name"
VariableDef -> Parser VariableDef
loop
(Setter VariableDef VariableDef Text Text
-> Text -> VariableDef -> VariableDef
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
(forall s a (f :: * -> *).
(HasField s "initialValueName" 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 @"initialValueName") Text
y VariableDef
x)
18
-> do Text
y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do ByteString
value <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Int -> Parser ByteString
Data.ProtoLens.Encoding.Bytes.getBytes
(Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
Either String Text -> Parser Text
forall a. Either String a -> Parser a
Data.ProtoLens.Encoding.Bytes.runEither
(case ByteString -> Either UnicodeException Text
Data.Text.Encoding.decodeUtf8' ByteString
value of
(Prelude.Left err :: UnicodeException
err)
-> String -> Either String Text
forall a b. a -> Either a b
Prelude.Left (UnicodeException -> String
forall a. Show a => a -> String
Prelude.show UnicodeException
err)
(Prelude.Right r :: Text
r) -> Text -> Either String Text
forall a b. b -> Either a b
Prelude.Right Text
r))
"initializer_name"
VariableDef -> Parser VariableDef
loop
(Setter VariableDef VariableDef Text Text
-> Text -> VariableDef -> VariableDef
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
(forall s a (f :: * -> *).
(HasField s "initializerName" 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 @"initializerName") Text
y VariableDef
x)
26
-> do Text
y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do ByteString
value <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Int -> Parser ByteString
Data.ProtoLens.Encoding.Bytes.getBytes
(Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
Either String Text -> Parser Text
forall a. Either String a -> Parser a
Data.ProtoLens.Encoding.Bytes.runEither
(case ByteString -> Either UnicodeException Text
Data.Text.Encoding.decodeUtf8' ByteString
value of
(Prelude.Left err :: UnicodeException
err)
-> String -> Either String Text
forall a b. a -> Either a b
Prelude.Left (UnicodeException -> String
forall a. Show a => a -> String
Prelude.show UnicodeException
err)
(Prelude.Right r :: Text
r) -> Text -> Either String Text
forall a b. b -> Either a b
Prelude.Right Text
r))
"snapshot_name"
VariableDef -> Parser VariableDef
loop
(Setter VariableDef VariableDef Text Text
-> Text -> VariableDef -> VariableDef
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
(forall s a (f :: * -> *).
(HasField s "snapshotName" 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 @"snapshotName") Text
y VariableDef
x)
34
-> do SaveSliceInfoDef
y <- Parser SaveSliceInfoDef -> String -> Parser SaveSliceInfoDef
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Int -> Parser SaveSliceInfoDef -> Parser SaveSliceInfoDef
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 SaveSliceInfoDef
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
"save_slice_info_def"
VariableDef -> Parser VariableDef
loop
(Setter VariableDef VariableDef SaveSliceInfoDef SaveSliceInfoDef
-> SaveSliceInfoDef -> VariableDef -> VariableDef
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
(forall s a (f :: * -> *).
(HasField s "saveSliceInfoDef" 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 @"saveSliceInfoDef") SaveSliceInfoDef
y VariableDef
x)
40
-> 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)
"is_resource"
VariableDef -> Parser VariableDef
loop
(Setter VariableDef VariableDef Bool Bool
-> Bool -> VariableDef -> VariableDef
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "isResource" 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 @"isResource") Bool
y VariableDef
x)
56
-> do Bool
y <- Parser Bool -> String -> Parser Bool
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
((Word64 -> Bool) -> Parser Word64 -> Parser Bool
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
(Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude./=) 0) Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
"trainable"
VariableDef -> Parser VariableDef
loop
(Setter VariableDef VariableDef Bool Bool
-> Bool -> VariableDef -> VariableDef
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "trainable" 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 @"trainable") Bool
y VariableDef
x)
64
-> do VariableSynchronization
y <- Parser VariableSynchronization
-> String -> Parser VariableSynchronization
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
((Int -> VariableSynchronization)
-> Parser Int -> Parser VariableSynchronization
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
Int -> VariableSynchronization
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))
"synchronization"
VariableDef -> Parser VariableDef
loop
(Setter
VariableDef
VariableDef
VariableSynchronization
VariableSynchronization
-> VariableSynchronization -> VariableDef -> VariableDef
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
(forall s a (f :: * -> *).
(HasField s "synchronization" 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 @"synchronization") VariableSynchronization
y VariableDef
x)
72
-> do VariableAggregation
y <- Parser VariableAggregation -> String -> Parser VariableAggregation
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
((Int -> VariableAggregation)
-> Parser Int -> Parser VariableAggregation
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
Int -> VariableAggregation
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))
"aggregation"
VariableDef -> Parser VariableDef
loop
(Setter
VariableDef VariableDef VariableAggregation VariableAggregation
-> VariableAggregation -> VariableDef -> VariableDef
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "aggregation" 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 @"aggregation") VariableAggregation
y VariableDef
x)
wire :: Word64
wire
-> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
Word64
wire
VariableDef -> Parser VariableDef
loop
(Setter VariableDef VariableDef FieldSet FieldSet
-> (FieldSet -> FieldSet) -> VariableDef -> VariableDef
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 VariableDef VariableDef FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) VariableDef
x)
in
Parser VariableDef -> String -> Parser VariableDef
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do VariableDef -> Parser VariableDef
loop VariableDef
forall msg. Message msg => msg
Data.ProtoLens.defMessage) "VariableDef"
buildMessage :: VariableDef -> Builder
buildMessage
= \ _x :: VariableDef
_x
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Text
_v
= FoldLike Text VariableDef VariableDef Text Text
-> VariableDef -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "variableName" 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 @"variableName") VariableDef
_x
in
if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 10)
((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ bs :: ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Text -> ByteString
Data.Text.Encoding.encodeUtf8
Text
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Text
_v
= FoldLike Text VariableDef VariableDef Text Text
-> VariableDef -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall s a (f :: * -> *).
(HasField s "initialValueName" 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 @"initialValueName") VariableDef
_x
in
if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 50)
((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ bs :: ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Text -> ByteString
Data.Text.Encoding.encodeUtf8
Text
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Text
_v
= FoldLike Text VariableDef VariableDef Text Text
-> VariableDef -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall s a (f :: * -> *).
(HasField s "initializerName" 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 @"initializerName") VariableDef
_x
in
if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 18)
((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ bs :: ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Text -> ByteString
Data.Text.Encoding.encodeUtf8
Text
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Text
_v
= FoldLike Text VariableDef VariableDef Text Text
-> VariableDef -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "snapshotName" 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 @"snapshotName") VariableDef
_x
in
if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 26)
((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ bs :: ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Text -> ByteString
Data.Text.Encoding.encodeUtf8
Text
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe SaveSliceInfoDef)
VariableDef
VariableDef
(Maybe SaveSliceInfoDef)
(Maybe SaveSliceInfoDef)
-> VariableDef -> Maybe SaveSliceInfoDef
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall s a (f :: * -> *).
(HasField s "maybe'saveSliceInfoDef" 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'saveSliceInfoDef") VariableDef
_x
of
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just _v :: SaveSliceInfoDef
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 34)
((ByteString -> Builder)
-> (SaveSliceInfoDef -> ByteString) -> SaveSliceInfoDef -> 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))
SaveSliceInfoDef -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
SaveSliceInfoDef
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Bool
_v
= FoldLike Bool VariableDef VariableDef Bool Bool
-> VariableDef -> Bool
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "isResource" 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 @"isResource") VariableDef
_x
in
if Bool -> Bool -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Bool
_v Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 40)
((Word64 -> Builder) -> (Bool -> Word64) -> Bool -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(\ b :: Bool
b -> if Bool
b then 1 else 0)
Bool
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Bool
_v
= FoldLike Bool VariableDef VariableDef Bool Bool
-> VariableDef -> Bool
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "trainable" 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 @"trainable") VariableDef
_x
in
if Bool -> Bool -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Bool
_v Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 56)
((Word64 -> Builder) -> (Bool -> Word64) -> Bool -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(\ b :: Bool
b -> if Bool
b then 1 else 0)
Bool
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: VariableSynchronization
_v
= FoldLike
VariableSynchronization
VariableDef
VariableDef
VariableSynchronization
VariableSynchronization
-> VariableDef -> VariableSynchronization
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall s a (f :: * -> *).
(HasField s "synchronization" 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 @"synchronization") VariableDef
_x
in
if VariableSynchronization -> VariableSynchronization -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) VariableSynchronization
_v VariableSynchronization
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 64)
((Int -> Builder)
-> (VariableSynchronization -> Int)
-> VariableSynchronization
-> 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)
VariableSynchronization -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum
VariableSynchronization
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: VariableAggregation
_v
= FoldLike
VariableAggregation
VariableDef
VariableDef
VariableAggregation
VariableAggregation
-> VariableDef -> VariableAggregation
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall s a (f :: * -> *).
(HasField s "aggregation" 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 @"aggregation") VariableDef
_x
in
if VariableAggregation -> VariableAggregation -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) VariableAggregation
_v VariableAggregation
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 72)
((Int -> Builder)
-> (VariableAggregation -> Int) -> VariableAggregation -> 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)
VariableAggregation -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum
VariableAggregation
_v))
(FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
(FoldLike FieldSet VariableDef VariableDef FieldSet FieldSet
-> VariableDef -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet VariableDef VariableDef FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields VariableDef
_x))))))))))
instance Control.DeepSeq.NFData VariableDef where
rnf :: VariableDef -> ()
rnf
= \ x__ :: VariableDef
x__
-> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(VariableDef -> FieldSet
_VariableDef'_unknownFields VariableDef
x__)
(Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(VariableDef -> Text
_VariableDef'variableName VariableDef
x__)
(Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(VariableDef -> Text
_VariableDef'initialValueName VariableDef
x__)
(Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(VariableDef -> Text
_VariableDef'initializerName VariableDef
x__)
(Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(VariableDef -> Text
_VariableDef'snapshotName VariableDef
x__)
(Maybe SaveSliceInfoDef -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(VariableDef -> Maybe SaveSliceInfoDef
_VariableDef'saveSliceInfoDef VariableDef
x__)
(Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(VariableDef -> Bool
_VariableDef'isResource VariableDef
x__)
(Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(VariableDef -> Bool
_VariableDef'trainable VariableDef
x__)
(VariableSynchronization -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(VariableDef -> VariableSynchronization
_VariableDef'synchronization VariableDef
x__)
(VariableAggregation -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(VariableDef -> VariableAggregation
_VariableDef'aggregation VariableDef
x__) ())))))))))
newtype VariableSynchronization'UnrecognizedValue
= VariableSynchronization'UnrecognizedValue Data.Int.Int32
deriving stock (VariableSynchronization'UnrecognizedValue
-> VariableSynchronization'UnrecognizedValue -> Bool
(VariableSynchronization'UnrecognizedValue
-> VariableSynchronization'UnrecognizedValue -> Bool)
-> (VariableSynchronization'UnrecognizedValue
-> VariableSynchronization'UnrecognizedValue -> Bool)
-> Eq VariableSynchronization'UnrecognizedValue
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: VariableSynchronization'UnrecognizedValue
-> VariableSynchronization'UnrecognizedValue -> Bool
$c/= :: VariableSynchronization'UnrecognizedValue
-> VariableSynchronization'UnrecognizedValue -> Bool
== :: VariableSynchronization'UnrecognizedValue
-> VariableSynchronization'UnrecognizedValue -> Bool
$c== :: VariableSynchronization'UnrecognizedValue
-> VariableSynchronization'UnrecognizedValue -> Bool
Prelude.Eq, Eq VariableSynchronization'UnrecognizedValue
Eq VariableSynchronization'UnrecognizedValue =>
(VariableSynchronization'UnrecognizedValue
-> VariableSynchronization'UnrecognizedValue -> Ordering)
-> (VariableSynchronization'UnrecognizedValue
-> VariableSynchronization'UnrecognizedValue -> Bool)
-> (VariableSynchronization'UnrecognizedValue
-> VariableSynchronization'UnrecognizedValue -> Bool)
-> (VariableSynchronization'UnrecognizedValue
-> VariableSynchronization'UnrecognizedValue -> Bool)
-> (VariableSynchronization'UnrecognizedValue
-> VariableSynchronization'UnrecognizedValue -> Bool)
-> (VariableSynchronization'UnrecognizedValue
-> VariableSynchronization'UnrecognizedValue
-> VariableSynchronization'UnrecognizedValue)
-> (VariableSynchronization'UnrecognizedValue
-> VariableSynchronization'UnrecognizedValue
-> VariableSynchronization'UnrecognizedValue)
-> Ord VariableSynchronization'UnrecognizedValue
VariableSynchronization'UnrecognizedValue
-> VariableSynchronization'UnrecognizedValue -> Bool
VariableSynchronization'UnrecognizedValue
-> VariableSynchronization'UnrecognizedValue -> Ordering
VariableSynchronization'UnrecognizedValue
-> VariableSynchronization'UnrecognizedValue
-> VariableSynchronization'UnrecognizedValue
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 :: VariableSynchronization'UnrecognizedValue
-> VariableSynchronization'UnrecognizedValue
-> VariableSynchronization'UnrecognizedValue
$cmin :: VariableSynchronization'UnrecognizedValue
-> VariableSynchronization'UnrecognizedValue
-> VariableSynchronization'UnrecognizedValue
max :: VariableSynchronization'UnrecognizedValue
-> VariableSynchronization'UnrecognizedValue
-> VariableSynchronization'UnrecognizedValue
$cmax :: VariableSynchronization'UnrecognizedValue
-> VariableSynchronization'UnrecognizedValue
-> VariableSynchronization'UnrecognizedValue
>= :: VariableSynchronization'UnrecognizedValue
-> VariableSynchronization'UnrecognizedValue -> Bool
$c>= :: VariableSynchronization'UnrecognizedValue
-> VariableSynchronization'UnrecognizedValue -> Bool
> :: VariableSynchronization'UnrecognizedValue
-> VariableSynchronization'UnrecognizedValue -> Bool
$c> :: VariableSynchronization'UnrecognizedValue
-> VariableSynchronization'UnrecognizedValue -> Bool
<= :: VariableSynchronization'UnrecognizedValue
-> VariableSynchronization'UnrecognizedValue -> Bool
$c<= :: VariableSynchronization'UnrecognizedValue
-> VariableSynchronization'UnrecognizedValue -> Bool
< :: VariableSynchronization'UnrecognizedValue
-> VariableSynchronization'UnrecognizedValue -> Bool
$c< :: VariableSynchronization'UnrecognizedValue
-> VariableSynchronization'UnrecognizedValue -> Bool
compare :: VariableSynchronization'UnrecognizedValue
-> VariableSynchronization'UnrecognizedValue -> Ordering
$ccompare :: VariableSynchronization'UnrecognizedValue
-> VariableSynchronization'UnrecognizedValue -> Ordering
$cp1Ord :: Eq VariableSynchronization'UnrecognizedValue
Prelude.Ord, Int -> VariableSynchronization'UnrecognizedValue -> ShowS
[VariableSynchronization'UnrecognizedValue] -> ShowS
VariableSynchronization'UnrecognizedValue -> String
(Int -> VariableSynchronization'UnrecognizedValue -> ShowS)
-> (VariableSynchronization'UnrecognizedValue -> String)
-> ([VariableSynchronization'UnrecognizedValue] -> ShowS)
-> Show VariableSynchronization'UnrecognizedValue
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [VariableSynchronization'UnrecognizedValue] -> ShowS
$cshowList :: [VariableSynchronization'UnrecognizedValue] -> ShowS
show :: VariableSynchronization'UnrecognizedValue -> String
$cshow :: VariableSynchronization'UnrecognizedValue -> String
showsPrec :: Int -> VariableSynchronization'UnrecognizedValue -> ShowS
$cshowsPrec :: Int -> VariableSynchronization'UnrecognizedValue -> ShowS
Prelude.Show)
data VariableSynchronization
= VARIABLE_SYNCHRONIZATION_AUTO |
VARIABLE_SYNCHRONIZATION_NONE |
VARIABLE_SYNCHRONIZATION_ON_WRITE |
VARIABLE_SYNCHRONIZATION_ON_READ |
VariableSynchronization'Unrecognized !VariableSynchronization'UnrecognizedValue
deriving stock (Int -> VariableSynchronization -> ShowS
[VariableSynchronization] -> ShowS
VariableSynchronization -> String
(Int -> VariableSynchronization -> ShowS)
-> (VariableSynchronization -> String)
-> ([VariableSynchronization] -> ShowS)
-> Show VariableSynchronization
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [VariableSynchronization] -> ShowS
$cshowList :: [VariableSynchronization] -> ShowS
show :: VariableSynchronization -> String
$cshow :: VariableSynchronization -> String
showsPrec :: Int -> VariableSynchronization -> ShowS
$cshowsPrec :: Int -> VariableSynchronization -> ShowS
Prelude.Show, VariableSynchronization -> VariableSynchronization -> Bool
(VariableSynchronization -> VariableSynchronization -> Bool)
-> (VariableSynchronization -> VariableSynchronization -> Bool)
-> Eq VariableSynchronization
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: VariableSynchronization -> VariableSynchronization -> Bool
$c/= :: VariableSynchronization -> VariableSynchronization -> Bool
== :: VariableSynchronization -> VariableSynchronization -> Bool
$c== :: VariableSynchronization -> VariableSynchronization -> Bool
Prelude.Eq, Eq VariableSynchronization
Eq VariableSynchronization =>
(VariableSynchronization -> VariableSynchronization -> Ordering)
-> (VariableSynchronization -> VariableSynchronization -> Bool)
-> (VariableSynchronization -> VariableSynchronization -> Bool)
-> (VariableSynchronization -> VariableSynchronization -> Bool)
-> (VariableSynchronization -> VariableSynchronization -> Bool)
-> (VariableSynchronization
-> VariableSynchronization -> VariableSynchronization)
-> (VariableSynchronization
-> VariableSynchronization -> VariableSynchronization)
-> Ord VariableSynchronization
VariableSynchronization -> VariableSynchronization -> Bool
VariableSynchronization -> VariableSynchronization -> Ordering
VariableSynchronization
-> VariableSynchronization -> VariableSynchronization
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 :: VariableSynchronization
-> VariableSynchronization -> VariableSynchronization
$cmin :: VariableSynchronization
-> VariableSynchronization -> VariableSynchronization
max :: VariableSynchronization
-> VariableSynchronization -> VariableSynchronization
$cmax :: VariableSynchronization
-> VariableSynchronization -> VariableSynchronization
>= :: VariableSynchronization -> VariableSynchronization -> Bool
$c>= :: VariableSynchronization -> VariableSynchronization -> Bool
> :: VariableSynchronization -> VariableSynchronization -> Bool
$c> :: VariableSynchronization -> VariableSynchronization -> Bool
<= :: VariableSynchronization -> VariableSynchronization -> Bool
$c<= :: VariableSynchronization -> VariableSynchronization -> Bool
< :: VariableSynchronization -> VariableSynchronization -> Bool
$c< :: VariableSynchronization -> VariableSynchronization -> Bool
compare :: VariableSynchronization -> VariableSynchronization -> Ordering
$ccompare :: VariableSynchronization -> VariableSynchronization -> Ordering
$cp1Ord :: Eq VariableSynchronization
Prelude.Ord)
instance Data.ProtoLens.MessageEnum VariableSynchronization where
maybeToEnum :: Int -> Maybe VariableSynchronization
maybeToEnum 0 = VariableSynchronization -> Maybe VariableSynchronization
forall a. a -> Maybe a
Prelude.Just VariableSynchronization
VARIABLE_SYNCHRONIZATION_AUTO
maybeToEnum 1 = VariableSynchronization -> Maybe VariableSynchronization
forall a. a -> Maybe a
Prelude.Just VariableSynchronization
VARIABLE_SYNCHRONIZATION_NONE
maybeToEnum 2 = VariableSynchronization -> Maybe VariableSynchronization
forall a. a -> Maybe a
Prelude.Just VariableSynchronization
VARIABLE_SYNCHRONIZATION_ON_WRITE
maybeToEnum 3 = VariableSynchronization -> Maybe VariableSynchronization
forall a. a -> Maybe a
Prelude.Just VariableSynchronization
VARIABLE_SYNCHRONIZATION_ON_READ
maybeToEnum k :: Int
k
= VariableSynchronization -> Maybe VariableSynchronization
forall a. a -> Maybe a
Prelude.Just
(VariableSynchronization'UnrecognizedValue
-> VariableSynchronization
VariableSynchronization'Unrecognized
(Int32 -> VariableSynchronization'UnrecognizedValue
VariableSynchronization'UnrecognizedValue
(Int -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int
k)))
showEnum :: VariableSynchronization -> String
showEnum VARIABLE_SYNCHRONIZATION_AUTO
= "VARIABLE_SYNCHRONIZATION_AUTO"
showEnum VARIABLE_SYNCHRONIZATION_NONE
= "VARIABLE_SYNCHRONIZATION_NONE"
showEnum VARIABLE_SYNCHRONIZATION_ON_WRITE
= "VARIABLE_SYNCHRONIZATION_ON_WRITE"
showEnum VARIABLE_SYNCHRONIZATION_ON_READ
= "VARIABLE_SYNCHRONIZATION_ON_READ"
showEnum
(VariableSynchronization'Unrecognized (VariableSynchronization'UnrecognizedValue k :: Int32
k))
= Int32 -> String
forall a. Show a => a -> String
Prelude.show Int32
k
readEnum :: String -> Maybe VariableSynchronization
readEnum k :: String
k
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k "VARIABLE_SYNCHRONIZATION_AUTO"
= VariableSynchronization -> Maybe VariableSynchronization
forall a. a -> Maybe a
Prelude.Just VariableSynchronization
VARIABLE_SYNCHRONIZATION_AUTO
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k "VARIABLE_SYNCHRONIZATION_NONE"
= VariableSynchronization -> Maybe VariableSynchronization
forall a. a -> Maybe a
Prelude.Just VariableSynchronization
VARIABLE_SYNCHRONIZATION_NONE
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k "VARIABLE_SYNCHRONIZATION_ON_WRITE"
= VariableSynchronization -> Maybe VariableSynchronization
forall a. a -> Maybe a
Prelude.Just VariableSynchronization
VARIABLE_SYNCHRONIZATION_ON_WRITE
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k "VARIABLE_SYNCHRONIZATION_ON_READ"
= VariableSynchronization -> Maybe VariableSynchronization
forall a. a -> Maybe a
Prelude.Just VariableSynchronization
VARIABLE_SYNCHRONIZATION_ON_READ
| Bool
Prelude.otherwise
= Maybe Int
-> (Int -> Maybe VariableSynchronization)
-> Maybe VariableSynchronization
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
(Prelude.>>=) (String -> Maybe Int
forall a. Read a => String -> Maybe a
Text.Read.readMaybe String
k) Int -> Maybe VariableSynchronization
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum
instance Prelude.Bounded VariableSynchronization where
minBound :: VariableSynchronization
minBound = VariableSynchronization
VARIABLE_SYNCHRONIZATION_AUTO
maxBound :: VariableSynchronization
maxBound = VariableSynchronization
VARIABLE_SYNCHRONIZATION_ON_READ
instance Prelude.Enum VariableSynchronization where
toEnum :: Int -> VariableSynchronization
toEnum k__ :: Int
k__
= VariableSynchronization
-> (VariableSynchronization -> VariableSynchronization)
-> Maybe VariableSynchronization
-> VariableSynchronization
forall b a. b -> (a -> b) -> Maybe a -> b
Prelude.maybe
(String -> VariableSynchronization
forall a. HasCallStack => String -> a
Prelude.error
(String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
"toEnum: unknown value for enum VariableSynchronization: "
(Int -> String
forall a. Show a => a -> String
Prelude.show Int
k__)))
VariableSynchronization -> VariableSynchronization
forall a. a -> a
Prelude.id
(Int -> Maybe VariableSynchronization
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum Int
k__)
fromEnum :: VariableSynchronization -> Int
fromEnum VARIABLE_SYNCHRONIZATION_AUTO = 0
fromEnum VARIABLE_SYNCHRONIZATION_NONE = 1
fromEnum VARIABLE_SYNCHRONIZATION_ON_WRITE = 2
fromEnum VARIABLE_SYNCHRONIZATION_ON_READ = 3
fromEnum
(VariableSynchronization'Unrecognized (VariableSynchronization'UnrecognizedValue k :: Int32
k))
= Int32 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
k
succ :: VariableSynchronization -> VariableSynchronization
succ VARIABLE_SYNCHRONIZATION_ON_READ
= String -> VariableSynchronization
forall a. HasCallStack => String -> a
Prelude.error
"VariableSynchronization.succ: bad argument VARIABLE_SYNCHRONIZATION_ON_READ. This value would be out of bounds."
succ VARIABLE_SYNCHRONIZATION_AUTO = VariableSynchronization
VARIABLE_SYNCHRONIZATION_NONE
succ VARIABLE_SYNCHRONIZATION_NONE
= VariableSynchronization
VARIABLE_SYNCHRONIZATION_ON_WRITE
succ VARIABLE_SYNCHRONIZATION_ON_WRITE
= VariableSynchronization
VARIABLE_SYNCHRONIZATION_ON_READ
succ (VariableSynchronization'Unrecognized _)
= String -> VariableSynchronization
forall a. HasCallStack => String -> a
Prelude.error
"VariableSynchronization.succ: bad argument: unrecognized value"
pred :: VariableSynchronization -> VariableSynchronization
pred VARIABLE_SYNCHRONIZATION_AUTO
= String -> VariableSynchronization
forall a. HasCallStack => String -> a
Prelude.error
"VariableSynchronization.pred: bad argument VARIABLE_SYNCHRONIZATION_AUTO. This value would be out of bounds."
pred VARIABLE_SYNCHRONIZATION_NONE = VariableSynchronization
VARIABLE_SYNCHRONIZATION_AUTO
pred VARIABLE_SYNCHRONIZATION_ON_WRITE
= VariableSynchronization
VARIABLE_SYNCHRONIZATION_NONE
pred VARIABLE_SYNCHRONIZATION_ON_READ
= VariableSynchronization
VARIABLE_SYNCHRONIZATION_ON_WRITE
pred (VariableSynchronization'Unrecognized _)
= String -> VariableSynchronization
forall a. HasCallStack => String -> a
Prelude.error
"VariableSynchronization.pred: bad argument: unrecognized value"
enumFrom :: VariableSynchronization -> [VariableSynchronization]
enumFrom = VariableSynchronization -> [VariableSynchronization]
forall a. (Enum a, Bounded a) => a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFrom
enumFromTo :: VariableSynchronization
-> VariableSynchronization -> [VariableSynchronization]
enumFromTo = VariableSynchronization
-> VariableSynchronization -> [VariableSynchronization]
forall a. Enum a => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromTo
enumFromThen :: VariableSynchronization
-> VariableSynchronization -> [VariableSynchronization]
enumFromThen = VariableSynchronization
-> VariableSynchronization -> [VariableSynchronization]
forall a. (Enum a, Bounded a) => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThen
enumFromThenTo :: VariableSynchronization
-> VariableSynchronization
-> VariableSynchronization
-> [VariableSynchronization]
enumFromThenTo = VariableSynchronization
-> VariableSynchronization
-> VariableSynchronization
-> [VariableSynchronization]
forall a. Enum a => a -> a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThenTo
instance Data.ProtoLens.FieldDefault VariableSynchronization where
fieldDefault :: VariableSynchronization
fieldDefault = VariableSynchronization
VARIABLE_SYNCHRONIZATION_AUTO
instance Control.DeepSeq.NFData VariableSynchronization where
rnf :: VariableSynchronization -> ()
rnf x__ :: VariableSynchronization
x__ = VariableSynchronization -> () -> ()
forall a b. a -> b -> b
Prelude.seq VariableSynchronization
x__ ()
packedFileDescriptor :: Data.ByteString.ByteString
packedFileDescriptor :: ByteString
packedFileDescriptor
= "\n\
\(tensorflow/core/framework/variable.proto\DC2\n\
\tensorflow\"\206\ETX\n\
\\vVariableDef\DC2#\n\
\\rvariable_name\CAN\SOH \SOH(\tR\fvariableName\DC2,\n\
\\DC2initial_value_name\CAN\ACK \SOH(\tR\DLEinitialValueName\DC2)\n\
\\DLEinitializer_name\CAN\STX \SOH(\tR\SIinitializerName\DC2#\n\
\\rsnapshot_name\CAN\ETX \SOH(\tR\fsnapshotName\DC2K\n\
\\DC3save_slice_info_def\CAN\EOT \SOH(\v2\FS.tensorflow.SaveSliceInfoDefR\DLEsaveSliceInfoDef\DC2\US\n\
\\vis_resource\CAN\ENQ \SOH(\bR\n\
\isResource\DC2\FS\n\
\\ttrainable\CAN\a \SOH(\bR\ttrainable\DC2M\n\
\\SIsynchronization\CAN\b \SOH(\SO2#.tensorflow.VariableSynchronizationR\SIsynchronization\DC2A\n\
\\vaggregation\CAN\t \SOH(\SO2\US.tensorflow.VariableAggregationR\vaggregation\"\138\SOH\n\
\\DLESaveSliceInfoDef\DC2\ESC\n\
\\tfull_name\CAN\SOH \SOH(\tR\bfullName\DC2\GS\n\
\\n\
\full_shape\CAN\STX \ETX(\ETXR\tfullShape\DC2\GS\n\
\\n\
\var_offset\CAN\ETX \ETX(\ETXR\tvarOffset\DC2\ESC\n\
\\tvar_shape\CAN\EOT \ETX(\ETXR\bvarShape*\172\SOH\n\
\\ETBVariableSynchronization\DC2!\n\
\\GSVARIABLE_SYNCHRONIZATION_AUTO\DLE\NUL\DC2!\n\
\\GSVARIABLE_SYNCHRONIZATION_NONE\DLE\SOH\DC2%\n\
\!VARIABLE_SYNCHRONIZATION_ON_WRITE\DLE\STX\DC2$\n\
\ VARIABLE_SYNCHRONIZATION_ON_READ\DLE\ETX*\158\SOH\n\
\\DC3VariableAggregation\DC2\GS\n\
\\EMVARIABLE_AGGREGATION_NONE\DLE\NUL\DC2\FS\n\
\\CANVARIABLE_AGGREGATION_SUM\DLE\SOH\DC2\GS\n\
\\EMVARIABLE_AGGREGATION_MEAN\DLE\STX\DC2+\n\
\'VARIABLE_AGGREGATION_ONLY_FIRST_REPLICA\DLE\ETXB\128\SOH\n\
\\CANorg.tensorflow.frameworkB\SOVariableProtosP\SOHZOgithub.com/tensorflow/tensorflow/tensorflow/go/core/framework/variable_go_proto\248\SOH\SOHJ\203\ETB\n\
\\ACK\DC2\EOT\NUL\NULS\SOH\n\
\\b\n\
\\SOH\f\DC2\ETX\NUL\NUL\DC2\n\
\\b\n\
\\SOH\STX\DC2\ETX\STX\NUL\DC3\n\
\\b\n\
\\SOH\b\DC2\ETX\EOT\NUL\US\n\
\\t\n\
\\STX\b\US\DC2\ETX\EOT\NUL\US\n\
\\b\n\
\\SOH\b\DC2\ETX\ENQ\NUL/\n\
\\t\n\
\\STX\b\b\DC2\ETX\ENQ\NUL/\n\
\\b\n\
\\SOH\b\DC2\ETX\ACK\NUL\"\n\
\\t\n\
\\STX\b\n\
\\DC2\ETX\ACK\NUL\"\n\
\\b\n\
\\SOH\b\DC2\ETX\a\NUL1\n\
\\t\n\
\\STX\b\SOH\DC2\ETX\a\NUL1\n\
\\b\n\
\\SOH\b\DC2\ETX\b\NULf\n\
\\t\n\
\\STX\b\v\DC2\ETX\b\NULf\n\
\C\n\
\\STX\ENQ\NUL\DC2\EOT\v\NUL\SUB\SOH\SUB7 Indicates when a distributed variable will be synced.\n\
\\n\
\\n\
\\n\
\\ETX\ENQ\NUL\SOH\DC2\ETX\v\ENQ\FS\n\
\\173\SOH\n\
\\EOT\ENQ\NUL\STX\NUL\DC2\ETX\SI\STX$\SUB\159\SOH `AUTO`: Indicates that the synchronization will be determined by the\n\
\ current `DistributionStrategy` (eg. With `MirroredStrategy` this would be\n\
\ `ON_WRITE`).\n\
\\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\NUL\SOH\DC2\ETX\SI\STX\US\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\NUL\STX\DC2\ETX\SI\"#\n\
\p\n\
\\EOT\ENQ\NUL\STX\SOH\DC2\ETX\DC2\STX$\SUBc `NONE`: Indicates that there will only be one copy of the variable, so\n\
\ there is no need to sync.\n\
\\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\SOH\SOH\DC2\ETX\DC2\STX\US\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\SOH\STX\DC2\ETX\DC2\"#\n\
\p\n\
\\EOT\ENQ\NUL\STX\STX\DC2\ETX\NAK\STX(\SUBc `ON_WRITE`: Indicates that the variable will be updated across devices\n\
\ every time it is written.\n\
\\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\STX\SOH\DC2\ETX\NAK\STX#\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\STX\STX\DC2\ETX\NAK&'\n\
\\180\SOH\n\
\\EOT\ENQ\NUL\STX\ETX\DC2\ETX\EM\STX'\SUB\166\SOH `ON_READ`: Indicates that the variable will be aggregated across devices\n\
\ when it is read (eg. when checkpointing or when evaluating an op that uses\n\
\ the variable).\n\
\\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\ETX\SOH\DC2\ETX\EM\STX\"\n\
\\f\n\
\\ENQ\ENQ\NUL\STX\ETX\STX\DC2\ETX\EM%&\n\
\F\n\
\\STX\ENQ\SOH\DC2\EOT\GS\NUL*\SOH\SUB: Indicates how a distributed variable will be aggregated.\n\
\\n\
\\n\
\\n\
\\ETX\ENQ\SOH\SOH\DC2\ETX\GS\ENQ\CAN\n\
\{\n\
\\EOT\ENQ\SOH\STX\NUL\DC2\ETX \STX \SUBn `NONE`: This is the default, giving an error if you use a\n\
\ variable-update operation with multiple replicas.\n\
\\n\
\\f\n\
\\ENQ\ENQ\SOH\STX\NUL\SOH\DC2\ETX \STX\ESC\n\
\\f\n\
\\ENQ\ENQ\SOH\STX\NUL\STX\DC2\ETX \RS\US\n\
\6\n\
\\EOT\ENQ\SOH\STX\SOH\DC2\ETX\"\STX\US\SUB) `SUM`: Add the updates across replicas.\n\
\\n\
\\f\n\
\\ENQ\ENQ\SOH\STX\SOH\SOH\DC2\ETX\"\STX\SUB\n\
\\f\n\
\\ENQ\ENQ\SOH\STX\SOH\STX\DC2\ETX\"\GS\RS\n\
\\\\n\
\\EOT\ENQ\SOH\STX\STX\DC2\ETX%\STX \SUBO `MEAN`: Take the arithmetic mean (\"average\") of the updates across\n\
\ replicas.\n\
\\n\
\\f\n\
\\ENQ\ENQ\SOH\STX\STX\SOH\DC2\ETX%\STX\ESC\n\
\\f\n\
\\ENQ\ENQ\SOH\STX\STX\STX\DC2\ETX%\RS\US\n\
\\187\SOH\n\
\\EOT\ENQ\SOH\STX\ETX\DC2\ETX)\STX.\SUB\173\SOH `ONLY_FIRST_REPLICA`: This is for when every replica is performing the same\n\
\ update, but we only want to perform the update once. Used, e.g., for the\n\
\ global step counter.\n\
\\n\
\\f\n\
\\ENQ\ENQ\SOH\STX\ETX\SOH\DC2\ETX)\STX)\n\
\\f\n\
\\ENQ\ENQ\SOH\STX\ETX\STX\DC2\ETX),-\n\
\6\n\
\\STX\EOT\NUL\DC2\EOT-\NULH\SOH\SUB* Protocol buffer representing a Variable.\n\
\\n\
\\n\
\\n\
\\ETX\EOT\NUL\SOH\DC2\ETX-\b\DC3\n\
\+\n\
\\EOT\EOT\NUL\STX\NUL\DC2\ETX/\STX\ESC\SUB\RS Name of the variable tensor.\n\
\\n\
\\f\n\
\\ENQ\EOT\NUL\STX\NUL\ENQ\DC2\ETX/\STX\b\n\
\\f\n\
\\ENQ\EOT\NUL\STX\NUL\SOH\DC2\ETX/\t\SYN\n\
\\f\n\
\\ENQ\EOT\NUL\STX\NUL\ETX\DC2\ETX/\EM\SUB\n\
\G\n\
\\EOT\EOT\NUL\STX\SOH\DC2\ETX2\STX \SUB: Name of the tensor holding the variable's initial value.\n\
\\n\
\\f\n\
\\ENQ\EOT\NUL\STX\SOH\ENQ\DC2\ETX2\STX\b\n\
\\f\n\
\\ENQ\EOT\NUL\STX\SOH\SOH\DC2\ETX2\t\ESC\n\
\\f\n\
\\ENQ\EOT\NUL\STX\SOH\ETX\DC2\ETX2\RS\US\n\
\*\n\
\\EOT\EOT\NUL\STX\STX\DC2\ETX5\STX\RS\SUB\GS Name of the initializer op.\n\
\\n\
\\f\n\
\\ENQ\EOT\NUL\STX\STX\ENQ\DC2\ETX5\STX\b\n\
\\f\n\
\\ENQ\EOT\NUL\STX\STX\SOH\DC2\ETX5\t\EM\n\
\\f\n\
\\ENQ\EOT\NUL\STX\STX\ETX\DC2\ETX5\FS\GS\n\
\+\n\
\\EOT\EOT\NUL\STX\ETX\DC2\ETX8\STX\ESC\SUB\RS Name of the snapshot tensor.\n\
\\n\
\\f\n\
\\ENQ\EOT\NUL\STX\ETX\ENQ\DC2\ETX8\STX\b\n\
\\f\n\
\\ENQ\EOT\NUL\STX\ETX\SOH\DC2\ETX8\t\SYN\n\
\\f\n\
\\ENQ\EOT\NUL\STX\ETX\ETX\DC2\ETX8\EM\SUB\n\
\K\n\
\\EOT\EOT\NUL\STX\EOT\DC2\ETX;\STX+\SUB> Support for saving variables as slices of a larger variable.\n\
\\n\
\\f\n\
\\ENQ\EOT\NUL\STX\EOT\ACK\DC2\ETX;\STX\DC2\n\
\\f\n\
\\ENQ\EOT\NUL\STX\EOT\SOH\DC2\ETX;\DC3&\n\
\\f\n\
\\ENQ\EOT\NUL\STX\EOT\ETX\DC2\ETX;)*\n\
\?\n\
\\EOT\EOT\NUL\STX\ENQ\DC2\ETX>\STX\ETB\SUB2 Whether to represent this as a ResourceVariable.\n\
\\n\
\\f\n\
\\ENQ\EOT\NUL\STX\ENQ\ENQ\DC2\ETX>\STX\ACK\n\
\\f\n\
\\ENQ\EOT\NUL\STX\ENQ\SOH\DC2\ETX>\a\DC2\n\
\\f\n\
\\ENQ\EOT\NUL\STX\ENQ\ETX\DC2\ETX>\NAK\SYN\n\
\7\n\
\\EOT\EOT\NUL\STX\ACK\DC2\ETXA\STX\NAK\SUB* Whether this variable should be trained.\n\
\\n\
\\f\n\
\\ENQ\EOT\NUL\STX\ACK\ENQ\DC2\ETXA\STX\ACK\n\
\\f\n\
\\ENQ\EOT\NUL\STX\ACK\SOH\DC2\ETXA\a\DLE\n\
\\f\n\
\\ENQ\EOT\NUL\STX\ACK\ETX\DC2\ETXA\DC3\DC4\n\
\D\n\
\\EOT\EOT\NUL\STX\a\DC2\ETXD\STX.\SUB7 Indicates when a distributed variable will be synced.\n\
\\n\
\\f\n\
\\ENQ\EOT\NUL\STX\a\ACK\DC2\ETXD\STX\EM\n\
\\f\n\
\\ENQ\EOT\NUL\STX\a\SOH\DC2\ETXD\SUB)\n\
\\f\n\
\\ENQ\EOT\NUL\STX\a\ETX\DC2\ETXD,-\n\
\G\n\
\\EOT\EOT\NUL\STX\b\DC2\ETXG\STX&\SUB: Indicates how a distributed variable will be aggregated.\n\
\\n\
\\f\n\
\\ENQ\EOT\NUL\STX\b\ACK\DC2\ETXG\STX\NAK\n\
\\f\n\
\\ENQ\EOT\NUL\STX\b\SOH\DC2\ETXG\SYN!\n\
\\f\n\
\\ENQ\EOT\NUL\STX\b\ETX\DC2\ETXG$%\n\
\\n\
\\n\
\\STX\EOT\SOH\DC2\EOTJ\NULS\SOH\n\
\\n\
\\n\
\\ETX\EOT\SOH\SOH\DC2\ETXJ\b\CAN\n\
\B\n\
\\EOT\EOT\SOH\STX\NUL\DC2\ETXL\STX\ETB\SUB5 Name of the full variable of which this is a slice.\n\
\\n\
\\f\n\
\\ENQ\EOT\SOH\STX\NUL\ENQ\DC2\ETXL\STX\b\n\
\\f\n\
\\ENQ\EOT\SOH\STX\NUL\SOH\DC2\ETXL\t\DC2\n\
\\f\n\
\\ENQ\EOT\SOH\STX\NUL\ETX\DC2\ETXL\NAK\SYN\n\
\*\n\
\\EOT\EOT\SOH\STX\SOH\DC2\ETXN\STX \SUB\GS Shape of the full variable.\n\
\\n\
\\f\n\
\\ENQ\EOT\SOH\STX\SOH\EOT\DC2\ETXN\STX\n\
\\n\
\\f\n\
\\ENQ\EOT\SOH\STX\SOH\ENQ\DC2\ETXN\v\DLE\n\
\\f\n\
\\ENQ\EOT\SOH\STX\SOH\SOH\DC2\ETXN\DC1\ESC\n\
\\f\n\
\\ENQ\EOT\SOH\STX\SOH\ETX\DC2\ETXN\RS\US\n\
\>\n\
\\EOT\EOT\SOH\STX\STX\DC2\ETXP\STX \SUB1 Offset of this variable into the full variable.\n\
\\n\
\\f\n\
\\ENQ\EOT\SOH\STX\STX\EOT\DC2\ETXP\STX\n\
\\n\
\\f\n\
\\ENQ\EOT\SOH\STX\STX\ENQ\DC2\ETXP\v\DLE\n\
\\f\n\
\\ENQ\EOT\SOH\STX\STX\SOH\DC2\ETXP\DC1\ESC\n\
\\f\n\
\\ENQ\EOT\SOH\STX\STX\ETX\DC2\ETXP\RS\US\n\
\&\n\
\\EOT\EOT\SOH\STX\ETX\DC2\ETXR\STX\US\SUB\EM Shape of this variable.\n\
\\n\
\\f\n\
\\ENQ\EOT\SOH\STX\ETX\EOT\DC2\ETXR\STX\n\
\\n\
\\f\n\
\\ENQ\EOT\SOH\STX\ETX\ENQ\DC2\ETXR\v\DLE\n\
\\f\n\
\\ENQ\EOT\SOH\STX\ETX\SOH\DC2\ETXR\DC1\SUB\n\
\\f\n\
\\ENQ\EOT\SOH\STX\ETX\ETX\DC2\ETXR\GS\RSb\ACKproto3"