{- This file was auto-generated from tensorflow/core/protobuf/config.proto by the proto-lens-protoc program. -}
{-# LANGUAGE ScopedTypeVariables, DataKinds, TypeFamilies, UndecidableInstances, GeneralizedNewtypeDeriving, MultiParamTypeClasses, FlexibleContexts, FlexibleInstances, PatternSynonyms, MagicHash, NoImplicitPrelude, DataKinds, BangPatterns, TypeApplications, OverloadedStrings, DerivingStrategies#-}
{-# OPTIONS_GHC -Wno-unused-imports#-}
{-# OPTIONS_GHC -Wno-duplicate-exports#-}
{-# OPTIONS_GHC -Wno-dodgy-exports#-}
module Proto.Tensorflow.Core.Protobuf.Config (
        CallableOptions(), CallableOptions'FeedDevicesEntry(),
        CallableOptions'FetchDevicesEntry(), ConfigProto(),
        ConfigProto'DeviceCountEntry(), ConfigProto'Experimental(),
        GPUOptions(), GPUOptions'Experimental(),
        GPUOptions'Experimental'VirtualDevices(), GraphOptions(),
        OptimizerOptions(), OptimizerOptions'GlobalJitLevel(..),
        OptimizerOptions'GlobalJitLevel(),
        OptimizerOptions'GlobalJitLevel'UnrecognizedValue,
        OptimizerOptions'Level(..), OptimizerOptions'Level(),
        OptimizerOptions'Level'UnrecognizedValue, RPCOptions(),
        RunMetadata(), RunMetadata'FunctionGraphs(), RunOptions(),
        RunOptions'Experimental(),
        RunOptions'Experimental'RunHandlerPoolOptions(),
        RunOptions'TraceLevel(..), RunOptions'TraceLevel(),
        RunOptions'TraceLevel'UnrecognizedValue, SessionMetadata(),
        TensorConnection(), ThreadPoolOptionProto()
    ) where
import qualified Data.ProtoLens.Runtime.Control.DeepSeq as Control.DeepSeq
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Prism as Data.ProtoLens.Prism
import qualified Data.ProtoLens.Runtime.Prelude as Prelude
import qualified Data.ProtoLens.Runtime.Data.Int as Data.Int
import qualified Data.ProtoLens.Runtime.Data.Monoid as Data.Monoid
import qualified Data.ProtoLens.Runtime.Data.Word as Data.Word
import qualified Data.ProtoLens.Runtime.Data.ProtoLens as Data.ProtoLens
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Bytes as Data.ProtoLens.Encoding.Bytes
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Growing as Data.ProtoLens.Encoding.Growing
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Parser.Unsafe as Data.ProtoLens.Encoding.Parser.Unsafe
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Wire as Data.ProtoLens.Encoding.Wire
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Field as Data.ProtoLens.Field
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Message.Enum as Data.ProtoLens.Message.Enum
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Service.Types as Data.ProtoLens.Service.Types
import qualified Data.ProtoLens.Runtime.Lens.Family2 as Lens.Family2
import qualified Data.ProtoLens.Runtime.Lens.Family2.Unchecked as Lens.Family2.Unchecked
import qualified Data.ProtoLens.Runtime.Data.Text as Data.Text
import qualified Data.ProtoLens.Runtime.Data.Map as Data.Map
import qualified Data.ProtoLens.Runtime.Data.ByteString as Data.ByteString
import qualified Data.ProtoLens.Runtime.Data.ByteString.Char8 as Data.ByteString.Char8
import qualified Data.ProtoLens.Runtime.Data.Text.Encoding as Data.Text.Encoding
import qualified Data.ProtoLens.Runtime.Data.Vector as Data.Vector
import qualified Data.ProtoLens.Runtime.Data.Vector.Generic as Data.Vector.Generic
import qualified Data.ProtoLens.Runtime.Data.Vector.Unboxed as Data.Vector.Unboxed
import qualified Data.ProtoLens.Runtime.Text.Read as Text.Read
import qualified Proto.Tensorflow.Core.Framework.CostGraph
import qualified Proto.Tensorflow.Core.Framework.Graph
import qualified Proto.Tensorflow.Core.Framework.StepStats
import qualified Proto.Tensorflow.Core.Protobuf.Cluster
import qualified Proto.Tensorflow.Core.Protobuf.Debug
import qualified Proto.Tensorflow.Core.Protobuf.RewriterConfig
{- | Fields :
     
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.feed' @:: Lens' CallableOptions [Data.Text.Text]@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.vec'feed' @:: Lens' CallableOptions (Data.Vector.Vector Data.Text.Text)@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.fetch' @:: Lens' CallableOptions [Data.Text.Text]@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.vec'fetch' @:: Lens' CallableOptions (Data.Vector.Vector Data.Text.Text)@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.target' @:: Lens' CallableOptions [Data.Text.Text]@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.vec'target' @:: Lens' CallableOptions (Data.Vector.Vector Data.Text.Text)@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.runOptions' @:: Lens' CallableOptions RunOptions@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.maybe'runOptions' @:: Lens' CallableOptions (Prelude.Maybe RunOptions)@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.tensorConnection' @:: Lens' CallableOptions [TensorConnection]@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.vec'tensorConnection' @:: Lens' CallableOptions (Data.Vector.Vector TensorConnection)@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.feedDevices' @:: Lens' CallableOptions (Data.Map.Map Data.Text.Text Data.Text.Text)@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.fetchDevices' @:: Lens' CallableOptions (Data.Map.Map Data.Text.Text Data.Text.Text)@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.fetchSkipSync' @:: Lens' CallableOptions Prelude.Bool@ -}
data CallableOptions
  = CallableOptions'_constructor {CallableOptions -> Vector Text
_CallableOptions'feed :: !(Data.Vector.Vector Data.Text.Text),
                                  CallableOptions -> Vector Text
_CallableOptions'fetch :: !(Data.Vector.Vector Data.Text.Text),
                                  CallableOptions -> Vector Text
_CallableOptions'target :: !(Data.Vector.Vector Data.Text.Text),
                                  CallableOptions -> Maybe RunOptions
_CallableOptions'runOptions :: !(Prelude.Maybe RunOptions),
                                  CallableOptions -> Vector TensorConnection
_CallableOptions'tensorConnection :: !(Data.Vector.Vector TensorConnection),
                                  CallableOptions -> Map Text Text
_CallableOptions'feedDevices :: !(Data.Map.Map Data.Text.Text Data.Text.Text),
                                  CallableOptions -> Map Text Text
_CallableOptions'fetchDevices :: !(Data.Map.Map Data.Text.Text Data.Text.Text),
                                  CallableOptions -> Bool
_CallableOptions'fetchSkipSync :: !Prelude.Bool,
                                  CallableOptions -> FieldSet
_CallableOptions'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (CallableOptions -> CallableOptions -> Bool
(CallableOptions -> CallableOptions -> Bool)
-> (CallableOptions -> CallableOptions -> Bool)
-> Eq CallableOptions
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: CallableOptions -> CallableOptions -> Bool
$c/= :: CallableOptions -> CallableOptions -> Bool
== :: CallableOptions -> CallableOptions -> Bool
$c== :: CallableOptions -> CallableOptions -> Bool
Prelude.Eq, Eq CallableOptions
Eq CallableOptions =>
(CallableOptions -> CallableOptions -> Ordering)
-> (CallableOptions -> CallableOptions -> Bool)
-> (CallableOptions -> CallableOptions -> Bool)
-> (CallableOptions -> CallableOptions -> Bool)
-> (CallableOptions -> CallableOptions -> Bool)
-> (CallableOptions -> CallableOptions -> CallableOptions)
-> (CallableOptions -> CallableOptions -> CallableOptions)
-> Ord CallableOptions
CallableOptions -> CallableOptions -> Bool
CallableOptions -> CallableOptions -> Ordering
CallableOptions -> CallableOptions -> CallableOptions
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 :: CallableOptions -> CallableOptions -> CallableOptions
$cmin :: CallableOptions -> CallableOptions -> CallableOptions
max :: CallableOptions -> CallableOptions -> CallableOptions
$cmax :: CallableOptions -> CallableOptions -> CallableOptions
>= :: CallableOptions -> CallableOptions -> Bool
$c>= :: CallableOptions -> CallableOptions -> Bool
> :: CallableOptions -> CallableOptions -> Bool
$c> :: CallableOptions -> CallableOptions -> Bool
<= :: CallableOptions -> CallableOptions -> Bool
$c<= :: CallableOptions -> CallableOptions -> Bool
< :: CallableOptions -> CallableOptions -> Bool
$c< :: CallableOptions -> CallableOptions -> Bool
compare :: CallableOptions -> CallableOptions -> Ordering
$ccompare :: CallableOptions -> CallableOptions -> Ordering
$cp1Ord :: Eq CallableOptions
Prelude.Ord)
instance Prelude.Show CallableOptions where
  showsPrec :: Int -> CallableOptions -> ShowS
showsPrec _ __x :: CallableOptions
__x __s :: String
__s
    = Char -> ShowS
Prelude.showChar
        '{'
        (String -> ShowS
Prelude.showString
           (CallableOptions -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort CallableOptions
__x) (Char -> ShowS
Prelude.showChar '}' String
__s))
instance Data.ProtoLens.Field.HasField CallableOptions "feed" [Data.Text.Text] where
  fieldOf :: Proxy# "feed"
-> ([Text] -> f [Text]) -> CallableOptions -> f CallableOptions
fieldOf _
    = ((Vector Text -> f (Vector Text))
 -> CallableOptions -> f CallableOptions)
-> (([Text] -> f [Text]) -> Vector Text -> f (Vector Text))
-> ([Text] -> f [Text])
-> CallableOptions
-> f CallableOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CallableOptions -> Vector Text)
-> (CallableOptions -> Vector Text -> CallableOptions)
-> Lens CallableOptions CallableOptions (Vector Text) (Vector Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CallableOptions -> Vector Text
_CallableOptions'feed
           (\ x__ :: CallableOptions
x__ y__ :: Vector Text
y__ -> CallableOptions
x__ {_CallableOptions'feed :: Vector Text
_CallableOptions'feed = Vector Text
y__}))
        ((Vector Text -> [Text])
-> (Vector Text -> [Text] -> Vector Text)
-> Lens (Vector Text) (Vector Text) [Text] [Text]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Text -> [Text]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ _ y__ :: [Text]
y__ -> [Text] -> Vector Text
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Text]
y__))
instance Data.ProtoLens.Field.HasField CallableOptions "vec'feed" (Data.Vector.Vector Data.Text.Text) where
  fieldOf :: Proxy# "vec'feed"
-> (Vector Text -> f (Vector Text))
-> CallableOptions
-> f CallableOptions
fieldOf _
    = ((Vector Text -> f (Vector Text))
 -> CallableOptions -> f CallableOptions)
-> ((Vector Text -> f (Vector Text))
    -> Vector Text -> f (Vector Text))
-> (Vector Text -> f (Vector Text))
-> CallableOptions
-> f CallableOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CallableOptions -> Vector Text)
-> (CallableOptions -> Vector Text -> CallableOptions)
-> Lens CallableOptions CallableOptions (Vector Text) (Vector Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CallableOptions -> Vector Text
_CallableOptions'feed
           (\ x__ :: CallableOptions
x__ y__ :: Vector Text
y__ -> CallableOptions
x__ {_CallableOptions'feed :: Vector Text
_CallableOptions'feed = Vector Text
y__}))
        (Vector Text -> f (Vector Text)) -> Vector Text -> f (Vector Text)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField CallableOptions "fetch" [Data.Text.Text] where
  fieldOf :: Proxy# "fetch"
-> ([Text] -> f [Text]) -> CallableOptions -> f CallableOptions
fieldOf _
    = ((Vector Text -> f (Vector Text))
 -> CallableOptions -> f CallableOptions)
-> (([Text] -> f [Text]) -> Vector Text -> f (Vector Text))
-> ([Text] -> f [Text])
-> CallableOptions
-> f CallableOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CallableOptions -> Vector Text)
-> (CallableOptions -> Vector Text -> CallableOptions)
-> Lens CallableOptions CallableOptions (Vector Text) (Vector Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CallableOptions -> Vector Text
_CallableOptions'fetch
           (\ x__ :: CallableOptions
x__ y__ :: Vector Text
y__ -> CallableOptions
x__ {_CallableOptions'fetch :: Vector Text
_CallableOptions'fetch = Vector Text
y__}))
        ((Vector Text -> [Text])
-> (Vector Text -> [Text] -> Vector Text)
-> Lens (Vector Text) (Vector Text) [Text] [Text]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Text -> [Text]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ _ y__ :: [Text]
y__ -> [Text] -> Vector Text
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Text]
y__))
instance Data.ProtoLens.Field.HasField CallableOptions "vec'fetch" (Data.Vector.Vector Data.Text.Text) where
  fieldOf :: Proxy# "vec'fetch"
-> (Vector Text -> f (Vector Text))
-> CallableOptions
-> f CallableOptions
fieldOf _
    = ((Vector Text -> f (Vector Text))
 -> CallableOptions -> f CallableOptions)
-> ((Vector Text -> f (Vector Text))
    -> Vector Text -> f (Vector Text))
-> (Vector Text -> f (Vector Text))
-> CallableOptions
-> f CallableOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CallableOptions -> Vector Text)
-> (CallableOptions -> Vector Text -> CallableOptions)
-> Lens CallableOptions CallableOptions (Vector Text) (Vector Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CallableOptions -> Vector Text
_CallableOptions'fetch
           (\ x__ :: CallableOptions
x__ y__ :: Vector Text
y__ -> CallableOptions
x__ {_CallableOptions'fetch :: Vector Text
_CallableOptions'fetch = Vector Text
y__}))
        (Vector Text -> f (Vector Text)) -> Vector Text -> f (Vector Text)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField CallableOptions "target" [Data.Text.Text] where
  fieldOf :: Proxy# "target"
-> ([Text] -> f [Text]) -> CallableOptions -> f CallableOptions
fieldOf _
    = ((Vector Text -> f (Vector Text))
 -> CallableOptions -> f CallableOptions)
-> (([Text] -> f [Text]) -> Vector Text -> f (Vector Text))
-> ([Text] -> f [Text])
-> CallableOptions
-> f CallableOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CallableOptions -> Vector Text)
-> (CallableOptions -> Vector Text -> CallableOptions)
-> Lens CallableOptions CallableOptions (Vector Text) (Vector Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CallableOptions -> Vector Text
_CallableOptions'target
           (\ x__ :: CallableOptions
x__ y__ :: Vector Text
y__ -> CallableOptions
x__ {_CallableOptions'target :: Vector Text
_CallableOptions'target = Vector Text
y__}))
        ((Vector Text -> [Text])
-> (Vector Text -> [Text] -> Vector Text)
-> Lens (Vector Text) (Vector Text) [Text] [Text]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Text -> [Text]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ _ y__ :: [Text]
y__ -> [Text] -> Vector Text
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Text]
y__))
instance Data.ProtoLens.Field.HasField CallableOptions "vec'target" (Data.Vector.Vector Data.Text.Text) where
  fieldOf :: Proxy# "vec'target"
-> (Vector Text -> f (Vector Text))
-> CallableOptions
-> f CallableOptions
fieldOf _
    = ((Vector Text -> f (Vector Text))
 -> CallableOptions -> f CallableOptions)
-> ((Vector Text -> f (Vector Text))
    -> Vector Text -> f (Vector Text))
-> (Vector Text -> f (Vector Text))
-> CallableOptions
-> f CallableOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CallableOptions -> Vector Text)
-> (CallableOptions -> Vector Text -> CallableOptions)
-> Lens CallableOptions CallableOptions (Vector Text) (Vector Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CallableOptions -> Vector Text
_CallableOptions'target
           (\ x__ :: CallableOptions
x__ y__ :: Vector Text
y__ -> CallableOptions
x__ {_CallableOptions'target :: Vector Text
_CallableOptions'target = Vector Text
y__}))
        (Vector Text -> f (Vector Text)) -> Vector Text -> f (Vector Text)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField CallableOptions "runOptions" RunOptions where
  fieldOf :: Proxy# "runOptions"
-> (RunOptions -> f RunOptions)
-> CallableOptions
-> f CallableOptions
fieldOf _
    = ((Maybe RunOptions -> f (Maybe RunOptions))
 -> CallableOptions -> f CallableOptions)
-> ((RunOptions -> f RunOptions)
    -> Maybe RunOptions -> f (Maybe RunOptions))
-> (RunOptions -> f RunOptions)
-> CallableOptions
-> f CallableOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CallableOptions -> Maybe RunOptions)
-> (CallableOptions -> Maybe RunOptions -> CallableOptions)
-> Lens
     CallableOptions
     CallableOptions
     (Maybe RunOptions)
     (Maybe RunOptions)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CallableOptions -> Maybe RunOptions
_CallableOptions'runOptions
           (\ x__ :: CallableOptions
x__ y__ :: Maybe RunOptions
y__ -> CallableOptions
x__ {_CallableOptions'runOptions :: Maybe RunOptions
_CallableOptions'runOptions = Maybe RunOptions
y__}))
        (RunOptions -> Lens' (Maybe RunOptions) RunOptions
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens RunOptions
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField CallableOptions "maybe'runOptions" (Prelude.Maybe RunOptions) where
  fieldOf :: Proxy# "maybe'runOptions"
-> (Maybe RunOptions -> f (Maybe RunOptions))
-> CallableOptions
-> f CallableOptions
fieldOf _
    = ((Maybe RunOptions -> f (Maybe RunOptions))
 -> CallableOptions -> f CallableOptions)
-> ((Maybe RunOptions -> f (Maybe RunOptions))
    -> Maybe RunOptions -> f (Maybe RunOptions))
-> (Maybe RunOptions -> f (Maybe RunOptions))
-> CallableOptions
-> f CallableOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CallableOptions -> Maybe RunOptions)
-> (CallableOptions -> Maybe RunOptions -> CallableOptions)
-> Lens
     CallableOptions
     CallableOptions
     (Maybe RunOptions)
     (Maybe RunOptions)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CallableOptions -> Maybe RunOptions
_CallableOptions'runOptions
           (\ x__ :: CallableOptions
x__ y__ :: Maybe RunOptions
y__ -> CallableOptions
x__ {_CallableOptions'runOptions :: Maybe RunOptions
_CallableOptions'runOptions = Maybe RunOptions
y__}))
        (Maybe RunOptions -> f (Maybe RunOptions))
-> Maybe RunOptions -> f (Maybe RunOptions)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField CallableOptions "tensorConnection" [TensorConnection] where
  fieldOf :: Proxy# "tensorConnection"
-> ([TensorConnection] -> f [TensorConnection])
-> CallableOptions
-> f CallableOptions
fieldOf _
    = ((Vector TensorConnection -> f (Vector TensorConnection))
 -> CallableOptions -> f CallableOptions)
-> (([TensorConnection] -> f [TensorConnection])
    -> Vector TensorConnection -> f (Vector TensorConnection))
-> ([TensorConnection] -> f [TensorConnection])
-> CallableOptions
-> f CallableOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CallableOptions -> Vector TensorConnection)
-> (CallableOptions -> Vector TensorConnection -> CallableOptions)
-> Lens
     CallableOptions
     CallableOptions
     (Vector TensorConnection)
     (Vector TensorConnection)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CallableOptions -> Vector TensorConnection
_CallableOptions'tensorConnection
           (\ x__ :: CallableOptions
x__ y__ :: Vector TensorConnection
y__ -> CallableOptions
x__ {_CallableOptions'tensorConnection :: Vector TensorConnection
_CallableOptions'tensorConnection = Vector TensorConnection
y__}))
        ((Vector TensorConnection -> [TensorConnection])
-> (Vector TensorConnection
    -> [TensorConnection] -> Vector TensorConnection)
-> Lens
     (Vector TensorConnection)
     (Vector TensorConnection)
     [TensorConnection]
     [TensorConnection]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector TensorConnection -> [TensorConnection]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ _ y__ :: [TensorConnection]
y__ -> [TensorConnection] -> Vector TensorConnection
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [TensorConnection]
y__))
instance Data.ProtoLens.Field.HasField CallableOptions "vec'tensorConnection" (Data.Vector.Vector TensorConnection) where
  fieldOf :: Proxy# "vec'tensorConnection"
-> (Vector TensorConnection -> f (Vector TensorConnection))
-> CallableOptions
-> f CallableOptions
fieldOf _
    = ((Vector TensorConnection -> f (Vector TensorConnection))
 -> CallableOptions -> f CallableOptions)
-> ((Vector TensorConnection -> f (Vector TensorConnection))
    -> Vector TensorConnection -> f (Vector TensorConnection))
-> (Vector TensorConnection -> f (Vector TensorConnection))
-> CallableOptions
-> f CallableOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CallableOptions -> Vector TensorConnection)
-> (CallableOptions -> Vector TensorConnection -> CallableOptions)
-> Lens
     CallableOptions
     CallableOptions
     (Vector TensorConnection)
     (Vector TensorConnection)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CallableOptions -> Vector TensorConnection
_CallableOptions'tensorConnection
           (\ x__ :: CallableOptions
x__ y__ :: Vector TensorConnection
y__ -> CallableOptions
x__ {_CallableOptions'tensorConnection :: Vector TensorConnection
_CallableOptions'tensorConnection = Vector TensorConnection
y__}))
        (Vector TensorConnection -> f (Vector TensorConnection))
-> Vector TensorConnection -> f (Vector TensorConnection)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField CallableOptions "feedDevices" (Data.Map.Map Data.Text.Text Data.Text.Text) where
  fieldOf :: Proxy# "feedDevices"
-> (Map Text Text -> f (Map Text Text))
-> CallableOptions
-> f CallableOptions
fieldOf _
    = ((Map Text Text -> f (Map Text Text))
 -> CallableOptions -> f CallableOptions)
-> ((Map Text Text -> f (Map Text Text))
    -> Map Text Text -> f (Map Text Text))
-> (Map Text Text -> f (Map Text Text))
-> CallableOptions
-> f CallableOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CallableOptions -> Map Text Text)
-> (CallableOptions -> Map Text Text -> CallableOptions)
-> Lens
     CallableOptions CallableOptions (Map Text Text) (Map Text Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CallableOptions -> Map Text Text
_CallableOptions'feedDevices
           (\ x__ :: CallableOptions
x__ y__ :: Map Text Text
y__ -> CallableOptions
x__ {_CallableOptions'feedDevices :: Map Text Text
_CallableOptions'feedDevices = Map Text Text
y__}))
        (Map Text Text -> f (Map Text Text))
-> Map Text Text -> f (Map Text Text)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField CallableOptions "fetchDevices" (Data.Map.Map Data.Text.Text Data.Text.Text) where
  fieldOf :: Proxy# "fetchDevices"
-> (Map Text Text -> f (Map Text Text))
-> CallableOptions
-> f CallableOptions
fieldOf _
    = ((Map Text Text -> f (Map Text Text))
 -> CallableOptions -> f CallableOptions)
-> ((Map Text Text -> f (Map Text Text))
    -> Map Text Text -> f (Map Text Text))
-> (Map Text Text -> f (Map Text Text))
-> CallableOptions
-> f CallableOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CallableOptions -> Map Text Text)
-> (CallableOptions -> Map Text Text -> CallableOptions)
-> Lens
     CallableOptions CallableOptions (Map Text Text) (Map Text Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CallableOptions -> Map Text Text
_CallableOptions'fetchDevices
           (\ x__ :: CallableOptions
x__ y__ :: Map Text Text
y__ -> CallableOptions
x__ {_CallableOptions'fetchDevices :: Map Text Text
_CallableOptions'fetchDevices = Map Text Text
y__}))
        (Map Text Text -> f (Map Text Text))
-> Map Text Text -> f (Map Text Text)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField CallableOptions "fetchSkipSync" Prelude.Bool where
  fieldOf :: Proxy# "fetchSkipSync"
-> (Bool -> f Bool) -> CallableOptions -> f CallableOptions
fieldOf _
    = ((Bool -> f Bool) -> CallableOptions -> f CallableOptions)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> CallableOptions
-> f CallableOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CallableOptions -> Bool)
-> (CallableOptions -> Bool -> CallableOptions)
-> Lens CallableOptions CallableOptions Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CallableOptions -> Bool
_CallableOptions'fetchSkipSync
           (\ x__ :: CallableOptions
x__ y__ :: Bool
y__ -> CallableOptions
x__ {_CallableOptions'fetchSkipSync :: Bool
_CallableOptions'fetchSkipSync = Bool
y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message CallableOptions where
  messageName :: Proxy CallableOptions -> Text
messageName _ = String -> Text
Data.Text.pack "tensorflow.CallableOptions"
  packedMessageDescriptor :: Proxy CallableOptions -> ByteString
packedMessageDescriptor _
    = "\n\
      \\SICallableOptions\DC2\DC2\n\
      \\EOTfeed\CAN\SOH \ETX(\tR\EOTfeed\DC2\DC4\n\
      \\ENQfetch\CAN\STX \ETX(\tR\ENQfetch\DC2\SYN\n\
      \\ACKtarget\CAN\ETX \ETX(\tR\ACKtarget\DC27\n\
      \\vrun_options\CAN\EOT \SOH(\v2\SYN.tensorflow.RunOptionsR\n\
      \runOptions\DC2I\n\
      \\DC1tensor_connection\CAN\ENQ \ETX(\v2\FS.tensorflow.TensorConnectionR\DLEtensorConnection\DC2O\n\
      \\ffeed_devices\CAN\ACK \ETX(\v2,.tensorflow.CallableOptions.FeedDevicesEntryR\vfeedDevices\DC2R\n\
      \\rfetch_devices\CAN\a \ETX(\v2-.tensorflow.CallableOptions.FetchDevicesEntryR\ffetchDevices\DC2&\n\
      \\SIfetch_skip_sync\CAN\b \SOH(\bR\rfetchSkipSync\SUB>\n\
      \\DLEFeedDevicesEntry\DC2\DLE\n\
      \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2\DC4\n\
      \\ENQvalue\CAN\STX \SOH(\tR\ENQvalue:\STX8\SOH\SUB?\n\
      \\DC1FetchDevicesEntry\DC2\DLE\n\
      \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2\DC4\n\
      \\ENQvalue\CAN\STX \SOH(\tR\ENQvalue:\STX8\SOH"
  packedFileDescriptor :: Proxy CallableOptions -> ByteString
packedFileDescriptor _ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor CallableOptions)
fieldsByTag
    = let
        feed__field_descriptor :: FieldDescriptor CallableOptions
feed__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor CallableOptions Text
-> FieldDescriptor CallableOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "feed"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (Packing
-> Lens' CallableOptions [Text]
-> FieldAccessor CallableOptions Text
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Unpacked (forall s a (f :: * -> *).
(HasField s "feed" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"feed")) ::
              Data.ProtoLens.FieldDescriptor CallableOptions
        fetch__field_descriptor :: FieldDescriptor CallableOptions
fetch__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor CallableOptions Text
-> FieldDescriptor CallableOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "fetch"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (Packing
-> Lens' CallableOptions [Text]
-> FieldAccessor CallableOptions Text
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Unpacked (forall s a (f :: * -> *).
(HasField s "fetch" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"fetch")) ::
              Data.ProtoLens.FieldDescriptor CallableOptions
        target__field_descriptor :: FieldDescriptor CallableOptions
target__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor CallableOptions Text
-> FieldDescriptor CallableOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "target"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (Packing
-> Lens' CallableOptions [Text]
-> FieldAccessor CallableOptions Text
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Unpacked (forall s a (f :: * -> *).
(HasField s "target" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"target")) ::
              Data.ProtoLens.FieldDescriptor CallableOptions
        runOptions__field_descriptor :: FieldDescriptor CallableOptions
runOptions__field_descriptor
          = String
-> FieldTypeDescriptor RunOptions
-> FieldAccessor CallableOptions RunOptions
-> FieldDescriptor CallableOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "run_options"
              (MessageOrGroup -> FieldTypeDescriptor RunOptions
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor RunOptions)
              (Lens
  CallableOptions
  CallableOptions
  (Maybe RunOptions)
  (Maybe RunOptions)
-> FieldAccessor CallableOptions RunOptions
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall s a (f :: * -> *).
(HasField s "maybe'runOptions" a, Functor f) =>
(a -> f a) -> s -> 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'runOptions")) ::
              Data.ProtoLens.FieldDescriptor CallableOptions
        tensorConnection__field_descriptor :: FieldDescriptor CallableOptions
tensorConnection__field_descriptor
          = String
-> FieldTypeDescriptor TensorConnection
-> FieldAccessor CallableOptions TensorConnection
-> FieldDescriptor CallableOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "tensor_connection"
              (MessageOrGroup -> FieldTypeDescriptor TensorConnection
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor TensorConnection)
              (Packing
-> Lens' CallableOptions [TensorConnection]
-> FieldAccessor CallableOptions TensorConnection
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Unpacked
                 (forall s a (f :: * -> *).
(HasField s "tensorConnection" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"tensorConnection")) ::
              Data.ProtoLens.FieldDescriptor CallableOptions
        feedDevices__field_descriptor :: FieldDescriptor CallableOptions
feedDevices__field_descriptor
          = String
-> FieldTypeDescriptor CallableOptions'FeedDevicesEntry
-> FieldAccessor CallableOptions CallableOptions'FeedDevicesEntry
-> FieldDescriptor CallableOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "feed_devices"
              (MessageOrGroup
-> FieldTypeDescriptor CallableOptions'FeedDevicesEntry
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor CallableOptions'FeedDevicesEntry)
              (Lens' CallableOptions'FeedDevicesEntry Text
-> Lens' CallableOptions'FeedDevicesEntry Text
-> Lens
     CallableOptions CallableOptions (Map Text Text) (Map Text Text)
-> FieldAccessor CallableOptions CallableOptions'FeedDevicesEntry
forall key value value1 msg.
(Ord key, Message value) =>
Lens' value key
-> Lens' value value1
-> Lens' msg (Map key value1)
-> FieldAccessor msg value
Data.ProtoLens.MapField
                 (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key")
                 (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value")
                 (forall s a (f :: * -> *).
(HasField s "feedDevices" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"feedDevices")) ::
              Data.ProtoLens.FieldDescriptor CallableOptions
        fetchDevices__field_descriptor :: FieldDescriptor CallableOptions
fetchDevices__field_descriptor
          = String
-> FieldTypeDescriptor CallableOptions'FetchDevicesEntry
-> FieldAccessor CallableOptions CallableOptions'FetchDevicesEntry
-> FieldDescriptor CallableOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "fetch_devices"
              (MessageOrGroup
-> FieldTypeDescriptor CallableOptions'FetchDevicesEntry
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor CallableOptions'FetchDevicesEntry)
              (Lens' CallableOptions'FetchDevicesEntry Text
-> Lens' CallableOptions'FetchDevicesEntry Text
-> Lens
     CallableOptions CallableOptions (Map Text Text) (Map Text Text)
-> FieldAccessor CallableOptions CallableOptions'FetchDevicesEntry
forall key value value1 msg.
(Ord key, Message value) =>
Lens' value key
-> Lens' value value1
-> Lens' msg (Map key value1)
-> FieldAccessor msg value
Data.ProtoLens.MapField
                 (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key")
                 (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value")
                 (forall s a (f :: * -> *).
(HasField s "fetchDevices" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"fetchDevices")) ::
              Data.ProtoLens.FieldDescriptor CallableOptions
        fetchSkipSync__field_descriptor :: FieldDescriptor CallableOptions
fetchSkipSync__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor CallableOptions Bool
-> FieldDescriptor CallableOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "fetch_skip_sync"
              (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 CallableOptions CallableOptions Bool Bool
-> FieldAccessor CallableOptions 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 "fetchSkipSync" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"fetchSkipSync")) ::
              Data.ProtoLens.FieldDescriptor CallableOptions
      in
        [(Tag, FieldDescriptor CallableOptions)]
-> Map Tag (FieldDescriptor CallableOptions)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag 1, FieldDescriptor CallableOptions
feed__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 2, FieldDescriptor CallableOptions
fetch__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 3, FieldDescriptor CallableOptions
target__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 4, FieldDescriptor CallableOptions
runOptions__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 5, FieldDescriptor CallableOptions
tensorConnection__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 6, FieldDescriptor CallableOptions
feedDevices__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 7, FieldDescriptor CallableOptions
fetchDevices__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 8, FieldDescriptor CallableOptions
fetchSkipSync__field_descriptor)]
  unknownFields :: LensLike' f CallableOptions FieldSet
unknownFields
    = (CallableOptions -> FieldSet)
-> (CallableOptions -> FieldSet -> CallableOptions)
-> Lens' CallableOptions FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        CallableOptions -> FieldSet
_CallableOptions'_unknownFields
        (\ x__ :: CallableOptions
x__ y__ :: FieldSet
y__ -> CallableOptions
x__ {_CallableOptions'_unknownFields :: FieldSet
_CallableOptions'_unknownFields = FieldSet
y__})
  defMessage :: CallableOptions
defMessage
    = $WCallableOptions'_constructor :: Vector Text
-> Vector Text
-> Vector Text
-> Maybe RunOptions
-> Vector TensorConnection
-> Map Text Text
-> Map Text Text
-> Bool
-> FieldSet
-> CallableOptions
CallableOptions'_constructor
        {_CallableOptions'feed :: Vector Text
_CallableOptions'feed = Vector Text
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _CallableOptions'fetch :: Vector Text
_CallableOptions'fetch = Vector Text
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _CallableOptions'target :: Vector Text
_CallableOptions'target = Vector Text
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _CallableOptions'runOptions :: Maybe RunOptions
_CallableOptions'runOptions = Maybe RunOptions
forall a. Maybe a
Prelude.Nothing,
         _CallableOptions'tensorConnection :: Vector TensorConnection
_CallableOptions'tensorConnection = Vector TensorConnection
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _CallableOptions'feedDevices :: Map Text Text
_CallableOptions'feedDevices = Map Text Text
forall k a. Map k a
Data.Map.empty,
         _CallableOptions'fetchDevices :: Map Text Text
_CallableOptions'fetchDevices = Map Text Text
forall k a. Map k a
Data.Map.empty,
         _CallableOptions'fetchSkipSync :: Bool
_CallableOptions'fetchSkipSync = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _CallableOptions'_unknownFields :: FieldSet
_CallableOptions'_unknownFields = []}
  parseMessage :: Parser CallableOptions
parseMessage
    = let
        loop ::
          CallableOptions
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text
             -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text
                -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text
                   -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld TensorConnection
                      -> Data.ProtoLens.Encoding.Bytes.Parser CallableOptions
        loop :: CallableOptions
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld TensorConnection
-> Parser CallableOptions
loop
          x :: CallableOptions
x
          mutable'feed :: Growing Vector RealWorld Text
mutable'feed
          mutable'fetch :: Growing Vector RealWorld Text
mutable'fetch
          mutable'target :: Growing Vector RealWorld Text
mutable'target
          mutable'tensorConnection :: Growing Vector RealWorld TensorConnection
mutable'tensorConnection
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do Vector Text
frozen'feed <- IO (Vector Text) -> Parser (Vector Text)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) Text -> IO (Vector Text)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> m (v a)
Data.ProtoLens.Encoding.Growing.unsafeFreeze Growing Vector RealWorld Text
Growing Vector (PrimState IO) Text
mutable'feed)
                      Vector Text
frozen'fetch <- IO (Vector Text) -> Parser (Vector Text)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                        (Growing Vector (PrimState IO) Text -> IO (Vector Text)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> m (v a)
Data.ProtoLens.Encoding.Growing.unsafeFreeze Growing Vector RealWorld Text
Growing Vector (PrimState IO) Text
mutable'fetch)
                      Vector Text
frozen'target <- IO (Vector Text) -> Parser (Vector Text)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                         (Growing Vector (PrimState IO) Text -> IO (Vector Text)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> m (v a)
Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                            Growing Vector RealWorld Text
Growing Vector (PrimState IO) Text
mutable'target)
                      Vector TensorConnection
frozen'tensorConnection <- IO (Vector TensorConnection) -> Parser (Vector TensorConnection)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                   (Growing Vector (PrimState IO) TensorConnection
-> IO (Vector TensorConnection)
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 TensorConnection
Growing Vector (PrimState IO) TensorConnection
mutable'tensorConnection)
                      (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]))))
                      CallableOptions -> Parser CallableOptions
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter CallableOptions CallableOptions FieldSet FieldSet
-> (FieldSet -> FieldSet) -> CallableOptions -> CallableOptions
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 CallableOptions CallableOptions FieldSet FieldSet
Data.ProtoLens.unknownFields
                           (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t)
                           (Setter CallableOptions CallableOptions (Vector Text) (Vector Text)
-> Vector Text -> CallableOptions -> CallableOptions
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                              (forall s a (f :: * -> *).
(HasField s "vec'feed" a, Functor f) =>
(a -> f a) -> s -> 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'feed")
                              Vector Text
frozen'feed
                              (Setter CallableOptions CallableOptions (Vector Text) (Vector Text)
-> Vector Text -> CallableOptions -> CallableOptions
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                 (forall s a (f :: * -> *).
(HasField s "vec'fetch" a, Functor f) =>
(a -> f a) -> s -> 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'fetch")
                                 Vector Text
frozen'fetch
                                 (Setter CallableOptions CallableOptions (Vector Text) (Vector Text)
-> Vector Text -> CallableOptions -> CallableOptions
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                    (forall s a (f :: * -> *).
(HasField s "vec'target" a, Functor f) =>
(a -> f a) -> s -> 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'target")
                                    Vector Text
frozen'target
                                    (Setter
  CallableOptions
  CallableOptions
  (Vector TensorConnection)
  (Vector TensorConnection)
-> Vector TensorConnection -> CallableOptions -> CallableOptions
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                       (forall s a (f :: * -> *).
(HasField s "vec'tensorConnection" a, Functor f) =>
(a -> f a) -> s -> 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'tensorConnection")
                                       Vector TensorConnection
frozen'tensorConnection
                                       CallableOptions
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))
                                        "feed"
                                Growing Vector RealWorld Text
v <- IO (Growing Vector RealWorld Text)
-> Parser (Growing Vector RealWorld Text)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) Text
-> Text -> IO (Growing Vector (PrimState IO) Text)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> a -> m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.append Growing Vector RealWorld Text
Growing Vector (PrimState IO) Text
mutable'feed Text
y)
                                CallableOptions
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld TensorConnection
-> Parser CallableOptions
loop CallableOptions
x Growing Vector RealWorld Text
v Growing Vector RealWorld Text
mutable'fetch Growing Vector RealWorld Text
mutable'target Growing Vector RealWorld TensorConnection
mutable'tensorConnection
                        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))
                                        "fetch"
                                Growing Vector RealWorld Text
v <- IO (Growing Vector RealWorld Text)
-> Parser (Growing Vector RealWorld Text)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) Text
-> Text -> IO (Growing Vector (PrimState IO) Text)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> a -> m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.append Growing Vector RealWorld Text
Growing Vector (PrimState IO) Text
mutable'fetch Text
y)
                                CallableOptions
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld TensorConnection
-> Parser CallableOptions
loop CallableOptions
x Growing Vector RealWorld Text
mutable'feed Growing Vector RealWorld Text
v Growing Vector RealWorld Text
mutable'target Growing Vector RealWorld TensorConnection
mutable'tensorConnection
                        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))
                                        "target"
                                Growing Vector RealWorld Text
v <- IO (Growing Vector RealWorld Text)
-> Parser (Growing Vector RealWorld Text)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) Text
-> Text -> IO (Growing Vector (PrimState IO) Text)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> a -> m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.append Growing Vector RealWorld Text
Growing Vector (PrimState IO) Text
mutable'target Text
y)
                                CallableOptions
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld TensorConnection
-> Parser CallableOptions
loop CallableOptions
x Growing Vector RealWorld Text
mutable'feed Growing Vector RealWorld Text
mutable'fetch Growing Vector RealWorld Text
v Growing Vector RealWorld TensorConnection
mutable'tensorConnection
                        34
                          -> do RunOptions
y <- Parser RunOptions -> String -> Parser RunOptions
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser RunOptions -> Parser RunOptions
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 RunOptions
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       "run_options"
                                CallableOptions
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld TensorConnection
-> Parser CallableOptions
loop
                                  (Setter CallableOptions CallableOptions RunOptions RunOptions
-> RunOptions -> CallableOptions -> CallableOptions
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "runOptions" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"runOptions") RunOptions
y CallableOptions
x)
                                  Growing Vector RealWorld Text
mutable'feed
                                  Growing Vector RealWorld Text
mutable'fetch
                                  Growing Vector RealWorld Text
mutable'target
                                  Growing Vector RealWorld TensorConnection
mutable'tensorConnection
                        42
                          -> do !TensorConnection
y <- Parser TensorConnection -> String -> Parser TensorConnection
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Int -> Parser TensorConnection -> Parser TensorConnection
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 TensorConnection
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                        "tensor_connection"
                                Growing Vector RealWorld TensorConnection
v <- IO (Growing Vector RealWorld TensorConnection)
-> Parser (Growing Vector RealWorld TensorConnection)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) TensorConnection
-> TensorConnection
-> IO (Growing Vector (PrimState IO) TensorConnection)
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 TensorConnection
Growing Vector (PrimState IO) TensorConnection
mutable'tensorConnection TensorConnection
y)
                                CallableOptions
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld TensorConnection
-> Parser CallableOptions
loop CallableOptions
x Growing Vector RealWorld Text
mutable'feed Growing Vector RealWorld Text
mutable'fetch Growing Vector RealWorld Text
mutable'target Growing Vector RealWorld TensorConnection
v
                        50
                          -> do !(CallableOptions'FeedDevicesEntry
entry :: CallableOptions'FeedDevicesEntry) <- Parser CallableOptions'FeedDevicesEntry
-> String -> Parser CallableOptions'FeedDevicesEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                                                                  (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                                                      Int
-> Parser CallableOptions'FeedDevicesEntry
-> Parser CallableOptions'FeedDevicesEntry
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 CallableOptions'FeedDevicesEntry
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                                                                  "feed_devices"
                                (let
                                   key :: Text
key = FoldLike
  Text
  CallableOptions'FeedDevicesEntry
  CallableOptions'FeedDevicesEntry
  Text
  Text
-> CallableOptions'FeedDevicesEntry -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key") CallableOptions'FeedDevicesEntry
entry
                                   value :: Text
value
                                     = FoldLike
  Text
  CallableOptions'FeedDevicesEntry
  CallableOptions'FeedDevicesEntry
  Text
  Text
-> CallableOptions'FeedDevicesEntry -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value") CallableOptions'FeedDevicesEntry
entry
                                 in
                                   CallableOptions
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld TensorConnection
-> Parser CallableOptions
loop
                                     (Setter
  CallableOptions CallableOptions (Map Text Text) (Map Text Text)
-> (Map Text Text -> Map Text Text)
-> CallableOptions
-> CallableOptions
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                        (forall s a (f :: * -> *).
(HasField s "feedDevices" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"feedDevices")
                                        (\ !Map Text Text
t -> Text -> Text -> Map Text Text -> Map Text Text
forall k a. Ord k => k -> a -> Map k a -> Map k a
Data.Map.insert Text
key Text
value Map Text Text
t)
                                        CallableOptions
x)
                                     Growing Vector RealWorld Text
mutable'feed
                                     Growing Vector RealWorld Text
mutable'fetch
                                     Growing Vector RealWorld Text
mutable'target
                                     Growing Vector RealWorld TensorConnection
mutable'tensorConnection)
                        58
                          -> do !(CallableOptions'FetchDevicesEntry
entry :: CallableOptions'FetchDevicesEntry) <- Parser CallableOptions'FetchDevicesEntry
-> String -> Parser CallableOptions'FetchDevicesEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                                                                   (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                                                       Int
-> Parser CallableOptions'FetchDevicesEntry
-> Parser CallableOptions'FetchDevicesEntry
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 CallableOptions'FetchDevicesEntry
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                                                                   "fetch_devices"
                                (let
                                   key :: Text
key = FoldLike
  Text
  CallableOptions'FetchDevicesEntry
  CallableOptions'FetchDevicesEntry
  Text
  Text
-> CallableOptions'FetchDevicesEntry -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key") CallableOptions'FetchDevicesEntry
entry
                                   value :: Text
value
                                     = FoldLike
  Text
  CallableOptions'FetchDevicesEntry
  CallableOptions'FetchDevicesEntry
  Text
  Text
-> CallableOptions'FetchDevicesEntry -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value") CallableOptions'FetchDevicesEntry
entry
                                 in
                                   CallableOptions
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld TensorConnection
-> Parser CallableOptions
loop
                                     (Setter
  CallableOptions CallableOptions (Map Text Text) (Map Text Text)
-> (Map Text Text -> Map Text Text)
-> CallableOptions
-> CallableOptions
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                        (forall s a (f :: * -> *).
(HasField s "fetchDevices" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"fetchDevices")
                                        (\ !Map Text Text
t -> Text -> Text -> Map Text Text -> Map Text Text
forall k a. Ord k => k -> a -> Map k a -> Map k a
Data.Map.insert Text
key Text
value Map Text Text
t)
                                        CallableOptions
x)
                                     Growing Vector RealWorld Text
mutable'feed
                                     Growing Vector RealWorld Text
mutable'fetch
                                     Growing Vector RealWorld Text
mutable'target
                                     Growing Vector RealWorld TensorConnection
mutable'tensorConnection)
                        64
                          -> 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)
                                       "fetch_skip_sync"
                                CallableOptions
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld TensorConnection
-> Parser CallableOptions
loop
                                  (Setter CallableOptions CallableOptions Bool Bool
-> Bool -> CallableOptions -> CallableOptions
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "fetchSkipSync" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"fetchSkipSync") Bool
y CallableOptions
x)
                                  Growing Vector RealWorld Text
mutable'feed
                                  Growing Vector RealWorld Text
mutable'fetch
                                  Growing Vector RealWorld Text
mutable'target
                                  Growing Vector RealWorld TensorConnection
mutable'tensorConnection
                        wire :: Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                CallableOptions
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld TensorConnection
-> Parser CallableOptions
loop
                                  (Setter CallableOptions CallableOptions FieldSet FieldSet
-> (FieldSet -> FieldSet) -> CallableOptions -> CallableOptions
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 CallableOptions CallableOptions FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) CallableOptions
x)
                                  Growing Vector RealWorld Text
mutable'feed
                                  Growing Vector RealWorld Text
mutable'fetch
                                  Growing Vector RealWorld Text
mutable'target
                                  Growing Vector RealWorld TensorConnection
mutable'tensorConnection
      in
        Parser CallableOptions -> String -> Parser CallableOptions
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do Growing Vector RealWorld Text
mutable'feed <- IO (Growing Vector RealWorld Text)
-> Parser (Growing Vector RealWorld Text)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                IO (Growing Vector RealWorld Text)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              Growing Vector RealWorld Text
mutable'fetch <- IO (Growing Vector RealWorld Text)
-> Parser (Growing Vector RealWorld Text)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                 IO (Growing Vector RealWorld Text)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              Growing Vector RealWorld Text
mutable'target <- IO (Growing Vector RealWorld Text)
-> Parser (Growing Vector RealWorld Text)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                  IO (Growing Vector RealWorld Text)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              Growing Vector RealWorld TensorConnection
mutable'tensorConnection <- IO (Growing Vector RealWorld TensorConnection)
-> Parser (Growing Vector RealWorld TensorConnection)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                            IO (Growing Vector RealWorld TensorConnection)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              CallableOptions
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld TensorConnection
-> Parser CallableOptions
loop
                CallableOptions
forall msg. Message msg => msg
Data.ProtoLens.defMessage
                Growing Vector RealWorld Text
mutable'feed
                Growing Vector RealWorld Text
mutable'fetch
                Growing Vector RealWorld Text
mutable'target
                Growing Vector RealWorld TensorConnection
mutable'tensorConnection)
          "CallableOptions"
  buildMessage :: CallableOptions -> Builder
buildMessage
    = \ _x :: CallableOptions
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             ((Text -> Builder) -> Vector Text -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                (\ _v :: Text
_v
                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 10)
                        ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                           (\ bs :: ByteString
bs
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                      (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                   (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                           Text -> ByteString
Data.Text.Encoding.encodeUtf8
                           Text
_v))
                (FoldLike
  (Vector Text)
  CallableOptions
  CallableOptions
  (Vector Text)
  (Vector Text)
-> CallableOptions -> Vector Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "vec'feed" a, Functor f) =>
(a -> f a) -> s -> 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'feed") CallableOptions
_x))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                ((Text -> Builder) -> Vector Text -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                   (\ _v :: Text
_v
                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 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))
                   (FoldLike
  (Vector Text)
  CallableOptions
  CallableOptions
  (Vector Text)
  (Vector Text)
-> CallableOptions -> Vector Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "vec'fetch" a, Functor f) =>
(a -> f a) -> s -> 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'fetch") CallableOptions
_x))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   ((Text -> Builder) -> Vector Text -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                      (\ _v :: Text
_v
                         -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                              (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 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))
                      (FoldLike
  (Vector Text)
  CallableOptions
  CallableOptions
  (Vector Text)
  (Vector Text)
-> CallableOptions -> Vector Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "vec'target" a, Functor f) =>
(a -> f a) -> s -> 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'target") CallableOptions
_x))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (case
                           FoldLike
  (Maybe RunOptions)
  CallableOptions
  CallableOptions
  (Maybe RunOptions)
  (Maybe RunOptions)
-> CallableOptions -> Maybe RunOptions
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                             (forall s a (f :: * -> *).
(HasField s "maybe'runOptions" a, Functor f) =>
(a -> f a) -> s -> 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'runOptions") CallableOptions
_x
                       of
                         Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         (Prelude.Just _v :: RunOptions
_v)
                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 34)
                                ((ByteString -> Builder)
-> (RunOptions -> ByteString) -> RunOptions -> 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))
                                   RunOptions -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                   RunOptions
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         ((TensorConnection -> Builder) -> Vector TensorConnection -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                            (\ _v :: TensorConnection
_v
                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 42)
                                    ((ByteString -> Builder)
-> (TensorConnection -> ByteString) -> TensorConnection -> 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))
                                       TensorConnection -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                       TensorConnection
_v))
                            (FoldLike
  (Vector TensorConnection)
  CallableOptions
  CallableOptions
  (Vector TensorConnection)
  (Vector TensorConnection)
-> CallableOptions -> Vector TensorConnection
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                               (forall s a (f :: * -> *).
(HasField s "vec'tensorConnection" a, Functor f) =>
(a -> f a) -> s -> 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'tensorConnection") CallableOptions
_x))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            ([Builder] -> Builder
forall a. Monoid a => [a] -> a
Data.Monoid.mconcat
                               (((Text, Text) -> Builder) -> [(Text, Text)] -> [Builder]
forall a b. (a -> b) -> [a] -> [b]
Prelude.map
                                  (\ _v :: (Text, Text)
_v
                                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 50)
                                          ((ByteString -> Builder)
-> (CallableOptions'FeedDevicesEntry -> ByteString)
-> CallableOptions'FeedDevicesEntry
-> 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))
                                             CallableOptions'FeedDevicesEntry -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                             (Setter
  CallableOptions'FeedDevicesEntry
  CallableOptions'FeedDevicesEntry
  Text
  Text
-> Text
-> CallableOptions'FeedDevicesEntry
-> CallableOptions'FeedDevicesEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                                (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key")
                                                ((Text, Text) -> Text
forall a b. (a, b) -> a
Prelude.fst (Text, Text)
_v)
                                                (Setter
  CallableOptions'FeedDevicesEntry
  CallableOptions'FeedDevicesEntry
  Text
  Text
-> Text
-> CallableOptions'FeedDevicesEntry
-> CallableOptions'FeedDevicesEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                                   (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value")
                                                   ((Text, Text) -> Text
forall a b. (a, b) -> b
Prelude.snd (Text, Text)
_v)
                                                   (CallableOptions'FeedDevicesEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage ::
                                                      CallableOptions'FeedDevicesEntry)))))
                                  (Map Text Text -> [(Text, Text)]
forall k a. Map k a -> [(k, a)]
Data.Map.toList
                                     (FoldLike
  (Map Text Text)
  CallableOptions
  CallableOptions
  (Map Text Text)
  (Map Text Text)
-> CallableOptions -> Map Text Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                        (forall s a (f :: * -> *).
(HasField s "feedDevices" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"feedDevices") CallableOptions
_x))))
                            (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               ([Builder] -> Builder
forall a. Monoid a => [a] -> a
Data.Monoid.mconcat
                                  (((Text, Text) -> Builder) -> [(Text, Text)] -> [Builder]
forall a b. (a -> b) -> [a] -> [b]
Prelude.map
                                     (\ _v :: (Text, Text)
_v
                                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 58)
                                             ((ByteString -> Builder)
-> (CallableOptions'FetchDevicesEntry -> ByteString)
-> CallableOptions'FetchDevicesEntry
-> 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))
                                                CallableOptions'FetchDevicesEntry -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                                (Setter
  CallableOptions'FetchDevicesEntry
  CallableOptions'FetchDevicesEntry
  Text
  Text
-> Text
-> CallableOptions'FetchDevicesEntry
-> CallableOptions'FetchDevicesEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                                   (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key")
                                                   ((Text, Text) -> Text
forall a b. (a, b) -> a
Prelude.fst (Text, Text)
_v)
                                                   (Setter
  CallableOptions'FetchDevicesEntry
  CallableOptions'FetchDevicesEntry
  Text
  Text
-> Text
-> CallableOptions'FetchDevicesEntry
-> CallableOptions'FetchDevicesEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                                      (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value")
                                                      ((Text, Text) -> Text
forall a b. (a, b) -> b
Prelude.snd (Text, Text)
_v)
                                                      (CallableOptions'FetchDevicesEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage ::
                                                         CallableOptions'FetchDevicesEntry)))))
                                     (Map Text Text -> [(Text, Text)]
forall k a. Map k a -> [(k, a)]
Data.Map.toList
                                        (FoldLike
  (Map Text Text)
  CallableOptions
  CallableOptions
  (Map Text Text)
  (Map Text Text)
-> CallableOptions -> Map Text Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                           (forall s a (f :: * -> *).
(HasField s "fetchDevices" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"fetchDevices") CallableOptions
_x))))
                               (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (let
                                     _v :: Bool
_v
                                       = FoldLike Bool CallableOptions CallableOptions Bool Bool
-> CallableOptions -> Bool
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                           (forall s a (f :: * -> *).
(HasField s "fetchSkipSync" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"fetchSkipSync") CallableOptions
_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 64)
                                           ((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))
                                  (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                     (FoldLike FieldSet CallableOptions CallableOptions FieldSet FieldSet
-> CallableOptions -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet CallableOptions CallableOptions FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields CallableOptions
_x)))))))))
instance Control.DeepSeq.NFData CallableOptions where
  rnf :: CallableOptions -> ()
rnf
    = \ x__ :: CallableOptions
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (CallableOptions -> FieldSet
_CallableOptions'_unknownFields CallableOptions
x__)
             (Vector Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (CallableOptions -> Vector Text
_CallableOptions'feed CallableOptions
x__)
                (Vector Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (CallableOptions -> Vector Text
_CallableOptions'fetch CallableOptions
x__)
                   (Vector Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (CallableOptions -> Vector Text
_CallableOptions'target CallableOptions
x__)
                      (Maybe RunOptions -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (CallableOptions -> Maybe RunOptions
_CallableOptions'runOptions CallableOptions
x__)
                         (Vector TensorConnection -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (CallableOptions -> Vector TensorConnection
_CallableOptions'tensorConnection CallableOptions
x__)
                            (Map Text Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (CallableOptions -> Map Text Text
_CallableOptions'feedDevices CallableOptions
x__)
                               (Map Text Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (CallableOptions -> Map Text Text
_CallableOptions'fetchDevices CallableOptions
x__)
                                  (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                     (CallableOptions -> Bool
_CallableOptions'fetchSkipSync CallableOptions
x__) ()))))))))
{- | Fields :
     
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.key' @:: Lens' CallableOptions'FeedDevicesEntry Data.Text.Text@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.value' @:: Lens' CallableOptions'FeedDevicesEntry Data.Text.Text@ -}
data CallableOptions'FeedDevicesEntry
  = CallableOptions'FeedDevicesEntry'_constructor {CallableOptions'FeedDevicesEntry -> Text
_CallableOptions'FeedDevicesEntry'key :: !Data.Text.Text,
                                                   CallableOptions'FeedDevicesEntry -> Text
_CallableOptions'FeedDevicesEntry'value :: !Data.Text.Text,
                                                   CallableOptions'FeedDevicesEntry -> FieldSet
_CallableOptions'FeedDevicesEntry'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (CallableOptions'FeedDevicesEntry
-> CallableOptions'FeedDevicesEntry -> Bool
(CallableOptions'FeedDevicesEntry
 -> CallableOptions'FeedDevicesEntry -> Bool)
-> (CallableOptions'FeedDevicesEntry
    -> CallableOptions'FeedDevicesEntry -> Bool)
-> Eq CallableOptions'FeedDevicesEntry
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: CallableOptions'FeedDevicesEntry
-> CallableOptions'FeedDevicesEntry -> Bool
$c/= :: CallableOptions'FeedDevicesEntry
-> CallableOptions'FeedDevicesEntry -> Bool
== :: CallableOptions'FeedDevicesEntry
-> CallableOptions'FeedDevicesEntry -> Bool
$c== :: CallableOptions'FeedDevicesEntry
-> CallableOptions'FeedDevicesEntry -> Bool
Prelude.Eq, Eq CallableOptions'FeedDevicesEntry
Eq CallableOptions'FeedDevicesEntry =>
(CallableOptions'FeedDevicesEntry
 -> CallableOptions'FeedDevicesEntry -> Ordering)
-> (CallableOptions'FeedDevicesEntry
    -> CallableOptions'FeedDevicesEntry -> Bool)
-> (CallableOptions'FeedDevicesEntry
    -> CallableOptions'FeedDevicesEntry -> Bool)
-> (CallableOptions'FeedDevicesEntry
    -> CallableOptions'FeedDevicesEntry -> Bool)
-> (CallableOptions'FeedDevicesEntry
    -> CallableOptions'FeedDevicesEntry -> Bool)
-> (CallableOptions'FeedDevicesEntry
    -> CallableOptions'FeedDevicesEntry
    -> CallableOptions'FeedDevicesEntry)
-> (CallableOptions'FeedDevicesEntry
    -> CallableOptions'FeedDevicesEntry
    -> CallableOptions'FeedDevicesEntry)
-> Ord CallableOptions'FeedDevicesEntry
CallableOptions'FeedDevicesEntry
-> CallableOptions'FeedDevicesEntry -> Bool
CallableOptions'FeedDevicesEntry
-> CallableOptions'FeedDevicesEntry -> Ordering
CallableOptions'FeedDevicesEntry
-> CallableOptions'FeedDevicesEntry
-> CallableOptions'FeedDevicesEntry
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 :: CallableOptions'FeedDevicesEntry
-> CallableOptions'FeedDevicesEntry
-> CallableOptions'FeedDevicesEntry
$cmin :: CallableOptions'FeedDevicesEntry
-> CallableOptions'FeedDevicesEntry
-> CallableOptions'FeedDevicesEntry
max :: CallableOptions'FeedDevicesEntry
-> CallableOptions'FeedDevicesEntry
-> CallableOptions'FeedDevicesEntry
$cmax :: CallableOptions'FeedDevicesEntry
-> CallableOptions'FeedDevicesEntry
-> CallableOptions'FeedDevicesEntry
>= :: CallableOptions'FeedDevicesEntry
-> CallableOptions'FeedDevicesEntry -> Bool
$c>= :: CallableOptions'FeedDevicesEntry
-> CallableOptions'FeedDevicesEntry -> Bool
> :: CallableOptions'FeedDevicesEntry
-> CallableOptions'FeedDevicesEntry -> Bool
$c> :: CallableOptions'FeedDevicesEntry
-> CallableOptions'FeedDevicesEntry -> Bool
<= :: CallableOptions'FeedDevicesEntry
-> CallableOptions'FeedDevicesEntry -> Bool
$c<= :: CallableOptions'FeedDevicesEntry
-> CallableOptions'FeedDevicesEntry -> Bool
< :: CallableOptions'FeedDevicesEntry
-> CallableOptions'FeedDevicesEntry -> Bool
$c< :: CallableOptions'FeedDevicesEntry
-> CallableOptions'FeedDevicesEntry -> Bool
compare :: CallableOptions'FeedDevicesEntry
-> CallableOptions'FeedDevicesEntry -> Ordering
$ccompare :: CallableOptions'FeedDevicesEntry
-> CallableOptions'FeedDevicesEntry -> Ordering
$cp1Ord :: Eq CallableOptions'FeedDevicesEntry
Prelude.Ord)
instance Prelude.Show CallableOptions'FeedDevicesEntry where
  showsPrec :: Int -> CallableOptions'FeedDevicesEntry -> ShowS
showsPrec _ __x :: CallableOptions'FeedDevicesEntry
__x __s :: String
__s
    = Char -> ShowS
Prelude.showChar
        '{'
        (String -> ShowS
Prelude.showString
           (CallableOptions'FeedDevicesEntry -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort CallableOptions'FeedDevicesEntry
__x) (Char -> ShowS
Prelude.showChar '}' String
__s))
instance Data.ProtoLens.Field.HasField CallableOptions'FeedDevicesEntry "key" Data.Text.Text where
  fieldOf :: Proxy# "key"
-> (Text -> f Text)
-> CallableOptions'FeedDevicesEntry
-> f CallableOptions'FeedDevicesEntry
fieldOf _
    = ((Text -> f Text)
 -> CallableOptions'FeedDevicesEntry
 -> f CallableOptions'FeedDevicesEntry)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> CallableOptions'FeedDevicesEntry
-> f CallableOptions'FeedDevicesEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CallableOptions'FeedDevicesEntry -> Text)
-> (CallableOptions'FeedDevicesEntry
    -> Text -> CallableOptions'FeedDevicesEntry)
-> Lens' CallableOptions'FeedDevicesEntry Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CallableOptions'FeedDevicesEntry -> Text
_CallableOptions'FeedDevicesEntry'key
           (\ x__ :: CallableOptions'FeedDevicesEntry
x__ y__ :: Text
y__ -> CallableOptions'FeedDevicesEntry
x__ {_CallableOptions'FeedDevicesEntry'key :: Text
_CallableOptions'FeedDevicesEntry'key = Text
y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField CallableOptions'FeedDevicesEntry "value" Data.Text.Text where
  fieldOf :: Proxy# "value"
-> (Text -> f Text)
-> CallableOptions'FeedDevicesEntry
-> f CallableOptions'FeedDevicesEntry
fieldOf _
    = ((Text -> f Text)
 -> CallableOptions'FeedDevicesEntry
 -> f CallableOptions'FeedDevicesEntry)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> CallableOptions'FeedDevicesEntry
-> f CallableOptions'FeedDevicesEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CallableOptions'FeedDevicesEntry -> Text)
-> (CallableOptions'FeedDevicesEntry
    -> Text -> CallableOptions'FeedDevicesEntry)
-> Lens' CallableOptions'FeedDevicesEntry Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CallableOptions'FeedDevicesEntry -> Text
_CallableOptions'FeedDevicesEntry'value
           (\ x__ :: CallableOptions'FeedDevicesEntry
x__ y__ :: Text
y__ -> CallableOptions'FeedDevicesEntry
x__ {_CallableOptions'FeedDevicesEntry'value :: Text
_CallableOptions'FeedDevicesEntry'value = Text
y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message CallableOptions'FeedDevicesEntry where
  messageName :: Proxy CallableOptions'FeedDevicesEntry -> Text
messageName _
    = String -> Text
Data.Text.pack "tensorflow.CallableOptions.FeedDevicesEntry"
  packedMessageDescriptor :: Proxy CallableOptions'FeedDevicesEntry -> ByteString
packedMessageDescriptor _
    = "\n\
      \\DLEFeedDevicesEntry\DC2\DLE\n\
      \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2\DC4\n\
      \\ENQvalue\CAN\STX \SOH(\tR\ENQvalue:\STX8\SOH"
  packedFileDescriptor :: Proxy CallableOptions'FeedDevicesEntry -> ByteString
packedFileDescriptor _ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor CallableOptions'FeedDevicesEntry)
fieldsByTag
    = let
        key__field_descriptor :: FieldDescriptor CallableOptions'FeedDevicesEntry
key__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor CallableOptions'FeedDevicesEntry Text
-> FieldDescriptor CallableOptions'FeedDevicesEntry
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "key"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens' CallableOptions'FeedDevicesEntry Text
-> FieldAccessor CallableOptions'FeedDevicesEntry Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key")) ::
              Data.ProtoLens.FieldDescriptor CallableOptions'FeedDevicesEntry
        value__field_descriptor :: FieldDescriptor CallableOptions'FeedDevicesEntry
value__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor CallableOptions'FeedDevicesEntry Text
-> FieldDescriptor CallableOptions'FeedDevicesEntry
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "value"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens' CallableOptions'FeedDevicesEntry Text
-> FieldAccessor CallableOptions'FeedDevicesEntry Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value")) ::
              Data.ProtoLens.FieldDescriptor CallableOptions'FeedDevicesEntry
      in
        [(Tag, FieldDescriptor CallableOptions'FeedDevicesEntry)]
-> Map Tag (FieldDescriptor CallableOptions'FeedDevicesEntry)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag 1, FieldDescriptor CallableOptions'FeedDevicesEntry
key__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 2, FieldDescriptor CallableOptions'FeedDevicesEntry
value__field_descriptor)]
  unknownFields :: LensLike' f CallableOptions'FeedDevicesEntry FieldSet
unknownFields
    = (CallableOptions'FeedDevicesEntry -> FieldSet)
-> (CallableOptions'FeedDevicesEntry
    -> FieldSet -> CallableOptions'FeedDevicesEntry)
-> Lens' CallableOptions'FeedDevicesEntry FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        CallableOptions'FeedDevicesEntry -> FieldSet
_CallableOptions'FeedDevicesEntry'_unknownFields
        (\ x__ :: CallableOptions'FeedDevicesEntry
x__ y__ :: FieldSet
y__
           -> CallableOptions'FeedDevicesEntry
x__ {_CallableOptions'FeedDevicesEntry'_unknownFields :: FieldSet
_CallableOptions'FeedDevicesEntry'_unknownFields = FieldSet
y__})
  defMessage :: CallableOptions'FeedDevicesEntry
defMessage
    = $WCallableOptions'FeedDevicesEntry'_constructor :: Text -> Text -> FieldSet -> CallableOptions'FeedDevicesEntry
CallableOptions'FeedDevicesEntry'_constructor
        {_CallableOptions'FeedDevicesEntry'key :: Text
_CallableOptions'FeedDevicesEntry'key = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _CallableOptions'FeedDevicesEntry'value :: Text
_CallableOptions'FeedDevicesEntry'value = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _CallableOptions'FeedDevicesEntry'_unknownFields :: FieldSet
_CallableOptions'FeedDevicesEntry'_unknownFields = []}
  parseMessage :: Parser CallableOptions'FeedDevicesEntry
parseMessage
    = let
        loop ::
          CallableOptions'FeedDevicesEntry
          -> Data.ProtoLens.Encoding.Bytes.Parser CallableOptions'FeedDevicesEntry
        loop :: CallableOptions'FeedDevicesEntry
-> Parser CallableOptions'FeedDevicesEntry
loop x :: CallableOptions'FeedDevicesEntry
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]))))
                      CallableOptions'FeedDevicesEntry
-> Parser CallableOptions'FeedDevicesEntry
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter
  CallableOptions'FeedDevicesEntry
  CallableOptions'FeedDevicesEntry
  FieldSet
  FieldSet
-> (FieldSet -> FieldSet)
-> CallableOptions'FeedDevicesEntry
-> CallableOptions'FeedDevicesEntry
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
  CallableOptions'FeedDevicesEntry
  CallableOptions'FeedDevicesEntry
  FieldSet
  FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) CallableOptions'FeedDevicesEntry
x)
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        10
                          -> do Text
y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do ByteString
value <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                       Int -> Parser ByteString
Data.ProtoLens.Encoding.Bytes.getBytes
                                                         (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
                                           Either String Text -> Parser Text
forall a. Either String a -> Parser a
Data.ProtoLens.Encoding.Bytes.runEither
                                             (case ByteString -> Either UnicodeException Text
Data.Text.Encoding.decodeUtf8' ByteString
value of
                                                (Prelude.Left err :: UnicodeException
err)
                                                  -> String -> Either String Text
forall a b. a -> Either a b
Prelude.Left (UnicodeException -> String
forall a. Show a => a -> String
Prelude.show UnicodeException
err)
                                                (Prelude.Right r :: Text
r) -> Text -> Either String Text
forall a b. b -> Either a b
Prelude.Right Text
r))
                                       "key"
                                CallableOptions'FeedDevicesEntry
-> Parser CallableOptions'FeedDevicesEntry
loop (Setter
  CallableOptions'FeedDevicesEntry
  CallableOptions'FeedDevicesEntry
  Text
  Text
-> Text
-> CallableOptions'FeedDevicesEntry
-> CallableOptions'FeedDevicesEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key") Text
y CallableOptions'FeedDevicesEntry
x)
                        18
                          -> do Text
y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do ByteString
value <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                       Int -> Parser ByteString
Data.ProtoLens.Encoding.Bytes.getBytes
                                                         (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
                                           Either String Text -> Parser Text
forall a. Either String a -> Parser a
Data.ProtoLens.Encoding.Bytes.runEither
                                             (case ByteString -> Either UnicodeException Text
Data.Text.Encoding.decodeUtf8' ByteString
value of
                                                (Prelude.Left err :: UnicodeException
err)
                                                  -> String -> Either String Text
forall a b. a -> Either a b
Prelude.Left (UnicodeException -> String
forall a. Show a => a -> String
Prelude.show UnicodeException
err)
                                                (Prelude.Right r :: Text
r) -> Text -> Either String Text
forall a b. b -> Either a b
Prelude.Right Text
r))
                                       "value"
                                CallableOptions'FeedDevicesEntry
-> Parser CallableOptions'FeedDevicesEntry
loop (Setter
  CallableOptions'FeedDevicesEntry
  CallableOptions'FeedDevicesEntry
  Text
  Text
-> Text
-> CallableOptions'FeedDevicesEntry
-> CallableOptions'FeedDevicesEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value") Text
y CallableOptions'FeedDevicesEntry
x)
                        wire :: Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                CallableOptions'FeedDevicesEntry
-> Parser CallableOptions'FeedDevicesEntry
loop
                                  (Setter
  CallableOptions'FeedDevicesEntry
  CallableOptions'FeedDevicesEntry
  FieldSet
  FieldSet
-> (FieldSet -> FieldSet)
-> CallableOptions'FeedDevicesEntry
-> CallableOptions'FeedDevicesEntry
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
  CallableOptions'FeedDevicesEntry
  CallableOptions'FeedDevicesEntry
  FieldSet
  FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) CallableOptions'FeedDevicesEntry
x)
      in
        Parser CallableOptions'FeedDevicesEntry
-> String -> Parser CallableOptions'FeedDevicesEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do CallableOptions'FeedDevicesEntry
-> Parser CallableOptions'FeedDevicesEntry
loop CallableOptions'FeedDevicesEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage) "FeedDevicesEntry"
  buildMessage :: CallableOptions'FeedDevicesEntry -> Builder
buildMessage
    = \ _x :: CallableOptions'FeedDevicesEntry
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Text
_v = FoldLike
  Text
  CallableOptions'FeedDevicesEntry
  CallableOptions'FeedDevicesEntry
  Text
  Text
-> CallableOptions'FeedDevicesEntry -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key") CallableOptions'FeedDevicesEntry
_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
  CallableOptions'FeedDevicesEntry
  CallableOptions'FeedDevicesEntry
  Text
  Text
-> CallableOptions'FeedDevicesEntry -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value") CallableOptions'FeedDevicesEntry
_x
                 in
                   if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 18)
                         ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            (\ bs :: ByteString
bs
                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                       (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                    (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                            Text -> ByteString
Data.Text.Encoding.encodeUtf8
                            Text
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  CallableOptions'FeedDevicesEntry
  CallableOptions'FeedDevicesEntry
  FieldSet
  FieldSet
-> CallableOptions'FeedDevicesEntry -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  CallableOptions'FeedDevicesEntry
  CallableOptions'FeedDevicesEntry
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields CallableOptions'FeedDevicesEntry
_x)))
instance Control.DeepSeq.NFData CallableOptions'FeedDevicesEntry where
  rnf :: CallableOptions'FeedDevicesEntry -> ()
rnf
    = \ x__ :: CallableOptions'FeedDevicesEntry
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (CallableOptions'FeedDevicesEntry -> FieldSet
_CallableOptions'FeedDevicesEntry'_unknownFields CallableOptions'FeedDevicesEntry
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (CallableOptions'FeedDevicesEntry -> Text
_CallableOptions'FeedDevicesEntry'key CallableOptions'FeedDevicesEntry
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (CallableOptions'FeedDevicesEntry -> Text
_CallableOptions'FeedDevicesEntry'value CallableOptions'FeedDevicesEntry
x__) ()))
{- | Fields :
     
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.key' @:: Lens' CallableOptions'FetchDevicesEntry Data.Text.Text@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.value' @:: Lens' CallableOptions'FetchDevicesEntry Data.Text.Text@ -}
data CallableOptions'FetchDevicesEntry
  = CallableOptions'FetchDevicesEntry'_constructor {CallableOptions'FetchDevicesEntry -> Text
_CallableOptions'FetchDevicesEntry'key :: !Data.Text.Text,
                                                    CallableOptions'FetchDevicesEntry -> Text
_CallableOptions'FetchDevicesEntry'value :: !Data.Text.Text,
                                                    CallableOptions'FetchDevicesEntry -> FieldSet
_CallableOptions'FetchDevicesEntry'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (CallableOptions'FetchDevicesEntry
-> CallableOptions'FetchDevicesEntry -> Bool
(CallableOptions'FetchDevicesEntry
 -> CallableOptions'FetchDevicesEntry -> Bool)
-> (CallableOptions'FetchDevicesEntry
    -> CallableOptions'FetchDevicesEntry -> Bool)
-> Eq CallableOptions'FetchDevicesEntry
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: CallableOptions'FetchDevicesEntry
-> CallableOptions'FetchDevicesEntry -> Bool
$c/= :: CallableOptions'FetchDevicesEntry
-> CallableOptions'FetchDevicesEntry -> Bool
== :: CallableOptions'FetchDevicesEntry
-> CallableOptions'FetchDevicesEntry -> Bool
$c== :: CallableOptions'FetchDevicesEntry
-> CallableOptions'FetchDevicesEntry -> Bool
Prelude.Eq, Eq CallableOptions'FetchDevicesEntry
Eq CallableOptions'FetchDevicesEntry =>
(CallableOptions'FetchDevicesEntry
 -> CallableOptions'FetchDevicesEntry -> Ordering)
-> (CallableOptions'FetchDevicesEntry
    -> CallableOptions'FetchDevicesEntry -> Bool)
-> (CallableOptions'FetchDevicesEntry
    -> CallableOptions'FetchDevicesEntry -> Bool)
-> (CallableOptions'FetchDevicesEntry
    -> CallableOptions'FetchDevicesEntry -> Bool)
-> (CallableOptions'FetchDevicesEntry
    -> CallableOptions'FetchDevicesEntry -> Bool)
-> (CallableOptions'FetchDevicesEntry
    -> CallableOptions'FetchDevicesEntry
    -> CallableOptions'FetchDevicesEntry)
-> (CallableOptions'FetchDevicesEntry
    -> CallableOptions'FetchDevicesEntry
    -> CallableOptions'FetchDevicesEntry)
-> Ord CallableOptions'FetchDevicesEntry
CallableOptions'FetchDevicesEntry
-> CallableOptions'FetchDevicesEntry -> Bool
CallableOptions'FetchDevicesEntry
-> CallableOptions'FetchDevicesEntry -> Ordering
CallableOptions'FetchDevicesEntry
-> CallableOptions'FetchDevicesEntry
-> CallableOptions'FetchDevicesEntry
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 :: CallableOptions'FetchDevicesEntry
-> CallableOptions'FetchDevicesEntry
-> CallableOptions'FetchDevicesEntry
$cmin :: CallableOptions'FetchDevicesEntry
-> CallableOptions'FetchDevicesEntry
-> CallableOptions'FetchDevicesEntry
max :: CallableOptions'FetchDevicesEntry
-> CallableOptions'FetchDevicesEntry
-> CallableOptions'FetchDevicesEntry
$cmax :: CallableOptions'FetchDevicesEntry
-> CallableOptions'FetchDevicesEntry
-> CallableOptions'FetchDevicesEntry
>= :: CallableOptions'FetchDevicesEntry
-> CallableOptions'FetchDevicesEntry -> Bool
$c>= :: CallableOptions'FetchDevicesEntry
-> CallableOptions'FetchDevicesEntry -> Bool
> :: CallableOptions'FetchDevicesEntry
-> CallableOptions'FetchDevicesEntry -> Bool
$c> :: CallableOptions'FetchDevicesEntry
-> CallableOptions'FetchDevicesEntry -> Bool
<= :: CallableOptions'FetchDevicesEntry
-> CallableOptions'FetchDevicesEntry -> Bool
$c<= :: CallableOptions'FetchDevicesEntry
-> CallableOptions'FetchDevicesEntry -> Bool
< :: CallableOptions'FetchDevicesEntry
-> CallableOptions'FetchDevicesEntry -> Bool
$c< :: CallableOptions'FetchDevicesEntry
-> CallableOptions'FetchDevicesEntry -> Bool
compare :: CallableOptions'FetchDevicesEntry
-> CallableOptions'FetchDevicesEntry -> Ordering
$ccompare :: CallableOptions'FetchDevicesEntry
-> CallableOptions'FetchDevicesEntry -> Ordering
$cp1Ord :: Eq CallableOptions'FetchDevicesEntry
Prelude.Ord)
instance Prelude.Show CallableOptions'FetchDevicesEntry where
  showsPrec :: Int -> CallableOptions'FetchDevicesEntry -> ShowS
showsPrec _ __x :: CallableOptions'FetchDevicesEntry
__x __s :: String
__s
    = Char -> ShowS
Prelude.showChar
        '{'
        (String -> ShowS
Prelude.showString
           (CallableOptions'FetchDevicesEntry -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort CallableOptions'FetchDevicesEntry
__x) (Char -> ShowS
Prelude.showChar '}' String
__s))
instance Data.ProtoLens.Field.HasField CallableOptions'FetchDevicesEntry "key" Data.Text.Text where
  fieldOf :: Proxy# "key"
-> (Text -> f Text)
-> CallableOptions'FetchDevicesEntry
-> f CallableOptions'FetchDevicesEntry
fieldOf _
    = ((Text -> f Text)
 -> CallableOptions'FetchDevicesEntry
 -> f CallableOptions'FetchDevicesEntry)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> CallableOptions'FetchDevicesEntry
-> f CallableOptions'FetchDevicesEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CallableOptions'FetchDevicesEntry -> Text)
-> (CallableOptions'FetchDevicesEntry
    -> Text -> CallableOptions'FetchDevicesEntry)
-> Lens' CallableOptions'FetchDevicesEntry Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CallableOptions'FetchDevicesEntry -> Text
_CallableOptions'FetchDevicesEntry'key
           (\ x__ :: CallableOptions'FetchDevicesEntry
x__ y__ :: Text
y__ -> CallableOptions'FetchDevicesEntry
x__ {_CallableOptions'FetchDevicesEntry'key :: Text
_CallableOptions'FetchDevicesEntry'key = Text
y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField CallableOptions'FetchDevicesEntry "value" Data.Text.Text where
  fieldOf :: Proxy# "value"
-> (Text -> f Text)
-> CallableOptions'FetchDevicesEntry
-> f CallableOptions'FetchDevicesEntry
fieldOf _
    = ((Text -> f Text)
 -> CallableOptions'FetchDevicesEntry
 -> f CallableOptions'FetchDevicesEntry)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> CallableOptions'FetchDevicesEntry
-> f CallableOptions'FetchDevicesEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CallableOptions'FetchDevicesEntry -> Text)
-> (CallableOptions'FetchDevicesEntry
    -> Text -> CallableOptions'FetchDevicesEntry)
-> Lens' CallableOptions'FetchDevicesEntry Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CallableOptions'FetchDevicesEntry -> Text
_CallableOptions'FetchDevicesEntry'value
           (\ x__ :: CallableOptions'FetchDevicesEntry
x__ y__ :: Text
y__
              -> CallableOptions'FetchDevicesEntry
x__ {_CallableOptions'FetchDevicesEntry'value :: Text
_CallableOptions'FetchDevicesEntry'value = Text
y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message CallableOptions'FetchDevicesEntry where
  messageName :: Proxy CallableOptions'FetchDevicesEntry -> Text
messageName _
    = String -> Text
Data.Text.pack "tensorflow.CallableOptions.FetchDevicesEntry"
  packedMessageDescriptor :: Proxy CallableOptions'FetchDevicesEntry -> ByteString
packedMessageDescriptor _
    = "\n\
      \\DC1FetchDevicesEntry\DC2\DLE\n\
      \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2\DC4\n\
      \\ENQvalue\CAN\STX \SOH(\tR\ENQvalue:\STX8\SOH"
  packedFileDescriptor :: Proxy CallableOptions'FetchDevicesEntry -> ByteString
packedFileDescriptor _ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor CallableOptions'FetchDevicesEntry)
fieldsByTag
    = let
        key__field_descriptor :: FieldDescriptor CallableOptions'FetchDevicesEntry
key__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor CallableOptions'FetchDevicesEntry Text
-> FieldDescriptor CallableOptions'FetchDevicesEntry
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "key"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens' CallableOptions'FetchDevicesEntry Text
-> FieldAccessor CallableOptions'FetchDevicesEntry Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key")) ::
              Data.ProtoLens.FieldDescriptor CallableOptions'FetchDevicesEntry
        value__field_descriptor :: FieldDescriptor CallableOptions'FetchDevicesEntry
value__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor CallableOptions'FetchDevicesEntry Text
-> FieldDescriptor CallableOptions'FetchDevicesEntry
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "value"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens' CallableOptions'FetchDevicesEntry Text
-> FieldAccessor CallableOptions'FetchDevicesEntry Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value")) ::
              Data.ProtoLens.FieldDescriptor CallableOptions'FetchDevicesEntry
      in
        [(Tag, FieldDescriptor CallableOptions'FetchDevicesEntry)]
-> Map Tag (FieldDescriptor CallableOptions'FetchDevicesEntry)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag 1, FieldDescriptor CallableOptions'FetchDevicesEntry
key__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 2, FieldDescriptor CallableOptions'FetchDevicesEntry
value__field_descriptor)]
  unknownFields :: LensLike' f CallableOptions'FetchDevicesEntry FieldSet
unknownFields
    = (CallableOptions'FetchDevicesEntry -> FieldSet)
-> (CallableOptions'FetchDevicesEntry
    -> FieldSet -> CallableOptions'FetchDevicesEntry)
-> Lens' CallableOptions'FetchDevicesEntry FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        CallableOptions'FetchDevicesEntry -> FieldSet
_CallableOptions'FetchDevicesEntry'_unknownFields
        (\ x__ :: CallableOptions'FetchDevicesEntry
x__ y__ :: FieldSet
y__
           -> CallableOptions'FetchDevicesEntry
x__ {_CallableOptions'FetchDevicesEntry'_unknownFields :: FieldSet
_CallableOptions'FetchDevicesEntry'_unknownFields = FieldSet
y__})
  defMessage :: CallableOptions'FetchDevicesEntry
defMessage
    = $WCallableOptions'FetchDevicesEntry'_constructor :: Text -> Text -> FieldSet -> CallableOptions'FetchDevicesEntry
CallableOptions'FetchDevicesEntry'_constructor
        {_CallableOptions'FetchDevicesEntry'key :: Text
_CallableOptions'FetchDevicesEntry'key = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _CallableOptions'FetchDevicesEntry'value :: Text
_CallableOptions'FetchDevicesEntry'value = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _CallableOptions'FetchDevicesEntry'_unknownFields :: FieldSet
_CallableOptions'FetchDevicesEntry'_unknownFields = []}
  parseMessage :: Parser CallableOptions'FetchDevicesEntry
parseMessage
    = let
        loop ::
          CallableOptions'FetchDevicesEntry
          -> Data.ProtoLens.Encoding.Bytes.Parser CallableOptions'FetchDevicesEntry
        loop :: CallableOptions'FetchDevicesEntry
-> Parser CallableOptions'FetchDevicesEntry
loop x :: CallableOptions'FetchDevicesEntry
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]))))
                      CallableOptions'FetchDevicesEntry
-> Parser CallableOptions'FetchDevicesEntry
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter
  CallableOptions'FetchDevicesEntry
  CallableOptions'FetchDevicesEntry
  FieldSet
  FieldSet
-> (FieldSet -> FieldSet)
-> CallableOptions'FetchDevicesEntry
-> CallableOptions'FetchDevicesEntry
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
  CallableOptions'FetchDevicesEntry
  CallableOptions'FetchDevicesEntry
  FieldSet
  FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) CallableOptions'FetchDevicesEntry
x)
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        10
                          -> do Text
y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do ByteString
value <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                       Int -> Parser ByteString
Data.ProtoLens.Encoding.Bytes.getBytes
                                                         (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
                                           Either String Text -> Parser Text
forall a. Either String a -> Parser a
Data.ProtoLens.Encoding.Bytes.runEither
                                             (case ByteString -> Either UnicodeException Text
Data.Text.Encoding.decodeUtf8' ByteString
value of
                                                (Prelude.Left err :: UnicodeException
err)
                                                  -> String -> Either String Text
forall a b. a -> Either a b
Prelude.Left (UnicodeException -> String
forall a. Show a => a -> String
Prelude.show UnicodeException
err)
                                                (Prelude.Right r :: Text
r) -> Text -> Either String Text
forall a b. b -> Either a b
Prelude.Right Text
r))
                                       "key"
                                CallableOptions'FetchDevicesEntry
-> Parser CallableOptions'FetchDevicesEntry
loop (Setter
  CallableOptions'FetchDevicesEntry
  CallableOptions'FetchDevicesEntry
  Text
  Text
-> Text
-> CallableOptions'FetchDevicesEntry
-> CallableOptions'FetchDevicesEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key") Text
y CallableOptions'FetchDevicesEntry
x)
                        18
                          -> do Text
y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do ByteString
value <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                       Int -> Parser ByteString
Data.ProtoLens.Encoding.Bytes.getBytes
                                                         (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
                                           Either String Text -> Parser Text
forall a. Either String a -> Parser a
Data.ProtoLens.Encoding.Bytes.runEither
                                             (case ByteString -> Either UnicodeException Text
Data.Text.Encoding.decodeUtf8' ByteString
value of
                                                (Prelude.Left err :: UnicodeException
err)
                                                  -> String -> Either String Text
forall a b. a -> Either a b
Prelude.Left (UnicodeException -> String
forall a. Show a => a -> String
Prelude.show UnicodeException
err)
                                                (Prelude.Right r :: Text
r) -> Text -> Either String Text
forall a b. b -> Either a b
Prelude.Right Text
r))
                                       "value"
                                CallableOptions'FetchDevicesEntry
-> Parser CallableOptions'FetchDevicesEntry
loop (Setter
  CallableOptions'FetchDevicesEntry
  CallableOptions'FetchDevicesEntry
  Text
  Text
-> Text
-> CallableOptions'FetchDevicesEntry
-> CallableOptions'FetchDevicesEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value") Text
y CallableOptions'FetchDevicesEntry
x)
                        wire :: Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                CallableOptions'FetchDevicesEntry
-> Parser CallableOptions'FetchDevicesEntry
loop
                                  (Setter
  CallableOptions'FetchDevicesEntry
  CallableOptions'FetchDevicesEntry
  FieldSet
  FieldSet
-> (FieldSet -> FieldSet)
-> CallableOptions'FetchDevicesEntry
-> CallableOptions'FetchDevicesEntry
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
  CallableOptions'FetchDevicesEntry
  CallableOptions'FetchDevicesEntry
  FieldSet
  FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) CallableOptions'FetchDevicesEntry
x)
      in
        Parser CallableOptions'FetchDevicesEntry
-> String -> Parser CallableOptions'FetchDevicesEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do CallableOptions'FetchDevicesEntry
-> Parser CallableOptions'FetchDevicesEntry
loop CallableOptions'FetchDevicesEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage) "FetchDevicesEntry"
  buildMessage :: CallableOptions'FetchDevicesEntry -> Builder
buildMessage
    = \ _x :: CallableOptions'FetchDevicesEntry
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Text
_v = FoldLike
  Text
  CallableOptions'FetchDevicesEntry
  CallableOptions'FetchDevicesEntry
  Text
  Text
-> CallableOptions'FetchDevicesEntry -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key") CallableOptions'FetchDevicesEntry
_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
  CallableOptions'FetchDevicesEntry
  CallableOptions'FetchDevicesEntry
  Text
  Text
-> CallableOptions'FetchDevicesEntry -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value") CallableOptions'FetchDevicesEntry
_x
                 in
                   if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 18)
                         ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            (\ bs :: ByteString
bs
                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                       (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                    (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                            Text -> ByteString
Data.Text.Encoding.encodeUtf8
                            Text
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  CallableOptions'FetchDevicesEntry
  CallableOptions'FetchDevicesEntry
  FieldSet
  FieldSet
-> CallableOptions'FetchDevicesEntry -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  CallableOptions'FetchDevicesEntry
  CallableOptions'FetchDevicesEntry
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields CallableOptions'FetchDevicesEntry
_x)))
instance Control.DeepSeq.NFData CallableOptions'FetchDevicesEntry where
  rnf :: CallableOptions'FetchDevicesEntry -> ()
rnf
    = \ x__ :: CallableOptions'FetchDevicesEntry
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (CallableOptions'FetchDevicesEntry -> FieldSet
_CallableOptions'FetchDevicesEntry'_unknownFields CallableOptions'FetchDevicesEntry
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (CallableOptions'FetchDevicesEntry -> Text
_CallableOptions'FetchDevicesEntry'key CallableOptions'FetchDevicesEntry
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (CallableOptions'FetchDevicesEntry -> Text
_CallableOptions'FetchDevicesEntry'value CallableOptions'FetchDevicesEntry
x__) ()))
{- | Fields :
     
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.deviceCount' @:: Lens' ConfigProto (Data.Map.Map Data.Text.Text Data.Int.Int32)@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.intraOpParallelismThreads' @:: Lens' ConfigProto Data.Int.Int32@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.interOpParallelismThreads' @:: Lens' ConfigProto Data.Int.Int32@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.usePerSessionThreads' @:: Lens' ConfigProto Prelude.Bool@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.sessionInterOpThreadPool' @:: Lens' ConfigProto [ThreadPoolOptionProto]@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.vec'sessionInterOpThreadPool' @:: Lens' ConfigProto (Data.Vector.Vector ThreadPoolOptionProto)@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.placementPeriod' @:: Lens' ConfigProto Data.Int.Int32@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.deviceFilters' @:: Lens' ConfigProto [Data.Text.Text]@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.vec'deviceFilters' @:: Lens' ConfigProto (Data.Vector.Vector Data.Text.Text)@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.gpuOptions' @:: Lens' ConfigProto GPUOptions@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.maybe'gpuOptions' @:: Lens' ConfigProto (Prelude.Maybe GPUOptions)@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.allowSoftPlacement' @:: Lens' ConfigProto Prelude.Bool@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.logDevicePlacement' @:: Lens' ConfigProto Prelude.Bool@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.graphOptions' @:: Lens' ConfigProto GraphOptions@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.maybe'graphOptions' @:: Lens' ConfigProto (Prelude.Maybe GraphOptions)@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.operationTimeoutInMs' @:: Lens' ConfigProto Data.Int.Int64@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.rpcOptions' @:: Lens' ConfigProto RPCOptions@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.maybe'rpcOptions' @:: Lens' ConfigProto (Prelude.Maybe RPCOptions)@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.clusterDef' @:: Lens' ConfigProto Proto.Tensorflow.Core.Protobuf.Cluster.ClusterDef@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.maybe'clusterDef' @:: Lens' ConfigProto (Prelude.Maybe Proto.Tensorflow.Core.Protobuf.Cluster.ClusterDef)@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.isolateSessionState' @:: Lens' ConfigProto Prelude.Bool@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.shareClusterDevicesInSession' @:: Lens' ConfigProto Prelude.Bool@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.experimental' @:: Lens' ConfigProto ConfigProto'Experimental@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.maybe'experimental' @:: Lens' ConfigProto (Prelude.Maybe ConfigProto'Experimental)@ -}
data ConfigProto
  = ConfigProto'_constructor {ConfigProto -> Map Text Int32
_ConfigProto'deviceCount :: !(Data.Map.Map Data.Text.Text Data.Int.Int32),
                              ConfigProto -> Int32
_ConfigProto'intraOpParallelismThreads :: !Data.Int.Int32,
                              ConfigProto -> Int32
_ConfigProto'interOpParallelismThreads :: !Data.Int.Int32,
                              ConfigProto -> Bool
_ConfigProto'usePerSessionThreads :: !Prelude.Bool,
                              ConfigProto -> Vector ThreadPoolOptionProto
_ConfigProto'sessionInterOpThreadPool :: !(Data.Vector.Vector ThreadPoolOptionProto),
                              ConfigProto -> Int32
_ConfigProto'placementPeriod :: !Data.Int.Int32,
                              ConfigProto -> Vector Text
_ConfigProto'deviceFilters :: !(Data.Vector.Vector Data.Text.Text),
                              ConfigProto -> Maybe GPUOptions
_ConfigProto'gpuOptions :: !(Prelude.Maybe GPUOptions),
                              ConfigProto -> Bool
_ConfigProto'allowSoftPlacement :: !Prelude.Bool,
                              ConfigProto -> Bool
_ConfigProto'logDevicePlacement :: !Prelude.Bool,
                              ConfigProto -> Maybe GraphOptions
_ConfigProto'graphOptions :: !(Prelude.Maybe GraphOptions),
                              ConfigProto -> Int64
_ConfigProto'operationTimeoutInMs :: !Data.Int.Int64,
                              ConfigProto -> Maybe RPCOptions
_ConfigProto'rpcOptions :: !(Prelude.Maybe RPCOptions),
                              ConfigProto -> Maybe ClusterDef
_ConfigProto'clusterDef :: !(Prelude.Maybe Proto.Tensorflow.Core.Protobuf.Cluster.ClusterDef),
                              ConfigProto -> Bool
_ConfigProto'isolateSessionState :: !Prelude.Bool,
                              ConfigProto -> Bool
_ConfigProto'shareClusterDevicesInSession :: !Prelude.Bool,
                              ConfigProto -> Maybe ConfigProto'Experimental
_ConfigProto'experimental :: !(Prelude.Maybe ConfigProto'Experimental),
                              ConfigProto -> FieldSet
_ConfigProto'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ConfigProto -> ConfigProto -> Bool
(ConfigProto -> ConfigProto -> Bool)
-> (ConfigProto -> ConfigProto -> Bool) -> Eq ConfigProto
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ConfigProto -> ConfigProto -> Bool
$c/= :: ConfigProto -> ConfigProto -> Bool
== :: ConfigProto -> ConfigProto -> Bool
$c== :: ConfigProto -> ConfigProto -> Bool
Prelude.Eq, Eq ConfigProto
Eq ConfigProto =>
(ConfigProto -> ConfigProto -> Ordering)
-> (ConfigProto -> ConfigProto -> Bool)
-> (ConfigProto -> ConfigProto -> Bool)
-> (ConfigProto -> ConfigProto -> Bool)
-> (ConfigProto -> ConfigProto -> Bool)
-> (ConfigProto -> ConfigProto -> ConfigProto)
-> (ConfigProto -> ConfigProto -> ConfigProto)
-> Ord ConfigProto
ConfigProto -> ConfigProto -> Bool
ConfigProto -> ConfigProto -> Ordering
ConfigProto -> ConfigProto -> ConfigProto
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 :: ConfigProto -> ConfigProto -> ConfigProto
$cmin :: ConfigProto -> ConfigProto -> ConfigProto
max :: ConfigProto -> ConfigProto -> ConfigProto
$cmax :: ConfigProto -> ConfigProto -> ConfigProto
>= :: ConfigProto -> ConfigProto -> Bool
$c>= :: ConfigProto -> ConfigProto -> Bool
> :: ConfigProto -> ConfigProto -> Bool
$c> :: ConfigProto -> ConfigProto -> Bool
<= :: ConfigProto -> ConfigProto -> Bool
$c<= :: ConfigProto -> ConfigProto -> Bool
< :: ConfigProto -> ConfigProto -> Bool
$c< :: ConfigProto -> ConfigProto -> Bool
compare :: ConfigProto -> ConfigProto -> Ordering
$ccompare :: ConfigProto -> ConfigProto -> Ordering
$cp1Ord :: Eq ConfigProto
Prelude.Ord)
instance Prelude.Show ConfigProto where
  showsPrec :: Int -> ConfigProto -> ShowS
showsPrec _ __x :: ConfigProto
__x __s :: String
__s
    = Char -> ShowS
Prelude.showChar
        '{'
        (String -> ShowS
Prelude.showString
           (ConfigProto -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ConfigProto
__x) (Char -> ShowS
Prelude.showChar '}' String
__s))
instance Data.ProtoLens.Field.HasField ConfigProto "deviceCount" (Data.Map.Map Data.Text.Text Data.Int.Int32) where
  fieldOf :: Proxy# "deviceCount"
-> (Map Text Int32 -> f (Map Text Int32))
-> ConfigProto
-> f ConfigProto
fieldOf _
    = ((Map Text Int32 -> f (Map Text Int32))
 -> ConfigProto -> f ConfigProto)
-> ((Map Text Int32 -> f (Map Text Int32))
    -> Map Text Int32 -> f (Map Text Int32))
-> (Map Text Int32 -> f (Map Text Int32))
-> ConfigProto
-> f ConfigProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ConfigProto -> Map Text Int32)
-> (ConfigProto -> Map Text Int32 -> ConfigProto)
-> Lens ConfigProto ConfigProto (Map Text Int32) (Map Text Int32)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ConfigProto -> Map Text Int32
_ConfigProto'deviceCount
           (\ x__ :: ConfigProto
x__ y__ :: Map Text Int32
y__ -> ConfigProto
x__ {_ConfigProto'deviceCount :: Map Text Int32
_ConfigProto'deviceCount = Map Text Int32
y__}))
        (Map Text Int32 -> f (Map Text Int32))
-> Map Text Int32 -> f (Map Text Int32)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ConfigProto "intraOpParallelismThreads" Data.Int.Int32 where
  fieldOf :: Proxy# "intraOpParallelismThreads"
-> (Int32 -> f Int32) -> ConfigProto -> f ConfigProto
fieldOf _
    = ((Int32 -> f Int32) -> ConfigProto -> f ConfigProto)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> ConfigProto
-> f ConfigProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ConfigProto -> Int32)
-> (ConfigProto -> Int32 -> ConfigProto)
-> Lens ConfigProto ConfigProto Int32 Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ConfigProto -> Int32
_ConfigProto'intraOpParallelismThreads
           (\ x__ :: ConfigProto
x__ y__ :: Int32
y__ -> ConfigProto
x__ {_ConfigProto'intraOpParallelismThreads :: Int32
_ConfigProto'intraOpParallelismThreads = Int32
y__}))
        (Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ConfigProto "interOpParallelismThreads" Data.Int.Int32 where
  fieldOf :: Proxy# "interOpParallelismThreads"
-> (Int32 -> f Int32) -> ConfigProto -> f ConfigProto
fieldOf _
    = ((Int32 -> f Int32) -> ConfigProto -> f ConfigProto)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> ConfigProto
-> f ConfigProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ConfigProto -> Int32)
-> (ConfigProto -> Int32 -> ConfigProto)
-> Lens ConfigProto ConfigProto Int32 Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ConfigProto -> Int32
_ConfigProto'interOpParallelismThreads
           (\ x__ :: ConfigProto
x__ y__ :: Int32
y__ -> ConfigProto
x__ {_ConfigProto'interOpParallelismThreads :: Int32
_ConfigProto'interOpParallelismThreads = Int32
y__}))
        (Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ConfigProto "usePerSessionThreads" Prelude.Bool where
  fieldOf :: Proxy# "usePerSessionThreads"
-> (Bool -> f Bool) -> ConfigProto -> f ConfigProto
fieldOf _
    = ((Bool -> f Bool) -> ConfigProto -> f ConfigProto)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> ConfigProto
-> f ConfigProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ConfigProto -> Bool)
-> (ConfigProto -> Bool -> ConfigProto)
-> Lens ConfigProto ConfigProto Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ConfigProto -> Bool
_ConfigProto'usePerSessionThreads
           (\ x__ :: ConfigProto
x__ y__ :: Bool
y__ -> ConfigProto
x__ {_ConfigProto'usePerSessionThreads :: Bool
_ConfigProto'usePerSessionThreads = Bool
y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ConfigProto "sessionInterOpThreadPool" [ThreadPoolOptionProto] where
  fieldOf :: Proxy# "sessionInterOpThreadPool"
-> ([ThreadPoolOptionProto] -> f [ThreadPoolOptionProto])
-> ConfigProto
-> f ConfigProto
fieldOf _
    = ((Vector ThreadPoolOptionProto -> f (Vector ThreadPoolOptionProto))
 -> ConfigProto -> f ConfigProto)
-> (([ThreadPoolOptionProto] -> f [ThreadPoolOptionProto])
    -> Vector ThreadPoolOptionProto
    -> f (Vector ThreadPoolOptionProto))
-> ([ThreadPoolOptionProto] -> f [ThreadPoolOptionProto])
-> ConfigProto
-> f ConfigProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ConfigProto -> Vector ThreadPoolOptionProto)
-> (ConfigProto -> Vector ThreadPoolOptionProto -> ConfigProto)
-> Lens
     ConfigProto
     ConfigProto
     (Vector ThreadPoolOptionProto)
     (Vector ThreadPoolOptionProto)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ConfigProto -> Vector ThreadPoolOptionProto
_ConfigProto'sessionInterOpThreadPool
           (\ x__ :: ConfigProto
x__ y__ :: Vector ThreadPoolOptionProto
y__ -> ConfigProto
x__ {_ConfigProto'sessionInterOpThreadPool :: Vector ThreadPoolOptionProto
_ConfigProto'sessionInterOpThreadPool = Vector ThreadPoolOptionProto
y__}))
        ((Vector ThreadPoolOptionProto -> [ThreadPoolOptionProto])
-> (Vector ThreadPoolOptionProto
    -> [ThreadPoolOptionProto] -> Vector ThreadPoolOptionProto)
-> Lens
     (Vector ThreadPoolOptionProto)
     (Vector ThreadPoolOptionProto)
     [ThreadPoolOptionProto]
     [ThreadPoolOptionProto]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector ThreadPoolOptionProto -> [ThreadPoolOptionProto]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ _ y__ :: [ThreadPoolOptionProto]
y__ -> [ThreadPoolOptionProto] -> Vector ThreadPoolOptionProto
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [ThreadPoolOptionProto]
y__))
instance Data.ProtoLens.Field.HasField ConfigProto "vec'sessionInterOpThreadPool" (Data.Vector.Vector ThreadPoolOptionProto) where
  fieldOf :: Proxy# "vec'sessionInterOpThreadPool"
-> (Vector ThreadPoolOptionProto
    -> f (Vector ThreadPoolOptionProto))
-> ConfigProto
-> f ConfigProto
fieldOf _
    = ((Vector ThreadPoolOptionProto -> f (Vector ThreadPoolOptionProto))
 -> ConfigProto -> f ConfigProto)
-> ((Vector ThreadPoolOptionProto
     -> f (Vector ThreadPoolOptionProto))
    -> Vector ThreadPoolOptionProto
    -> f (Vector ThreadPoolOptionProto))
-> (Vector ThreadPoolOptionProto
    -> f (Vector ThreadPoolOptionProto))
-> ConfigProto
-> f ConfigProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ConfigProto -> Vector ThreadPoolOptionProto)
-> (ConfigProto -> Vector ThreadPoolOptionProto -> ConfigProto)
-> Lens
     ConfigProto
     ConfigProto
     (Vector ThreadPoolOptionProto)
     (Vector ThreadPoolOptionProto)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ConfigProto -> Vector ThreadPoolOptionProto
_ConfigProto'sessionInterOpThreadPool
           (\ x__ :: ConfigProto
x__ y__ :: Vector ThreadPoolOptionProto
y__ -> ConfigProto
x__ {_ConfigProto'sessionInterOpThreadPool :: Vector ThreadPoolOptionProto
_ConfigProto'sessionInterOpThreadPool = Vector ThreadPoolOptionProto
y__}))
        (Vector ThreadPoolOptionProto -> f (Vector ThreadPoolOptionProto))
-> Vector ThreadPoolOptionProto -> f (Vector ThreadPoolOptionProto)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ConfigProto "placementPeriod" Data.Int.Int32 where
  fieldOf :: Proxy# "placementPeriod"
-> (Int32 -> f Int32) -> ConfigProto -> f ConfigProto
fieldOf _
    = ((Int32 -> f Int32) -> ConfigProto -> f ConfigProto)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> ConfigProto
-> f ConfigProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ConfigProto -> Int32)
-> (ConfigProto -> Int32 -> ConfigProto)
-> Lens ConfigProto ConfigProto Int32 Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ConfigProto -> Int32
_ConfigProto'placementPeriod
           (\ x__ :: ConfigProto
x__ y__ :: Int32
y__ -> ConfigProto
x__ {_ConfigProto'placementPeriod :: Int32
_ConfigProto'placementPeriod = Int32
y__}))
        (Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ConfigProto "deviceFilters" [Data.Text.Text] where
  fieldOf :: Proxy# "deviceFilters"
-> ([Text] -> f [Text]) -> ConfigProto -> f ConfigProto
fieldOf _
    = ((Vector Text -> f (Vector Text)) -> ConfigProto -> f ConfigProto)
-> (([Text] -> f [Text]) -> Vector Text -> f (Vector Text))
-> ([Text] -> f [Text])
-> ConfigProto
-> f ConfigProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ConfigProto -> Vector Text)
-> (ConfigProto -> Vector Text -> ConfigProto)
-> Lens ConfigProto ConfigProto (Vector Text) (Vector Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ConfigProto -> Vector Text
_ConfigProto'deviceFilters
           (\ x__ :: ConfigProto
x__ y__ :: Vector Text
y__ -> ConfigProto
x__ {_ConfigProto'deviceFilters :: Vector Text
_ConfigProto'deviceFilters = Vector Text
y__}))
        ((Vector Text -> [Text])
-> (Vector Text -> [Text] -> Vector Text)
-> Lens (Vector Text) (Vector Text) [Text] [Text]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Text -> [Text]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ _ y__ :: [Text]
y__ -> [Text] -> Vector Text
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Text]
y__))
instance Data.ProtoLens.Field.HasField ConfigProto "vec'deviceFilters" (Data.Vector.Vector Data.Text.Text) where
  fieldOf :: Proxy# "vec'deviceFilters"
-> (Vector Text -> f (Vector Text)) -> ConfigProto -> f ConfigProto
fieldOf _
    = ((Vector Text -> f (Vector Text)) -> ConfigProto -> f ConfigProto)
-> ((Vector Text -> f (Vector Text))
    -> Vector Text -> f (Vector Text))
-> (Vector Text -> f (Vector Text))
-> ConfigProto
-> f ConfigProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ConfigProto -> Vector Text)
-> (ConfigProto -> Vector Text -> ConfigProto)
-> Lens ConfigProto ConfigProto (Vector Text) (Vector Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ConfigProto -> Vector Text
_ConfigProto'deviceFilters
           (\ x__ :: ConfigProto
x__ y__ :: Vector Text
y__ -> ConfigProto
x__ {_ConfigProto'deviceFilters :: Vector Text
_ConfigProto'deviceFilters = Vector Text
y__}))
        (Vector Text -> f (Vector Text)) -> Vector Text -> f (Vector Text)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ConfigProto "gpuOptions" GPUOptions where
  fieldOf :: Proxy# "gpuOptions"
-> (GPUOptions -> f GPUOptions) -> ConfigProto -> f ConfigProto
fieldOf _
    = ((Maybe GPUOptions -> f (Maybe GPUOptions))
 -> ConfigProto -> f ConfigProto)
-> ((GPUOptions -> f GPUOptions)
    -> Maybe GPUOptions -> f (Maybe GPUOptions))
-> (GPUOptions -> f GPUOptions)
-> ConfigProto
-> f ConfigProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ConfigProto -> Maybe GPUOptions)
-> (ConfigProto -> Maybe GPUOptions -> ConfigProto)
-> Lens
     ConfigProto ConfigProto (Maybe GPUOptions) (Maybe GPUOptions)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ConfigProto -> Maybe GPUOptions
_ConfigProto'gpuOptions
           (\ x__ :: ConfigProto
x__ y__ :: Maybe GPUOptions
y__ -> ConfigProto
x__ {_ConfigProto'gpuOptions :: Maybe GPUOptions
_ConfigProto'gpuOptions = Maybe GPUOptions
y__}))
        (GPUOptions -> Lens' (Maybe GPUOptions) GPUOptions
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens GPUOptions
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField ConfigProto "maybe'gpuOptions" (Prelude.Maybe GPUOptions) where
  fieldOf :: Proxy# "maybe'gpuOptions"
-> (Maybe GPUOptions -> f (Maybe GPUOptions))
-> ConfigProto
-> f ConfigProto
fieldOf _
    = ((Maybe GPUOptions -> f (Maybe GPUOptions))
 -> ConfigProto -> f ConfigProto)
-> ((Maybe GPUOptions -> f (Maybe GPUOptions))
    -> Maybe GPUOptions -> f (Maybe GPUOptions))
-> (Maybe GPUOptions -> f (Maybe GPUOptions))
-> ConfigProto
-> f ConfigProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ConfigProto -> Maybe GPUOptions)
-> (ConfigProto -> Maybe GPUOptions -> ConfigProto)
-> Lens
     ConfigProto ConfigProto (Maybe GPUOptions) (Maybe GPUOptions)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ConfigProto -> Maybe GPUOptions
_ConfigProto'gpuOptions
           (\ x__ :: ConfigProto
x__ y__ :: Maybe GPUOptions
y__ -> ConfigProto
x__ {_ConfigProto'gpuOptions :: Maybe GPUOptions
_ConfigProto'gpuOptions = Maybe GPUOptions
y__}))
        (Maybe GPUOptions -> f (Maybe GPUOptions))
-> Maybe GPUOptions -> f (Maybe GPUOptions)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ConfigProto "allowSoftPlacement" Prelude.Bool where
  fieldOf :: Proxy# "allowSoftPlacement"
-> (Bool -> f Bool) -> ConfigProto -> f ConfigProto
fieldOf _
    = ((Bool -> f Bool) -> ConfigProto -> f ConfigProto)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> ConfigProto
-> f ConfigProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ConfigProto -> Bool)
-> (ConfigProto -> Bool -> ConfigProto)
-> Lens ConfigProto ConfigProto Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ConfigProto -> Bool
_ConfigProto'allowSoftPlacement
           (\ x__ :: ConfigProto
x__ y__ :: Bool
y__ -> ConfigProto
x__ {_ConfigProto'allowSoftPlacement :: Bool
_ConfigProto'allowSoftPlacement = Bool
y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ConfigProto "logDevicePlacement" Prelude.Bool where
  fieldOf :: Proxy# "logDevicePlacement"
-> (Bool -> f Bool) -> ConfigProto -> f ConfigProto
fieldOf _
    = ((Bool -> f Bool) -> ConfigProto -> f ConfigProto)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> ConfigProto
-> f ConfigProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ConfigProto -> Bool)
-> (ConfigProto -> Bool -> ConfigProto)
-> Lens ConfigProto ConfigProto Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ConfigProto -> Bool
_ConfigProto'logDevicePlacement
           (\ x__ :: ConfigProto
x__ y__ :: Bool
y__ -> ConfigProto
x__ {_ConfigProto'logDevicePlacement :: Bool
_ConfigProto'logDevicePlacement = Bool
y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ConfigProto "graphOptions" GraphOptions where
  fieldOf :: Proxy# "graphOptions"
-> (GraphOptions -> f GraphOptions) -> ConfigProto -> f ConfigProto
fieldOf _
    = ((Maybe GraphOptions -> f (Maybe GraphOptions))
 -> ConfigProto -> f ConfigProto)
-> ((GraphOptions -> f GraphOptions)
    -> Maybe GraphOptions -> f (Maybe GraphOptions))
-> (GraphOptions -> f GraphOptions)
-> ConfigProto
-> f ConfigProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ConfigProto -> Maybe GraphOptions)
-> (ConfigProto -> Maybe GraphOptions -> ConfigProto)
-> Lens
     ConfigProto ConfigProto (Maybe GraphOptions) (Maybe GraphOptions)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ConfigProto -> Maybe GraphOptions
_ConfigProto'graphOptions
           (\ x__ :: ConfigProto
x__ y__ :: Maybe GraphOptions
y__ -> ConfigProto
x__ {_ConfigProto'graphOptions :: Maybe GraphOptions
_ConfigProto'graphOptions = Maybe GraphOptions
y__}))
        (GraphOptions -> Lens' (Maybe GraphOptions) GraphOptions
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens GraphOptions
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField ConfigProto "maybe'graphOptions" (Prelude.Maybe GraphOptions) where
  fieldOf :: Proxy# "maybe'graphOptions"
-> (Maybe GraphOptions -> f (Maybe GraphOptions))
-> ConfigProto
-> f ConfigProto
fieldOf _
    = ((Maybe GraphOptions -> f (Maybe GraphOptions))
 -> ConfigProto -> f ConfigProto)
-> ((Maybe GraphOptions -> f (Maybe GraphOptions))
    -> Maybe GraphOptions -> f (Maybe GraphOptions))
-> (Maybe GraphOptions -> f (Maybe GraphOptions))
-> ConfigProto
-> f ConfigProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ConfigProto -> Maybe GraphOptions)
-> (ConfigProto -> Maybe GraphOptions -> ConfigProto)
-> Lens
     ConfigProto ConfigProto (Maybe GraphOptions) (Maybe GraphOptions)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ConfigProto -> Maybe GraphOptions
_ConfigProto'graphOptions
           (\ x__ :: ConfigProto
x__ y__ :: Maybe GraphOptions
y__ -> ConfigProto
x__ {_ConfigProto'graphOptions :: Maybe GraphOptions
_ConfigProto'graphOptions = Maybe GraphOptions
y__}))
        (Maybe GraphOptions -> f (Maybe GraphOptions))
-> Maybe GraphOptions -> f (Maybe GraphOptions)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ConfigProto "operationTimeoutInMs" Data.Int.Int64 where
  fieldOf :: Proxy# "operationTimeoutInMs"
-> (Int64 -> f Int64) -> ConfigProto -> f ConfigProto
fieldOf _
    = ((Int64 -> f Int64) -> ConfigProto -> f ConfigProto)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> ConfigProto
-> f ConfigProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ConfigProto -> Int64)
-> (ConfigProto -> Int64 -> ConfigProto)
-> Lens ConfigProto ConfigProto Int64 Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ConfigProto -> Int64
_ConfigProto'operationTimeoutInMs
           (\ x__ :: ConfigProto
x__ y__ :: Int64
y__ -> ConfigProto
x__ {_ConfigProto'operationTimeoutInMs :: Int64
_ConfigProto'operationTimeoutInMs = Int64
y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ConfigProto "rpcOptions" RPCOptions where
  fieldOf :: Proxy# "rpcOptions"
-> (RPCOptions -> f RPCOptions) -> ConfigProto -> f ConfigProto
fieldOf _
    = ((Maybe RPCOptions -> f (Maybe RPCOptions))
 -> ConfigProto -> f ConfigProto)
-> ((RPCOptions -> f RPCOptions)
    -> Maybe RPCOptions -> f (Maybe RPCOptions))
-> (RPCOptions -> f RPCOptions)
-> ConfigProto
-> f ConfigProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ConfigProto -> Maybe RPCOptions)
-> (ConfigProto -> Maybe RPCOptions -> ConfigProto)
-> Lens
     ConfigProto ConfigProto (Maybe RPCOptions) (Maybe RPCOptions)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ConfigProto -> Maybe RPCOptions
_ConfigProto'rpcOptions
           (\ x__ :: ConfigProto
x__ y__ :: Maybe RPCOptions
y__ -> ConfigProto
x__ {_ConfigProto'rpcOptions :: Maybe RPCOptions
_ConfigProto'rpcOptions = Maybe RPCOptions
y__}))
        (RPCOptions -> Lens' (Maybe RPCOptions) RPCOptions
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens RPCOptions
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField ConfigProto "maybe'rpcOptions" (Prelude.Maybe RPCOptions) where
  fieldOf :: Proxy# "maybe'rpcOptions"
-> (Maybe RPCOptions -> f (Maybe RPCOptions))
-> ConfigProto
-> f ConfigProto
fieldOf _
    = ((Maybe RPCOptions -> f (Maybe RPCOptions))
 -> ConfigProto -> f ConfigProto)
-> ((Maybe RPCOptions -> f (Maybe RPCOptions))
    -> Maybe RPCOptions -> f (Maybe RPCOptions))
-> (Maybe RPCOptions -> f (Maybe RPCOptions))
-> ConfigProto
-> f ConfigProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ConfigProto -> Maybe RPCOptions)
-> (ConfigProto -> Maybe RPCOptions -> ConfigProto)
-> Lens
     ConfigProto ConfigProto (Maybe RPCOptions) (Maybe RPCOptions)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ConfigProto -> Maybe RPCOptions
_ConfigProto'rpcOptions
           (\ x__ :: ConfigProto
x__ y__ :: Maybe RPCOptions
y__ -> ConfigProto
x__ {_ConfigProto'rpcOptions :: Maybe RPCOptions
_ConfigProto'rpcOptions = Maybe RPCOptions
y__}))
        (Maybe RPCOptions -> f (Maybe RPCOptions))
-> Maybe RPCOptions -> f (Maybe RPCOptions)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ConfigProto "clusterDef" Proto.Tensorflow.Core.Protobuf.Cluster.ClusterDef where
  fieldOf :: Proxy# "clusterDef"
-> (ClusterDef -> f ClusterDef) -> ConfigProto -> f ConfigProto
fieldOf _
    = ((Maybe ClusterDef -> f (Maybe ClusterDef))
 -> ConfigProto -> f ConfigProto)
-> ((ClusterDef -> f ClusterDef)
    -> Maybe ClusterDef -> f (Maybe ClusterDef))
-> (ClusterDef -> f ClusterDef)
-> ConfigProto
-> f ConfigProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ConfigProto -> Maybe ClusterDef)
-> (ConfigProto -> Maybe ClusterDef -> ConfigProto)
-> Lens
     ConfigProto ConfigProto (Maybe ClusterDef) (Maybe ClusterDef)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ConfigProto -> Maybe ClusterDef
_ConfigProto'clusterDef
           (\ x__ :: ConfigProto
x__ y__ :: Maybe ClusterDef
y__ -> ConfigProto
x__ {_ConfigProto'clusterDef :: Maybe ClusterDef
_ConfigProto'clusterDef = Maybe ClusterDef
y__}))
        (ClusterDef -> Lens' (Maybe ClusterDef) ClusterDef
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens ClusterDef
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField ConfigProto "maybe'clusterDef" (Prelude.Maybe Proto.Tensorflow.Core.Protobuf.Cluster.ClusterDef) where
  fieldOf :: Proxy# "maybe'clusterDef"
-> (Maybe ClusterDef -> f (Maybe ClusterDef))
-> ConfigProto
-> f ConfigProto
fieldOf _
    = ((Maybe ClusterDef -> f (Maybe ClusterDef))
 -> ConfigProto -> f ConfigProto)
-> ((Maybe ClusterDef -> f (Maybe ClusterDef))
    -> Maybe ClusterDef -> f (Maybe ClusterDef))
-> (Maybe ClusterDef -> f (Maybe ClusterDef))
-> ConfigProto
-> f ConfigProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ConfigProto -> Maybe ClusterDef)
-> (ConfigProto -> Maybe ClusterDef -> ConfigProto)
-> Lens
     ConfigProto ConfigProto (Maybe ClusterDef) (Maybe ClusterDef)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ConfigProto -> Maybe ClusterDef
_ConfigProto'clusterDef
           (\ x__ :: ConfigProto
x__ y__ :: Maybe ClusterDef
y__ -> ConfigProto
x__ {_ConfigProto'clusterDef :: Maybe ClusterDef
_ConfigProto'clusterDef = Maybe ClusterDef
y__}))
        (Maybe ClusterDef -> f (Maybe ClusterDef))
-> Maybe ClusterDef -> f (Maybe ClusterDef)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ConfigProto "isolateSessionState" Prelude.Bool where
  fieldOf :: Proxy# "isolateSessionState"
-> (Bool -> f Bool) -> ConfigProto -> f ConfigProto
fieldOf _
    = ((Bool -> f Bool) -> ConfigProto -> f ConfigProto)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> ConfigProto
-> f ConfigProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ConfigProto -> Bool)
-> (ConfigProto -> Bool -> ConfigProto)
-> Lens ConfigProto ConfigProto Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ConfigProto -> Bool
_ConfigProto'isolateSessionState
           (\ x__ :: ConfigProto
x__ y__ :: Bool
y__ -> ConfigProto
x__ {_ConfigProto'isolateSessionState :: Bool
_ConfigProto'isolateSessionState = Bool
y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ConfigProto "shareClusterDevicesInSession" Prelude.Bool where
  fieldOf :: Proxy# "shareClusterDevicesInSession"
-> (Bool -> f Bool) -> ConfigProto -> f ConfigProto
fieldOf _
    = ((Bool -> f Bool) -> ConfigProto -> f ConfigProto)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> ConfigProto
-> f ConfigProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ConfigProto -> Bool)
-> (ConfigProto -> Bool -> ConfigProto)
-> Lens ConfigProto ConfigProto Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ConfigProto -> Bool
_ConfigProto'shareClusterDevicesInSession
           (\ x__ :: ConfigProto
x__ y__ :: Bool
y__
              -> ConfigProto
x__ {_ConfigProto'shareClusterDevicesInSession :: Bool
_ConfigProto'shareClusterDevicesInSession = Bool
y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ConfigProto "experimental" ConfigProto'Experimental where
  fieldOf :: Proxy# "experimental"
-> (ConfigProto'Experimental -> f ConfigProto'Experimental)
-> ConfigProto
-> f ConfigProto
fieldOf _
    = ((Maybe ConfigProto'Experimental
  -> f (Maybe ConfigProto'Experimental))
 -> ConfigProto -> f ConfigProto)
-> ((ConfigProto'Experimental -> f ConfigProto'Experimental)
    -> Maybe ConfigProto'Experimental
    -> f (Maybe ConfigProto'Experimental))
-> (ConfigProto'Experimental -> f ConfigProto'Experimental)
-> ConfigProto
-> f ConfigProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ConfigProto -> Maybe ConfigProto'Experimental)
-> (ConfigProto -> Maybe ConfigProto'Experimental -> ConfigProto)
-> Lens
     ConfigProto
     ConfigProto
     (Maybe ConfigProto'Experimental)
     (Maybe ConfigProto'Experimental)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ConfigProto -> Maybe ConfigProto'Experimental
_ConfigProto'experimental
           (\ x__ :: ConfigProto
x__ y__ :: Maybe ConfigProto'Experimental
y__ -> ConfigProto
x__ {_ConfigProto'experimental :: Maybe ConfigProto'Experimental
_ConfigProto'experimental = Maybe ConfigProto'Experimental
y__}))
        (ConfigProto'Experimental
-> Lens' (Maybe ConfigProto'Experimental) ConfigProto'Experimental
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens ConfigProto'Experimental
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField ConfigProto "maybe'experimental" (Prelude.Maybe ConfigProto'Experimental) where
  fieldOf :: Proxy# "maybe'experimental"
-> (Maybe ConfigProto'Experimental
    -> f (Maybe ConfigProto'Experimental))
-> ConfigProto
-> f ConfigProto
fieldOf _
    = ((Maybe ConfigProto'Experimental
  -> f (Maybe ConfigProto'Experimental))
 -> ConfigProto -> f ConfigProto)
-> ((Maybe ConfigProto'Experimental
     -> f (Maybe ConfigProto'Experimental))
    -> Maybe ConfigProto'Experimental
    -> f (Maybe ConfigProto'Experimental))
-> (Maybe ConfigProto'Experimental
    -> f (Maybe ConfigProto'Experimental))
-> ConfigProto
-> f ConfigProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ConfigProto -> Maybe ConfigProto'Experimental)
-> (ConfigProto -> Maybe ConfigProto'Experimental -> ConfigProto)
-> Lens
     ConfigProto
     ConfigProto
     (Maybe ConfigProto'Experimental)
     (Maybe ConfigProto'Experimental)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ConfigProto -> Maybe ConfigProto'Experimental
_ConfigProto'experimental
           (\ x__ :: ConfigProto
x__ y__ :: Maybe ConfigProto'Experimental
y__ -> ConfigProto
x__ {_ConfigProto'experimental :: Maybe ConfigProto'Experimental
_ConfigProto'experimental = Maybe ConfigProto'Experimental
y__}))
        (Maybe ConfigProto'Experimental
 -> f (Maybe ConfigProto'Experimental))
-> Maybe ConfigProto'Experimental
-> f (Maybe ConfigProto'Experimental)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ConfigProto where
  messageName :: Proxy ConfigProto -> Text
messageName _ = String -> Text
Data.Text.pack "tensorflow.ConfigProto"
  packedMessageDescriptor :: Proxy ConfigProto -> ByteString
packedMessageDescriptor _
    = "\n\
      \\vConfigProto\DC2K\n\
      \\fdevice_count\CAN\SOH \ETX(\v2(.tensorflow.ConfigProto.DeviceCountEntryR\vdeviceCount\DC2?\n\
      \\FSintra_op_parallelism_threads\CAN\STX \SOH(\ENQR\EMintraOpParallelismThreads\DC2?\n\
      \\FSinter_op_parallelism_threads\CAN\ENQ \SOH(\ENQR\EMinterOpParallelismThreads\DC25\n\
      \\ETBuse_per_session_threads\CAN\t \SOH(\bR\DC4usePerSessionThreads\DC2a\n\
      \\FSsession_inter_op_thread_pool\CAN\f \ETX(\v2!.tensorflow.ThreadPoolOptionProtoR\CANsessionInterOpThreadPool\DC2)\n\
      \\DLEplacement_period\CAN\ETX \SOH(\ENQR\SIplacementPeriod\DC2%\n\
      \\SOdevice_filters\CAN\EOT \ETX(\tR\rdeviceFilters\DC27\n\
      \\vgpu_options\CAN\ACK \SOH(\v2\SYN.tensorflow.GPUOptionsR\n\
      \gpuOptions\DC20\n\
      \\DC4allow_soft_placement\CAN\a \SOH(\bR\DC2allowSoftPlacement\DC20\n\
      \\DC4log_device_placement\CAN\b \SOH(\bR\DC2logDevicePlacement\DC2=\n\
      \\rgraph_options\CAN\n\
      \ \SOH(\v2\CAN.tensorflow.GraphOptionsR\fgraphOptions\DC25\n\
      \\ETBoperation_timeout_in_ms\CAN\v \SOH(\ETXR\DC4operationTimeoutInMs\DC27\n\
      \\vrpc_options\CAN\r \SOH(\v2\SYN.tensorflow.RPCOptionsR\n\
      \rpcOptions\DC27\n\
      \\vcluster_def\CAN\SO \SOH(\v2\SYN.tensorflow.ClusterDefR\n\
      \clusterDef\DC22\n\
      \\NAKisolate_session_state\CAN\SI \SOH(\bR\DC3isolateSessionState\DC2F\n\
      \ share_cluster_devices_in_session\CAN\DC1 \SOH(\bR\FSshareClusterDevicesInSession\DC2H\n\
      \\fexperimental\CAN\DLE \SOH(\v2$.tensorflow.ConfigProto.ExperimentalR\fexperimental\SUB>\n\
      \\DLEDeviceCountEntry\DC2\DLE\n\
      \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2\DC4\n\
      \\ENQvalue\CAN\STX \SOH(\ENQR\ENQvalue:\STX8\SOH\SUB\181\a\n\
      \\fExperimental\DC26\n\
      \\ETBcollective_group_leader\CAN\SOH \SOH(\tR\NAKcollectiveGroupLeader\DC2#\n\
      \\rexecutor_type\CAN\ETX \SOH(\tR\fexecutorType\DC2+\n\
      \\DC2recv_buf_max_chunk\CAN\EOT \SOH(\ENQR\SIrecvBufMaxChunk\DC2*\n\
      \\DC1use_numa_affinity\CAN\ENQ \SOH(\bR\SIuseNumaAffinity\DC2a\n\
      \-collective_deterministic_sequential_execution\CAN\ACK \SOH(\bR*collectiveDeterministicSequentialExecution\DC2'\n\
      \\SIcollective_nccl\CAN\a \SOH(\bR\SOcollectiveNccl\DC2a\n\
      \.share_session_state_in_clusterspec_propagation\CAN\b \SOH(\bR)shareSessionStateInClusterspecPropagation\DC26\n\
      \\ETBdisable_thread_spinning\CAN\t \SOH(\bR\NAKdisableThreadSpinning\DC2F\n\
      \ share_cluster_devices_in_session\CAN\n\
      \ \SOH(\bR\FSshareClusterDevicesInSession\DC2F\n\
      \\DLEsession_metadata\CAN\v \SOH(\v2\ESC.tensorflow.SessionMetadataR\SIsessionMetadata\DC29\n\
      \\EMoptimize_for_static_graph\CAN\f \SOH(\bR\SYNoptimizeForStaticGraph\DC2,\n\
      \\DC2enable_mlir_bridge\CAN\r \SOH(\bR\DLEenableMlirBridge\DC2C\n\
      \\RSenable_mlir_graph_optimization\CAN\DLE \SOH(\bR\ESCenableMlirGraphOptimization\DC2E\n\
      \\USdisable_output_partition_graphs\CAN\SO \SOH(\bR\FSdisableOutputPartitionGraphs\DC2=\n\
      \\ESCxla_fusion_autotuner_thresh\CAN\SI \SOH(\ETXR\CANxlaFusionAutotunerThreshJ\EOT\b\STX\DLE\ETX"
  packedFileDescriptor :: Proxy ConfigProto -> ByteString
packedFileDescriptor _ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ConfigProto)
fieldsByTag
    = let
        deviceCount__field_descriptor :: FieldDescriptor ConfigProto
deviceCount__field_descriptor
          = String
-> FieldTypeDescriptor ConfigProto'DeviceCountEntry
-> FieldAccessor ConfigProto ConfigProto'DeviceCountEntry
-> FieldDescriptor ConfigProto
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "device_count"
              (MessageOrGroup -> FieldTypeDescriptor ConfigProto'DeviceCountEntry
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ConfigProto'DeviceCountEntry)
              (Lens' ConfigProto'DeviceCountEntry Text
-> Lens' ConfigProto'DeviceCountEntry Int32
-> Lens ConfigProto ConfigProto (Map Text Int32) (Map Text Int32)
-> FieldAccessor ConfigProto ConfigProto'DeviceCountEntry
forall key value value1 msg.
(Ord key, Message value) =>
Lens' value key
-> Lens' value value1
-> Lens' msg (Map key value1)
-> FieldAccessor msg value
Data.ProtoLens.MapField
                 (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key")
                 (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value")
                 (forall s a (f :: * -> *).
(HasField s "deviceCount" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"deviceCount")) ::
              Data.ProtoLens.FieldDescriptor ConfigProto
        intraOpParallelismThreads__field_descriptor :: FieldDescriptor ConfigProto
intraOpParallelismThreads__field_descriptor
          = String
-> FieldTypeDescriptor Int32
-> FieldAccessor ConfigProto Int32
-> FieldDescriptor ConfigProto
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "intra_op_parallelism_threads"
              (ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.Int32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
              (WireDefault Int32
-> Lens ConfigProto ConfigProto Int32 Int32
-> FieldAccessor ConfigProto Int32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "intraOpParallelismThreads" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"intraOpParallelismThreads")) ::
              Data.ProtoLens.FieldDescriptor ConfigProto
        interOpParallelismThreads__field_descriptor :: FieldDescriptor ConfigProto
interOpParallelismThreads__field_descriptor
          = String
-> FieldTypeDescriptor Int32
-> FieldAccessor ConfigProto Int32
-> FieldDescriptor ConfigProto
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "inter_op_parallelism_threads"
              (ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.Int32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
              (WireDefault Int32
-> Lens ConfigProto ConfigProto Int32 Int32
-> FieldAccessor ConfigProto Int32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "interOpParallelismThreads" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"interOpParallelismThreads")) ::
              Data.ProtoLens.FieldDescriptor ConfigProto
        usePerSessionThreads__field_descriptor :: FieldDescriptor ConfigProto
usePerSessionThreads__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor ConfigProto Bool
-> FieldDescriptor ConfigProto
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "use_per_session_threads"
              (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 ConfigProto ConfigProto Bool Bool
-> FieldAccessor ConfigProto 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 "usePerSessionThreads" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"usePerSessionThreads")) ::
              Data.ProtoLens.FieldDescriptor ConfigProto
        sessionInterOpThreadPool__field_descriptor :: FieldDescriptor ConfigProto
sessionInterOpThreadPool__field_descriptor
          = String
-> FieldTypeDescriptor ThreadPoolOptionProto
-> FieldAccessor ConfigProto ThreadPoolOptionProto
-> FieldDescriptor ConfigProto
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "session_inter_op_thread_pool"
              (MessageOrGroup -> FieldTypeDescriptor ThreadPoolOptionProto
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ThreadPoolOptionProto)
              (Packing
-> Lens' ConfigProto [ThreadPoolOptionProto]
-> FieldAccessor ConfigProto ThreadPoolOptionProto
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Unpacked
                 (forall s a (f :: * -> *).
(HasField s "sessionInterOpThreadPool" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"sessionInterOpThreadPool")) ::
              Data.ProtoLens.FieldDescriptor ConfigProto
        placementPeriod__field_descriptor :: FieldDescriptor ConfigProto
placementPeriod__field_descriptor
          = String
-> FieldTypeDescriptor Int32
-> FieldAccessor ConfigProto Int32
-> FieldDescriptor ConfigProto
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "placement_period"
              (ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.Int32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
              (WireDefault Int32
-> Lens ConfigProto ConfigProto Int32 Int32
-> FieldAccessor ConfigProto Int32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "placementPeriod" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"placementPeriod")) ::
              Data.ProtoLens.FieldDescriptor ConfigProto
        deviceFilters__field_descriptor :: FieldDescriptor ConfigProto
deviceFilters__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ConfigProto Text
-> FieldDescriptor ConfigProto
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "device_filters"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (Packing
-> Lens' ConfigProto [Text] -> FieldAccessor ConfigProto Text
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Unpacked
                 (forall s a (f :: * -> *).
(HasField s "deviceFilters" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"deviceFilters")) ::
              Data.ProtoLens.FieldDescriptor ConfigProto
        gpuOptions__field_descriptor :: FieldDescriptor ConfigProto
gpuOptions__field_descriptor
          = String
-> FieldTypeDescriptor GPUOptions
-> FieldAccessor ConfigProto GPUOptions
-> FieldDescriptor ConfigProto
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "gpu_options"
              (MessageOrGroup -> FieldTypeDescriptor GPUOptions
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor GPUOptions)
              (Lens ConfigProto ConfigProto (Maybe GPUOptions) (Maybe GPUOptions)
-> FieldAccessor ConfigProto GPUOptions
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall s a (f :: * -> *).
(HasField s "maybe'gpuOptions" a, Functor f) =>
(a -> f a) -> s -> 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'gpuOptions")) ::
              Data.ProtoLens.FieldDescriptor ConfigProto
        allowSoftPlacement__field_descriptor :: FieldDescriptor ConfigProto
allowSoftPlacement__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor ConfigProto Bool
-> FieldDescriptor ConfigProto
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "allow_soft_placement"
              (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 ConfigProto ConfigProto Bool Bool
-> FieldAccessor ConfigProto 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 "allowSoftPlacement" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"allowSoftPlacement")) ::
              Data.ProtoLens.FieldDescriptor ConfigProto
        logDevicePlacement__field_descriptor :: FieldDescriptor ConfigProto
logDevicePlacement__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor ConfigProto Bool
-> FieldDescriptor ConfigProto
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "log_device_placement"
              (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 ConfigProto ConfigProto Bool Bool
-> FieldAccessor ConfigProto 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 "logDevicePlacement" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"logDevicePlacement")) ::
              Data.ProtoLens.FieldDescriptor ConfigProto
        graphOptions__field_descriptor :: FieldDescriptor ConfigProto
graphOptions__field_descriptor
          = String
-> FieldTypeDescriptor GraphOptions
-> FieldAccessor ConfigProto GraphOptions
-> FieldDescriptor ConfigProto
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "graph_options"
              (MessageOrGroup -> FieldTypeDescriptor GraphOptions
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor GraphOptions)
              (Lens
  ConfigProto ConfigProto (Maybe GraphOptions) (Maybe GraphOptions)
-> FieldAccessor ConfigProto GraphOptions
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall s a (f :: * -> *).
(HasField s "maybe'graphOptions" a, Functor f) =>
(a -> f a) -> s -> 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'graphOptions")) ::
              Data.ProtoLens.FieldDescriptor ConfigProto
        operationTimeoutInMs__field_descriptor :: FieldDescriptor ConfigProto
operationTimeoutInMs__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor ConfigProto Int64
-> FieldDescriptor ConfigProto
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "operation_timeout_in_ms"
              (ScalarField Int64 -> FieldTypeDescriptor Int64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int64
Data.ProtoLens.Int64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64)
              (WireDefault Int64
-> Lens ConfigProto ConfigProto Int64 Int64
-> FieldAccessor ConfigProto Int64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "operationTimeoutInMs" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"operationTimeoutInMs")) ::
              Data.ProtoLens.FieldDescriptor ConfigProto
        rpcOptions__field_descriptor :: FieldDescriptor ConfigProto
rpcOptions__field_descriptor
          = String
-> FieldTypeDescriptor RPCOptions
-> FieldAccessor ConfigProto RPCOptions
-> FieldDescriptor ConfigProto
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "rpc_options"
              (MessageOrGroup -> FieldTypeDescriptor RPCOptions
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor RPCOptions)
              (Lens ConfigProto ConfigProto (Maybe RPCOptions) (Maybe RPCOptions)
-> FieldAccessor ConfigProto RPCOptions
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall s a (f :: * -> *).
(HasField s "maybe'rpcOptions" a, Functor f) =>
(a -> f a) -> s -> 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'rpcOptions")) ::
              Data.ProtoLens.FieldDescriptor ConfigProto
        clusterDef__field_descriptor :: FieldDescriptor ConfigProto
clusterDef__field_descriptor
          = String
-> FieldTypeDescriptor ClusterDef
-> FieldAccessor ConfigProto ClusterDef
-> FieldDescriptor ConfigProto
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "cluster_def"
              (MessageOrGroup -> FieldTypeDescriptor ClusterDef
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Tensorflow.Core.Protobuf.Cluster.ClusterDef)
              (Lens ConfigProto ConfigProto (Maybe ClusterDef) (Maybe ClusterDef)
-> FieldAccessor ConfigProto ClusterDef
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall s a (f :: * -> *).
(HasField s "maybe'clusterDef" a, Functor f) =>
(a -> f a) -> s -> 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'clusterDef")) ::
              Data.ProtoLens.FieldDescriptor ConfigProto
        isolateSessionState__field_descriptor :: FieldDescriptor ConfigProto
isolateSessionState__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor ConfigProto Bool
-> FieldDescriptor ConfigProto
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "isolate_session_state"
              (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 ConfigProto ConfigProto Bool Bool
-> FieldAccessor ConfigProto 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 "isolateSessionState" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"isolateSessionState")) ::
              Data.ProtoLens.FieldDescriptor ConfigProto
        shareClusterDevicesInSession__field_descriptor :: FieldDescriptor ConfigProto
shareClusterDevicesInSession__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor ConfigProto Bool
-> FieldDescriptor ConfigProto
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "share_cluster_devices_in_session"
              (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 ConfigProto ConfigProto Bool Bool
-> FieldAccessor ConfigProto 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 "shareClusterDevicesInSession" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"shareClusterDevicesInSession")) ::
              Data.ProtoLens.FieldDescriptor ConfigProto
        experimental__field_descriptor :: FieldDescriptor ConfigProto
experimental__field_descriptor
          = String
-> FieldTypeDescriptor ConfigProto'Experimental
-> FieldAccessor ConfigProto ConfigProto'Experimental
-> FieldDescriptor ConfigProto
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "experimental"
              (MessageOrGroup -> FieldTypeDescriptor ConfigProto'Experimental
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ConfigProto'Experimental)
              (Lens
  ConfigProto
  ConfigProto
  (Maybe ConfigProto'Experimental)
  (Maybe ConfigProto'Experimental)
-> FieldAccessor ConfigProto ConfigProto'Experimental
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall s a (f :: * -> *).
(HasField s "maybe'experimental" a, Functor f) =>
(a -> f a) -> s -> 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'experimental")) ::
              Data.ProtoLens.FieldDescriptor ConfigProto
      in
        [(Tag, FieldDescriptor ConfigProto)]
-> Map Tag (FieldDescriptor ConfigProto)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag 1, FieldDescriptor ConfigProto
deviceCount__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 2, 
            FieldDescriptor ConfigProto
intraOpParallelismThreads__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 5, 
            FieldDescriptor ConfigProto
interOpParallelismThreads__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 9, FieldDescriptor ConfigProto
usePerSessionThreads__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 12, 
            FieldDescriptor ConfigProto
sessionInterOpThreadPool__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 3, FieldDescriptor ConfigProto
placementPeriod__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 4, FieldDescriptor ConfigProto
deviceFilters__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 6, FieldDescriptor ConfigProto
gpuOptions__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 7, FieldDescriptor ConfigProto
allowSoftPlacement__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 8, FieldDescriptor ConfigProto
logDevicePlacement__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 10, FieldDescriptor ConfigProto
graphOptions__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 11, FieldDescriptor ConfigProto
operationTimeoutInMs__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 13, FieldDescriptor ConfigProto
rpcOptions__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 14, FieldDescriptor ConfigProto
clusterDef__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 15, FieldDescriptor ConfigProto
isolateSessionState__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 17, 
            FieldDescriptor ConfigProto
shareClusterDevicesInSession__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 16, FieldDescriptor ConfigProto
experimental__field_descriptor)]
  unknownFields :: LensLike' f ConfigProto FieldSet
unknownFields
    = (ConfigProto -> FieldSet)
-> (ConfigProto -> FieldSet -> ConfigProto)
-> Lens' ConfigProto FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ConfigProto -> FieldSet
_ConfigProto'_unknownFields
        (\ x__ :: ConfigProto
x__ y__ :: FieldSet
y__ -> ConfigProto
x__ {_ConfigProto'_unknownFields :: FieldSet
_ConfigProto'_unknownFields = FieldSet
y__})
  defMessage :: ConfigProto
defMessage
    = $WConfigProto'_constructor :: Map Text Int32
-> Int32
-> Int32
-> Bool
-> Vector ThreadPoolOptionProto
-> Int32
-> Vector Text
-> Maybe GPUOptions
-> Bool
-> Bool
-> Maybe GraphOptions
-> Int64
-> Maybe RPCOptions
-> Maybe ClusterDef
-> Bool
-> Bool
-> Maybe ConfigProto'Experimental
-> FieldSet
-> ConfigProto
ConfigProto'_constructor
        {_ConfigProto'deviceCount :: Map Text Int32
_ConfigProto'deviceCount = Map Text Int32
forall k a. Map k a
Data.Map.empty,
         _ConfigProto'intraOpParallelismThreads :: Int32
_ConfigProto'intraOpParallelismThreads = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ConfigProto'interOpParallelismThreads :: Int32
_ConfigProto'interOpParallelismThreads = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ConfigProto'usePerSessionThreads :: Bool
_ConfigProto'usePerSessionThreads = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ConfigProto'sessionInterOpThreadPool :: Vector ThreadPoolOptionProto
_ConfigProto'sessionInterOpThreadPool = Vector ThreadPoolOptionProto
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _ConfigProto'placementPeriod :: Int32
_ConfigProto'placementPeriod = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ConfigProto'deviceFilters :: Vector Text
_ConfigProto'deviceFilters = Vector Text
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _ConfigProto'gpuOptions :: Maybe GPUOptions
_ConfigProto'gpuOptions = Maybe GPUOptions
forall a. Maybe a
Prelude.Nothing,
         _ConfigProto'allowSoftPlacement :: Bool
_ConfigProto'allowSoftPlacement = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ConfigProto'logDevicePlacement :: Bool
_ConfigProto'logDevicePlacement = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ConfigProto'graphOptions :: Maybe GraphOptions
_ConfigProto'graphOptions = Maybe GraphOptions
forall a. Maybe a
Prelude.Nothing,
         _ConfigProto'operationTimeoutInMs :: Int64
_ConfigProto'operationTimeoutInMs = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ConfigProto'rpcOptions :: Maybe RPCOptions
_ConfigProto'rpcOptions = Maybe RPCOptions
forall a. Maybe a
Prelude.Nothing,
         _ConfigProto'clusterDef :: Maybe ClusterDef
_ConfigProto'clusterDef = Maybe ClusterDef
forall a. Maybe a
Prelude.Nothing,
         _ConfigProto'isolateSessionState :: Bool
_ConfigProto'isolateSessionState = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ConfigProto'shareClusterDevicesInSession :: Bool
_ConfigProto'shareClusterDevicesInSession = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ConfigProto'experimental :: Maybe ConfigProto'Experimental
_ConfigProto'experimental = Maybe ConfigProto'Experimental
forall a. Maybe a
Prelude.Nothing,
         _ConfigProto'_unknownFields :: FieldSet
_ConfigProto'_unknownFields = []}
  parseMessage :: Parser ConfigProto
parseMessage
    = let
        loop ::
          ConfigProto
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text
             -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld ThreadPoolOptionProto
                -> Data.ProtoLens.Encoding.Bytes.Parser ConfigProto
        loop :: ConfigProto
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld ThreadPoolOptionProto
-> Parser ConfigProto
loop x :: ConfigProto
x mutable'deviceFilters :: Growing Vector RealWorld Text
mutable'deviceFilters mutable'sessionInterOpThreadPool :: Growing Vector RealWorld ThreadPoolOptionProto
mutable'sessionInterOpThreadPool
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do Vector Text
frozen'deviceFilters <- IO (Vector Text) -> Parser (Vector Text)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                (Growing Vector (PrimState IO) Text -> IO (Vector Text)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> m (v a)
Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                                   Growing Vector RealWorld Text
Growing Vector (PrimState IO) Text
mutable'deviceFilters)
                      Vector ThreadPoolOptionProto
frozen'sessionInterOpThreadPool <- IO (Vector ThreadPoolOptionProto)
-> Parser (Vector ThreadPoolOptionProto)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                           (Growing Vector (PrimState IO) ThreadPoolOptionProto
-> IO (Vector ThreadPoolOptionProto)
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 ThreadPoolOptionProto
Growing Vector (PrimState IO) ThreadPoolOptionProto
mutable'sessionInterOpThreadPool)
                      (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]))))
                      ConfigProto -> Parser ConfigProto
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter ConfigProto ConfigProto FieldSet FieldSet
-> (FieldSet -> FieldSet) -> ConfigProto -> ConfigProto
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 ConfigProto ConfigProto FieldSet FieldSet
Data.ProtoLens.unknownFields
                           (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t)
                           (Setter ConfigProto ConfigProto (Vector Text) (Vector Text)
-> Vector Text -> ConfigProto -> ConfigProto
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                              (forall s a (f :: * -> *).
(HasField s "vec'deviceFilters" a, Functor f) =>
(a -> f a) -> s -> 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'deviceFilters")
                              Vector Text
frozen'deviceFilters
                              (Setter
  ConfigProto
  ConfigProto
  (Vector ThreadPoolOptionProto)
  (Vector ThreadPoolOptionProto)
-> Vector ThreadPoolOptionProto -> ConfigProto -> ConfigProto
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                 (forall s a (f :: * -> *).
(HasField s "vec'sessionInterOpThreadPool" a, Functor f) =>
(a -> f a) -> s -> 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'sessionInterOpThreadPool")
                                 Vector ThreadPoolOptionProto
frozen'sessionInterOpThreadPool
                                 ConfigProto
x)))
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        10
                          -> do !(ConfigProto'DeviceCountEntry
entry :: ConfigProto'DeviceCountEntry) <- Parser ConfigProto'DeviceCountEntry
-> String -> Parser ConfigProto'DeviceCountEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                                                              (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                                                  Int
-> Parser ConfigProto'DeviceCountEntry
-> Parser ConfigProto'DeviceCountEntry
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 ConfigProto'DeviceCountEntry
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                                                              "device_count"
                                (let
                                   key :: Text
key = FoldLike
  Text
  ConfigProto'DeviceCountEntry
  ConfigProto'DeviceCountEntry
  Text
  Text
-> ConfigProto'DeviceCountEntry -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key") ConfigProto'DeviceCountEntry
entry
                                   value :: Int32
value
                                     = FoldLike
  Int32
  ConfigProto'DeviceCountEntry
  ConfigProto'DeviceCountEntry
  Int32
  Int32
-> ConfigProto'DeviceCountEntry -> Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value") ConfigProto'DeviceCountEntry
entry
                                 in
                                   ConfigProto
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld ThreadPoolOptionProto
-> Parser ConfigProto
loop
                                     (Setter ConfigProto ConfigProto (Map Text Int32) (Map Text Int32)
-> (Map Text Int32 -> Map Text Int32) -> ConfigProto -> ConfigProto
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                        (forall s a (f :: * -> *).
(HasField s "deviceCount" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"deviceCount")
                                        (\ !Map Text Int32
t -> Text -> Int32 -> Map Text Int32 -> Map Text Int32
forall k a. Ord k => k -> a -> Map k a -> Map k a
Data.Map.insert Text
key Int32
value Map Text Int32
t)
                                        ConfigProto
x)
                                     Growing Vector RealWorld Text
mutable'deviceFilters
                                     Growing Vector RealWorld ThreadPoolOptionProto
mutable'sessionInterOpThreadPool)
                        16
                          -> do Int32
y <- Parser Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int32) -> Parser Word64 -> Parser Int32
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       "intra_op_parallelism_threads"
                                ConfigProto
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld ThreadPoolOptionProto
-> Parser ConfigProto
loop
                                  (Setter ConfigProto ConfigProto Int32 Int32
-> Int32 -> ConfigProto -> ConfigProto
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "intraOpParallelismThreads" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"intraOpParallelismThreads") Int32
y ConfigProto
x)
                                  Growing Vector RealWorld Text
mutable'deviceFilters
                                  Growing Vector RealWorld ThreadPoolOptionProto
mutable'sessionInterOpThreadPool
                        40
                          -> do Int32
y <- Parser Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int32) -> Parser Word64 -> Parser Int32
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       "inter_op_parallelism_threads"
                                ConfigProto
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld ThreadPoolOptionProto
-> Parser ConfigProto
loop
                                  (Setter ConfigProto ConfigProto Int32 Int32
-> Int32 -> ConfigProto -> ConfigProto
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "interOpParallelismThreads" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"interOpParallelismThreads") Int32
y ConfigProto
x)
                                  Growing Vector RealWorld Text
mutable'deviceFilters
                                  Growing Vector RealWorld ThreadPoolOptionProto
mutable'sessionInterOpThreadPool
                        72
                          -> 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)
                                       "use_per_session_threads"
                                ConfigProto
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld ThreadPoolOptionProto
-> Parser ConfigProto
loop
                                  (Setter ConfigProto ConfigProto Bool Bool
-> Bool -> ConfigProto -> ConfigProto
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "usePerSessionThreads" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"usePerSessionThreads") Bool
y ConfigProto
x)
                                  Growing Vector RealWorld Text
mutable'deviceFilters
                                  Growing Vector RealWorld ThreadPoolOptionProto
mutable'sessionInterOpThreadPool
                        98
                          -> do !ThreadPoolOptionProto
y <- Parser ThreadPoolOptionProto
-> String -> Parser ThreadPoolOptionProto
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Int -> Parser ThreadPoolOptionProto -> Parser ThreadPoolOptionProto
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 ThreadPoolOptionProto
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                        "session_inter_op_thread_pool"
                                Growing Vector RealWorld ThreadPoolOptionProto
v <- IO (Growing Vector RealWorld ThreadPoolOptionProto)
-> Parser (Growing Vector RealWorld ThreadPoolOptionProto)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) ThreadPoolOptionProto
-> ThreadPoolOptionProto
-> IO (Growing Vector (PrimState IO) ThreadPoolOptionProto)
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 ThreadPoolOptionProto
Growing Vector (PrimState IO) ThreadPoolOptionProto
mutable'sessionInterOpThreadPool ThreadPoolOptionProto
y)
                                ConfigProto
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld ThreadPoolOptionProto
-> Parser ConfigProto
loop ConfigProto
x Growing Vector RealWorld Text
mutable'deviceFilters Growing Vector RealWorld ThreadPoolOptionProto
v
                        24
                          -> do Int32
y <- Parser Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int32) -> Parser Word64 -> Parser Int32
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       "placement_period"
                                ConfigProto
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld ThreadPoolOptionProto
-> Parser ConfigProto
loop
                                  (Setter ConfigProto ConfigProto Int32 Int32
-> Int32 -> ConfigProto -> ConfigProto
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "placementPeriod" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"placementPeriod") Int32
y ConfigProto
x)
                                  Growing Vector RealWorld Text
mutable'deviceFilters
                                  Growing Vector RealWorld ThreadPoolOptionProto
mutable'sessionInterOpThreadPool
                        34
                          -> do !Text
y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do ByteString
value <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                        Int -> Parser ByteString
Data.ProtoLens.Encoding.Bytes.getBytes
                                                          (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
                                            Either String Text -> Parser Text
forall a. Either String a -> Parser a
Data.ProtoLens.Encoding.Bytes.runEither
                                              (case ByteString -> Either UnicodeException Text
Data.Text.Encoding.decodeUtf8' ByteString
value of
                                                 (Prelude.Left err :: UnicodeException
err)
                                                   -> String -> Either String Text
forall a b. a -> Either a b
Prelude.Left (UnicodeException -> String
forall a. Show a => a -> String
Prelude.show UnicodeException
err)
                                                 (Prelude.Right r :: Text
r) -> Text -> Either String Text
forall a b. b -> Either a b
Prelude.Right Text
r))
                                        "device_filters"
                                Growing Vector RealWorld Text
v <- IO (Growing Vector RealWorld Text)
-> Parser (Growing Vector RealWorld Text)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) Text
-> Text -> IO (Growing Vector (PrimState IO) Text)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> a -> m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.append
                                          Growing Vector RealWorld Text
Growing Vector (PrimState IO) Text
mutable'deviceFilters Text
y)
                                ConfigProto
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld ThreadPoolOptionProto
-> Parser ConfigProto
loop ConfigProto
x Growing Vector RealWorld Text
v Growing Vector RealWorld ThreadPoolOptionProto
mutable'sessionInterOpThreadPool
                        50
                          -> do GPUOptions
y <- Parser GPUOptions -> String -> Parser GPUOptions
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser GPUOptions -> Parser GPUOptions
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 GPUOptions
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       "gpu_options"
                                ConfigProto
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld ThreadPoolOptionProto
-> Parser ConfigProto
loop
                                  (Setter ConfigProto ConfigProto GPUOptions GPUOptions
-> GPUOptions -> ConfigProto -> ConfigProto
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "gpuOptions" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"gpuOptions") GPUOptions
y ConfigProto
x)
                                  Growing Vector RealWorld Text
mutable'deviceFilters
                                  Growing Vector RealWorld ThreadPoolOptionProto
mutable'sessionInterOpThreadPool
                        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)
                                       "allow_soft_placement"
                                ConfigProto
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld ThreadPoolOptionProto
-> Parser ConfigProto
loop
                                  (Setter ConfigProto ConfigProto Bool Bool
-> Bool -> ConfigProto -> ConfigProto
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "allowSoftPlacement" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"allowSoftPlacement") Bool
y ConfigProto
x)
                                  Growing Vector RealWorld Text
mutable'deviceFilters
                                  Growing Vector RealWorld ThreadPoolOptionProto
mutable'sessionInterOpThreadPool
                        64
                          -> 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)
                                       "log_device_placement"
                                ConfigProto
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld ThreadPoolOptionProto
-> Parser ConfigProto
loop
                                  (Setter ConfigProto ConfigProto Bool Bool
-> Bool -> ConfigProto -> ConfigProto
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "logDevicePlacement" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"logDevicePlacement") Bool
y ConfigProto
x)
                                  Growing Vector RealWorld Text
mutable'deviceFilters
                                  Growing Vector RealWorld ThreadPoolOptionProto
mutable'sessionInterOpThreadPool
                        82
                          -> do GraphOptions
y <- Parser GraphOptions -> String -> Parser GraphOptions
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser GraphOptions -> Parser GraphOptions
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 GraphOptions
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       "graph_options"
                                ConfigProto
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld ThreadPoolOptionProto
-> Parser ConfigProto
loop
                                  (Setter ConfigProto ConfigProto GraphOptions GraphOptions
-> GraphOptions -> ConfigProto -> ConfigProto
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "graphOptions" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"graphOptions") GraphOptions
y ConfigProto
x)
                                  Growing Vector RealWorld Text
mutable'deviceFilters
                                  Growing Vector RealWorld ThreadPoolOptionProto
mutable'sessionInterOpThreadPool
                        88
                          -> 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)
                                       "operation_timeout_in_ms"
                                ConfigProto
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld ThreadPoolOptionProto
-> Parser ConfigProto
loop
                                  (Setter ConfigProto ConfigProto Int64 Int64
-> Int64 -> ConfigProto -> ConfigProto
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "operationTimeoutInMs" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"operationTimeoutInMs") Int64
y ConfigProto
x)
                                  Growing Vector RealWorld Text
mutable'deviceFilters
                                  Growing Vector RealWorld ThreadPoolOptionProto
mutable'sessionInterOpThreadPool
                        106
                          -> do RPCOptions
y <- Parser RPCOptions -> String -> Parser RPCOptions
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser RPCOptions -> Parser RPCOptions
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 RPCOptions
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       "rpc_options"
                                ConfigProto
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld ThreadPoolOptionProto
-> Parser ConfigProto
loop
                                  (Setter ConfigProto ConfigProto RPCOptions RPCOptions
-> RPCOptions -> ConfigProto -> ConfigProto
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "rpcOptions" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"rpcOptions") RPCOptions
y ConfigProto
x)
                                  Growing Vector RealWorld Text
mutable'deviceFilters
                                  Growing Vector RealWorld ThreadPoolOptionProto
mutable'sessionInterOpThreadPool
                        114
                          -> do ClusterDef
y <- Parser ClusterDef -> String -> Parser ClusterDef
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser ClusterDef -> Parser ClusterDef
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 ClusterDef
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       "cluster_def"
                                ConfigProto
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld ThreadPoolOptionProto
-> Parser ConfigProto
loop
                                  (Setter ConfigProto ConfigProto ClusterDef ClusterDef
-> ClusterDef -> ConfigProto -> ConfigProto
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "clusterDef" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"clusterDef") ClusterDef
y ConfigProto
x)
                                  Growing Vector RealWorld Text
mutable'deviceFilters
                                  Growing Vector RealWorld ThreadPoolOptionProto
mutable'sessionInterOpThreadPool
                        120
                          -> 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)
                                       "isolate_session_state"
                                ConfigProto
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld ThreadPoolOptionProto
-> Parser ConfigProto
loop
                                  (Setter ConfigProto ConfigProto Bool Bool
-> Bool -> ConfigProto -> ConfigProto
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "isolateSessionState" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"isolateSessionState") Bool
y ConfigProto
x)
                                  Growing Vector RealWorld Text
mutable'deviceFilters
                                  Growing Vector RealWorld ThreadPoolOptionProto
mutable'sessionInterOpThreadPool
                        136
                          -> 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)
                                       "share_cluster_devices_in_session"
                                ConfigProto
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld ThreadPoolOptionProto
-> Parser ConfigProto
loop
                                  (Setter ConfigProto ConfigProto Bool Bool
-> Bool -> ConfigProto -> ConfigProto
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "shareClusterDevicesInSession" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"shareClusterDevicesInSession")
                                     Bool
y
                                     ConfigProto
x)
                                  Growing Vector RealWorld Text
mutable'deviceFilters
                                  Growing Vector RealWorld ThreadPoolOptionProto
mutable'sessionInterOpThreadPool
                        130
                          -> do ConfigProto'Experimental
y <- Parser ConfigProto'Experimental
-> String -> Parser ConfigProto'Experimental
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int
-> Parser ConfigProto'Experimental
-> Parser ConfigProto'Experimental
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 ConfigProto'Experimental
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       "experimental"
                                ConfigProto
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld ThreadPoolOptionProto
-> Parser ConfigProto
loop
                                  (Setter
  ConfigProto
  ConfigProto
  ConfigProto'Experimental
  ConfigProto'Experimental
-> ConfigProto'Experimental -> ConfigProto -> ConfigProto
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "experimental" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"experimental") ConfigProto'Experimental
y ConfigProto
x)
                                  Growing Vector RealWorld Text
mutable'deviceFilters
                                  Growing Vector RealWorld ThreadPoolOptionProto
mutable'sessionInterOpThreadPool
                        wire :: Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                ConfigProto
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld ThreadPoolOptionProto
-> Parser ConfigProto
loop
                                  (Setter ConfigProto ConfigProto FieldSet FieldSet
-> (FieldSet -> FieldSet) -> ConfigProto -> ConfigProto
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 ConfigProto ConfigProto FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) ConfigProto
x)
                                  Growing Vector RealWorld Text
mutable'deviceFilters
                                  Growing Vector RealWorld ThreadPoolOptionProto
mutable'sessionInterOpThreadPool
      in
        Parser ConfigProto -> String -> Parser ConfigProto
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do Growing Vector RealWorld Text
mutable'deviceFilters <- IO (Growing Vector RealWorld Text)
-> Parser (Growing Vector RealWorld Text)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                         IO (Growing Vector RealWorld Text)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              Growing Vector RealWorld ThreadPoolOptionProto
mutable'sessionInterOpThreadPool <- IO (Growing Vector RealWorld ThreadPoolOptionProto)
-> Parser (Growing Vector RealWorld ThreadPoolOptionProto)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                    IO (Growing Vector RealWorld ThreadPoolOptionProto)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              ConfigProto
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld ThreadPoolOptionProto
-> Parser ConfigProto
loop
                ConfigProto
forall msg. Message msg => msg
Data.ProtoLens.defMessage
                Growing Vector RealWorld Text
mutable'deviceFilters
                Growing Vector RealWorld ThreadPoolOptionProto
mutable'sessionInterOpThreadPool)
          "ConfigProto"
  buildMessage :: ConfigProto -> Builder
buildMessage
    = \ _x :: ConfigProto
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             ([Builder] -> Builder
forall a. Monoid a => [a] -> a
Data.Monoid.mconcat
                (((Text, Int32) -> Builder) -> [(Text, Int32)] -> [Builder]
forall a b. (a -> b) -> [a] -> [b]
Prelude.map
                   (\ _v :: (Text, Int32)
_v
                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 10)
                           ((ByteString -> Builder)
-> (ConfigProto'DeviceCountEntry -> ByteString)
-> ConfigProto'DeviceCountEntry
-> 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))
                              ConfigProto'DeviceCountEntry -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                              (Setter
  ConfigProto'DeviceCountEntry ConfigProto'DeviceCountEntry Text Text
-> Text
-> ConfigProto'DeviceCountEntry
-> ConfigProto'DeviceCountEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                 (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key")
                                 ((Text, Int32) -> Text
forall a b. (a, b) -> a
Prelude.fst (Text, Int32)
_v)
                                 (Setter
  ConfigProto'DeviceCountEntry
  ConfigProto'DeviceCountEntry
  Int32
  Int32
-> Int32
-> ConfigProto'DeviceCountEntry
-> ConfigProto'DeviceCountEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                    (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value")
                                    ((Text, Int32) -> Int32
forall a b. (a, b) -> b
Prelude.snd (Text, Int32)
_v)
                                    (ConfigProto'DeviceCountEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage :: ConfigProto'DeviceCountEntry)))))
                   (Map Text Int32 -> [(Text, Int32)]
forall k a. Map k a -> [(k, a)]
Data.Map.toList
                      (FoldLike
  (Map Text Int32)
  ConfigProto
  ConfigProto
  (Map Text Int32)
  (Map Text Int32)
-> ConfigProto -> Map Text Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                         (forall s a (f :: * -> *).
(HasField s "deviceCount" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"deviceCount") ConfigProto
_x))))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   _v :: Int32
_v
                     = FoldLike Int32 ConfigProto ConfigProto Int32 Int32
-> ConfigProto -> Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                         (forall s a (f :: * -> *).
(HasField s "intraOpParallelismThreads" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"intraOpParallelismThreads") ConfigProto
_x
                 in
                   if Int32 -> Int32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int32
_v Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 16)
                         ((Word64 -> Builder) -> (Int32 -> Word64) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: Int32
_v
                        = FoldLike Int32 ConfigProto ConfigProto Int32 Int32
-> ConfigProto -> Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                            (forall s a (f :: * -> *).
(HasField s "interOpParallelismThreads" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"interOpParallelismThreads") ConfigProto
_x
                    in
                      if Int32 -> Int32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int32
_v Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      else
                          Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 40)
                            ((Word64 -> Builder) -> (Int32 -> Word64) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                               Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (let
                         _v :: Bool
_v
                           = FoldLike Bool ConfigProto ConfigProto Bool Bool
-> ConfigProto -> Bool
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                               (forall s a (f :: * -> *).
(HasField s "usePerSessionThreads" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"usePerSessionThreads") ConfigProto
_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 72)
                               ((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.<>)
                         ((ThreadPoolOptionProto -> Builder)
-> Vector ThreadPoolOptionProto -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                            (\ _v :: ThreadPoolOptionProto
_v
                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 98)
                                    ((ByteString -> Builder)
-> (ThreadPoolOptionProto -> ByteString)
-> ThreadPoolOptionProto
-> 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))
                                       ThreadPoolOptionProto -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                       ThreadPoolOptionProto
_v))
                            (FoldLike
  (Vector ThreadPoolOptionProto)
  ConfigProto
  ConfigProto
  (Vector ThreadPoolOptionProto)
  (Vector ThreadPoolOptionProto)
-> ConfigProto -> Vector ThreadPoolOptionProto
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                               (forall s a (f :: * -> *).
(HasField s "vec'sessionInterOpThreadPool" a, Functor f) =>
(a -> f a) -> s -> 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'sessionInterOpThreadPool") ConfigProto
_x))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (let
                               _v :: Int32
_v
                                 = FoldLike Int32 ConfigProto ConfigProto Int32 Int32
-> ConfigProto -> Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                     (forall s a (f :: * -> *).
(HasField s "placementPeriod" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"placementPeriod") ConfigProto
_x
                             in
                               if Int32 -> Int32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int32
_v Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                   Builder
forall a. Monoid a => a
Data.Monoid.mempty
                               else
                                   Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 24)
                                     ((Word64 -> Builder) -> (Int32 -> Word64) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                        Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        Int32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                        Int32
_v))
                            (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               ((Text -> Builder) -> Vector Text -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                                  (\ _v :: Text
_v
                                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 34)
                                          ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                             (\ bs :: ByteString
bs
                                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                           (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                             Text -> ByteString
Data.Text.Encoding.encodeUtf8
                                             Text
_v))
                                  (FoldLike
  (Vector Text) ConfigProto ConfigProto (Vector Text) (Vector Text)
-> ConfigProto -> Vector Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                     (forall s a (f :: * -> *).
(HasField s "vec'deviceFilters" a, Functor f) =>
(a -> f a) -> s -> 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'deviceFilters") ConfigProto
_x))
                               (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (case
                                       FoldLike
  (Maybe GPUOptions)
  ConfigProto
  ConfigProto
  (Maybe GPUOptions)
  (Maybe GPUOptions)
-> ConfigProto -> Maybe GPUOptions
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                         (forall s a (f :: * -> *).
(HasField s "maybe'gpuOptions" a, Functor f) =>
(a -> f a) -> s -> 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'gpuOptions") ConfigProto
_x
                                   of
                                     Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                     (Prelude.Just _v :: GPUOptions
_v)
                                       -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 50)
                                            ((ByteString -> Builder)
-> (GPUOptions -> ByteString) -> GPUOptions -> 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))
                                               GPUOptions -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                               GPUOptions
_v))
                                  (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (let
                                        _v :: Bool
_v
                                          = FoldLike Bool ConfigProto ConfigProto Bool Bool
-> ConfigProto -> Bool
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                              (forall s a (f :: * -> *).
(HasField s "allowSoftPlacement" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"allowSoftPlacement") ConfigProto
_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 :: Bool
_v
                                             = FoldLike Bool ConfigProto ConfigProto Bool Bool
-> ConfigProto -> Bool
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                 (forall s a (f :: * -> *).
(HasField s "logDevicePlacement" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"logDevicePlacement")
                                                 ConfigProto
_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 64)
                                                 ((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.<>)
                                           (case
                                                FoldLike
  (Maybe GraphOptions)
  ConfigProto
  ConfigProto
  (Maybe GraphOptions)
  (Maybe GraphOptions)
-> ConfigProto -> Maybe GraphOptions
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                  (forall s a (f :: * -> *).
(HasField s "maybe'graphOptions" a, Functor f) =>
(a -> f a) -> s -> 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'graphOptions")
                                                  ConfigProto
_x
                                            of
                                              Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                              (Prelude.Just _v :: GraphOptions
_v)
                                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 82)
                                                     ((ByteString -> Builder)
-> (GraphOptions -> ByteString) -> GraphOptions -> 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))
                                                        GraphOptions -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                                        GraphOptions
_v))
                                           (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                              (let
                                                 _v :: Int64
_v
                                                   = FoldLike Int64 ConfigProto ConfigProto Int64 Int64
-> ConfigProto -> Int64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                       (forall s a (f :: * -> *).
(HasField s "operationTimeoutInMs" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                          @"operationTimeoutInMs")
                                                       ConfigProto
_x
                                               in
                                                 if Int64 -> Int64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int64
_v Int64
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 88)
                                                       ((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
                                                          Int64
_v))
                                              (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                 (case
                                                      FoldLike
  (Maybe RPCOptions)
  ConfigProto
  ConfigProto
  (Maybe RPCOptions)
  (Maybe RPCOptions)
-> ConfigProto -> Maybe RPCOptions
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                        (forall s a (f :: * -> *).
(HasField s "maybe'rpcOptions" a, Functor f) =>
(a -> f a) -> s -> 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'rpcOptions")
                                                        ConfigProto
_x
                                                  of
                                                    Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                                    (Prelude.Just _v :: RPCOptions
_v)
                                                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                              106)
                                                           ((ByteString -> Builder)
-> (RPCOptions -> ByteString) -> RPCOptions -> 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))
                                                              RPCOptions -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                                              RPCOptions
_v))
                                                 (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                    (case
                                                         FoldLike
  (Maybe ClusterDef)
  ConfigProto
  ConfigProto
  (Maybe ClusterDef)
  (Maybe ClusterDef)
-> ConfigProto -> Maybe ClusterDef
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                           (forall s a (f :: * -> *).
(HasField s "maybe'clusterDef" a, Functor f) =>
(a -> f a) -> s -> 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'clusterDef")
                                                           ConfigProto
_x
                                                     of
                                                       Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                                       (Prelude.Just _v :: ClusterDef
_v)
                                                         -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                              (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                 114)
                                                              ((ByteString -> Builder)
-> (ClusterDef -> ByteString) -> ClusterDef -> 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))
                                                                 ClusterDef -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                                                 ClusterDef
_v))
                                                    (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                       (let
                                                          _v :: Bool
_v
                                                            = FoldLike Bool ConfigProto ConfigProto Bool Bool
-> ConfigProto -> Bool
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                                (forall s a (f :: * -> *).
(HasField s "isolateSessionState" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                                   @"isolateSessionState")
                                                                ConfigProto
_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
                                                                   120)
                                                                ((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 ConfigProto ConfigProto Bool Bool
-> ConfigProto -> Bool
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                                   (forall s a (f :: * -> *).
(HasField s "shareClusterDevicesInSession" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                                      @"shareClusterDevicesInSession")
                                                                   ConfigProto
_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
                                                                      136)
                                                                   ((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.<>)
                                                             (case
                                                                  FoldLike
  (Maybe ConfigProto'Experimental)
  ConfigProto
  ConfigProto
  (Maybe ConfigProto'Experimental)
  (Maybe ConfigProto'Experimental)
-> ConfigProto -> Maybe ConfigProto'Experimental
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                                    (forall s a (f :: * -> *).
(HasField s "maybe'experimental" a, Functor f) =>
(a -> f a) -> s -> 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'experimental")
                                                                    ConfigProto
_x
                                                              of
                                                                Prelude.Nothing
                                                                  -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                                                (Prelude.Just _v :: ConfigProto'Experimental
_v)
                                                                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                          130)
                                                                       ((ByteString -> Builder)
-> (ConfigProto'Experimental -> ByteString)
-> ConfigProto'Experimental
-> 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))
                                                                          ConfigProto'Experimental -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                                                          ConfigProto'Experimental
_v))
                                                             (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                                                (FoldLike FieldSet ConfigProto ConfigProto FieldSet FieldSet
-> ConfigProto -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                                   FoldLike FieldSet ConfigProto ConfigProto FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields
                                                                   ConfigProto
_x))))))))))))))))))
instance Control.DeepSeq.NFData ConfigProto where
  rnf :: ConfigProto -> ()
rnf
    = \ x__ :: ConfigProto
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ConfigProto -> FieldSet
_ConfigProto'_unknownFields ConfigProto
x__)
             (Map Text Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ConfigProto -> Map Text Int32
_ConfigProto'deviceCount ConfigProto
x__)
                (Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ConfigProto -> Int32
_ConfigProto'intraOpParallelismThreads ConfigProto
x__)
                   (Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (ConfigProto -> Int32
_ConfigProto'interOpParallelismThreads ConfigProto
x__)
                      (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (ConfigProto -> Bool
_ConfigProto'usePerSessionThreads ConfigProto
x__)
                         (Vector ThreadPoolOptionProto -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (ConfigProto -> Vector ThreadPoolOptionProto
_ConfigProto'sessionInterOpThreadPool ConfigProto
x__)
                            (Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (ConfigProto -> Int32
_ConfigProto'placementPeriod ConfigProto
x__)
                               (Vector Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (ConfigProto -> Vector Text
_ConfigProto'deviceFilters ConfigProto
x__)
                                  (Maybe GPUOptions -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                     (ConfigProto -> Maybe GPUOptions
_ConfigProto'gpuOptions ConfigProto
x__)
                                     (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                        (ConfigProto -> Bool
_ConfigProto'allowSoftPlacement ConfigProto
x__)
                                        (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                           (ConfigProto -> Bool
_ConfigProto'logDevicePlacement ConfigProto
x__)
                                           (Maybe GraphOptions -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                              (ConfigProto -> Maybe GraphOptions
_ConfigProto'graphOptions ConfigProto
x__)
                                              (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                 (ConfigProto -> Int64
_ConfigProto'operationTimeoutInMs ConfigProto
x__)
                                                 (Maybe RPCOptions -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                    (ConfigProto -> Maybe RPCOptions
_ConfigProto'rpcOptions ConfigProto
x__)
                                                    (Maybe ClusterDef -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                       (ConfigProto -> Maybe ClusterDef
_ConfigProto'clusterDef ConfigProto
x__)
                                                       (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                          (ConfigProto -> Bool
_ConfigProto'isolateSessionState ConfigProto
x__)
                                                          (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                             (ConfigProto -> Bool
_ConfigProto'shareClusterDevicesInSession
                                                                ConfigProto
x__)
                                                             (Maybe ConfigProto'Experimental -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                                (ConfigProto -> Maybe ConfigProto'Experimental
_ConfigProto'experimental ConfigProto
x__)
                                                                ())))))))))))))))))
{- | Fields :
     
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.key' @:: Lens' ConfigProto'DeviceCountEntry Data.Text.Text@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.value' @:: Lens' ConfigProto'DeviceCountEntry Data.Int.Int32@ -}
data ConfigProto'DeviceCountEntry
  = ConfigProto'DeviceCountEntry'_constructor {ConfigProto'DeviceCountEntry -> Text
_ConfigProto'DeviceCountEntry'key :: !Data.Text.Text,
                                               ConfigProto'DeviceCountEntry -> Int32
_ConfigProto'DeviceCountEntry'value :: !Data.Int.Int32,
                                               ConfigProto'DeviceCountEntry -> FieldSet
_ConfigProto'DeviceCountEntry'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ConfigProto'DeviceCountEntry
-> ConfigProto'DeviceCountEntry -> Bool
(ConfigProto'DeviceCountEntry
 -> ConfigProto'DeviceCountEntry -> Bool)
-> (ConfigProto'DeviceCountEntry
    -> ConfigProto'DeviceCountEntry -> Bool)
-> Eq ConfigProto'DeviceCountEntry
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ConfigProto'DeviceCountEntry
-> ConfigProto'DeviceCountEntry -> Bool
$c/= :: ConfigProto'DeviceCountEntry
-> ConfigProto'DeviceCountEntry -> Bool
== :: ConfigProto'DeviceCountEntry
-> ConfigProto'DeviceCountEntry -> Bool
$c== :: ConfigProto'DeviceCountEntry
-> ConfigProto'DeviceCountEntry -> Bool
Prelude.Eq, Eq ConfigProto'DeviceCountEntry
Eq ConfigProto'DeviceCountEntry =>
(ConfigProto'DeviceCountEntry
 -> ConfigProto'DeviceCountEntry -> Ordering)
-> (ConfigProto'DeviceCountEntry
    -> ConfigProto'DeviceCountEntry -> Bool)
-> (ConfigProto'DeviceCountEntry
    -> ConfigProto'DeviceCountEntry -> Bool)
-> (ConfigProto'DeviceCountEntry
    -> ConfigProto'DeviceCountEntry -> Bool)
-> (ConfigProto'DeviceCountEntry
    -> ConfigProto'DeviceCountEntry -> Bool)
-> (ConfigProto'DeviceCountEntry
    -> ConfigProto'DeviceCountEntry -> ConfigProto'DeviceCountEntry)
-> (ConfigProto'DeviceCountEntry
    -> ConfigProto'DeviceCountEntry -> ConfigProto'DeviceCountEntry)
-> Ord ConfigProto'DeviceCountEntry
ConfigProto'DeviceCountEntry
-> ConfigProto'DeviceCountEntry -> Bool
ConfigProto'DeviceCountEntry
-> ConfigProto'DeviceCountEntry -> Ordering
ConfigProto'DeviceCountEntry
-> ConfigProto'DeviceCountEntry -> ConfigProto'DeviceCountEntry
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 :: ConfigProto'DeviceCountEntry
-> ConfigProto'DeviceCountEntry -> ConfigProto'DeviceCountEntry
$cmin :: ConfigProto'DeviceCountEntry
-> ConfigProto'DeviceCountEntry -> ConfigProto'DeviceCountEntry
max :: ConfigProto'DeviceCountEntry
-> ConfigProto'DeviceCountEntry -> ConfigProto'DeviceCountEntry
$cmax :: ConfigProto'DeviceCountEntry
-> ConfigProto'DeviceCountEntry -> ConfigProto'DeviceCountEntry
>= :: ConfigProto'DeviceCountEntry
-> ConfigProto'DeviceCountEntry -> Bool
$c>= :: ConfigProto'DeviceCountEntry
-> ConfigProto'DeviceCountEntry -> Bool
> :: ConfigProto'DeviceCountEntry
-> ConfigProto'DeviceCountEntry -> Bool
$c> :: ConfigProto'DeviceCountEntry
-> ConfigProto'DeviceCountEntry -> Bool
<= :: ConfigProto'DeviceCountEntry
-> ConfigProto'DeviceCountEntry -> Bool
$c<= :: ConfigProto'DeviceCountEntry
-> ConfigProto'DeviceCountEntry -> Bool
< :: ConfigProto'DeviceCountEntry
-> ConfigProto'DeviceCountEntry -> Bool
$c< :: ConfigProto'DeviceCountEntry
-> ConfigProto'DeviceCountEntry -> Bool
compare :: ConfigProto'DeviceCountEntry
-> ConfigProto'DeviceCountEntry -> Ordering
$ccompare :: ConfigProto'DeviceCountEntry
-> ConfigProto'DeviceCountEntry -> Ordering
$cp1Ord :: Eq ConfigProto'DeviceCountEntry
Prelude.Ord)
instance Prelude.Show ConfigProto'DeviceCountEntry where
  showsPrec :: Int -> ConfigProto'DeviceCountEntry -> ShowS
showsPrec _ __x :: ConfigProto'DeviceCountEntry
__x __s :: String
__s
    = Char -> ShowS
Prelude.showChar
        '{'
        (String -> ShowS
Prelude.showString
           (ConfigProto'DeviceCountEntry -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ConfigProto'DeviceCountEntry
__x) (Char -> ShowS
Prelude.showChar '}' String
__s))
instance Data.ProtoLens.Field.HasField ConfigProto'DeviceCountEntry "key" Data.Text.Text where
  fieldOf :: Proxy# "key"
-> (Text -> f Text)
-> ConfigProto'DeviceCountEntry
-> f ConfigProto'DeviceCountEntry
fieldOf _
    = ((Text -> f Text)
 -> ConfigProto'DeviceCountEntry -> f ConfigProto'DeviceCountEntry)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ConfigProto'DeviceCountEntry
-> f ConfigProto'DeviceCountEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ConfigProto'DeviceCountEntry -> Text)
-> (ConfigProto'DeviceCountEntry
    -> Text -> ConfigProto'DeviceCountEntry)
-> Lens' ConfigProto'DeviceCountEntry Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ConfigProto'DeviceCountEntry -> Text
_ConfigProto'DeviceCountEntry'key
           (\ x__ :: ConfigProto'DeviceCountEntry
x__ y__ :: Text
y__ -> ConfigProto'DeviceCountEntry
x__ {_ConfigProto'DeviceCountEntry'key :: Text
_ConfigProto'DeviceCountEntry'key = Text
y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ConfigProto'DeviceCountEntry "value" Data.Int.Int32 where
  fieldOf :: Proxy# "value"
-> (Int32 -> f Int32)
-> ConfigProto'DeviceCountEntry
-> f ConfigProto'DeviceCountEntry
fieldOf _
    = ((Int32 -> f Int32)
 -> ConfigProto'DeviceCountEntry -> f ConfigProto'DeviceCountEntry)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> ConfigProto'DeviceCountEntry
-> f ConfigProto'DeviceCountEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ConfigProto'DeviceCountEntry -> Int32)
-> (ConfigProto'DeviceCountEntry
    -> Int32 -> ConfigProto'DeviceCountEntry)
-> Lens' ConfigProto'DeviceCountEntry Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ConfigProto'DeviceCountEntry -> Int32
_ConfigProto'DeviceCountEntry'value
           (\ x__ :: ConfigProto'DeviceCountEntry
x__ y__ :: Int32
y__ -> ConfigProto'DeviceCountEntry
x__ {_ConfigProto'DeviceCountEntry'value :: Int32
_ConfigProto'DeviceCountEntry'value = Int32
y__}))
        (Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ConfigProto'DeviceCountEntry where
  messageName :: Proxy ConfigProto'DeviceCountEntry -> Text
messageName _
    = String -> Text
Data.Text.pack "tensorflow.ConfigProto.DeviceCountEntry"
  packedMessageDescriptor :: Proxy ConfigProto'DeviceCountEntry -> ByteString
packedMessageDescriptor _
    = "\n\
      \\DLEDeviceCountEntry\DC2\DLE\n\
      \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2\DC4\n\
      \\ENQvalue\CAN\STX \SOH(\ENQR\ENQvalue:\STX8\SOH"
  packedFileDescriptor :: Proxy ConfigProto'DeviceCountEntry -> ByteString
packedFileDescriptor _ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ConfigProto'DeviceCountEntry)
fieldsByTag
    = let
        key__field_descriptor :: FieldDescriptor ConfigProto'DeviceCountEntry
key__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ConfigProto'DeviceCountEntry Text
-> FieldDescriptor ConfigProto'DeviceCountEntry
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "key"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens' ConfigProto'DeviceCountEntry Text
-> FieldAccessor ConfigProto'DeviceCountEntry Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key")) ::
              Data.ProtoLens.FieldDescriptor ConfigProto'DeviceCountEntry
        value__field_descriptor :: FieldDescriptor ConfigProto'DeviceCountEntry
value__field_descriptor
          = String
-> FieldTypeDescriptor Int32
-> FieldAccessor ConfigProto'DeviceCountEntry Int32
-> FieldDescriptor ConfigProto'DeviceCountEntry
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "value"
              (ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.Int32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
              (WireDefault Int32
-> Lens' ConfigProto'DeviceCountEntry Int32
-> FieldAccessor ConfigProto'DeviceCountEntry Int32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value")) ::
              Data.ProtoLens.FieldDescriptor ConfigProto'DeviceCountEntry
      in
        [(Tag, FieldDescriptor ConfigProto'DeviceCountEntry)]
-> Map Tag (FieldDescriptor ConfigProto'DeviceCountEntry)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag 1, FieldDescriptor ConfigProto'DeviceCountEntry
key__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 2, FieldDescriptor ConfigProto'DeviceCountEntry
value__field_descriptor)]
  unknownFields :: LensLike' f ConfigProto'DeviceCountEntry FieldSet
unknownFields
    = (ConfigProto'DeviceCountEntry -> FieldSet)
-> (ConfigProto'DeviceCountEntry
    -> FieldSet -> ConfigProto'DeviceCountEntry)
-> Lens' ConfigProto'DeviceCountEntry FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ConfigProto'DeviceCountEntry -> FieldSet
_ConfigProto'DeviceCountEntry'_unknownFields
        (\ x__ :: ConfigProto'DeviceCountEntry
x__ y__ :: FieldSet
y__
           -> ConfigProto'DeviceCountEntry
x__ {_ConfigProto'DeviceCountEntry'_unknownFields :: FieldSet
_ConfigProto'DeviceCountEntry'_unknownFields = FieldSet
y__})
  defMessage :: ConfigProto'DeviceCountEntry
defMessage
    = $WConfigProto'DeviceCountEntry'_constructor :: Text -> Int32 -> FieldSet -> ConfigProto'DeviceCountEntry
ConfigProto'DeviceCountEntry'_constructor
        {_ConfigProto'DeviceCountEntry'key :: Text
_ConfigProto'DeviceCountEntry'key = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ConfigProto'DeviceCountEntry'value :: Int32
_ConfigProto'DeviceCountEntry'value = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ConfigProto'DeviceCountEntry'_unknownFields :: FieldSet
_ConfigProto'DeviceCountEntry'_unknownFields = []}
  parseMessage :: Parser ConfigProto'DeviceCountEntry
parseMessage
    = let
        loop ::
          ConfigProto'DeviceCountEntry
          -> Data.ProtoLens.Encoding.Bytes.Parser ConfigProto'DeviceCountEntry
        loop :: ConfigProto'DeviceCountEntry -> Parser ConfigProto'DeviceCountEntry
loop x :: ConfigProto'DeviceCountEntry
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]))))
                      ConfigProto'DeviceCountEntry -> Parser ConfigProto'DeviceCountEntry
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter
  ConfigProto'DeviceCountEntry
  ConfigProto'DeviceCountEntry
  FieldSet
  FieldSet
-> (FieldSet -> FieldSet)
-> ConfigProto'DeviceCountEntry
-> ConfigProto'DeviceCountEntry
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
  ConfigProto'DeviceCountEntry
  ConfigProto'DeviceCountEntry
  FieldSet
  FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) ConfigProto'DeviceCountEntry
x)
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        10
                          -> do Text
y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do ByteString
value <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                       Int -> Parser ByteString
Data.ProtoLens.Encoding.Bytes.getBytes
                                                         (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
                                           Either String Text -> Parser Text
forall a. Either String a -> Parser a
Data.ProtoLens.Encoding.Bytes.runEither
                                             (case ByteString -> Either UnicodeException Text
Data.Text.Encoding.decodeUtf8' ByteString
value of
                                                (Prelude.Left err :: UnicodeException
err)
                                                  -> String -> Either String Text
forall a b. a -> Either a b
Prelude.Left (UnicodeException -> String
forall a. Show a => a -> String
Prelude.show UnicodeException
err)
                                                (Prelude.Right r :: Text
r) -> Text -> Either String Text
forall a b. b -> Either a b
Prelude.Right Text
r))
                                       "key"
                                ConfigProto'DeviceCountEntry -> Parser ConfigProto'DeviceCountEntry
loop (Setter
  ConfigProto'DeviceCountEntry ConfigProto'DeviceCountEntry Text Text
-> Text
-> ConfigProto'DeviceCountEntry
-> ConfigProto'DeviceCountEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key") Text
y ConfigProto'DeviceCountEntry
x)
                        16
                          -> do Int32
y <- Parser Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int32) -> Parser Word64 -> Parser Int32
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       "value"
                                ConfigProto'DeviceCountEntry -> Parser ConfigProto'DeviceCountEntry
loop (Setter
  ConfigProto'DeviceCountEntry
  ConfigProto'DeviceCountEntry
  Int32
  Int32
-> Int32
-> ConfigProto'DeviceCountEntry
-> ConfigProto'DeviceCountEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value") Int32
y ConfigProto'DeviceCountEntry
x)
                        wire :: Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                ConfigProto'DeviceCountEntry -> Parser ConfigProto'DeviceCountEntry
loop
                                  (Setter
  ConfigProto'DeviceCountEntry
  ConfigProto'DeviceCountEntry
  FieldSet
  FieldSet
-> (FieldSet -> FieldSet)
-> ConfigProto'DeviceCountEntry
-> ConfigProto'DeviceCountEntry
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
  ConfigProto'DeviceCountEntry
  ConfigProto'DeviceCountEntry
  FieldSet
  FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) ConfigProto'DeviceCountEntry
x)
      in
        Parser ConfigProto'DeviceCountEntry
-> String -> Parser ConfigProto'DeviceCountEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ConfigProto'DeviceCountEntry -> Parser ConfigProto'DeviceCountEntry
loop ConfigProto'DeviceCountEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage) "DeviceCountEntry"
  buildMessage :: ConfigProto'DeviceCountEntry -> Builder
buildMessage
    = \ _x :: ConfigProto'DeviceCountEntry
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Text
_v = FoldLike
  Text
  ConfigProto'DeviceCountEntry
  ConfigProto'DeviceCountEntry
  Text
  Text
-> ConfigProto'DeviceCountEntry -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "key" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key") ConfigProto'DeviceCountEntry
_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 :: Int32
_v = FoldLike
  Int32
  ConfigProto'DeviceCountEntry
  ConfigProto'DeviceCountEntry
  Int32
  Int32
-> ConfigProto'DeviceCountEntry -> Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "value" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value") ConfigProto'DeviceCountEntry
_x
                 in
                   if Int32 -> Int32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int32
_v Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 16)
                         ((Word64 -> Builder) -> (Int32 -> Word64) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  ConfigProto'DeviceCountEntry
  ConfigProto'DeviceCountEntry
  FieldSet
  FieldSet
-> ConfigProto'DeviceCountEntry -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ConfigProto'DeviceCountEntry
  ConfigProto'DeviceCountEntry
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields ConfigProto'DeviceCountEntry
_x)))
instance Control.DeepSeq.NFData ConfigProto'DeviceCountEntry where
  rnf :: ConfigProto'DeviceCountEntry -> ()
rnf
    = \ x__ :: ConfigProto'DeviceCountEntry
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ConfigProto'DeviceCountEntry -> FieldSet
_ConfigProto'DeviceCountEntry'_unknownFields ConfigProto'DeviceCountEntry
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ConfigProto'DeviceCountEntry -> Text
_ConfigProto'DeviceCountEntry'key ConfigProto'DeviceCountEntry
x__)
                (Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ConfigProto'DeviceCountEntry -> Int32
_ConfigProto'DeviceCountEntry'value ConfigProto'DeviceCountEntry
x__) ()))
{- | Fields :
     
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.collectiveGroupLeader' @:: Lens' ConfigProto'Experimental Data.Text.Text@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.executorType' @:: Lens' ConfigProto'Experimental Data.Text.Text@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.recvBufMaxChunk' @:: Lens' ConfigProto'Experimental Data.Int.Int32@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.useNumaAffinity' @:: Lens' ConfigProto'Experimental Prelude.Bool@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.collectiveDeterministicSequentialExecution' @:: Lens' ConfigProto'Experimental Prelude.Bool@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.collectiveNccl' @:: Lens' ConfigProto'Experimental Prelude.Bool@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.shareSessionStateInClusterspecPropagation' @:: Lens' ConfigProto'Experimental Prelude.Bool@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.disableThreadSpinning' @:: Lens' ConfigProto'Experimental Prelude.Bool@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.shareClusterDevicesInSession' @:: Lens' ConfigProto'Experimental Prelude.Bool@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.sessionMetadata' @:: Lens' ConfigProto'Experimental SessionMetadata@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.maybe'sessionMetadata' @:: Lens' ConfigProto'Experimental (Prelude.Maybe SessionMetadata)@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.optimizeForStaticGraph' @:: Lens' ConfigProto'Experimental Prelude.Bool@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.enableMlirBridge' @:: Lens' ConfigProto'Experimental Prelude.Bool@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.enableMlirGraphOptimization' @:: Lens' ConfigProto'Experimental Prelude.Bool@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.disableOutputPartitionGraphs' @:: Lens' ConfigProto'Experimental Prelude.Bool@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.xlaFusionAutotunerThresh' @:: Lens' ConfigProto'Experimental Data.Int.Int64@ -}
data ConfigProto'Experimental
  = ConfigProto'Experimental'_constructor {ConfigProto'Experimental -> Text
_ConfigProto'Experimental'collectiveGroupLeader :: !Data.Text.Text,
                                           ConfigProto'Experimental -> Text
_ConfigProto'Experimental'executorType :: !Data.Text.Text,
                                           ConfigProto'Experimental -> Int32
_ConfigProto'Experimental'recvBufMaxChunk :: !Data.Int.Int32,
                                           ConfigProto'Experimental -> Bool
_ConfigProto'Experimental'useNumaAffinity :: !Prelude.Bool,
                                           ConfigProto'Experimental -> Bool
_ConfigProto'Experimental'collectiveDeterministicSequentialExecution :: !Prelude.Bool,
                                           ConfigProto'Experimental -> Bool
_ConfigProto'Experimental'collectiveNccl :: !Prelude.Bool,
                                           ConfigProto'Experimental -> Bool
_ConfigProto'Experimental'shareSessionStateInClusterspecPropagation :: !Prelude.Bool,
                                           ConfigProto'Experimental -> Bool
_ConfigProto'Experimental'disableThreadSpinning :: !Prelude.Bool,
                                           ConfigProto'Experimental -> Bool
_ConfigProto'Experimental'shareClusterDevicesInSession :: !Prelude.Bool,
                                           ConfigProto'Experimental -> Maybe SessionMetadata
_ConfigProto'Experimental'sessionMetadata :: !(Prelude.Maybe SessionMetadata),
                                           ConfigProto'Experimental -> Bool
_ConfigProto'Experimental'optimizeForStaticGraph :: !Prelude.Bool,
                                           ConfigProto'Experimental -> Bool
_ConfigProto'Experimental'enableMlirBridge :: !Prelude.Bool,
                                           ConfigProto'Experimental -> Bool
_ConfigProto'Experimental'enableMlirGraphOptimization :: !Prelude.Bool,
                                           ConfigProto'Experimental -> Bool
_ConfigProto'Experimental'disableOutputPartitionGraphs :: !Prelude.Bool,
                                           ConfigProto'Experimental -> Int64
_ConfigProto'Experimental'xlaFusionAutotunerThresh :: !Data.Int.Int64,
                                           ConfigProto'Experimental -> FieldSet
_ConfigProto'Experimental'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ConfigProto'Experimental -> ConfigProto'Experimental -> Bool
(ConfigProto'Experimental -> ConfigProto'Experimental -> Bool)
-> (ConfigProto'Experimental -> ConfigProto'Experimental -> Bool)
-> Eq ConfigProto'Experimental
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ConfigProto'Experimental -> ConfigProto'Experimental -> Bool
$c/= :: ConfigProto'Experimental -> ConfigProto'Experimental -> Bool
== :: ConfigProto'Experimental -> ConfigProto'Experimental -> Bool
$c== :: ConfigProto'Experimental -> ConfigProto'Experimental -> Bool
Prelude.Eq, Eq ConfigProto'Experimental
Eq ConfigProto'Experimental =>
(ConfigProto'Experimental -> ConfigProto'Experimental -> Ordering)
-> (ConfigProto'Experimental -> ConfigProto'Experimental -> Bool)
-> (ConfigProto'Experimental -> ConfigProto'Experimental -> Bool)
-> (ConfigProto'Experimental -> ConfigProto'Experimental -> Bool)
-> (ConfigProto'Experimental -> ConfigProto'Experimental -> Bool)
-> (ConfigProto'Experimental
    -> ConfigProto'Experimental -> ConfigProto'Experimental)
-> (ConfigProto'Experimental
    -> ConfigProto'Experimental -> ConfigProto'Experimental)
-> Ord ConfigProto'Experimental
ConfigProto'Experimental -> ConfigProto'Experimental -> Bool
ConfigProto'Experimental -> ConfigProto'Experimental -> Ordering
ConfigProto'Experimental
-> ConfigProto'Experimental -> ConfigProto'Experimental
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 :: ConfigProto'Experimental
-> ConfigProto'Experimental -> ConfigProto'Experimental
$cmin :: ConfigProto'Experimental
-> ConfigProto'Experimental -> ConfigProto'Experimental
max :: ConfigProto'Experimental
-> ConfigProto'Experimental -> ConfigProto'Experimental
$cmax :: ConfigProto'Experimental
-> ConfigProto'Experimental -> ConfigProto'Experimental
>= :: ConfigProto'Experimental -> ConfigProto'Experimental -> Bool
$c>= :: ConfigProto'Experimental -> ConfigProto'Experimental -> Bool
> :: ConfigProto'Experimental -> ConfigProto'Experimental -> Bool
$c> :: ConfigProto'Experimental -> ConfigProto'Experimental -> Bool
<= :: ConfigProto'Experimental -> ConfigProto'Experimental -> Bool
$c<= :: ConfigProto'Experimental -> ConfigProto'Experimental -> Bool
< :: ConfigProto'Experimental -> ConfigProto'Experimental -> Bool
$c< :: ConfigProto'Experimental -> ConfigProto'Experimental -> Bool
compare :: ConfigProto'Experimental -> ConfigProto'Experimental -> Ordering
$ccompare :: ConfigProto'Experimental -> ConfigProto'Experimental -> Ordering
$cp1Ord :: Eq ConfigProto'Experimental
Prelude.Ord)
instance Prelude.Show ConfigProto'Experimental where
  showsPrec :: Int -> ConfigProto'Experimental -> ShowS
showsPrec _ __x :: ConfigProto'Experimental
__x __s :: String
__s
    = Char -> ShowS
Prelude.showChar
        '{'
        (String -> ShowS
Prelude.showString
           (ConfigProto'Experimental -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ConfigProto'Experimental
__x) (Char -> ShowS
Prelude.showChar '}' String
__s))
instance Data.ProtoLens.Field.HasField ConfigProto'Experimental "collectiveGroupLeader" Data.Text.Text where
  fieldOf :: Proxy# "collectiveGroupLeader"
-> (Text -> f Text)
-> ConfigProto'Experimental
-> f ConfigProto'Experimental
fieldOf _
    = ((Text -> f Text)
 -> ConfigProto'Experimental -> f ConfigProto'Experimental)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ConfigProto'Experimental
-> f ConfigProto'Experimental
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ConfigProto'Experimental -> Text)
-> (ConfigProto'Experimental -> Text -> ConfigProto'Experimental)
-> Lens ConfigProto'Experimental ConfigProto'Experimental Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ConfigProto'Experimental -> Text
_ConfigProto'Experimental'collectiveGroupLeader
           (\ x__ :: ConfigProto'Experimental
x__ y__ :: Text
y__
              -> ConfigProto'Experimental
x__ {_ConfigProto'Experimental'collectiveGroupLeader :: Text
_ConfigProto'Experimental'collectiveGroupLeader = Text
y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ConfigProto'Experimental "executorType" Data.Text.Text where
  fieldOf :: Proxy# "executorType"
-> (Text -> f Text)
-> ConfigProto'Experimental
-> f ConfigProto'Experimental
fieldOf _
    = ((Text -> f Text)
 -> ConfigProto'Experimental -> f ConfigProto'Experimental)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ConfigProto'Experimental
-> f ConfigProto'Experimental
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ConfigProto'Experimental -> Text)
-> (ConfigProto'Experimental -> Text -> ConfigProto'Experimental)
-> Lens ConfigProto'Experimental ConfigProto'Experimental Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ConfigProto'Experimental -> Text
_ConfigProto'Experimental'executorType
           (\ x__ :: ConfigProto'Experimental
x__ y__ :: Text
y__ -> ConfigProto'Experimental
x__ {_ConfigProto'Experimental'executorType :: Text
_ConfigProto'Experimental'executorType = Text
y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ConfigProto'Experimental "recvBufMaxChunk" Data.Int.Int32 where
  fieldOf :: Proxy# "recvBufMaxChunk"
-> (Int32 -> f Int32)
-> ConfigProto'Experimental
-> f ConfigProto'Experimental
fieldOf _
    = ((Int32 -> f Int32)
 -> ConfigProto'Experimental -> f ConfigProto'Experimental)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> ConfigProto'Experimental
-> f ConfigProto'Experimental
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ConfigProto'Experimental -> Int32)
-> (ConfigProto'Experimental -> Int32 -> ConfigProto'Experimental)
-> Lens
     ConfigProto'Experimental ConfigProto'Experimental Int32 Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ConfigProto'Experimental -> Int32
_ConfigProto'Experimental'recvBufMaxChunk
           (\ x__ :: ConfigProto'Experimental
x__ y__ :: Int32
y__
              -> ConfigProto'Experimental
x__ {_ConfigProto'Experimental'recvBufMaxChunk :: Int32
_ConfigProto'Experimental'recvBufMaxChunk = Int32
y__}))
        (Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ConfigProto'Experimental "useNumaAffinity" Prelude.Bool where
  fieldOf :: Proxy# "useNumaAffinity"
-> (Bool -> f Bool)
-> ConfigProto'Experimental
-> f ConfigProto'Experimental
fieldOf _
    = ((Bool -> f Bool)
 -> ConfigProto'Experimental -> f ConfigProto'Experimental)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> ConfigProto'Experimental
-> f ConfigProto'Experimental
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ConfigProto'Experimental -> Bool)
-> (ConfigProto'Experimental -> Bool -> ConfigProto'Experimental)
-> Lens ConfigProto'Experimental ConfigProto'Experimental Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ConfigProto'Experimental -> Bool
_ConfigProto'Experimental'useNumaAffinity
           (\ x__ :: ConfigProto'Experimental
x__ y__ :: Bool
y__
              -> ConfigProto'Experimental
x__ {_ConfigProto'Experimental'useNumaAffinity :: Bool
_ConfigProto'Experimental'useNumaAffinity = Bool
y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ConfigProto'Experimental "collectiveDeterministicSequentialExecution" Prelude.Bool where
  fieldOf :: Proxy# "collectiveDeterministicSequentialExecution"
-> (Bool -> f Bool)
-> ConfigProto'Experimental
-> f ConfigProto'Experimental
fieldOf _
    = ((Bool -> f Bool)
 -> ConfigProto'Experimental -> f ConfigProto'Experimental)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> ConfigProto'Experimental
-> f ConfigProto'Experimental
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ConfigProto'Experimental -> Bool)
-> (ConfigProto'Experimental -> Bool -> ConfigProto'Experimental)
-> Lens ConfigProto'Experimental ConfigProto'Experimental Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ConfigProto'Experimental -> Bool
_ConfigProto'Experimental'collectiveDeterministicSequentialExecution
           (\ x__ :: ConfigProto'Experimental
x__ y__ :: Bool
y__
              -> ConfigProto'Experimental
x__
                   {_ConfigProto'Experimental'collectiveDeterministicSequentialExecution :: Bool
_ConfigProto'Experimental'collectiveDeterministicSequentialExecution = Bool
y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ConfigProto'Experimental "collectiveNccl" Prelude.Bool where
  fieldOf :: Proxy# "collectiveNccl"
-> (Bool -> f Bool)
-> ConfigProto'Experimental
-> f ConfigProto'Experimental
fieldOf _
    = ((Bool -> f Bool)
 -> ConfigProto'Experimental -> f ConfigProto'Experimental)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> ConfigProto'Experimental
-> f ConfigProto'Experimental
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ConfigProto'Experimental -> Bool)
-> (ConfigProto'Experimental -> Bool -> ConfigProto'Experimental)
-> Lens ConfigProto'Experimental ConfigProto'Experimental Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ConfigProto'Experimental -> Bool
_ConfigProto'Experimental'collectiveNccl
           (\ x__ :: ConfigProto'Experimental
x__ y__ :: Bool
y__
              -> ConfigProto'Experimental
x__ {_ConfigProto'Experimental'collectiveNccl :: Bool
_ConfigProto'Experimental'collectiveNccl = Bool
y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ConfigProto'Experimental "shareSessionStateInClusterspecPropagation" Prelude.Bool where
  fieldOf :: Proxy# "shareSessionStateInClusterspecPropagation"
-> (Bool -> f Bool)
-> ConfigProto'Experimental
-> f ConfigProto'Experimental
fieldOf _
    = ((Bool -> f Bool)
 -> ConfigProto'Experimental -> f ConfigProto'Experimental)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> ConfigProto'Experimental
-> f ConfigProto'Experimental
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ConfigProto'Experimental -> Bool)
-> (ConfigProto'Experimental -> Bool -> ConfigProto'Experimental)
-> Lens ConfigProto'Experimental ConfigProto'Experimental Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ConfigProto'Experimental -> Bool
_ConfigProto'Experimental'shareSessionStateInClusterspecPropagation
           (\ x__ :: ConfigProto'Experimental
x__ y__ :: Bool
y__
              -> ConfigProto'Experimental
x__
                   {_ConfigProto'Experimental'shareSessionStateInClusterspecPropagation :: Bool
_ConfigProto'Experimental'shareSessionStateInClusterspecPropagation = Bool
y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ConfigProto'Experimental "disableThreadSpinning" Prelude.Bool where
  fieldOf :: Proxy# "disableThreadSpinning"
-> (Bool -> f Bool)
-> ConfigProto'Experimental
-> f ConfigProto'Experimental
fieldOf _
    = ((Bool -> f Bool)
 -> ConfigProto'Experimental -> f ConfigProto'Experimental)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> ConfigProto'Experimental
-> f ConfigProto'Experimental
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ConfigProto'Experimental -> Bool)
-> (ConfigProto'Experimental -> Bool -> ConfigProto'Experimental)
-> Lens ConfigProto'Experimental ConfigProto'Experimental Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ConfigProto'Experimental -> Bool
_ConfigProto'Experimental'disableThreadSpinning
           (\ x__ :: ConfigProto'Experimental
x__ y__ :: Bool
y__
              -> ConfigProto'Experimental
x__ {_ConfigProto'Experimental'disableThreadSpinning :: Bool
_ConfigProto'Experimental'disableThreadSpinning = Bool
y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ConfigProto'Experimental "shareClusterDevicesInSession" Prelude.Bool where
  fieldOf :: Proxy# "shareClusterDevicesInSession"
-> (Bool -> f Bool)
-> ConfigProto'Experimental
-> f ConfigProto'Experimental
fieldOf _
    = ((Bool -> f Bool)
 -> ConfigProto'Experimental -> f ConfigProto'Experimental)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> ConfigProto'Experimental
-> f ConfigProto'Experimental
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ConfigProto'Experimental -> Bool)
-> (ConfigProto'Experimental -> Bool -> ConfigProto'Experimental)
-> Lens ConfigProto'Experimental ConfigProto'Experimental Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ConfigProto'Experimental -> Bool
_ConfigProto'Experimental'shareClusterDevicesInSession
           (\ x__ :: ConfigProto'Experimental
x__ y__ :: Bool
y__
              -> ConfigProto'Experimental
x__
                   {_ConfigProto'Experimental'shareClusterDevicesInSession :: Bool
_ConfigProto'Experimental'shareClusterDevicesInSession = Bool
y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ConfigProto'Experimental "sessionMetadata" SessionMetadata where
  fieldOf :: Proxy# "sessionMetadata"
-> (SessionMetadata -> f SessionMetadata)
-> ConfigProto'Experimental
-> f ConfigProto'Experimental
fieldOf _
    = ((Maybe SessionMetadata -> f (Maybe SessionMetadata))
 -> ConfigProto'Experimental -> f ConfigProto'Experimental)
-> ((SessionMetadata -> f SessionMetadata)
    -> Maybe SessionMetadata -> f (Maybe SessionMetadata))
-> (SessionMetadata -> f SessionMetadata)
-> ConfigProto'Experimental
-> f ConfigProto'Experimental
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ConfigProto'Experimental -> Maybe SessionMetadata)
-> (ConfigProto'Experimental
    -> Maybe SessionMetadata -> ConfigProto'Experimental)
-> Lens
     ConfigProto'Experimental
     ConfigProto'Experimental
     (Maybe SessionMetadata)
     (Maybe SessionMetadata)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ConfigProto'Experimental -> Maybe SessionMetadata
_ConfigProto'Experimental'sessionMetadata
           (\ x__ :: ConfigProto'Experimental
x__ y__ :: Maybe SessionMetadata
y__
              -> ConfigProto'Experimental
x__ {_ConfigProto'Experimental'sessionMetadata :: Maybe SessionMetadata
_ConfigProto'Experimental'sessionMetadata = Maybe SessionMetadata
y__}))
        (SessionMetadata -> Lens' (Maybe SessionMetadata) SessionMetadata
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens SessionMetadata
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField ConfigProto'Experimental "maybe'sessionMetadata" (Prelude.Maybe SessionMetadata) where
  fieldOf :: Proxy# "maybe'sessionMetadata"
-> (Maybe SessionMetadata -> f (Maybe SessionMetadata))
-> ConfigProto'Experimental
-> f ConfigProto'Experimental
fieldOf _
    = ((Maybe SessionMetadata -> f (Maybe SessionMetadata))
 -> ConfigProto'Experimental -> f ConfigProto'Experimental)
-> ((Maybe SessionMetadata -> f (Maybe SessionMetadata))
    -> Maybe SessionMetadata -> f (Maybe SessionMetadata))
-> (Maybe SessionMetadata -> f (Maybe SessionMetadata))
-> ConfigProto'Experimental
-> f ConfigProto'Experimental
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ConfigProto'Experimental -> Maybe SessionMetadata)
-> (ConfigProto'Experimental
    -> Maybe SessionMetadata -> ConfigProto'Experimental)
-> Lens
     ConfigProto'Experimental
     ConfigProto'Experimental
     (Maybe SessionMetadata)
     (Maybe SessionMetadata)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ConfigProto'Experimental -> Maybe SessionMetadata
_ConfigProto'Experimental'sessionMetadata
           (\ x__ :: ConfigProto'Experimental
x__ y__ :: Maybe SessionMetadata
y__
              -> ConfigProto'Experimental
x__ {_ConfigProto'Experimental'sessionMetadata :: Maybe SessionMetadata
_ConfigProto'Experimental'sessionMetadata = Maybe SessionMetadata
y__}))
        (Maybe SessionMetadata -> f (Maybe SessionMetadata))
-> Maybe SessionMetadata -> f (Maybe SessionMetadata)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ConfigProto'Experimental "optimizeForStaticGraph" Prelude.Bool where
  fieldOf :: Proxy# "optimizeForStaticGraph"
-> (Bool -> f Bool)
-> ConfigProto'Experimental
-> f ConfigProto'Experimental
fieldOf _
    = ((Bool -> f Bool)
 -> ConfigProto'Experimental -> f ConfigProto'Experimental)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> ConfigProto'Experimental
-> f ConfigProto'Experimental
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ConfigProto'Experimental -> Bool)
-> (ConfigProto'Experimental -> Bool -> ConfigProto'Experimental)
-> Lens ConfigProto'Experimental ConfigProto'Experimental Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ConfigProto'Experimental -> Bool
_ConfigProto'Experimental'optimizeForStaticGraph
           (\ x__ :: ConfigProto'Experimental
x__ y__ :: Bool
y__
              -> ConfigProto'Experimental
x__ {_ConfigProto'Experimental'optimizeForStaticGraph :: Bool
_ConfigProto'Experimental'optimizeForStaticGraph = Bool
y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ConfigProto'Experimental "enableMlirBridge" Prelude.Bool where
  fieldOf :: Proxy# "enableMlirBridge"
-> (Bool -> f Bool)
-> ConfigProto'Experimental
-> f ConfigProto'Experimental
fieldOf _
    = ((Bool -> f Bool)
 -> ConfigProto'Experimental -> f ConfigProto'Experimental)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> ConfigProto'Experimental
-> f ConfigProto'Experimental
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ConfigProto'Experimental -> Bool)
-> (ConfigProto'Experimental -> Bool -> ConfigProto'Experimental)
-> Lens ConfigProto'Experimental ConfigProto'Experimental Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ConfigProto'Experimental -> Bool
_ConfigProto'Experimental'enableMlirBridge
           (\ x__ :: ConfigProto'Experimental
x__ y__ :: Bool
y__
              -> ConfigProto'Experimental
x__ {_ConfigProto'Experimental'enableMlirBridge :: Bool
_ConfigProto'Experimental'enableMlirBridge = Bool
y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ConfigProto'Experimental "enableMlirGraphOptimization" Prelude.Bool where
  fieldOf :: Proxy# "enableMlirGraphOptimization"
-> (Bool -> f Bool)
-> ConfigProto'Experimental
-> f ConfigProto'Experimental
fieldOf _
    = ((Bool -> f Bool)
 -> ConfigProto'Experimental -> f ConfigProto'Experimental)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> ConfigProto'Experimental
-> f ConfigProto'Experimental
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ConfigProto'Experimental -> Bool)
-> (ConfigProto'Experimental -> Bool -> ConfigProto'Experimental)
-> Lens ConfigProto'Experimental ConfigProto'Experimental Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ConfigProto'Experimental -> Bool
_ConfigProto'Experimental'enableMlirGraphOptimization
           (\ x__ :: ConfigProto'Experimental
x__ y__ :: Bool
y__
              -> ConfigProto'Experimental
x__
                   {_ConfigProto'Experimental'enableMlirGraphOptimization :: Bool
_ConfigProto'Experimental'enableMlirGraphOptimization = Bool
y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ConfigProto'Experimental "disableOutputPartitionGraphs" Prelude.Bool where
  fieldOf :: Proxy# "disableOutputPartitionGraphs"
-> (Bool -> f Bool)
-> ConfigProto'Experimental
-> f ConfigProto'Experimental
fieldOf _
    = ((Bool -> f Bool)
 -> ConfigProto'Experimental -> f ConfigProto'Experimental)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> ConfigProto'Experimental
-> f ConfigProto'Experimental
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ConfigProto'Experimental -> Bool)
-> (ConfigProto'Experimental -> Bool -> ConfigProto'Experimental)
-> Lens ConfigProto'Experimental ConfigProto'Experimental Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ConfigProto'Experimental -> Bool
_ConfigProto'Experimental'disableOutputPartitionGraphs
           (\ x__ :: ConfigProto'Experimental
x__ y__ :: Bool
y__
              -> ConfigProto'Experimental
x__
                   {_ConfigProto'Experimental'disableOutputPartitionGraphs :: Bool
_ConfigProto'Experimental'disableOutputPartitionGraphs = Bool
y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ConfigProto'Experimental "xlaFusionAutotunerThresh" Data.Int.Int64 where
  fieldOf :: Proxy# "xlaFusionAutotunerThresh"
-> (Int64 -> f Int64)
-> ConfigProto'Experimental
-> f ConfigProto'Experimental
fieldOf _
    = ((Int64 -> f Int64)
 -> ConfigProto'Experimental -> f ConfigProto'Experimental)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> ConfigProto'Experimental
-> f ConfigProto'Experimental
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ConfigProto'Experimental -> Int64)
-> (ConfigProto'Experimental -> Int64 -> ConfigProto'Experimental)
-> Lens
     ConfigProto'Experimental ConfigProto'Experimental Int64 Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ConfigProto'Experimental -> Int64
_ConfigProto'Experimental'xlaFusionAutotunerThresh
           (\ x__ :: ConfigProto'Experimental
x__ y__ :: Int64
y__
              -> ConfigProto'Experimental
x__ {_ConfigProto'Experimental'xlaFusionAutotunerThresh :: Int64
_ConfigProto'Experimental'xlaFusionAutotunerThresh = Int64
y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ConfigProto'Experimental where
  messageName :: Proxy ConfigProto'Experimental -> Text
messageName _
    = String -> Text
Data.Text.pack "tensorflow.ConfigProto.Experimental"
  packedMessageDescriptor :: Proxy ConfigProto'Experimental -> ByteString
packedMessageDescriptor _
    = "\n\
      \\fExperimental\DC26\n\
      \\ETBcollective_group_leader\CAN\SOH \SOH(\tR\NAKcollectiveGroupLeader\DC2#\n\
      \\rexecutor_type\CAN\ETX \SOH(\tR\fexecutorType\DC2+\n\
      \\DC2recv_buf_max_chunk\CAN\EOT \SOH(\ENQR\SIrecvBufMaxChunk\DC2*\n\
      \\DC1use_numa_affinity\CAN\ENQ \SOH(\bR\SIuseNumaAffinity\DC2a\n\
      \-collective_deterministic_sequential_execution\CAN\ACK \SOH(\bR*collectiveDeterministicSequentialExecution\DC2'\n\
      \\SIcollective_nccl\CAN\a \SOH(\bR\SOcollectiveNccl\DC2a\n\
      \.share_session_state_in_clusterspec_propagation\CAN\b \SOH(\bR)shareSessionStateInClusterspecPropagation\DC26\n\
      \\ETBdisable_thread_spinning\CAN\t \SOH(\bR\NAKdisableThreadSpinning\DC2F\n\
      \ share_cluster_devices_in_session\CAN\n\
      \ \SOH(\bR\FSshareClusterDevicesInSession\DC2F\n\
      \\DLEsession_metadata\CAN\v \SOH(\v2\ESC.tensorflow.SessionMetadataR\SIsessionMetadata\DC29\n\
      \\EMoptimize_for_static_graph\CAN\f \SOH(\bR\SYNoptimizeForStaticGraph\DC2,\n\
      \\DC2enable_mlir_bridge\CAN\r \SOH(\bR\DLEenableMlirBridge\DC2C\n\
      \\RSenable_mlir_graph_optimization\CAN\DLE \SOH(\bR\ESCenableMlirGraphOptimization\DC2E\n\
      \\USdisable_output_partition_graphs\CAN\SO \SOH(\bR\FSdisableOutputPartitionGraphs\DC2=\n\
      \\ESCxla_fusion_autotuner_thresh\CAN\SI \SOH(\ETXR\CANxlaFusionAutotunerThreshJ\EOT\b\STX\DLE\ETX"
  packedFileDescriptor :: Proxy ConfigProto'Experimental -> ByteString
packedFileDescriptor _ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ConfigProto'Experimental)
fieldsByTag
    = let
        collectiveGroupLeader__field_descriptor :: FieldDescriptor ConfigProto'Experimental
collectiveGroupLeader__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ConfigProto'Experimental Text
-> FieldDescriptor ConfigProto'Experimental
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "collective_group_leader"
              (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 ConfigProto'Experimental ConfigProto'Experimental Text Text
-> FieldAccessor ConfigProto'Experimental 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 "collectiveGroupLeader" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"collectiveGroupLeader")) ::
              Data.ProtoLens.FieldDescriptor ConfigProto'Experimental
        executorType__field_descriptor :: FieldDescriptor ConfigProto'Experimental
executorType__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ConfigProto'Experimental Text
-> FieldDescriptor ConfigProto'Experimental
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "executor_type"
              (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 ConfigProto'Experimental ConfigProto'Experimental Text Text
-> FieldAccessor ConfigProto'Experimental 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 "executorType" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"executorType")) ::
              Data.ProtoLens.FieldDescriptor ConfigProto'Experimental
        recvBufMaxChunk__field_descriptor :: FieldDescriptor ConfigProto'Experimental
recvBufMaxChunk__field_descriptor
          = String
-> FieldTypeDescriptor Int32
-> FieldAccessor ConfigProto'Experimental Int32
-> FieldDescriptor ConfigProto'Experimental
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "recv_buf_max_chunk"
              (ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.Int32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
              (WireDefault Int32
-> Lens
     ConfigProto'Experimental ConfigProto'Experimental Int32 Int32
-> FieldAccessor ConfigProto'Experimental Int32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "recvBufMaxChunk" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"recvBufMaxChunk")) ::
              Data.ProtoLens.FieldDescriptor ConfigProto'Experimental
        useNumaAffinity__field_descriptor :: FieldDescriptor ConfigProto'Experimental
useNumaAffinity__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor ConfigProto'Experimental Bool
-> FieldDescriptor ConfigProto'Experimental
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "use_numa_affinity"
              (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 ConfigProto'Experimental ConfigProto'Experimental Bool Bool
-> FieldAccessor ConfigProto'Experimental 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 "useNumaAffinity" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"useNumaAffinity")) ::
              Data.ProtoLens.FieldDescriptor ConfigProto'Experimental
        collectiveDeterministicSequentialExecution__field_descriptor :: FieldDescriptor ConfigProto'Experimental
collectiveDeterministicSequentialExecution__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor ConfigProto'Experimental Bool
-> FieldDescriptor ConfigProto'Experimental
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "collective_deterministic_sequential_execution"
              (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 ConfigProto'Experimental ConfigProto'Experimental Bool Bool
-> FieldAccessor ConfigProto'Experimental 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 "collectiveDeterministicSequentialExecution" a,
 Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                    @"collectiveDeterministicSequentialExecution")) ::
              Data.ProtoLens.FieldDescriptor ConfigProto'Experimental
        collectiveNccl__field_descriptor :: FieldDescriptor ConfigProto'Experimental
collectiveNccl__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor ConfigProto'Experimental Bool
-> FieldDescriptor ConfigProto'Experimental
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "collective_nccl"
              (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 ConfigProto'Experimental ConfigProto'Experimental Bool Bool
-> FieldAccessor ConfigProto'Experimental 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 "collectiveNccl" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"collectiveNccl")) ::
              Data.ProtoLens.FieldDescriptor ConfigProto'Experimental
        shareSessionStateInClusterspecPropagation__field_descriptor :: FieldDescriptor ConfigProto'Experimental
shareSessionStateInClusterspecPropagation__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor ConfigProto'Experimental Bool
-> FieldDescriptor ConfigProto'Experimental
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "share_session_state_in_clusterspec_propagation"
              (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 ConfigProto'Experimental ConfigProto'Experimental Bool Bool
-> FieldAccessor ConfigProto'Experimental 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 "shareSessionStateInClusterspecPropagation" a,
 Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                    @"shareSessionStateInClusterspecPropagation")) ::
              Data.ProtoLens.FieldDescriptor ConfigProto'Experimental
        disableThreadSpinning__field_descriptor :: FieldDescriptor ConfigProto'Experimental
disableThreadSpinning__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor ConfigProto'Experimental Bool
-> FieldDescriptor ConfigProto'Experimental
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "disable_thread_spinning"
              (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 ConfigProto'Experimental ConfigProto'Experimental Bool Bool
-> FieldAccessor ConfigProto'Experimental 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 "disableThreadSpinning" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"disableThreadSpinning")) ::
              Data.ProtoLens.FieldDescriptor ConfigProto'Experimental
        shareClusterDevicesInSession__field_descriptor :: FieldDescriptor ConfigProto'Experimental
shareClusterDevicesInSession__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor ConfigProto'Experimental Bool
-> FieldDescriptor ConfigProto'Experimental
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "share_cluster_devices_in_session"
              (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 ConfigProto'Experimental ConfigProto'Experimental Bool Bool
-> FieldAccessor ConfigProto'Experimental 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 "shareClusterDevicesInSession" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"shareClusterDevicesInSession")) ::
              Data.ProtoLens.FieldDescriptor ConfigProto'Experimental
        sessionMetadata__field_descriptor :: FieldDescriptor ConfigProto'Experimental
sessionMetadata__field_descriptor
          = String
-> FieldTypeDescriptor SessionMetadata
-> FieldAccessor ConfigProto'Experimental SessionMetadata
-> FieldDescriptor ConfigProto'Experimental
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "session_metadata"
              (MessageOrGroup -> FieldTypeDescriptor SessionMetadata
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor SessionMetadata)
              (Lens
  ConfigProto'Experimental
  ConfigProto'Experimental
  (Maybe SessionMetadata)
  (Maybe SessionMetadata)
-> FieldAccessor ConfigProto'Experimental SessionMetadata
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall s a (f :: * -> *).
(HasField s "maybe'sessionMetadata" a, Functor f) =>
(a -> f a) -> s -> 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'sessionMetadata")) ::
              Data.ProtoLens.FieldDescriptor ConfigProto'Experimental
        optimizeForStaticGraph__field_descriptor :: FieldDescriptor ConfigProto'Experimental
optimizeForStaticGraph__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor ConfigProto'Experimental Bool
-> FieldDescriptor ConfigProto'Experimental
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "optimize_for_static_graph"
              (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 ConfigProto'Experimental ConfigProto'Experimental Bool Bool
-> FieldAccessor ConfigProto'Experimental 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 "optimizeForStaticGraph" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"optimizeForStaticGraph")) ::
              Data.ProtoLens.FieldDescriptor ConfigProto'Experimental
        enableMlirBridge__field_descriptor :: FieldDescriptor ConfigProto'Experimental
enableMlirBridge__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor ConfigProto'Experimental Bool
-> FieldDescriptor ConfigProto'Experimental
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "enable_mlir_bridge"
              (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 ConfigProto'Experimental ConfigProto'Experimental Bool Bool
-> FieldAccessor ConfigProto'Experimental 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 "enableMlirBridge" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"enableMlirBridge")) ::
              Data.ProtoLens.FieldDescriptor ConfigProto'Experimental
        enableMlirGraphOptimization__field_descriptor :: FieldDescriptor ConfigProto'Experimental
enableMlirGraphOptimization__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor ConfigProto'Experimental Bool
-> FieldDescriptor ConfigProto'Experimental
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "enable_mlir_graph_optimization"
              (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 ConfigProto'Experimental ConfigProto'Experimental Bool Bool
-> FieldAccessor ConfigProto'Experimental 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 "enableMlirGraphOptimization" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"enableMlirGraphOptimization")) ::
              Data.ProtoLens.FieldDescriptor ConfigProto'Experimental
        disableOutputPartitionGraphs__field_descriptor :: FieldDescriptor ConfigProto'Experimental
disableOutputPartitionGraphs__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor ConfigProto'Experimental Bool
-> FieldDescriptor ConfigProto'Experimental
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "disable_output_partition_graphs"
              (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 ConfigProto'Experimental ConfigProto'Experimental Bool Bool
-> FieldAccessor ConfigProto'Experimental 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 "disableOutputPartitionGraphs" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"disableOutputPartitionGraphs")) ::
              Data.ProtoLens.FieldDescriptor ConfigProto'Experimental
        xlaFusionAutotunerThresh__field_descriptor :: FieldDescriptor ConfigProto'Experimental
xlaFusionAutotunerThresh__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor ConfigProto'Experimental Int64
-> FieldDescriptor ConfigProto'Experimental
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "xla_fusion_autotuner_thresh"
              (ScalarField Int64 -> FieldTypeDescriptor Int64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int64
Data.ProtoLens.Int64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64)
              (WireDefault Int64
-> Lens
     ConfigProto'Experimental ConfigProto'Experimental Int64 Int64
-> FieldAccessor ConfigProto'Experimental Int64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "xlaFusionAutotunerThresh" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"xlaFusionAutotunerThresh")) ::
              Data.ProtoLens.FieldDescriptor ConfigProto'Experimental
      in
        [(Tag, FieldDescriptor ConfigProto'Experimental)]
-> Map Tag (FieldDescriptor ConfigProto'Experimental)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag 1, FieldDescriptor ConfigProto'Experimental
collectiveGroupLeader__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 3, FieldDescriptor ConfigProto'Experimental
executorType__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 4, FieldDescriptor ConfigProto'Experimental
recvBufMaxChunk__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 5, FieldDescriptor ConfigProto'Experimental
useNumaAffinity__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 6, 
            FieldDescriptor ConfigProto'Experimental
collectiveDeterministicSequentialExecution__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 7, FieldDescriptor ConfigProto'Experimental
collectiveNccl__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 8, 
            FieldDescriptor ConfigProto'Experimental
shareSessionStateInClusterspecPropagation__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 9, FieldDescriptor ConfigProto'Experimental
disableThreadSpinning__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 10, 
            FieldDescriptor ConfigProto'Experimental
shareClusterDevicesInSession__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 11, FieldDescriptor ConfigProto'Experimental
sessionMetadata__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 12, FieldDescriptor ConfigProto'Experimental
optimizeForStaticGraph__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 13, FieldDescriptor ConfigProto'Experimental
enableMlirBridge__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 16, 
            FieldDescriptor ConfigProto'Experimental
enableMlirGraphOptimization__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 14, 
            FieldDescriptor ConfigProto'Experimental
disableOutputPartitionGraphs__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 15, 
            FieldDescriptor ConfigProto'Experimental
xlaFusionAutotunerThresh__field_descriptor)]
  unknownFields :: LensLike' f ConfigProto'Experimental FieldSet
unknownFields
    = (ConfigProto'Experimental -> FieldSet)
-> (ConfigProto'Experimental
    -> FieldSet -> ConfigProto'Experimental)
-> Lens' ConfigProto'Experimental FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ConfigProto'Experimental -> FieldSet
_ConfigProto'Experimental'_unknownFields
        (\ x__ :: ConfigProto'Experimental
x__ y__ :: FieldSet
y__ -> ConfigProto'Experimental
x__ {_ConfigProto'Experimental'_unknownFields :: FieldSet
_ConfigProto'Experimental'_unknownFields = FieldSet
y__})
  defMessage :: ConfigProto'Experimental
defMessage
    = $WConfigProto'Experimental'_constructor :: Text
-> Text
-> Int32
-> Bool
-> Bool
-> Bool
-> Bool
-> Bool
-> Bool
-> Maybe SessionMetadata
-> Bool
-> Bool
-> Bool
-> Bool
-> Int64
-> FieldSet
-> ConfigProto'Experimental
ConfigProto'Experimental'_constructor
        {_ConfigProto'Experimental'collectiveGroupLeader :: Text
_ConfigProto'Experimental'collectiveGroupLeader = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ConfigProto'Experimental'executorType :: Text
_ConfigProto'Experimental'executorType = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ConfigProto'Experimental'recvBufMaxChunk :: Int32
_ConfigProto'Experimental'recvBufMaxChunk = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ConfigProto'Experimental'useNumaAffinity :: Bool
_ConfigProto'Experimental'useNumaAffinity = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ConfigProto'Experimental'collectiveDeterministicSequentialExecution :: Bool
_ConfigProto'Experimental'collectiveDeterministicSequentialExecution = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ConfigProto'Experimental'collectiveNccl :: Bool
_ConfigProto'Experimental'collectiveNccl = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ConfigProto'Experimental'shareSessionStateInClusterspecPropagation :: Bool
_ConfigProto'Experimental'shareSessionStateInClusterspecPropagation = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ConfigProto'Experimental'disableThreadSpinning :: Bool
_ConfigProto'Experimental'disableThreadSpinning = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ConfigProto'Experimental'shareClusterDevicesInSession :: Bool
_ConfigProto'Experimental'shareClusterDevicesInSession = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ConfigProto'Experimental'sessionMetadata :: Maybe SessionMetadata
_ConfigProto'Experimental'sessionMetadata = Maybe SessionMetadata
forall a. Maybe a
Prelude.Nothing,
         _ConfigProto'Experimental'optimizeForStaticGraph :: Bool
_ConfigProto'Experimental'optimizeForStaticGraph = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ConfigProto'Experimental'enableMlirBridge :: Bool
_ConfigProto'Experimental'enableMlirBridge = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ConfigProto'Experimental'enableMlirGraphOptimization :: Bool
_ConfigProto'Experimental'enableMlirGraphOptimization = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ConfigProto'Experimental'disableOutputPartitionGraphs :: Bool
_ConfigProto'Experimental'disableOutputPartitionGraphs = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ConfigProto'Experimental'xlaFusionAutotunerThresh :: Int64
_ConfigProto'Experimental'xlaFusionAutotunerThresh = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ConfigProto'Experimental'_unknownFields :: FieldSet
_ConfigProto'Experimental'_unknownFields = []}
  parseMessage :: Parser ConfigProto'Experimental
parseMessage
    = let
        loop ::
          ConfigProto'Experimental
          -> Data.ProtoLens.Encoding.Bytes.Parser ConfigProto'Experimental
        loop :: ConfigProto'Experimental -> Parser ConfigProto'Experimental
loop x :: ConfigProto'Experimental
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]))))
                      ConfigProto'Experimental -> Parser ConfigProto'Experimental
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter
  ConfigProto'Experimental ConfigProto'Experimental FieldSet FieldSet
-> (FieldSet -> FieldSet)
-> ConfigProto'Experimental
-> ConfigProto'Experimental
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
  ConfigProto'Experimental ConfigProto'Experimental FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) ConfigProto'Experimental
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))
                                       "collective_group_leader"
                                ConfigProto'Experimental -> Parser ConfigProto'Experimental
loop
                                  (Setter ConfigProto'Experimental ConfigProto'Experimental Text Text
-> Text -> ConfigProto'Experimental -> ConfigProto'Experimental
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "collectiveGroupLeader" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"collectiveGroupLeader") Text
y ConfigProto'Experimental
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))
                                       "executor_type"
                                ConfigProto'Experimental -> Parser ConfigProto'Experimental
loop
                                  (Setter ConfigProto'Experimental ConfigProto'Experimental Text Text
-> Text -> ConfigProto'Experimental -> ConfigProto'Experimental
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "executorType" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"executorType") Text
y ConfigProto'Experimental
x)
                        32
                          -> do Int32
y <- Parser Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int32) -> Parser Word64 -> Parser Int32
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       "recv_buf_max_chunk"
                                ConfigProto'Experimental -> Parser ConfigProto'Experimental
loop
                                  (Setter
  ConfigProto'Experimental ConfigProto'Experimental Int32 Int32
-> Int32 -> ConfigProto'Experimental -> ConfigProto'Experimental
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "recvBufMaxChunk" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"recvBufMaxChunk") Int32
y ConfigProto'Experimental
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)
                                       "use_numa_affinity"
                                ConfigProto'Experimental -> Parser ConfigProto'Experimental
loop
                                  (Setter ConfigProto'Experimental ConfigProto'Experimental Bool Bool
-> Bool -> ConfigProto'Experimental -> ConfigProto'Experimental
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "useNumaAffinity" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"useNumaAffinity") Bool
y ConfigProto'Experimental
x)
                        48
                          -> 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)
                                       "collective_deterministic_sequential_execution"
                                ConfigProto'Experimental -> Parser ConfigProto'Experimental
loop
                                  (Setter ConfigProto'Experimental ConfigProto'Experimental Bool Bool
-> Bool -> ConfigProto'Experimental -> ConfigProto'Experimental
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "collectiveDeterministicSequentialExecution" a,
 Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                        @"collectiveDeterministicSequentialExecution")
                                     Bool
y
                                     ConfigProto'Experimental
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)
                                       "collective_nccl"
                                ConfigProto'Experimental -> Parser ConfigProto'Experimental
loop
                                  (Setter ConfigProto'Experimental ConfigProto'Experimental Bool Bool
-> Bool -> ConfigProto'Experimental -> ConfigProto'Experimental
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "collectiveNccl" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"collectiveNccl") Bool
y ConfigProto'Experimental
x)
                        64
                          -> 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)
                                       "share_session_state_in_clusterspec_propagation"
                                ConfigProto'Experimental -> Parser ConfigProto'Experimental
loop
                                  (Setter ConfigProto'Experimental ConfigProto'Experimental Bool Bool
-> Bool -> ConfigProto'Experimental -> ConfigProto'Experimental
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "shareSessionStateInClusterspecPropagation" a,
 Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                        @"shareSessionStateInClusterspecPropagation")
                                     Bool
y
                                     ConfigProto'Experimental
x)
                        72
                          -> 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)
                                       "disable_thread_spinning"
                                ConfigProto'Experimental -> Parser ConfigProto'Experimental
loop
                                  (Setter ConfigProto'Experimental ConfigProto'Experimental Bool Bool
-> Bool -> ConfigProto'Experimental -> ConfigProto'Experimental
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "disableThreadSpinning" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"disableThreadSpinning") Bool
y ConfigProto'Experimental
x)
                        80
                          -> 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)
                                       "share_cluster_devices_in_session"
                                ConfigProto'Experimental -> Parser ConfigProto'Experimental
loop
                                  (Setter ConfigProto'Experimental ConfigProto'Experimental Bool Bool
-> Bool -> ConfigProto'Experimental -> ConfigProto'Experimental
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "shareClusterDevicesInSession" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"shareClusterDevicesInSession")
                                     Bool
y
                                     ConfigProto'Experimental
x)
                        90
                          -> do SessionMetadata
y <- Parser SessionMetadata -> String -> Parser SessionMetadata
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser SessionMetadata -> Parser SessionMetadata
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 SessionMetadata
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       "session_metadata"
                                ConfigProto'Experimental -> Parser ConfigProto'Experimental
loop
                                  (Setter
  ConfigProto'Experimental
  ConfigProto'Experimental
  SessionMetadata
  SessionMetadata
-> SessionMetadata
-> ConfigProto'Experimental
-> ConfigProto'Experimental
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "sessionMetadata" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"sessionMetadata") SessionMetadata
y ConfigProto'Experimental
x)
                        96
                          -> 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)
                                       "optimize_for_static_graph"
                                ConfigProto'Experimental -> Parser ConfigProto'Experimental
loop
                                  (Setter ConfigProto'Experimental ConfigProto'Experimental Bool Bool
-> Bool -> ConfigProto'Experimental -> ConfigProto'Experimental
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "optimizeForStaticGraph" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"optimizeForStaticGraph") Bool
y ConfigProto'Experimental
x)
                        104
                          -> 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)
                                       "enable_mlir_bridge"
                                ConfigProto'Experimental -> Parser ConfigProto'Experimental
loop
                                  (Setter ConfigProto'Experimental ConfigProto'Experimental Bool Bool
-> Bool -> ConfigProto'Experimental -> ConfigProto'Experimental
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "enableMlirBridge" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"enableMlirBridge") Bool
y ConfigProto'Experimental
x)
                        128
                          -> 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)
                                       "enable_mlir_graph_optimization"
                                ConfigProto'Experimental -> Parser ConfigProto'Experimental
loop
                                  (Setter ConfigProto'Experimental ConfigProto'Experimental Bool Bool
-> Bool -> ConfigProto'Experimental -> ConfigProto'Experimental
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "enableMlirGraphOptimization" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"enableMlirGraphOptimization")
                                     Bool
y
                                     ConfigProto'Experimental
x)
                        112
                          -> 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)
                                       "disable_output_partition_graphs"
                                ConfigProto'Experimental -> Parser ConfigProto'Experimental
loop
                                  (Setter ConfigProto'Experimental ConfigProto'Experimental Bool Bool
-> Bool -> ConfigProto'Experimental -> ConfigProto'Experimental
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "disableOutputPartitionGraphs" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"disableOutputPartitionGraphs")
                                     Bool
y
                                     ConfigProto'Experimental
x)
                        120
                          -> 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)
                                       "xla_fusion_autotuner_thresh"
                                ConfigProto'Experimental -> Parser ConfigProto'Experimental
loop
                                  (Setter
  ConfigProto'Experimental ConfigProto'Experimental Int64 Int64
-> Int64 -> ConfigProto'Experimental -> ConfigProto'Experimental
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "xlaFusionAutotunerThresh" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"xlaFusionAutotunerThresh") Int64
y ConfigProto'Experimental
x)
                        wire :: Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                ConfigProto'Experimental -> Parser ConfigProto'Experimental
loop
                                  (Setter
  ConfigProto'Experimental ConfigProto'Experimental FieldSet FieldSet
-> (FieldSet -> FieldSet)
-> ConfigProto'Experimental
-> ConfigProto'Experimental
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
  ConfigProto'Experimental ConfigProto'Experimental FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) ConfigProto'Experimental
x)
      in
        Parser ConfigProto'Experimental
-> String -> Parser ConfigProto'Experimental
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ConfigProto'Experimental -> Parser ConfigProto'Experimental
loop ConfigProto'Experimental
forall msg. Message msg => msg
Data.ProtoLens.defMessage) "Experimental"
  buildMessage :: ConfigProto'Experimental -> Builder
buildMessage
    = \ _x :: ConfigProto'Experimental
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v
                  = FoldLike
  Text ConfigProto'Experimental ConfigProto'Experimental Text Text
-> ConfigProto'Experimental -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                      (forall s a (f :: * -> *).
(HasField s "collectiveGroupLeader" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"collectiveGroupLeader") ConfigProto'Experimental
_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 ConfigProto'Experimental ConfigProto'Experimental Text Text
-> ConfigProto'Experimental -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "executorType" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"executorType") ConfigProto'Experimental
_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.<>)
                   (let
                      _v :: Int32
_v
                        = FoldLike
  Int32 ConfigProto'Experimental ConfigProto'Experimental Int32 Int32
-> ConfigProto'Experimental -> Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                            (forall s a (f :: * -> *).
(HasField s "recvBufMaxChunk" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"recvBufMaxChunk") ConfigProto'Experimental
_x
                    in
                      if Int32 -> Int32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int32
_v Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      else
                          Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 32)
                            ((Word64 -> Builder) -> (Int32 -> Word64) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                               Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (let
                         _v :: Bool
_v
                           = FoldLike
  Bool ConfigProto'Experimental ConfigProto'Experimental Bool Bool
-> ConfigProto'Experimental -> Bool
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                               (forall s a (f :: * -> *).
(HasField s "useNumaAffinity" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"useNumaAffinity") ConfigProto'Experimental
_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 ConfigProto'Experimental ConfigProto'Experimental Bool Bool
-> ConfigProto'Experimental -> Bool
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                  (forall s a (f :: * -> *).
(HasField s "collectiveDeterministicSequentialExecution" a,
 Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                     @"collectiveDeterministicSequentialExecution")
                                  ConfigProto'Experimental
_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 48)
                                  ((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 ConfigProto'Experimental ConfigProto'Experimental Bool Bool
-> ConfigProto'Experimental -> Bool
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                     (forall s a (f :: * -> *).
(HasField s "collectiveNccl" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"collectiveNccl") ConfigProto'Experimental
_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 :: Bool
_v
                                    = FoldLike
  Bool ConfigProto'Experimental ConfigProto'Experimental Bool Bool
-> ConfigProto'Experimental -> Bool
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                        (forall s a (f :: * -> *).
(HasField s "shareSessionStateInClusterspecPropagation" a,
 Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                           @"shareSessionStateInClusterspecPropagation")
                                        ConfigProto'Experimental
_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 64)
                                        ((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 ConfigProto'Experimental ConfigProto'Experimental Bool Bool
-> ConfigProto'Experimental -> Bool
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                           (forall s a (f :: * -> *).
(HasField s "disableThreadSpinning" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"disableThreadSpinning") ConfigProto'Experimental
_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 72)
                                           ((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 ConfigProto'Experimental ConfigProto'Experimental Bool Bool
-> ConfigProto'Experimental -> Bool
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                              (forall s a (f :: * -> *).
(HasField s "shareClusterDevicesInSession" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                 @"shareClusterDevicesInSession")
                                              ConfigProto'Experimental
_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 80)
                                              ((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.<>)
                                        (case
                                             FoldLike
  (Maybe SessionMetadata)
  ConfigProto'Experimental
  ConfigProto'Experimental
  (Maybe SessionMetadata)
  (Maybe SessionMetadata)
-> ConfigProto'Experimental -> Maybe SessionMetadata
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                               (forall s a (f :: * -> *).
(HasField s "maybe'sessionMetadata" a, Functor f) =>
(a -> f a) -> s -> 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'sessionMetadata")
                                               ConfigProto'Experimental
_x
                                         of
                                           Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                           (Prelude.Just _v :: SessionMetadata
_v)
                                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 90)
                                                  ((ByteString -> Builder)
-> (SessionMetadata -> ByteString) -> SessionMetadata -> 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))
                                                     SessionMetadata -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                                     SessionMetadata
_v))
                                        (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (let
                                              _v :: Bool
_v
                                                = FoldLike
  Bool ConfigProto'Experimental ConfigProto'Experimental Bool Bool
-> ConfigProto'Experimental -> Bool
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                    (forall s a (f :: * -> *).
(HasField s "optimizeForStaticGraph" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                       @"optimizeForStaticGraph")
                                                    ConfigProto'Experimental
_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 96)
                                                    ((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 ConfigProto'Experimental ConfigProto'Experimental Bool Bool
-> ConfigProto'Experimental -> Bool
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                       (forall s a (f :: * -> *).
(HasField s "enableMlirBridge" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                          @"enableMlirBridge")
                                                       ConfigProto'Experimental
_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 104)
                                                       ((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 ConfigProto'Experimental ConfigProto'Experimental Bool Bool
-> ConfigProto'Experimental -> Bool
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                          (forall s a (f :: * -> *).
(HasField s "enableMlirGraphOptimization" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                             @"enableMlirGraphOptimization")
                                                          ConfigProto'Experimental
_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
                                                             128)
                                                          ((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 ConfigProto'Experimental ConfigProto'Experimental Bool Bool
-> ConfigProto'Experimental -> Bool
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                             (forall s a (f :: * -> *).
(HasField s "disableOutputPartitionGraphs" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                                @"disableOutputPartitionGraphs")
                                                             ConfigProto'Experimental
_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
                                                                112)
                                                             ((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 :: Int64
_v
                                                            = FoldLike
  Int64 ConfigProto'Experimental ConfigProto'Experimental Int64 Int64
-> ConfigProto'Experimental -> Int64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                                (forall s a (f :: * -> *).
(HasField s "xlaFusionAutotunerThresh" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                                   @"xlaFusionAutotunerThresh")
                                                                ConfigProto'Experimental
_x
                                                        in
                                                          if Int64 -> Int64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==)
                                                               Int64
_v Int64
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
                                                                   120)
                                                                ((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
                                                                   Int64
_v))
                                                       (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                                          (FoldLike
  FieldSet
  ConfigProto'Experimental
  ConfigProto'Experimental
  FieldSet
  FieldSet
-> ConfigProto'Experimental -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                             FoldLike
  FieldSet
  ConfigProto'Experimental
  ConfigProto'Experimental
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields
                                                             ConfigProto'Experimental
_x))))))))))))))))
instance Control.DeepSeq.NFData ConfigProto'Experimental where
  rnf :: ConfigProto'Experimental -> ()
rnf
    = \ x__ :: ConfigProto'Experimental
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ConfigProto'Experimental -> FieldSet
_ConfigProto'Experimental'_unknownFields ConfigProto'Experimental
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ConfigProto'Experimental -> Text
_ConfigProto'Experimental'collectiveGroupLeader ConfigProto'Experimental
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ConfigProto'Experimental -> Text
_ConfigProto'Experimental'executorType ConfigProto'Experimental
x__)
                   (Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (ConfigProto'Experimental -> Int32
_ConfigProto'Experimental'recvBufMaxChunk ConfigProto'Experimental
x__)
                      (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (ConfigProto'Experimental -> Bool
_ConfigProto'Experimental'useNumaAffinity ConfigProto'Experimental
x__)
                         (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (ConfigProto'Experimental -> Bool
_ConfigProto'Experimental'collectiveDeterministicSequentialExecution
                               ConfigProto'Experimental
x__)
                            (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (ConfigProto'Experimental -> Bool
_ConfigProto'Experimental'collectiveNccl ConfigProto'Experimental
x__)
                               (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (ConfigProto'Experimental -> Bool
_ConfigProto'Experimental'shareSessionStateInClusterspecPropagation
                                     ConfigProto'Experimental
x__)
                                  (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                     (ConfigProto'Experimental -> Bool
_ConfigProto'Experimental'disableThreadSpinning ConfigProto'Experimental
x__)
                                     (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                        (ConfigProto'Experimental -> Bool
_ConfigProto'Experimental'shareClusterDevicesInSession ConfigProto'Experimental
x__)
                                        (Maybe SessionMetadata -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                           (ConfigProto'Experimental -> Maybe SessionMetadata
_ConfigProto'Experimental'sessionMetadata ConfigProto'Experimental
x__)
                                           (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                              (ConfigProto'Experimental -> Bool
_ConfigProto'Experimental'optimizeForStaticGraph ConfigProto'Experimental
x__)
                                              (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                 (ConfigProto'Experimental -> Bool
_ConfigProto'Experimental'enableMlirBridge ConfigProto'Experimental
x__)
                                                 (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                    (ConfigProto'Experimental -> Bool
_ConfigProto'Experimental'enableMlirGraphOptimization
                                                       ConfigProto'Experimental
x__)
                                                    (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                       (ConfigProto'Experimental -> Bool
_ConfigProto'Experimental'disableOutputPartitionGraphs
                                                          ConfigProto'Experimental
x__)
                                                       (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                          (ConfigProto'Experimental -> Int64
_ConfigProto'Experimental'xlaFusionAutotunerThresh
                                                             ConfigProto'Experimental
x__)
                                                          ())))))))))))))))
{- | Fields :
     
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.perProcessGpuMemoryFraction' @:: Lens' GPUOptions Prelude.Double@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.allowGrowth' @:: Lens' GPUOptions Prelude.Bool@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.allocatorType' @:: Lens' GPUOptions Data.Text.Text@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.deferredDeletionBytes' @:: Lens' GPUOptions Data.Int.Int64@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.visibleDeviceList' @:: Lens' GPUOptions Data.Text.Text@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.pollingActiveDelayUsecs' @:: Lens' GPUOptions Data.Int.Int32@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.pollingInactiveDelayMsecs' @:: Lens' GPUOptions Data.Int.Int32@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.forceGpuCompatible' @:: Lens' GPUOptions Prelude.Bool@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.experimental' @:: Lens' GPUOptions GPUOptions'Experimental@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.maybe'experimental' @:: Lens' GPUOptions (Prelude.Maybe GPUOptions'Experimental)@ -}
data GPUOptions
  = GPUOptions'_constructor {GPUOptions -> Double
_GPUOptions'perProcessGpuMemoryFraction :: !Prelude.Double,
                             GPUOptions -> Bool
_GPUOptions'allowGrowth :: !Prelude.Bool,
                             GPUOptions -> Text
_GPUOptions'allocatorType :: !Data.Text.Text,
                             GPUOptions -> Int64
_GPUOptions'deferredDeletionBytes :: !Data.Int.Int64,
                             GPUOptions -> Text
_GPUOptions'visibleDeviceList :: !Data.Text.Text,
                             GPUOptions -> Int32
_GPUOptions'pollingActiveDelayUsecs :: !Data.Int.Int32,
                             GPUOptions -> Int32
_GPUOptions'pollingInactiveDelayMsecs :: !Data.Int.Int32,
                             GPUOptions -> Bool
_GPUOptions'forceGpuCompatible :: !Prelude.Bool,
                             GPUOptions -> Maybe GPUOptions'Experimental
_GPUOptions'experimental :: !(Prelude.Maybe GPUOptions'Experimental),
                             GPUOptions -> FieldSet
_GPUOptions'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (GPUOptions -> GPUOptions -> Bool
(GPUOptions -> GPUOptions -> Bool)
-> (GPUOptions -> GPUOptions -> Bool) -> Eq GPUOptions
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GPUOptions -> GPUOptions -> Bool
$c/= :: GPUOptions -> GPUOptions -> Bool
== :: GPUOptions -> GPUOptions -> Bool
$c== :: GPUOptions -> GPUOptions -> Bool
Prelude.Eq, Eq GPUOptions
Eq GPUOptions =>
(GPUOptions -> GPUOptions -> Ordering)
-> (GPUOptions -> GPUOptions -> Bool)
-> (GPUOptions -> GPUOptions -> Bool)
-> (GPUOptions -> GPUOptions -> Bool)
-> (GPUOptions -> GPUOptions -> Bool)
-> (GPUOptions -> GPUOptions -> GPUOptions)
-> (GPUOptions -> GPUOptions -> GPUOptions)
-> Ord GPUOptions
GPUOptions -> GPUOptions -> Bool
GPUOptions -> GPUOptions -> Ordering
GPUOptions -> GPUOptions -> GPUOptions
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 :: GPUOptions -> GPUOptions -> GPUOptions
$cmin :: GPUOptions -> GPUOptions -> GPUOptions
max :: GPUOptions -> GPUOptions -> GPUOptions
$cmax :: GPUOptions -> GPUOptions -> GPUOptions
>= :: GPUOptions -> GPUOptions -> Bool
$c>= :: GPUOptions -> GPUOptions -> Bool
> :: GPUOptions -> GPUOptions -> Bool
$c> :: GPUOptions -> GPUOptions -> Bool
<= :: GPUOptions -> GPUOptions -> Bool
$c<= :: GPUOptions -> GPUOptions -> Bool
< :: GPUOptions -> GPUOptions -> Bool
$c< :: GPUOptions -> GPUOptions -> Bool
compare :: GPUOptions -> GPUOptions -> Ordering
$ccompare :: GPUOptions -> GPUOptions -> Ordering
$cp1Ord :: Eq GPUOptions
Prelude.Ord)
instance Prelude.Show GPUOptions where
  showsPrec :: Int -> GPUOptions -> ShowS
showsPrec _ __x :: GPUOptions
__x __s :: String
__s
    = Char -> ShowS
Prelude.showChar
        '{'
        (String -> ShowS
Prelude.showString
           (GPUOptions -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort GPUOptions
__x) (Char -> ShowS
Prelude.showChar '}' String
__s))
instance Data.ProtoLens.Field.HasField GPUOptions "perProcessGpuMemoryFraction" Prelude.Double where
  fieldOf :: Proxy# "perProcessGpuMemoryFraction"
-> (Double -> f Double) -> GPUOptions -> f GPUOptions
fieldOf _
    = ((Double -> f Double) -> GPUOptions -> f GPUOptions)
-> ((Double -> f Double) -> Double -> f Double)
-> (Double -> f Double)
-> GPUOptions
-> f GPUOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GPUOptions -> Double)
-> (GPUOptions -> Double -> GPUOptions)
-> Lens GPUOptions GPUOptions Double Double
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GPUOptions -> Double
_GPUOptions'perProcessGpuMemoryFraction
           (\ x__ :: GPUOptions
x__ y__ :: Double
y__ -> GPUOptions
x__ {_GPUOptions'perProcessGpuMemoryFraction :: Double
_GPUOptions'perProcessGpuMemoryFraction = Double
y__}))
        (Double -> f Double) -> Double -> f Double
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GPUOptions "allowGrowth" Prelude.Bool where
  fieldOf :: Proxy# "allowGrowth"
-> (Bool -> f Bool) -> GPUOptions -> f GPUOptions
fieldOf _
    = ((Bool -> f Bool) -> GPUOptions -> f GPUOptions)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> GPUOptions
-> f GPUOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GPUOptions -> Bool)
-> (GPUOptions -> Bool -> GPUOptions)
-> Lens GPUOptions GPUOptions Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GPUOptions -> Bool
_GPUOptions'allowGrowth
           (\ x__ :: GPUOptions
x__ y__ :: Bool
y__ -> GPUOptions
x__ {_GPUOptions'allowGrowth :: Bool
_GPUOptions'allowGrowth = Bool
y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GPUOptions "allocatorType" Data.Text.Text where
  fieldOf :: Proxy# "allocatorType"
-> (Text -> f Text) -> GPUOptions -> f GPUOptions
fieldOf _
    = ((Text -> f Text) -> GPUOptions -> f GPUOptions)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> GPUOptions
-> f GPUOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GPUOptions -> Text)
-> (GPUOptions -> Text -> GPUOptions)
-> Lens GPUOptions GPUOptions Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GPUOptions -> Text
_GPUOptions'allocatorType
           (\ x__ :: GPUOptions
x__ y__ :: Text
y__ -> GPUOptions
x__ {_GPUOptions'allocatorType :: Text
_GPUOptions'allocatorType = Text
y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GPUOptions "deferredDeletionBytes" Data.Int.Int64 where
  fieldOf :: Proxy# "deferredDeletionBytes"
-> (Int64 -> f Int64) -> GPUOptions -> f GPUOptions
fieldOf _
    = ((Int64 -> f Int64) -> GPUOptions -> f GPUOptions)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> GPUOptions
-> f GPUOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GPUOptions -> Int64)
-> (GPUOptions -> Int64 -> GPUOptions)
-> Lens GPUOptions GPUOptions Int64 Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GPUOptions -> Int64
_GPUOptions'deferredDeletionBytes
           (\ x__ :: GPUOptions
x__ y__ :: Int64
y__ -> GPUOptions
x__ {_GPUOptions'deferredDeletionBytes :: Int64
_GPUOptions'deferredDeletionBytes = Int64
y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GPUOptions "visibleDeviceList" Data.Text.Text where
  fieldOf :: Proxy# "visibleDeviceList"
-> (Text -> f Text) -> GPUOptions -> f GPUOptions
fieldOf _
    = ((Text -> f Text) -> GPUOptions -> f GPUOptions)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> GPUOptions
-> f GPUOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GPUOptions -> Text)
-> (GPUOptions -> Text -> GPUOptions)
-> Lens GPUOptions GPUOptions Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GPUOptions -> Text
_GPUOptions'visibleDeviceList
           (\ x__ :: GPUOptions
x__ y__ :: Text
y__ -> GPUOptions
x__ {_GPUOptions'visibleDeviceList :: Text
_GPUOptions'visibleDeviceList = Text
y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GPUOptions "pollingActiveDelayUsecs" Data.Int.Int32 where
  fieldOf :: Proxy# "pollingActiveDelayUsecs"
-> (Int32 -> f Int32) -> GPUOptions -> f GPUOptions
fieldOf _
    = ((Int32 -> f Int32) -> GPUOptions -> f GPUOptions)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> GPUOptions
-> f GPUOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GPUOptions -> Int32)
-> (GPUOptions -> Int32 -> GPUOptions)
-> Lens GPUOptions GPUOptions Int32 Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GPUOptions -> Int32
_GPUOptions'pollingActiveDelayUsecs
           (\ x__ :: GPUOptions
x__ y__ :: Int32
y__ -> GPUOptions
x__ {_GPUOptions'pollingActiveDelayUsecs :: Int32
_GPUOptions'pollingActiveDelayUsecs = Int32
y__}))
        (Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GPUOptions "pollingInactiveDelayMsecs" Data.Int.Int32 where
  fieldOf :: Proxy# "pollingInactiveDelayMsecs"
-> (Int32 -> f Int32) -> GPUOptions -> f GPUOptions
fieldOf _
    = ((Int32 -> f Int32) -> GPUOptions -> f GPUOptions)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> GPUOptions
-> f GPUOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GPUOptions -> Int32)
-> (GPUOptions -> Int32 -> GPUOptions)
-> Lens GPUOptions GPUOptions Int32 Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GPUOptions -> Int32
_GPUOptions'pollingInactiveDelayMsecs
           (\ x__ :: GPUOptions
x__ y__ :: Int32
y__ -> GPUOptions
x__ {_GPUOptions'pollingInactiveDelayMsecs :: Int32
_GPUOptions'pollingInactiveDelayMsecs = Int32
y__}))
        (Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GPUOptions "forceGpuCompatible" Prelude.Bool where
  fieldOf :: Proxy# "forceGpuCompatible"
-> (Bool -> f Bool) -> GPUOptions -> f GPUOptions
fieldOf _
    = ((Bool -> f Bool) -> GPUOptions -> f GPUOptions)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> GPUOptions
-> f GPUOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GPUOptions -> Bool)
-> (GPUOptions -> Bool -> GPUOptions)
-> Lens GPUOptions GPUOptions Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GPUOptions -> Bool
_GPUOptions'forceGpuCompatible
           (\ x__ :: GPUOptions
x__ y__ :: Bool
y__ -> GPUOptions
x__ {_GPUOptions'forceGpuCompatible :: Bool
_GPUOptions'forceGpuCompatible = Bool
y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GPUOptions "experimental" GPUOptions'Experimental where
  fieldOf :: Proxy# "experimental"
-> (GPUOptions'Experimental -> f GPUOptions'Experimental)
-> GPUOptions
-> f GPUOptions
fieldOf _
    = ((Maybe GPUOptions'Experimental
  -> f (Maybe GPUOptions'Experimental))
 -> GPUOptions -> f GPUOptions)
-> ((GPUOptions'Experimental -> f GPUOptions'Experimental)
    -> Maybe GPUOptions'Experimental
    -> f (Maybe GPUOptions'Experimental))
-> (GPUOptions'Experimental -> f GPUOptions'Experimental)
-> GPUOptions
-> f GPUOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GPUOptions -> Maybe GPUOptions'Experimental)
-> (GPUOptions -> Maybe GPUOptions'Experimental -> GPUOptions)
-> Lens
     GPUOptions
     GPUOptions
     (Maybe GPUOptions'Experimental)
     (Maybe GPUOptions'Experimental)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GPUOptions -> Maybe GPUOptions'Experimental
_GPUOptions'experimental
           (\ x__ :: GPUOptions
x__ y__ :: Maybe GPUOptions'Experimental
y__ -> GPUOptions
x__ {_GPUOptions'experimental :: Maybe GPUOptions'Experimental
_GPUOptions'experimental = Maybe GPUOptions'Experimental
y__}))
        (GPUOptions'Experimental
-> Lens' (Maybe GPUOptions'Experimental) GPUOptions'Experimental
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens GPUOptions'Experimental
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField GPUOptions "maybe'experimental" (Prelude.Maybe GPUOptions'Experimental) where
  fieldOf :: Proxy# "maybe'experimental"
-> (Maybe GPUOptions'Experimental
    -> f (Maybe GPUOptions'Experimental))
-> GPUOptions
-> f GPUOptions
fieldOf _
    = ((Maybe GPUOptions'Experimental
  -> f (Maybe GPUOptions'Experimental))
 -> GPUOptions -> f GPUOptions)
-> ((Maybe GPUOptions'Experimental
     -> f (Maybe GPUOptions'Experimental))
    -> Maybe GPUOptions'Experimental
    -> f (Maybe GPUOptions'Experimental))
-> (Maybe GPUOptions'Experimental
    -> f (Maybe GPUOptions'Experimental))
-> GPUOptions
-> f GPUOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GPUOptions -> Maybe GPUOptions'Experimental)
-> (GPUOptions -> Maybe GPUOptions'Experimental -> GPUOptions)
-> Lens
     GPUOptions
     GPUOptions
     (Maybe GPUOptions'Experimental)
     (Maybe GPUOptions'Experimental)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GPUOptions -> Maybe GPUOptions'Experimental
_GPUOptions'experimental
           (\ x__ :: GPUOptions
x__ y__ :: Maybe GPUOptions'Experimental
y__ -> GPUOptions
x__ {_GPUOptions'experimental :: Maybe GPUOptions'Experimental
_GPUOptions'experimental = Maybe GPUOptions'Experimental
y__}))
        (Maybe GPUOptions'Experimental
 -> f (Maybe GPUOptions'Experimental))
-> Maybe GPUOptions'Experimental
-> f (Maybe GPUOptions'Experimental)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message GPUOptions where
  messageName :: Proxy GPUOptions -> Text
messageName _ = String -> Text
Data.Text.pack "tensorflow.GPUOptions"
  packedMessageDescriptor :: Proxy GPUOptions -> ByteString
packedMessageDescriptor _
    = "\n\
      \\n\
      \GPUOptions\DC2D\n\
      \\USper_process_gpu_memory_fraction\CAN\SOH \SOH(\SOHR\ESCperProcessGpuMemoryFraction\DC2!\n\
      \\fallow_growth\CAN\EOT \SOH(\bR\vallowGrowth\DC2%\n\
      \\SOallocator_type\CAN\STX \SOH(\tR\rallocatorType\DC26\n\
      \\ETBdeferred_deletion_bytes\CAN\ETX \SOH(\ETXR\NAKdeferredDeletionBytes\DC2.\n\
      \\DC3visible_device_list\CAN\ENQ \SOH(\tR\DC1visibleDeviceList\DC2;\n\
      \\SUBpolling_active_delay_usecs\CAN\ACK \SOH(\ENQR\ETBpollingActiveDelayUsecs\DC2?\n\
      \\FSpolling_inactive_delay_msecs\CAN\a \SOH(\ENQR\EMpollingInactiveDelayMsecs\DC20\n\
      \\DC4force_gpu_compatible\CAN\b \SOH(\bR\DC2forceGpuCompatible\DC2G\n\
      \\fexperimental\CAN\t \SOH(\v2#.tensorflow.GPUOptions.ExperimentalR\fexperimental\SUB\202\EOT\n\
      \\fExperimental\DC2[\n\
      \\SIvirtual_devices\CAN\SOH \ETX(\v22.tensorflow.GPUOptions.Experimental.VirtualDevicesR\SOvirtualDevices\DC2,\n\
      \\DC2use_unified_memory\CAN\STX \SOH(\bR\DLEuseUnifiedMemory\DC2;\n\
      \\ESCnum_dev_to_dev_copy_streams\CAN\ETX \SOH(\ENQR\SYNnumDevToDevCopyStreams\DC22\n\
      \\NAKcollective_ring_order\CAN\EOT \SOH(\tR\DC3collectiveRingOrder\DC23\n\
      \\NAKtimestamped_allocator\CAN\ENQ \SOH(\bR\DC4timestampedAllocator\DC2=\n\
      \\ESCkernel_tracker_max_interval\CAN\a \SOH(\ENQR\CANkernelTrackerMaxInterval\DC27\n\
      \\CANkernel_tracker_max_bytes\CAN\b \SOH(\ENQR\NAKkernelTrackerMaxBytes\DC2;\n\
      \\SUBkernel_tracker_max_pending\CAN\t \SOH(\ENQR\ETBkernelTrackerMaxPending\SUBT\n\
      \\SOVirtualDevices\DC2&\n\
      \\SImemory_limit_mb\CAN\SOH \ETX(\STXR\rmemoryLimitMb\DC2\SUB\n\
      \\bpriority\CAN\STX \ETX(\ENQR\bpriority"
  packedFileDescriptor :: Proxy GPUOptions -> ByteString
packedFileDescriptor _ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor GPUOptions)
fieldsByTag
    = let
        perProcessGpuMemoryFraction__field_descriptor :: FieldDescriptor GPUOptions
perProcessGpuMemoryFraction__field_descriptor
          = String
-> FieldTypeDescriptor Double
-> FieldAccessor GPUOptions Double
-> FieldDescriptor GPUOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "per_process_gpu_memory_fraction"
              (ScalarField Double -> FieldTypeDescriptor Double
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Double
Data.ProtoLens.DoubleField ::
                 Data.ProtoLens.FieldTypeDescriptor Prelude.Double)
              (WireDefault Double
-> Lens GPUOptions GPUOptions Double Double
-> FieldAccessor GPUOptions Double
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Double
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "perProcessGpuMemoryFraction" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"perProcessGpuMemoryFraction")) ::
              Data.ProtoLens.FieldDescriptor GPUOptions
        allowGrowth__field_descriptor :: FieldDescriptor GPUOptions
allowGrowth__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor GPUOptions Bool
-> FieldDescriptor GPUOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "allow_growth"
              (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 GPUOptions GPUOptions Bool Bool
-> FieldAccessor GPUOptions 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 "allowGrowth" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"allowGrowth")) ::
              Data.ProtoLens.FieldDescriptor GPUOptions
        allocatorType__field_descriptor :: FieldDescriptor GPUOptions
allocatorType__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor GPUOptions Text
-> FieldDescriptor GPUOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "allocator_type"
              (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 GPUOptions GPUOptions Text Text
-> FieldAccessor GPUOptions 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 "allocatorType" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"allocatorType")) ::
              Data.ProtoLens.FieldDescriptor GPUOptions
        deferredDeletionBytes__field_descriptor :: FieldDescriptor GPUOptions
deferredDeletionBytes__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor GPUOptions Int64
-> FieldDescriptor GPUOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "deferred_deletion_bytes"
              (ScalarField Int64 -> FieldTypeDescriptor Int64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int64
Data.ProtoLens.Int64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64)
              (WireDefault Int64
-> Lens GPUOptions GPUOptions Int64 Int64
-> FieldAccessor GPUOptions Int64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "deferredDeletionBytes" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"deferredDeletionBytes")) ::
              Data.ProtoLens.FieldDescriptor GPUOptions
        visibleDeviceList__field_descriptor :: FieldDescriptor GPUOptions
visibleDeviceList__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor GPUOptions Text
-> FieldDescriptor GPUOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "visible_device_list"
              (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 GPUOptions GPUOptions Text Text
-> FieldAccessor GPUOptions 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 "visibleDeviceList" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"visibleDeviceList")) ::
              Data.ProtoLens.FieldDescriptor GPUOptions
        pollingActiveDelayUsecs__field_descriptor :: FieldDescriptor GPUOptions
pollingActiveDelayUsecs__field_descriptor
          = String
-> FieldTypeDescriptor Int32
-> FieldAccessor GPUOptions Int32
-> FieldDescriptor GPUOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "polling_active_delay_usecs"
              (ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.Int32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
              (WireDefault Int32
-> Lens GPUOptions GPUOptions Int32 Int32
-> FieldAccessor GPUOptions Int32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "pollingActiveDelayUsecs" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"pollingActiveDelayUsecs")) ::
              Data.ProtoLens.FieldDescriptor GPUOptions
        pollingInactiveDelayMsecs__field_descriptor :: FieldDescriptor GPUOptions
pollingInactiveDelayMsecs__field_descriptor
          = String
-> FieldTypeDescriptor Int32
-> FieldAccessor GPUOptions Int32
-> FieldDescriptor GPUOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "polling_inactive_delay_msecs"
              (ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.Int32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
              (WireDefault Int32
-> Lens GPUOptions GPUOptions Int32 Int32
-> FieldAccessor GPUOptions Int32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "pollingInactiveDelayMsecs" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"pollingInactiveDelayMsecs")) ::
              Data.ProtoLens.FieldDescriptor GPUOptions
        forceGpuCompatible__field_descriptor :: FieldDescriptor GPUOptions
forceGpuCompatible__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor GPUOptions Bool
-> FieldDescriptor GPUOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "force_gpu_compatible"
              (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 GPUOptions GPUOptions Bool Bool
-> FieldAccessor GPUOptions 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 "forceGpuCompatible" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"forceGpuCompatible")) ::
              Data.ProtoLens.FieldDescriptor GPUOptions
        experimental__field_descriptor :: FieldDescriptor GPUOptions
experimental__field_descriptor
          = String
-> FieldTypeDescriptor GPUOptions'Experimental
-> FieldAccessor GPUOptions GPUOptions'Experimental
-> FieldDescriptor GPUOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "experimental"
              (MessageOrGroup -> FieldTypeDescriptor GPUOptions'Experimental
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor GPUOptions'Experimental)
              (Lens
  GPUOptions
  GPUOptions
  (Maybe GPUOptions'Experimental)
  (Maybe GPUOptions'Experimental)
-> FieldAccessor GPUOptions GPUOptions'Experimental
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall s a (f :: * -> *).
(HasField s "maybe'experimental" a, Functor f) =>
(a -> f a) -> s -> 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'experimental")) ::
              Data.ProtoLens.FieldDescriptor GPUOptions
      in
        [(Tag, FieldDescriptor GPUOptions)]
-> Map Tag (FieldDescriptor GPUOptions)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag 1, 
            FieldDescriptor GPUOptions
perProcessGpuMemoryFraction__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 4, FieldDescriptor GPUOptions
allowGrowth__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 2, FieldDescriptor GPUOptions
allocatorType__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 3, FieldDescriptor GPUOptions
deferredDeletionBytes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 5, FieldDescriptor GPUOptions
visibleDeviceList__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 6, FieldDescriptor GPUOptions
pollingActiveDelayUsecs__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 7, 
            FieldDescriptor GPUOptions
pollingInactiveDelayMsecs__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 8, FieldDescriptor GPUOptions
forceGpuCompatible__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 9, FieldDescriptor GPUOptions
experimental__field_descriptor)]
  unknownFields :: LensLike' f GPUOptions FieldSet
unknownFields
    = (GPUOptions -> FieldSet)
-> (GPUOptions -> FieldSet -> GPUOptions)
-> Lens' GPUOptions FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        GPUOptions -> FieldSet
_GPUOptions'_unknownFields
        (\ x__ :: GPUOptions
x__ y__ :: FieldSet
y__ -> GPUOptions
x__ {_GPUOptions'_unknownFields :: FieldSet
_GPUOptions'_unknownFields = FieldSet
y__})
  defMessage :: GPUOptions
defMessage
    = $WGPUOptions'_constructor :: Double
-> Bool
-> Text
-> Int64
-> Text
-> Int32
-> Int32
-> Bool
-> Maybe GPUOptions'Experimental
-> FieldSet
-> GPUOptions
GPUOptions'_constructor
        {_GPUOptions'perProcessGpuMemoryFraction :: Double
_GPUOptions'perProcessGpuMemoryFraction = Double
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GPUOptions'allowGrowth :: Bool
_GPUOptions'allowGrowth = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GPUOptions'allocatorType :: Text
_GPUOptions'allocatorType = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GPUOptions'deferredDeletionBytes :: Int64
_GPUOptions'deferredDeletionBytes = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GPUOptions'visibleDeviceList :: Text
_GPUOptions'visibleDeviceList = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GPUOptions'pollingActiveDelayUsecs :: Int32
_GPUOptions'pollingActiveDelayUsecs = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GPUOptions'pollingInactiveDelayMsecs :: Int32
_GPUOptions'pollingInactiveDelayMsecs = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GPUOptions'forceGpuCompatible :: Bool
_GPUOptions'forceGpuCompatible = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GPUOptions'experimental :: Maybe GPUOptions'Experimental
_GPUOptions'experimental = Maybe GPUOptions'Experimental
forall a. Maybe a
Prelude.Nothing,
         _GPUOptions'_unknownFields :: FieldSet
_GPUOptions'_unknownFields = []}
  parseMessage :: Parser GPUOptions
parseMessage
    = let
        loop ::
          GPUOptions -> Data.ProtoLens.Encoding.Bytes.Parser GPUOptions
        loop :: GPUOptions -> Parser GPUOptions
loop x :: GPUOptions
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]))))
                      GPUOptions -> Parser GPUOptions
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter GPUOptions GPUOptions FieldSet FieldSet
-> (FieldSet -> FieldSet) -> GPUOptions -> GPUOptions
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 GPUOptions GPUOptions FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) GPUOptions
x)
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        9 -> do Double
y <- Parser Double -> String -> Parser Double
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Double) -> Parser Word64 -> Parser Double
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Double
Data.ProtoLens.Encoding.Bytes.wordToDouble
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getFixed64)
                                       "per_process_gpu_memory_fraction"
                                GPUOptions -> Parser GPUOptions
loop
                                  (Setter GPUOptions GPUOptions Double Double
-> Double -> GPUOptions -> GPUOptions
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "perProcessGpuMemoryFraction" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"perProcessGpuMemoryFraction")
                                     Double
y
                                     GPUOptions
x)
                        32
                          -> 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)
                                       "allow_growth"
                                GPUOptions -> Parser GPUOptions
loop
                                  (Setter GPUOptions GPUOptions Bool Bool
-> Bool -> GPUOptions -> GPUOptions
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "allowGrowth" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"allowGrowth") Bool
y GPUOptions
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))
                                       "allocator_type"
                                GPUOptions -> Parser GPUOptions
loop
                                  (Setter GPUOptions GPUOptions Text Text
-> Text -> GPUOptions -> GPUOptions
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "allocatorType" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"allocatorType") Text
y GPUOptions
x)
                        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)
                                       "deferred_deletion_bytes"
                                GPUOptions -> Parser GPUOptions
loop
                                  (Setter GPUOptions GPUOptions Int64 Int64
-> Int64 -> GPUOptions -> GPUOptions
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "deferredDeletionBytes" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"deferredDeletionBytes") Int64
y GPUOptions
x)
                        42
                          -> do Text
y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do ByteString
value <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                       Int -> Parser ByteString
Data.ProtoLens.Encoding.Bytes.getBytes
                                                         (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
                                           Either String Text -> Parser Text
forall a. Either String a -> Parser a
Data.ProtoLens.Encoding.Bytes.runEither
                                             (case ByteString -> Either UnicodeException Text
Data.Text.Encoding.decodeUtf8' ByteString
value of
                                                (Prelude.Left err :: UnicodeException
err)
                                                  -> String -> Either String Text
forall a b. a -> Either a b
Prelude.Left (UnicodeException -> String
forall a. Show a => a -> String
Prelude.show UnicodeException
err)
                                                (Prelude.Right r :: Text
r) -> Text -> Either String Text
forall a b. b -> Either a b
Prelude.Right Text
r))
                                       "visible_device_list"
                                GPUOptions -> Parser GPUOptions
loop
                                  (Setter GPUOptions GPUOptions Text Text
-> Text -> GPUOptions -> GPUOptions
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "visibleDeviceList" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"visibleDeviceList") Text
y GPUOptions
x)
                        48
                          -> do Int32
y <- Parser Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int32) -> Parser Word64 -> Parser Int32
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       "polling_active_delay_usecs"
                                GPUOptions -> Parser GPUOptions
loop
                                  (Setter GPUOptions GPUOptions Int32 Int32
-> Int32 -> GPUOptions -> GPUOptions
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "pollingActiveDelayUsecs" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"pollingActiveDelayUsecs") Int32
y GPUOptions
x)
                        56
                          -> do Int32
y <- Parser Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int32) -> Parser Word64 -> Parser Int32
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       "polling_inactive_delay_msecs"
                                GPUOptions -> Parser GPUOptions
loop
                                  (Setter GPUOptions GPUOptions Int32 Int32
-> Int32 -> GPUOptions -> GPUOptions
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "pollingInactiveDelayMsecs" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"pollingInactiveDelayMsecs") Int32
y GPUOptions
x)
                        64
                          -> 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)
                                       "force_gpu_compatible"
                                GPUOptions -> Parser GPUOptions
loop
                                  (Setter GPUOptions GPUOptions Bool Bool
-> Bool -> GPUOptions -> GPUOptions
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "forceGpuCompatible" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"forceGpuCompatible") Bool
y GPUOptions
x)
                        74
                          -> do GPUOptions'Experimental
y <- Parser GPUOptions'Experimental
-> String -> Parser GPUOptions'Experimental
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int
-> Parser GPUOptions'Experimental -> Parser GPUOptions'Experimental
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 GPUOptions'Experimental
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       "experimental"
                                GPUOptions -> Parser GPUOptions
loop
                                  (Setter
  GPUOptions
  GPUOptions
  GPUOptions'Experimental
  GPUOptions'Experimental
-> GPUOptions'Experimental -> GPUOptions -> GPUOptions
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "experimental" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"experimental") GPUOptions'Experimental
y GPUOptions
x)
                        wire :: Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                GPUOptions -> Parser GPUOptions
loop
                                  (Setter GPUOptions GPUOptions FieldSet FieldSet
-> (FieldSet -> FieldSet) -> GPUOptions -> GPUOptions
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 GPUOptions GPUOptions FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) GPUOptions
x)
      in
        Parser GPUOptions -> String -> Parser GPUOptions
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do GPUOptions -> Parser GPUOptions
loop GPUOptions
forall msg. Message msg => msg
Data.ProtoLens.defMessage) "GPUOptions"
  buildMessage :: GPUOptions -> Builder
buildMessage
    = \ _x :: GPUOptions
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Double
_v
                  = FoldLike Double GPUOptions GPUOptions Double Double
-> GPUOptions -> Double
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                      (forall s a (f :: * -> *).
(HasField s "perProcessGpuMemoryFraction" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"perProcessGpuMemoryFraction") GPUOptions
_x
              in
                if Double -> Double -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Double
_v Double
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 9)
                      ((Word64 -> Builder) -> (Double -> Word64) -> Double -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                         Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putFixed64
                         Double -> Word64
Data.ProtoLens.Encoding.Bytes.doubleToWord
                         Double
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   _v :: Bool
_v
                     = FoldLike Bool GPUOptions GPUOptions Bool Bool -> GPUOptions -> Bool
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "allowGrowth" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"allowGrowth") GPUOptions
_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 32)
                         ((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 :: Text
_v
                        = FoldLike Text GPUOptions GPUOptions Text Text -> GPUOptions -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                            (forall s a (f :: * -> *).
(HasField s "allocatorType" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"allocatorType") GPUOptions
_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 :: Int64
_v
                           = FoldLike Int64 GPUOptions GPUOptions Int64 Int64
-> GPUOptions -> Int64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                               (forall s a (f :: * -> *).
(HasField s "deferredDeletionBytes" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"deferredDeletionBytes") GPUOptions
_x
                       in
                         if Int64 -> Int64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int64
_v Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                             Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         else
                             Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 24)
                               ((Word64 -> Builder) -> (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 Int64
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (let
                            _v :: Text
_v
                              = FoldLike Text GPUOptions GPUOptions Text Text -> GPUOptions -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                  (forall s a (f :: * -> *).
(HasField s "visibleDeviceList" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"visibleDeviceList") GPUOptions
_x
                          in
                            if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            else
                                Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 42)
                                  ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                     (\ bs :: ByteString
bs
                                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                             (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                     Text -> ByteString
Data.Text.Encoding.encodeUtf8
                                     Text
_v))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (let
                               _v :: Int32
_v
                                 = FoldLike Int32 GPUOptions GPUOptions Int32 Int32
-> GPUOptions -> Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                     (forall s a (f :: * -> *).
(HasField s "pollingActiveDelayUsecs" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"pollingActiveDelayUsecs") GPUOptions
_x
                             in
                               if Int32 -> Int32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int32
_v Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                   Builder
forall a. Monoid a => a
Data.Monoid.mempty
                               else
                                   Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 48)
                                     ((Word64 -> Builder) -> (Int32 -> Word64) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                        Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        Int32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                        Int32
_v))
                            (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (let
                                  _v :: Int32
_v
                                    = FoldLike Int32 GPUOptions GPUOptions Int32 Int32
-> GPUOptions -> Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                        (forall s a (f :: * -> *).
(HasField s "pollingInactiveDelayMsecs" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"pollingInactiveDelayMsecs") GPUOptions
_x
                                in
                                  if Int32 -> Int32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int32
_v Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                      Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                  else
                                      Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 56)
                                        ((Word64 -> Builder) -> (Int32 -> Word64) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                           Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                           Int32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                           Int32
_v))
                               (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (let
                                     _v :: Bool
_v
                                       = FoldLike Bool GPUOptions GPUOptions Bool Bool -> GPUOptions -> Bool
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                           (forall s a (f :: * -> *).
(HasField s "forceGpuCompatible" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"forceGpuCompatible") GPUOptions
_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 64)
                                           ((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.<>)
                                     (case
                                          FoldLike
  (Maybe GPUOptions'Experimental)
  GPUOptions
  GPUOptions
  (Maybe GPUOptions'Experimental)
  (Maybe GPUOptions'Experimental)
-> GPUOptions -> Maybe GPUOptions'Experimental
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                            (forall s a (f :: * -> *).
(HasField s "maybe'experimental" a, Functor f) =>
(a -> f a) -> s -> 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'experimental") GPUOptions
_x
                                      of
                                        Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                        (Prelude.Just _v :: GPUOptions'Experimental
_v)
                                          -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 74)
                                               ((ByteString -> Builder)
-> (GPUOptions'Experimental -> ByteString)
-> GPUOptions'Experimental
-> 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))
                                                  GPUOptions'Experimental -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                                  GPUOptions'Experimental
_v))
                                     (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                        (FoldLike FieldSet GPUOptions GPUOptions FieldSet FieldSet
-> GPUOptions -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet GPUOptions GPUOptions FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields GPUOptions
_x))))))))))
instance Control.DeepSeq.NFData GPUOptions where
  rnf :: GPUOptions -> ()
rnf
    = \ x__ :: GPUOptions
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (GPUOptions -> FieldSet
_GPUOptions'_unknownFields GPUOptions
x__)
             (Double -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (GPUOptions -> Double
_GPUOptions'perProcessGpuMemoryFraction GPUOptions
x__)
                (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (GPUOptions -> Bool
_GPUOptions'allowGrowth GPUOptions
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (GPUOptions -> Text
_GPUOptions'allocatorType GPUOptions
x__)
                      (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (GPUOptions -> Int64
_GPUOptions'deferredDeletionBytes GPUOptions
x__)
                         (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (GPUOptions -> Text
_GPUOptions'visibleDeviceList GPUOptions
x__)
                            (Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (GPUOptions -> Int32
_GPUOptions'pollingActiveDelayUsecs GPUOptions
x__)
                               (Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (GPUOptions -> Int32
_GPUOptions'pollingInactiveDelayMsecs GPUOptions
x__)
                                  (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                     (GPUOptions -> Bool
_GPUOptions'forceGpuCompatible GPUOptions
x__)
                                     (Maybe GPUOptions'Experimental -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                        (GPUOptions -> Maybe GPUOptions'Experimental
_GPUOptions'experimental GPUOptions
x__) ())))))))))
{- | Fields :
     
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.virtualDevices' @:: Lens' GPUOptions'Experimental [GPUOptions'Experimental'VirtualDevices]@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.vec'virtualDevices' @:: Lens' GPUOptions'Experimental (Data.Vector.Vector GPUOptions'Experimental'VirtualDevices)@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.useUnifiedMemory' @:: Lens' GPUOptions'Experimental Prelude.Bool@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.numDevToDevCopyStreams' @:: Lens' GPUOptions'Experimental Data.Int.Int32@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.collectiveRingOrder' @:: Lens' GPUOptions'Experimental Data.Text.Text@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.timestampedAllocator' @:: Lens' GPUOptions'Experimental Prelude.Bool@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.kernelTrackerMaxInterval' @:: Lens' GPUOptions'Experimental Data.Int.Int32@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.kernelTrackerMaxBytes' @:: Lens' GPUOptions'Experimental Data.Int.Int32@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.kernelTrackerMaxPending' @:: Lens' GPUOptions'Experimental Data.Int.Int32@ -}
data GPUOptions'Experimental
  = GPUOptions'Experimental'_constructor {GPUOptions'Experimental
-> Vector GPUOptions'Experimental'VirtualDevices
_GPUOptions'Experimental'virtualDevices :: !(Data.Vector.Vector GPUOptions'Experimental'VirtualDevices),
                                          GPUOptions'Experimental -> Bool
_GPUOptions'Experimental'useUnifiedMemory :: !Prelude.Bool,
                                          GPUOptions'Experimental -> Int32
_GPUOptions'Experimental'numDevToDevCopyStreams :: !Data.Int.Int32,
                                          GPUOptions'Experimental -> Text
_GPUOptions'Experimental'collectiveRingOrder :: !Data.Text.Text,
                                          GPUOptions'Experimental -> Bool
_GPUOptions'Experimental'timestampedAllocator :: !Prelude.Bool,
                                          GPUOptions'Experimental -> Int32
_GPUOptions'Experimental'kernelTrackerMaxInterval :: !Data.Int.Int32,
                                          GPUOptions'Experimental -> Int32
_GPUOptions'Experimental'kernelTrackerMaxBytes :: !Data.Int.Int32,
                                          GPUOptions'Experimental -> Int32
_GPUOptions'Experimental'kernelTrackerMaxPending :: !Data.Int.Int32,
                                          GPUOptions'Experimental -> FieldSet
_GPUOptions'Experimental'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (GPUOptions'Experimental -> GPUOptions'Experimental -> Bool
(GPUOptions'Experimental -> GPUOptions'Experimental -> Bool)
-> (GPUOptions'Experimental -> GPUOptions'Experimental -> Bool)
-> Eq GPUOptions'Experimental
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GPUOptions'Experimental -> GPUOptions'Experimental -> Bool
$c/= :: GPUOptions'Experimental -> GPUOptions'Experimental -> Bool
== :: GPUOptions'Experimental -> GPUOptions'Experimental -> Bool
$c== :: GPUOptions'Experimental -> GPUOptions'Experimental -> Bool
Prelude.Eq, Eq GPUOptions'Experimental
Eq GPUOptions'Experimental =>
(GPUOptions'Experimental -> GPUOptions'Experimental -> Ordering)
-> (GPUOptions'Experimental -> GPUOptions'Experimental -> Bool)
-> (GPUOptions'Experimental -> GPUOptions'Experimental -> Bool)
-> (GPUOptions'Experimental -> GPUOptions'Experimental -> Bool)
-> (GPUOptions'Experimental -> GPUOptions'Experimental -> Bool)
-> (GPUOptions'Experimental
    -> GPUOptions'Experimental -> GPUOptions'Experimental)
-> (GPUOptions'Experimental
    -> GPUOptions'Experimental -> GPUOptions'Experimental)
-> Ord GPUOptions'Experimental
GPUOptions'Experimental -> GPUOptions'Experimental -> Bool
GPUOptions'Experimental -> GPUOptions'Experimental -> Ordering
GPUOptions'Experimental
-> GPUOptions'Experimental -> GPUOptions'Experimental
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 :: GPUOptions'Experimental
-> GPUOptions'Experimental -> GPUOptions'Experimental
$cmin :: GPUOptions'Experimental
-> GPUOptions'Experimental -> GPUOptions'Experimental
max :: GPUOptions'Experimental
-> GPUOptions'Experimental -> GPUOptions'Experimental
$cmax :: GPUOptions'Experimental
-> GPUOptions'Experimental -> GPUOptions'Experimental
>= :: GPUOptions'Experimental -> GPUOptions'Experimental -> Bool
$c>= :: GPUOptions'Experimental -> GPUOptions'Experimental -> Bool
> :: GPUOptions'Experimental -> GPUOptions'Experimental -> Bool
$c> :: GPUOptions'Experimental -> GPUOptions'Experimental -> Bool
<= :: GPUOptions'Experimental -> GPUOptions'Experimental -> Bool
$c<= :: GPUOptions'Experimental -> GPUOptions'Experimental -> Bool
< :: GPUOptions'Experimental -> GPUOptions'Experimental -> Bool
$c< :: GPUOptions'Experimental -> GPUOptions'Experimental -> Bool
compare :: GPUOptions'Experimental -> GPUOptions'Experimental -> Ordering
$ccompare :: GPUOptions'Experimental -> GPUOptions'Experimental -> Ordering
$cp1Ord :: Eq GPUOptions'Experimental
Prelude.Ord)
instance Prelude.Show GPUOptions'Experimental where
  showsPrec :: Int -> GPUOptions'Experimental -> ShowS
showsPrec _ __x :: GPUOptions'Experimental
__x __s :: String
__s
    = Char -> ShowS
Prelude.showChar
        '{'
        (String -> ShowS
Prelude.showString
           (GPUOptions'Experimental -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort GPUOptions'Experimental
__x) (Char -> ShowS
Prelude.showChar '}' String
__s))
instance Data.ProtoLens.Field.HasField GPUOptions'Experimental "virtualDevices" [GPUOptions'Experimental'VirtualDevices] where
  fieldOf :: Proxy# "virtualDevices"
-> ([GPUOptions'Experimental'VirtualDevices]
    -> f [GPUOptions'Experimental'VirtualDevices])
-> GPUOptions'Experimental
-> f GPUOptions'Experimental
fieldOf _
    = ((Vector GPUOptions'Experimental'VirtualDevices
  -> f (Vector GPUOptions'Experimental'VirtualDevices))
 -> GPUOptions'Experimental -> f GPUOptions'Experimental)
-> (([GPUOptions'Experimental'VirtualDevices]
     -> f [GPUOptions'Experimental'VirtualDevices])
    -> Vector GPUOptions'Experimental'VirtualDevices
    -> f (Vector GPUOptions'Experimental'VirtualDevices))
-> ([GPUOptions'Experimental'VirtualDevices]
    -> f [GPUOptions'Experimental'VirtualDevices])
-> GPUOptions'Experimental
-> f GPUOptions'Experimental
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GPUOptions'Experimental
 -> Vector GPUOptions'Experimental'VirtualDevices)
-> (GPUOptions'Experimental
    -> Vector GPUOptions'Experimental'VirtualDevices
    -> GPUOptions'Experimental)
-> Lens
     GPUOptions'Experimental
     GPUOptions'Experimental
     (Vector GPUOptions'Experimental'VirtualDevices)
     (Vector GPUOptions'Experimental'VirtualDevices)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GPUOptions'Experimental
-> Vector GPUOptions'Experimental'VirtualDevices
_GPUOptions'Experimental'virtualDevices
           (\ x__ :: GPUOptions'Experimental
x__ y__ :: Vector GPUOptions'Experimental'VirtualDevices
y__ -> GPUOptions'Experimental
x__ {_GPUOptions'Experimental'virtualDevices :: Vector GPUOptions'Experimental'VirtualDevices
_GPUOptions'Experimental'virtualDevices = Vector GPUOptions'Experimental'VirtualDevices
y__}))
        ((Vector GPUOptions'Experimental'VirtualDevices
 -> [GPUOptions'Experimental'VirtualDevices])
-> (Vector GPUOptions'Experimental'VirtualDevices
    -> [GPUOptions'Experimental'VirtualDevices]
    -> Vector GPUOptions'Experimental'VirtualDevices)
-> Lens
     (Vector GPUOptions'Experimental'VirtualDevices)
     (Vector GPUOptions'Experimental'VirtualDevices)
     [GPUOptions'Experimental'VirtualDevices]
     [GPUOptions'Experimental'VirtualDevices]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector GPUOptions'Experimental'VirtualDevices
-> [GPUOptions'Experimental'VirtualDevices]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ _ y__ :: [GPUOptions'Experimental'VirtualDevices]
y__ -> [GPUOptions'Experimental'VirtualDevices]
-> Vector GPUOptions'Experimental'VirtualDevices
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [GPUOptions'Experimental'VirtualDevices]
y__))
instance Data.ProtoLens.Field.HasField GPUOptions'Experimental "vec'virtualDevices" (Data.Vector.Vector GPUOptions'Experimental'VirtualDevices) where
  fieldOf :: Proxy# "vec'virtualDevices"
-> (Vector GPUOptions'Experimental'VirtualDevices
    -> f (Vector GPUOptions'Experimental'VirtualDevices))
-> GPUOptions'Experimental
-> f GPUOptions'Experimental
fieldOf _
    = ((Vector GPUOptions'Experimental'VirtualDevices
  -> f (Vector GPUOptions'Experimental'VirtualDevices))
 -> GPUOptions'Experimental -> f GPUOptions'Experimental)
-> ((Vector GPUOptions'Experimental'VirtualDevices
     -> f (Vector GPUOptions'Experimental'VirtualDevices))
    -> Vector GPUOptions'Experimental'VirtualDevices
    -> f (Vector GPUOptions'Experimental'VirtualDevices))
-> (Vector GPUOptions'Experimental'VirtualDevices
    -> f (Vector GPUOptions'Experimental'VirtualDevices))
-> GPUOptions'Experimental
-> f GPUOptions'Experimental
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GPUOptions'Experimental
 -> Vector GPUOptions'Experimental'VirtualDevices)
-> (GPUOptions'Experimental
    -> Vector GPUOptions'Experimental'VirtualDevices
    -> GPUOptions'Experimental)
-> Lens
     GPUOptions'Experimental
     GPUOptions'Experimental
     (Vector GPUOptions'Experimental'VirtualDevices)
     (Vector GPUOptions'Experimental'VirtualDevices)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GPUOptions'Experimental
-> Vector GPUOptions'Experimental'VirtualDevices
_GPUOptions'Experimental'virtualDevices
           (\ x__ :: GPUOptions'Experimental
x__ y__ :: Vector GPUOptions'Experimental'VirtualDevices
y__ -> GPUOptions'Experimental
x__ {_GPUOptions'Experimental'virtualDevices :: Vector GPUOptions'Experimental'VirtualDevices
_GPUOptions'Experimental'virtualDevices = Vector GPUOptions'Experimental'VirtualDevices
y__}))
        (Vector GPUOptions'Experimental'VirtualDevices
 -> f (Vector GPUOptions'Experimental'VirtualDevices))
-> Vector GPUOptions'Experimental'VirtualDevices
-> f (Vector GPUOptions'Experimental'VirtualDevices)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GPUOptions'Experimental "useUnifiedMemory" Prelude.Bool where
  fieldOf :: Proxy# "useUnifiedMemory"
-> (Bool -> f Bool)
-> GPUOptions'Experimental
-> f GPUOptions'Experimental
fieldOf _
    = ((Bool -> f Bool)
 -> GPUOptions'Experimental -> f GPUOptions'Experimental)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> GPUOptions'Experimental
-> f GPUOptions'Experimental
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GPUOptions'Experimental -> Bool)
-> (GPUOptions'Experimental -> Bool -> GPUOptions'Experimental)
-> Lens GPUOptions'Experimental GPUOptions'Experimental Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GPUOptions'Experimental -> Bool
_GPUOptions'Experimental'useUnifiedMemory
           (\ x__ :: GPUOptions'Experimental
x__ y__ :: Bool
y__
              -> GPUOptions'Experimental
x__ {_GPUOptions'Experimental'useUnifiedMemory :: Bool
_GPUOptions'Experimental'useUnifiedMemory = Bool
y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GPUOptions'Experimental "numDevToDevCopyStreams" Data.Int.Int32 where
  fieldOf :: Proxy# "numDevToDevCopyStreams"
-> (Int32 -> f Int32)
-> GPUOptions'Experimental
-> f GPUOptions'Experimental
fieldOf _
    = ((Int32 -> f Int32)
 -> GPUOptions'Experimental -> f GPUOptions'Experimental)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> GPUOptions'Experimental
-> f GPUOptions'Experimental
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GPUOptions'Experimental -> Int32)
-> (GPUOptions'Experimental -> Int32 -> GPUOptions'Experimental)
-> Lens GPUOptions'Experimental GPUOptions'Experimental Int32 Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GPUOptions'Experimental -> Int32
_GPUOptions'Experimental'numDevToDevCopyStreams
           (\ x__ :: GPUOptions'Experimental
x__ y__ :: Int32
y__
              -> GPUOptions'Experimental
x__ {_GPUOptions'Experimental'numDevToDevCopyStreams :: Int32
_GPUOptions'Experimental'numDevToDevCopyStreams = Int32
y__}))
        (Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GPUOptions'Experimental "collectiveRingOrder" Data.Text.Text where
  fieldOf :: Proxy# "collectiveRingOrder"
-> (Text -> f Text)
-> GPUOptions'Experimental
-> f GPUOptions'Experimental
fieldOf _
    = ((Text -> f Text)
 -> GPUOptions'Experimental -> f GPUOptions'Experimental)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> GPUOptions'Experimental
-> f GPUOptions'Experimental
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GPUOptions'Experimental -> Text)
-> (GPUOptions'Experimental -> Text -> GPUOptions'Experimental)
-> Lens GPUOptions'Experimental GPUOptions'Experimental Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GPUOptions'Experimental -> Text
_GPUOptions'Experimental'collectiveRingOrder
           (\ x__ :: GPUOptions'Experimental
x__ y__ :: Text
y__
              -> GPUOptions'Experimental
x__ {_GPUOptions'Experimental'collectiveRingOrder :: Text
_GPUOptions'Experimental'collectiveRingOrder = Text
y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GPUOptions'Experimental "timestampedAllocator" Prelude.Bool where
  fieldOf :: Proxy# "timestampedAllocator"
-> (Bool -> f Bool)
-> GPUOptions'Experimental
-> f GPUOptions'Experimental
fieldOf _
    = ((Bool -> f Bool)
 -> GPUOptions'Experimental -> f GPUOptions'Experimental)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> GPUOptions'Experimental
-> f GPUOptions'Experimental
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GPUOptions'Experimental -> Bool)
-> (GPUOptions'Experimental -> Bool -> GPUOptions'Experimental)
-> Lens GPUOptions'Experimental GPUOptions'Experimental Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GPUOptions'Experimental -> Bool
_GPUOptions'Experimental'timestampedAllocator
           (\ x__ :: GPUOptions'Experimental
x__ y__ :: Bool
y__
              -> GPUOptions'Experimental
x__ {_GPUOptions'Experimental'timestampedAllocator :: Bool
_GPUOptions'Experimental'timestampedAllocator = Bool
y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GPUOptions'Experimental "kernelTrackerMaxInterval" Data.Int.Int32 where
  fieldOf :: Proxy# "kernelTrackerMaxInterval"
-> (Int32 -> f Int32)
-> GPUOptions'Experimental
-> f GPUOptions'Experimental
fieldOf _
    = ((Int32 -> f Int32)
 -> GPUOptions'Experimental -> f GPUOptions'Experimental)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> GPUOptions'Experimental
-> f GPUOptions'Experimental
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GPUOptions'Experimental -> Int32)
-> (GPUOptions'Experimental -> Int32 -> GPUOptions'Experimental)
-> Lens GPUOptions'Experimental GPUOptions'Experimental Int32 Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GPUOptions'Experimental -> Int32
_GPUOptions'Experimental'kernelTrackerMaxInterval
           (\ x__ :: GPUOptions'Experimental
x__ y__ :: Int32
y__
              -> GPUOptions'Experimental
x__ {_GPUOptions'Experimental'kernelTrackerMaxInterval :: Int32
_GPUOptions'Experimental'kernelTrackerMaxInterval = Int32
y__}))
        (Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GPUOptions'Experimental "kernelTrackerMaxBytes" Data.Int.Int32 where
  fieldOf :: Proxy# "kernelTrackerMaxBytes"
-> (Int32 -> f Int32)
-> GPUOptions'Experimental
-> f GPUOptions'Experimental
fieldOf _
    = ((Int32 -> f Int32)
 -> GPUOptions'Experimental -> f GPUOptions'Experimental)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> GPUOptions'Experimental
-> f GPUOptions'Experimental
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GPUOptions'Experimental -> Int32)
-> (GPUOptions'Experimental -> Int32 -> GPUOptions'Experimental)
-> Lens GPUOptions'Experimental GPUOptions'Experimental Int32 Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GPUOptions'Experimental -> Int32
_GPUOptions'Experimental'kernelTrackerMaxBytes
           (\ x__ :: GPUOptions'Experimental
x__ y__ :: Int32
y__
              -> GPUOptions'Experimental
x__ {_GPUOptions'Experimental'kernelTrackerMaxBytes :: Int32
_GPUOptions'Experimental'kernelTrackerMaxBytes = Int32
y__}))
        (Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GPUOptions'Experimental "kernelTrackerMaxPending" Data.Int.Int32 where
  fieldOf :: Proxy# "kernelTrackerMaxPending"
-> (Int32 -> f Int32)
-> GPUOptions'Experimental
-> f GPUOptions'Experimental
fieldOf _
    = ((Int32 -> f Int32)
 -> GPUOptions'Experimental -> f GPUOptions'Experimental)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> GPUOptions'Experimental
-> f GPUOptions'Experimental
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GPUOptions'Experimental -> Int32)
-> (GPUOptions'Experimental -> Int32 -> GPUOptions'Experimental)
-> Lens GPUOptions'Experimental GPUOptions'Experimental Int32 Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GPUOptions'Experimental -> Int32
_GPUOptions'Experimental'kernelTrackerMaxPending
           (\ x__ :: GPUOptions'Experimental
x__ y__ :: Int32
y__
              -> GPUOptions'Experimental
x__ {_GPUOptions'Experimental'kernelTrackerMaxPending :: Int32
_GPUOptions'Experimental'kernelTrackerMaxPending = Int32
y__}))
        (Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message GPUOptions'Experimental where
  messageName :: Proxy GPUOptions'Experimental -> Text
messageName _ = String -> Text
Data.Text.pack "tensorflow.GPUOptions.Experimental"
  packedMessageDescriptor :: Proxy GPUOptions'Experimental -> ByteString
packedMessageDescriptor _
    = "\n\
      \\fExperimental\DC2[\n\
      \\SIvirtual_devices\CAN\SOH \ETX(\v22.tensorflow.GPUOptions.Experimental.VirtualDevicesR\SOvirtualDevices\DC2,\n\
      \\DC2use_unified_memory\CAN\STX \SOH(\bR\DLEuseUnifiedMemory\DC2;\n\
      \\ESCnum_dev_to_dev_copy_streams\CAN\ETX \SOH(\ENQR\SYNnumDevToDevCopyStreams\DC22\n\
      \\NAKcollective_ring_order\CAN\EOT \SOH(\tR\DC3collectiveRingOrder\DC23\n\
      \\NAKtimestamped_allocator\CAN\ENQ \SOH(\bR\DC4timestampedAllocator\DC2=\n\
      \\ESCkernel_tracker_max_interval\CAN\a \SOH(\ENQR\CANkernelTrackerMaxInterval\DC27\n\
      \\CANkernel_tracker_max_bytes\CAN\b \SOH(\ENQR\NAKkernelTrackerMaxBytes\DC2;\n\
      \\SUBkernel_tracker_max_pending\CAN\t \SOH(\ENQR\ETBkernelTrackerMaxPending\SUBT\n\
      \\SOVirtualDevices\DC2&\n\
      \\SImemory_limit_mb\CAN\SOH \ETX(\STXR\rmemoryLimitMb\DC2\SUB\n\
      \\bpriority\CAN\STX \ETX(\ENQR\bpriority"
  packedFileDescriptor :: Proxy GPUOptions'Experimental -> ByteString
packedFileDescriptor _ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor GPUOptions'Experimental)
fieldsByTag
    = let
        virtualDevices__field_descriptor :: FieldDescriptor GPUOptions'Experimental
virtualDevices__field_descriptor
          = String
-> FieldTypeDescriptor GPUOptions'Experimental'VirtualDevices
-> FieldAccessor
     GPUOptions'Experimental GPUOptions'Experimental'VirtualDevices
-> FieldDescriptor GPUOptions'Experimental
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "virtual_devices"
              (MessageOrGroup
-> FieldTypeDescriptor GPUOptions'Experimental'VirtualDevices
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor GPUOptions'Experimental'VirtualDevices)
              (Packing
-> Lens'
     GPUOptions'Experimental [GPUOptions'Experimental'VirtualDevices]
-> FieldAccessor
     GPUOptions'Experimental GPUOptions'Experimental'VirtualDevices
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Unpacked
                 (forall s a (f :: * -> *).
(HasField s "virtualDevices" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"virtualDevices")) ::
              Data.ProtoLens.FieldDescriptor GPUOptions'Experimental
        useUnifiedMemory__field_descriptor :: FieldDescriptor GPUOptions'Experimental
useUnifiedMemory__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor GPUOptions'Experimental Bool
-> FieldDescriptor GPUOptions'Experimental
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "use_unified_memory"
              (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 GPUOptions'Experimental GPUOptions'Experimental Bool Bool
-> FieldAccessor GPUOptions'Experimental 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 "useUnifiedMemory" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"useUnifiedMemory")) ::
              Data.ProtoLens.FieldDescriptor GPUOptions'Experimental
        numDevToDevCopyStreams__field_descriptor :: FieldDescriptor GPUOptions'Experimental
numDevToDevCopyStreams__field_descriptor
          = String
-> FieldTypeDescriptor Int32
-> FieldAccessor GPUOptions'Experimental Int32
-> FieldDescriptor GPUOptions'Experimental
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "num_dev_to_dev_copy_streams"
              (ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.Int32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
              (WireDefault Int32
-> Lens GPUOptions'Experimental GPUOptions'Experimental Int32 Int32
-> FieldAccessor GPUOptions'Experimental Int32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "numDevToDevCopyStreams" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"numDevToDevCopyStreams")) ::
              Data.ProtoLens.FieldDescriptor GPUOptions'Experimental
        collectiveRingOrder__field_descriptor :: FieldDescriptor GPUOptions'Experimental
collectiveRingOrder__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor GPUOptions'Experimental Text
-> FieldDescriptor GPUOptions'Experimental
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "collective_ring_order"
              (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 GPUOptions'Experimental GPUOptions'Experimental Text Text
-> FieldAccessor GPUOptions'Experimental 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 "collectiveRingOrder" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"collectiveRingOrder")) ::
              Data.ProtoLens.FieldDescriptor GPUOptions'Experimental
        timestampedAllocator__field_descriptor :: FieldDescriptor GPUOptions'Experimental
timestampedAllocator__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor GPUOptions'Experimental Bool
-> FieldDescriptor GPUOptions'Experimental
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "timestamped_allocator"
              (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 GPUOptions'Experimental GPUOptions'Experimental Bool Bool
-> FieldAccessor GPUOptions'Experimental 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 "timestampedAllocator" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"timestampedAllocator")) ::
              Data.ProtoLens.FieldDescriptor GPUOptions'Experimental
        kernelTrackerMaxInterval__field_descriptor :: FieldDescriptor GPUOptions'Experimental
kernelTrackerMaxInterval__field_descriptor
          = String
-> FieldTypeDescriptor Int32
-> FieldAccessor GPUOptions'Experimental Int32
-> FieldDescriptor GPUOptions'Experimental
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "kernel_tracker_max_interval"
              (ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.Int32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
              (WireDefault Int32
-> Lens GPUOptions'Experimental GPUOptions'Experimental Int32 Int32
-> FieldAccessor GPUOptions'Experimental Int32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "kernelTrackerMaxInterval" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"kernelTrackerMaxInterval")) ::
              Data.ProtoLens.FieldDescriptor GPUOptions'Experimental
        kernelTrackerMaxBytes__field_descriptor :: FieldDescriptor GPUOptions'Experimental
kernelTrackerMaxBytes__field_descriptor
          = String
-> FieldTypeDescriptor Int32
-> FieldAccessor GPUOptions'Experimental Int32
-> FieldDescriptor GPUOptions'Experimental
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "kernel_tracker_max_bytes"
              (ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.Int32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
              (WireDefault Int32
-> Lens GPUOptions'Experimental GPUOptions'Experimental Int32 Int32
-> FieldAccessor GPUOptions'Experimental Int32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "kernelTrackerMaxBytes" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"kernelTrackerMaxBytes")) ::
              Data.ProtoLens.FieldDescriptor GPUOptions'Experimental
        kernelTrackerMaxPending__field_descriptor :: FieldDescriptor GPUOptions'Experimental
kernelTrackerMaxPending__field_descriptor
          = String
-> FieldTypeDescriptor Int32
-> FieldAccessor GPUOptions'Experimental Int32
-> FieldDescriptor GPUOptions'Experimental
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "kernel_tracker_max_pending"
              (ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.Int32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
              (WireDefault Int32
-> Lens GPUOptions'Experimental GPUOptions'Experimental Int32 Int32
-> FieldAccessor GPUOptions'Experimental Int32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "kernelTrackerMaxPending" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"kernelTrackerMaxPending")) ::
              Data.ProtoLens.FieldDescriptor GPUOptions'Experimental
      in
        [(Tag, FieldDescriptor GPUOptions'Experimental)]
-> Map Tag (FieldDescriptor GPUOptions'Experimental)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag 1, FieldDescriptor GPUOptions'Experimental
virtualDevices__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 2, FieldDescriptor GPUOptions'Experimental
useUnifiedMemory__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 3, FieldDescriptor GPUOptions'Experimental
numDevToDevCopyStreams__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 4, FieldDescriptor GPUOptions'Experimental
collectiveRingOrder__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 5, FieldDescriptor GPUOptions'Experimental
timestampedAllocator__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 7, FieldDescriptor GPUOptions'Experimental
kernelTrackerMaxInterval__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 8, FieldDescriptor GPUOptions'Experimental
kernelTrackerMaxBytes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 9, FieldDescriptor GPUOptions'Experimental
kernelTrackerMaxPending__field_descriptor)]
  unknownFields :: LensLike' f GPUOptions'Experimental FieldSet
unknownFields
    = (GPUOptions'Experimental -> FieldSet)
-> (GPUOptions'Experimental -> FieldSet -> GPUOptions'Experimental)
-> Lens' GPUOptions'Experimental FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        GPUOptions'Experimental -> FieldSet
_GPUOptions'Experimental'_unknownFields
        (\ x__ :: GPUOptions'Experimental
x__ y__ :: FieldSet
y__ -> GPUOptions'Experimental
x__ {_GPUOptions'Experimental'_unknownFields :: FieldSet
_GPUOptions'Experimental'_unknownFields = FieldSet
y__})
  defMessage :: GPUOptions'Experimental
defMessage
    = $WGPUOptions'Experimental'_constructor :: Vector GPUOptions'Experimental'VirtualDevices
-> Bool
-> Int32
-> Text
-> Bool
-> Int32
-> Int32
-> Int32
-> FieldSet
-> GPUOptions'Experimental
GPUOptions'Experimental'_constructor
        {_GPUOptions'Experimental'virtualDevices :: Vector GPUOptions'Experimental'VirtualDevices
_GPUOptions'Experimental'virtualDevices = Vector GPUOptions'Experimental'VirtualDevices
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _GPUOptions'Experimental'useUnifiedMemory :: Bool
_GPUOptions'Experimental'useUnifiedMemory = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GPUOptions'Experimental'numDevToDevCopyStreams :: Int32
_GPUOptions'Experimental'numDevToDevCopyStreams = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GPUOptions'Experimental'collectiveRingOrder :: Text
_GPUOptions'Experimental'collectiveRingOrder = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GPUOptions'Experimental'timestampedAllocator :: Bool
_GPUOptions'Experimental'timestampedAllocator = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GPUOptions'Experimental'kernelTrackerMaxInterval :: Int32
_GPUOptions'Experimental'kernelTrackerMaxInterval = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GPUOptions'Experimental'kernelTrackerMaxBytes :: Int32
_GPUOptions'Experimental'kernelTrackerMaxBytes = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GPUOptions'Experimental'kernelTrackerMaxPending :: Int32
_GPUOptions'Experimental'kernelTrackerMaxPending = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GPUOptions'Experimental'_unknownFields :: FieldSet
_GPUOptions'Experimental'_unknownFields = []}
  parseMessage :: Parser GPUOptions'Experimental
parseMessage
    = let
        loop ::
          GPUOptions'Experimental
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld GPUOptions'Experimental'VirtualDevices
             -> Data.ProtoLens.Encoding.Bytes.Parser GPUOptions'Experimental
        loop :: GPUOptions'Experimental
-> Growing Vector RealWorld GPUOptions'Experimental'VirtualDevices
-> Parser GPUOptions'Experimental
loop x :: GPUOptions'Experimental
x mutable'virtualDevices :: Growing Vector RealWorld GPUOptions'Experimental'VirtualDevices
mutable'virtualDevices
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do Vector GPUOptions'Experimental'VirtualDevices
frozen'virtualDevices <- IO (Vector GPUOptions'Experimental'VirtualDevices)
-> Parser (Vector GPUOptions'Experimental'VirtualDevices)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                 (Growing
  Vector (PrimState IO) GPUOptions'Experimental'VirtualDevices
-> IO (Vector GPUOptions'Experimental'VirtualDevices)
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 GPUOptions'Experimental'VirtualDevices
Growing
  Vector (PrimState IO) GPUOptions'Experimental'VirtualDevices
mutable'virtualDevices)
                      (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]))))
                      GPUOptions'Experimental -> Parser GPUOptions'Experimental
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter
  GPUOptions'Experimental GPUOptions'Experimental FieldSet FieldSet
-> (FieldSet -> FieldSet)
-> GPUOptions'Experimental
-> GPUOptions'Experimental
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
  GPUOptions'Experimental GPUOptions'Experimental FieldSet FieldSet
Data.ProtoLens.unknownFields
                           (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t)
                           (Setter
  GPUOptions'Experimental
  GPUOptions'Experimental
  (Vector GPUOptions'Experimental'VirtualDevices)
  (Vector GPUOptions'Experimental'VirtualDevices)
-> Vector GPUOptions'Experimental'VirtualDevices
-> GPUOptions'Experimental
-> GPUOptions'Experimental
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                              (forall s a (f :: * -> *).
(HasField s "vec'virtualDevices" a, Functor f) =>
(a -> f a) -> s -> 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'virtualDevices")
                              Vector GPUOptions'Experimental'VirtualDevices
frozen'virtualDevices
                              GPUOptions'Experimental
x))
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        10
                          -> do !GPUOptions'Experimental'VirtualDevices
y <- Parser GPUOptions'Experimental'VirtualDevices
-> String -> Parser GPUOptions'Experimental'VirtualDevices
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Int
-> Parser GPUOptions'Experimental'VirtualDevices
-> Parser GPUOptions'Experimental'VirtualDevices
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 GPUOptions'Experimental'VirtualDevices
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                        "virtual_devices"
                                Growing Vector RealWorld GPUOptions'Experimental'VirtualDevices
v <- IO
  (Growing Vector RealWorld GPUOptions'Experimental'VirtualDevices)
-> Parser
     (Growing Vector RealWorld GPUOptions'Experimental'VirtualDevices)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing
  Vector (PrimState IO) GPUOptions'Experimental'VirtualDevices
-> GPUOptions'Experimental'VirtualDevices
-> IO
     (Growing
        Vector (PrimState IO) GPUOptions'Experimental'VirtualDevices)
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 GPUOptions'Experimental'VirtualDevices
Growing
  Vector (PrimState IO) GPUOptions'Experimental'VirtualDevices
mutable'virtualDevices GPUOptions'Experimental'VirtualDevices
y)
                                GPUOptions'Experimental
-> Growing Vector RealWorld GPUOptions'Experimental'VirtualDevices
-> Parser GPUOptions'Experimental
loop GPUOptions'Experimental
x Growing Vector RealWorld GPUOptions'Experimental'VirtualDevices
v
                        16
                          -> 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)
                                       "use_unified_memory"
                                GPUOptions'Experimental
-> Growing Vector RealWorld GPUOptions'Experimental'VirtualDevices
-> Parser GPUOptions'Experimental
loop
                                  (Setter GPUOptions'Experimental GPUOptions'Experimental Bool Bool
-> Bool -> GPUOptions'Experimental -> GPUOptions'Experimental
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "useUnifiedMemory" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"useUnifiedMemory") Bool
y GPUOptions'Experimental
x)
                                  Growing Vector RealWorld GPUOptions'Experimental'VirtualDevices
mutable'virtualDevices
                        24
                          -> do Int32
y <- Parser Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int32) -> Parser Word64 -> Parser Int32
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       "num_dev_to_dev_copy_streams"
                                GPUOptions'Experimental
-> Growing Vector RealWorld GPUOptions'Experimental'VirtualDevices
-> Parser GPUOptions'Experimental
loop
                                  (Setter GPUOptions'Experimental GPUOptions'Experimental Int32 Int32
-> Int32 -> GPUOptions'Experimental -> GPUOptions'Experimental
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "numDevToDevCopyStreams" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"numDevToDevCopyStreams") Int32
y GPUOptions'Experimental
x)
                                  Growing Vector RealWorld GPUOptions'Experimental'VirtualDevices
mutable'virtualDevices
                        34
                          -> do Text
y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do ByteString
value <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                       Int -> Parser ByteString
Data.ProtoLens.Encoding.Bytes.getBytes
                                                         (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
                                           Either String Text -> Parser Text
forall a. Either String a -> Parser a
Data.ProtoLens.Encoding.Bytes.runEither
                                             (case ByteString -> Either UnicodeException Text
Data.Text.Encoding.decodeUtf8' ByteString
value of
                                                (Prelude.Left err :: UnicodeException
err)
                                                  -> String -> Either String Text
forall a b. a -> Either a b
Prelude.Left (UnicodeException -> String
forall a. Show a => a -> String
Prelude.show UnicodeException
err)
                                                (Prelude.Right r :: Text
r) -> Text -> Either String Text
forall a b. b -> Either a b
Prelude.Right Text
r))
                                       "collective_ring_order"
                                GPUOptions'Experimental
-> Growing Vector RealWorld GPUOptions'Experimental'VirtualDevices
-> Parser GPUOptions'Experimental
loop
                                  (Setter GPUOptions'Experimental GPUOptions'Experimental Text Text
-> Text -> GPUOptions'Experimental -> GPUOptions'Experimental
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "collectiveRingOrder" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"collectiveRingOrder") Text
y GPUOptions'Experimental
x)
                                  Growing Vector RealWorld GPUOptions'Experimental'VirtualDevices
mutable'virtualDevices
                        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)
                                       "timestamped_allocator"
                                GPUOptions'Experimental
-> Growing Vector RealWorld GPUOptions'Experimental'VirtualDevices
-> Parser GPUOptions'Experimental
loop
                                  (Setter GPUOptions'Experimental GPUOptions'Experimental Bool Bool
-> Bool -> GPUOptions'Experimental -> GPUOptions'Experimental
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "timestampedAllocator" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"timestampedAllocator") Bool
y GPUOptions'Experimental
x)
                                  Growing Vector RealWorld GPUOptions'Experimental'VirtualDevices
mutable'virtualDevices
                        56
                          -> do Int32
y <- Parser Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int32) -> Parser Word64 -> Parser Int32
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       "kernel_tracker_max_interval"
                                GPUOptions'Experimental
-> Growing Vector RealWorld GPUOptions'Experimental'VirtualDevices
-> Parser GPUOptions'Experimental
loop
                                  (Setter GPUOptions'Experimental GPUOptions'Experimental Int32 Int32
-> Int32 -> GPUOptions'Experimental -> GPUOptions'Experimental
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "kernelTrackerMaxInterval" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"kernelTrackerMaxInterval") Int32
y GPUOptions'Experimental
x)
                                  Growing Vector RealWorld GPUOptions'Experimental'VirtualDevices
mutable'virtualDevices
                        64
                          -> do Int32
y <- Parser Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int32) -> Parser Word64 -> Parser Int32
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       "kernel_tracker_max_bytes"
                                GPUOptions'Experimental
-> Growing Vector RealWorld GPUOptions'Experimental'VirtualDevices
-> Parser GPUOptions'Experimental
loop
                                  (Setter GPUOptions'Experimental GPUOptions'Experimental Int32 Int32
-> Int32 -> GPUOptions'Experimental -> GPUOptions'Experimental
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "kernelTrackerMaxBytes" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"kernelTrackerMaxBytes") Int32
y GPUOptions'Experimental
x)
                                  Growing Vector RealWorld GPUOptions'Experimental'VirtualDevices
mutable'virtualDevices
                        72
                          -> do Int32
y <- Parser Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int32) -> Parser Word64 -> Parser Int32
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       "kernel_tracker_max_pending"
                                GPUOptions'Experimental
-> Growing Vector RealWorld GPUOptions'Experimental'VirtualDevices
-> Parser GPUOptions'Experimental
loop
                                  (Setter GPUOptions'Experimental GPUOptions'Experimental Int32 Int32
-> Int32 -> GPUOptions'Experimental -> GPUOptions'Experimental
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "kernelTrackerMaxPending" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"kernelTrackerMaxPending") Int32
y GPUOptions'Experimental
x)
                                  Growing Vector RealWorld GPUOptions'Experimental'VirtualDevices
mutable'virtualDevices
                        wire :: Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                GPUOptions'Experimental
-> Growing Vector RealWorld GPUOptions'Experimental'VirtualDevices
-> Parser GPUOptions'Experimental
loop
                                  (Setter
  GPUOptions'Experimental GPUOptions'Experimental FieldSet FieldSet
-> (FieldSet -> FieldSet)
-> GPUOptions'Experimental
-> GPUOptions'Experimental
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
  GPUOptions'Experimental GPUOptions'Experimental FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) GPUOptions'Experimental
x)
                                  Growing Vector RealWorld GPUOptions'Experimental'VirtualDevices
mutable'virtualDevices
      in
        Parser GPUOptions'Experimental
-> String -> Parser GPUOptions'Experimental
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do Growing Vector RealWorld GPUOptions'Experimental'VirtualDevices
mutable'virtualDevices <- IO
  (Growing Vector RealWorld GPUOptions'Experimental'VirtualDevices)
-> Parser
     (Growing Vector RealWorld GPUOptions'Experimental'VirtualDevices)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                          IO
  (Growing Vector RealWorld GPUOptions'Experimental'VirtualDevices)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              GPUOptions'Experimental
-> Growing Vector RealWorld GPUOptions'Experimental'VirtualDevices
-> Parser GPUOptions'Experimental
loop GPUOptions'Experimental
forall msg. Message msg => msg
Data.ProtoLens.defMessage Growing Vector RealWorld GPUOptions'Experimental'VirtualDevices
mutable'virtualDevices)
          "Experimental"
  buildMessage :: GPUOptions'Experimental -> Builder
buildMessage
    = \ _x :: GPUOptions'Experimental
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             ((GPUOptions'Experimental'VirtualDevices -> Builder)
-> Vector GPUOptions'Experimental'VirtualDevices -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                (\ _v :: GPUOptions'Experimental'VirtualDevices
_v
                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 10)
                        ((ByteString -> Builder)
-> (GPUOptions'Experimental'VirtualDevices -> ByteString)
-> GPUOptions'Experimental'VirtualDevices
-> 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))
                           GPUOptions'Experimental'VirtualDevices -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                           GPUOptions'Experimental'VirtualDevices
_v))
                (FoldLike
  (Vector GPUOptions'Experimental'VirtualDevices)
  GPUOptions'Experimental
  GPUOptions'Experimental
  (Vector GPUOptions'Experimental'VirtualDevices)
  (Vector GPUOptions'Experimental'VirtualDevices)
-> GPUOptions'Experimental
-> Vector GPUOptions'Experimental'VirtualDevices
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                   (forall s a (f :: * -> *).
(HasField s "vec'virtualDevices" a, Functor f) =>
(a -> f a) -> s -> 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'virtualDevices") GPUOptions'Experimental
_x))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   _v :: Bool
_v
                     = FoldLike
  Bool GPUOptions'Experimental GPUOptions'Experimental Bool Bool
-> GPUOptions'Experimental -> Bool
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                         (forall s a (f :: * -> *).
(HasField s "useUnifiedMemory" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"useUnifiedMemory") GPUOptions'Experimental
_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 16)
                         ((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 :: Int32
_v
                        = FoldLike
  Int32 GPUOptions'Experimental GPUOptions'Experimental Int32 Int32
-> GPUOptions'Experimental -> Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                            (forall s a (f :: * -> *).
(HasField s "numDevToDevCopyStreams" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"numDevToDevCopyStreams") GPUOptions'Experimental
_x
                    in
                      if Int32 -> Int32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int32
_v Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      else
                          Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 24)
                            ((Word64 -> Builder) -> (Int32 -> Word64) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                               Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (let
                         _v :: Text
_v
                           = FoldLike
  Text GPUOptions'Experimental GPUOptions'Experimental Text Text
-> GPUOptions'Experimental -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                               (forall s a (f :: * -> *).
(HasField s "collectiveRingOrder" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"collectiveRingOrder") GPUOptions'Experimental
_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 34)
                               ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                  (\ bs :: ByteString
bs
                                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                             (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                          (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                  Text -> ByteString
Data.Text.Encoding.encodeUtf8
                                  Text
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (let
                            _v :: Bool
_v
                              = FoldLike
  Bool GPUOptions'Experimental GPUOptions'Experimental Bool Bool
-> GPUOptions'Experimental -> Bool
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                  (forall s a (f :: * -> *).
(HasField s "timestampedAllocator" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"timestampedAllocator") GPUOptions'Experimental
_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 :: Int32
_v
                                 = FoldLike
  Int32 GPUOptions'Experimental GPUOptions'Experimental Int32 Int32
-> GPUOptions'Experimental -> Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                     (forall s a (f :: * -> *).
(HasField s "kernelTrackerMaxInterval" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"kernelTrackerMaxInterval") GPUOptions'Experimental
_x
                             in
                               if Int32 -> Int32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int32
_v Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                   Builder
forall a. Monoid a => a
Data.Monoid.mempty
                               else
                                   Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 56)
                                     ((Word64 -> Builder) -> (Int32 -> Word64) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                        Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        Int32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                        Int32
_v))
                            (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (let
                                  _v :: Int32
_v
                                    = FoldLike
  Int32 GPUOptions'Experimental GPUOptions'Experimental Int32 Int32
-> GPUOptions'Experimental -> Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                        (forall s a (f :: * -> *).
(HasField s "kernelTrackerMaxBytes" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"kernelTrackerMaxBytes") GPUOptions'Experimental
_x
                                in
                                  if Int32 -> Int32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int32
_v Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                      Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                  else
                                      Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 64)
                                        ((Word64 -> Builder) -> (Int32 -> Word64) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                           Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                           Int32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                           Int32
_v))
                               (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (let
                                     _v :: Int32
_v
                                       = FoldLike
  Int32 GPUOptions'Experimental GPUOptions'Experimental Int32 Int32
-> GPUOptions'Experimental -> Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                           (forall s a (f :: * -> *).
(HasField s "kernelTrackerMaxPending" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"kernelTrackerMaxPending")
                                           GPUOptions'Experimental
_x
                                   in
                                     if Int32 -> Int32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int32
_v Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                         Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                     else
                                         Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 72)
                                           ((Word64 -> Builder) -> (Int32 -> Word64) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                              Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                              Int32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                              Int32
_v))
                                  (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                     (FoldLike
  FieldSet
  GPUOptions'Experimental
  GPUOptions'Experimental
  FieldSet
  FieldSet
-> GPUOptions'Experimental -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  GPUOptions'Experimental
  GPUOptions'Experimental
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields GPUOptions'Experimental
_x)))))))))
instance Control.DeepSeq.NFData GPUOptions'Experimental where
  rnf :: GPUOptions'Experimental -> ()
rnf
    = \ x__ :: GPUOptions'Experimental
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (GPUOptions'Experimental -> FieldSet
_GPUOptions'Experimental'_unknownFields GPUOptions'Experimental
x__)
             (Vector GPUOptions'Experimental'VirtualDevices -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (GPUOptions'Experimental
-> Vector GPUOptions'Experimental'VirtualDevices
_GPUOptions'Experimental'virtualDevices GPUOptions'Experimental
x__)
                (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (GPUOptions'Experimental -> Bool
_GPUOptions'Experimental'useUnifiedMemory GPUOptions'Experimental
x__)
                   (Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (GPUOptions'Experimental -> Int32
_GPUOptions'Experimental'numDevToDevCopyStreams GPUOptions'Experimental
x__)
                      (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (GPUOptions'Experimental -> Text
_GPUOptions'Experimental'collectiveRingOrder GPUOptions'Experimental
x__)
                         (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (GPUOptions'Experimental -> Bool
_GPUOptions'Experimental'timestampedAllocator GPUOptions'Experimental
x__)
                            (Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (GPUOptions'Experimental -> Int32
_GPUOptions'Experimental'kernelTrackerMaxInterval GPUOptions'Experimental
x__)
                               (Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (GPUOptions'Experimental -> Int32
_GPUOptions'Experimental'kernelTrackerMaxBytes GPUOptions'Experimental
x__)
                                  (Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                     (GPUOptions'Experimental -> Int32
_GPUOptions'Experimental'kernelTrackerMaxPending GPUOptions'Experimental
x__)
                                     ()))))))))
{- | Fields :
     
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.memoryLimitMb' @:: Lens' GPUOptions'Experimental'VirtualDevices [Prelude.Float]@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.vec'memoryLimitMb' @:: Lens' GPUOptions'Experimental'VirtualDevices (Data.Vector.Unboxed.Vector Prelude.Float)@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.priority' @:: Lens' GPUOptions'Experimental'VirtualDevices [Data.Int.Int32]@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.vec'priority' @:: Lens' GPUOptions'Experimental'VirtualDevices (Data.Vector.Unboxed.Vector Data.Int.Int32)@ -}
data GPUOptions'Experimental'VirtualDevices
  = GPUOptions'Experimental'VirtualDevices'_constructor {GPUOptions'Experimental'VirtualDevices -> Vector Float
_GPUOptions'Experimental'VirtualDevices'memoryLimitMb :: !(Data.Vector.Unboxed.Vector Prelude.Float),
                                                         GPUOptions'Experimental'VirtualDevices -> Vector Int32
_GPUOptions'Experimental'VirtualDevices'priority :: !(Data.Vector.Unboxed.Vector Data.Int.Int32),
                                                         GPUOptions'Experimental'VirtualDevices -> FieldSet
_GPUOptions'Experimental'VirtualDevices'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (GPUOptions'Experimental'VirtualDevices
-> GPUOptions'Experimental'VirtualDevices -> Bool
(GPUOptions'Experimental'VirtualDevices
 -> GPUOptions'Experimental'VirtualDevices -> Bool)
-> (GPUOptions'Experimental'VirtualDevices
    -> GPUOptions'Experimental'VirtualDevices -> Bool)
-> Eq GPUOptions'Experimental'VirtualDevices
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GPUOptions'Experimental'VirtualDevices
-> GPUOptions'Experimental'VirtualDevices -> Bool
$c/= :: GPUOptions'Experimental'VirtualDevices
-> GPUOptions'Experimental'VirtualDevices -> Bool
== :: GPUOptions'Experimental'VirtualDevices
-> GPUOptions'Experimental'VirtualDevices -> Bool
$c== :: GPUOptions'Experimental'VirtualDevices
-> GPUOptions'Experimental'VirtualDevices -> Bool
Prelude.Eq, Eq GPUOptions'Experimental'VirtualDevices
Eq GPUOptions'Experimental'VirtualDevices =>
(GPUOptions'Experimental'VirtualDevices
 -> GPUOptions'Experimental'VirtualDevices -> Ordering)
-> (GPUOptions'Experimental'VirtualDevices
    -> GPUOptions'Experimental'VirtualDevices -> Bool)
-> (GPUOptions'Experimental'VirtualDevices
    -> GPUOptions'Experimental'VirtualDevices -> Bool)
-> (GPUOptions'Experimental'VirtualDevices
    -> GPUOptions'Experimental'VirtualDevices -> Bool)
-> (GPUOptions'Experimental'VirtualDevices
    -> GPUOptions'Experimental'VirtualDevices -> Bool)
-> (GPUOptions'Experimental'VirtualDevices
    -> GPUOptions'Experimental'VirtualDevices
    -> GPUOptions'Experimental'VirtualDevices)
-> (GPUOptions'Experimental'VirtualDevices
    -> GPUOptions'Experimental'VirtualDevices
    -> GPUOptions'Experimental'VirtualDevices)
-> Ord GPUOptions'Experimental'VirtualDevices
GPUOptions'Experimental'VirtualDevices
-> GPUOptions'Experimental'VirtualDevices -> Bool
GPUOptions'Experimental'VirtualDevices
-> GPUOptions'Experimental'VirtualDevices -> Ordering
GPUOptions'Experimental'VirtualDevices
-> GPUOptions'Experimental'VirtualDevices
-> GPUOptions'Experimental'VirtualDevices
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 :: GPUOptions'Experimental'VirtualDevices
-> GPUOptions'Experimental'VirtualDevices
-> GPUOptions'Experimental'VirtualDevices
$cmin :: GPUOptions'Experimental'VirtualDevices
-> GPUOptions'Experimental'VirtualDevices
-> GPUOptions'Experimental'VirtualDevices
max :: GPUOptions'Experimental'VirtualDevices
-> GPUOptions'Experimental'VirtualDevices
-> GPUOptions'Experimental'VirtualDevices
$cmax :: GPUOptions'Experimental'VirtualDevices
-> GPUOptions'Experimental'VirtualDevices
-> GPUOptions'Experimental'VirtualDevices
>= :: GPUOptions'Experimental'VirtualDevices
-> GPUOptions'Experimental'VirtualDevices -> Bool
$c>= :: GPUOptions'Experimental'VirtualDevices
-> GPUOptions'Experimental'VirtualDevices -> Bool
> :: GPUOptions'Experimental'VirtualDevices
-> GPUOptions'Experimental'VirtualDevices -> Bool
$c> :: GPUOptions'Experimental'VirtualDevices
-> GPUOptions'Experimental'VirtualDevices -> Bool
<= :: GPUOptions'Experimental'VirtualDevices
-> GPUOptions'Experimental'VirtualDevices -> Bool
$c<= :: GPUOptions'Experimental'VirtualDevices
-> GPUOptions'Experimental'VirtualDevices -> Bool
< :: GPUOptions'Experimental'VirtualDevices
-> GPUOptions'Experimental'VirtualDevices -> Bool
$c< :: GPUOptions'Experimental'VirtualDevices
-> GPUOptions'Experimental'VirtualDevices -> Bool
compare :: GPUOptions'Experimental'VirtualDevices
-> GPUOptions'Experimental'VirtualDevices -> Ordering
$ccompare :: GPUOptions'Experimental'VirtualDevices
-> GPUOptions'Experimental'VirtualDevices -> Ordering
$cp1Ord :: Eq GPUOptions'Experimental'VirtualDevices
Prelude.Ord)
instance Prelude.Show GPUOptions'Experimental'VirtualDevices where
  showsPrec :: Int -> GPUOptions'Experimental'VirtualDevices -> ShowS
showsPrec _ __x :: GPUOptions'Experimental'VirtualDevices
__x __s :: String
__s
    = Char -> ShowS
Prelude.showChar
        '{'
        (String -> ShowS
Prelude.showString
           (GPUOptions'Experimental'VirtualDevices -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort GPUOptions'Experimental'VirtualDevices
__x) (Char -> ShowS
Prelude.showChar '}' String
__s))
instance Data.ProtoLens.Field.HasField GPUOptions'Experimental'VirtualDevices "memoryLimitMb" [Prelude.Float] where
  fieldOf :: Proxy# "memoryLimitMb"
-> ([Float] -> f [Float])
-> GPUOptions'Experimental'VirtualDevices
-> f GPUOptions'Experimental'VirtualDevices
fieldOf _
    = ((Vector Float -> f (Vector Float))
 -> GPUOptions'Experimental'VirtualDevices
 -> f GPUOptions'Experimental'VirtualDevices)
-> (([Float] -> f [Float]) -> Vector Float -> f (Vector Float))
-> ([Float] -> f [Float])
-> GPUOptions'Experimental'VirtualDevices
-> f GPUOptions'Experimental'VirtualDevices
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GPUOptions'Experimental'VirtualDevices -> Vector Float)
-> (GPUOptions'Experimental'VirtualDevices
    -> Vector Float -> GPUOptions'Experimental'VirtualDevices)
-> Lens
     GPUOptions'Experimental'VirtualDevices
     GPUOptions'Experimental'VirtualDevices
     (Vector Float)
     (Vector Float)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GPUOptions'Experimental'VirtualDevices -> Vector Float
_GPUOptions'Experimental'VirtualDevices'memoryLimitMb
           (\ x__ :: GPUOptions'Experimental'VirtualDevices
x__ y__ :: Vector Float
y__
              -> GPUOptions'Experimental'VirtualDevices
x__
                   {_GPUOptions'Experimental'VirtualDevices'memoryLimitMb :: Vector Float
_GPUOptions'Experimental'VirtualDevices'memoryLimitMb = Vector Float
y__}))
        ((Vector Float -> [Float])
-> (Vector Float -> [Float] -> Vector Float)
-> Lens (Vector Float) (Vector Float) [Float] [Float]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Float -> [Float]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ _ y__ :: [Float]
y__ -> [Float] -> Vector Float
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Float]
y__))
instance Data.ProtoLens.Field.HasField GPUOptions'Experimental'VirtualDevices "vec'memoryLimitMb" (Data.Vector.Unboxed.Vector Prelude.Float) where
  fieldOf :: Proxy# "vec'memoryLimitMb"
-> (Vector Float -> f (Vector Float))
-> GPUOptions'Experimental'VirtualDevices
-> f GPUOptions'Experimental'VirtualDevices
fieldOf _
    = ((Vector Float -> f (Vector Float))
 -> GPUOptions'Experimental'VirtualDevices
 -> f GPUOptions'Experimental'VirtualDevices)
-> ((Vector Float -> f (Vector Float))
    -> Vector Float -> f (Vector Float))
-> (Vector Float -> f (Vector Float))
-> GPUOptions'Experimental'VirtualDevices
-> f GPUOptions'Experimental'VirtualDevices
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GPUOptions'Experimental'VirtualDevices -> Vector Float)
-> (GPUOptions'Experimental'VirtualDevices
    -> Vector Float -> GPUOptions'Experimental'VirtualDevices)
-> Lens
     GPUOptions'Experimental'VirtualDevices
     GPUOptions'Experimental'VirtualDevices
     (Vector Float)
     (Vector Float)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GPUOptions'Experimental'VirtualDevices -> Vector Float
_GPUOptions'Experimental'VirtualDevices'memoryLimitMb
           (\ x__ :: GPUOptions'Experimental'VirtualDevices
x__ y__ :: Vector Float
y__
              -> GPUOptions'Experimental'VirtualDevices
x__
                   {_GPUOptions'Experimental'VirtualDevices'memoryLimitMb :: Vector Float
_GPUOptions'Experimental'VirtualDevices'memoryLimitMb = Vector Float
y__}))
        (Vector Float -> f (Vector Float))
-> Vector Float -> f (Vector Float)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GPUOptions'Experimental'VirtualDevices "priority" [Data.Int.Int32] where
  fieldOf :: Proxy# "priority"
-> ([Int32] -> f [Int32])
-> GPUOptions'Experimental'VirtualDevices
-> f GPUOptions'Experimental'VirtualDevices
fieldOf _
    = ((Vector Int32 -> f (Vector Int32))
 -> GPUOptions'Experimental'VirtualDevices
 -> f GPUOptions'Experimental'VirtualDevices)
-> (([Int32] -> f [Int32]) -> Vector Int32 -> f (Vector Int32))
-> ([Int32] -> f [Int32])
-> GPUOptions'Experimental'VirtualDevices
-> f GPUOptions'Experimental'VirtualDevices
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GPUOptions'Experimental'VirtualDevices -> Vector Int32)
-> (GPUOptions'Experimental'VirtualDevices
    -> Vector Int32 -> GPUOptions'Experimental'VirtualDevices)
-> Lens
     GPUOptions'Experimental'VirtualDevices
     GPUOptions'Experimental'VirtualDevices
     (Vector Int32)
     (Vector Int32)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GPUOptions'Experimental'VirtualDevices -> Vector Int32
_GPUOptions'Experimental'VirtualDevices'priority
           (\ x__ :: GPUOptions'Experimental'VirtualDevices
x__ y__ :: Vector Int32
y__
              -> GPUOptions'Experimental'VirtualDevices
x__ {_GPUOptions'Experimental'VirtualDevices'priority :: Vector Int32
_GPUOptions'Experimental'VirtualDevices'priority = Vector Int32
y__}))
        ((Vector Int32 -> [Int32])
-> (Vector Int32 -> [Int32] -> Vector Int32)
-> Lens (Vector Int32) (Vector Int32) [Int32] [Int32]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Int32 -> [Int32]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ _ y__ :: [Int32]
y__ -> [Int32] -> Vector Int32
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Int32]
y__))
instance Data.ProtoLens.Field.HasField GPUOptions'Experimental'VirtualDevices "vec'priority" (Data.Vector.Unboxed.Vector Data.Int.Int32) where
  fieldOf :: Proxy# "vec'priority"
-> (Vector Int32 -> f (Vector Int32))
-> GPUOptions'Experimental'VirtualDevices
-> f GPUOptions'Experimental'VirtualDevices
fieldOf _
    = ((Vector Int32 -> f (Vector Int32))
 -> GPUOptions'Experimental'VirtualDevices
 -> f GPUOptions'Experimental'VirtualDevices)
-> ((Vector Int32 -> f (Vector Int32))
    -> Vector Int32 -> f (Vector Int32))
-> (Vector Int32 -> f (Vector Int32))
-> GPUOptions'Experimental'VirtualDevices
-> f GPUOptions'Experimental'VirtualDevices
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GPUOptions'Experimental'VirtualDevices -> Vector Int32)
-> (GPUOptions'Experimental'VirtualDevices
    -> Vector Int32 -> GPUOptions'Experimental'VirtualDevices)
-> Lens
     GPUOptions'Experimental'VirtualDevices
     GPUOptions'Experimental'VirtualDevices
     (Vector Int32)
     (Vector Int32)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GPUOptions'Experimental'VirtualDevices -> Vector Int32
_GPUOptions'Experimental'VirtualDevices'priority
           (\ x__ :: GPUOptions'Experimental'VirtualDevices
x__ y__ :: Vector Int32
y__
              -> GPUOptions'Experimental'VirtualDevices
x__ {_GPUOptions'Experimental'VirtualDevices'priority :: Vector Int32
_GPUOptions'Experimental'VirtualDevices'priority = Vector Int32
y__}))
        (Vector Int32 -> f (Vector Int32))
-> Vector Int32 -> f (Vector Int32)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message GPUOptions'Experimental'VirtualDevices where
  messageName :: Proxy GPUOptions'Experimental'VirtualDevices -> Text
messageName _
    = String -> Text
Data.Text.pack
        "tensorflow.GPUOptions.Experimental.VirtualDevices"
  packedMessageDescriptor :: Proxy GPUOptions'Experimental'VirtualDevices -> ByteString
packedMessageDescriptor _
    = "\n\
      \\SOVirtualDevices\DC2&\n\
      \\SImemory_limit_mb\CAN\SOH \ETX(\STXR\rmemoryLimitMb\DC2\SUB\n\
      \\bpriority\CAN\STX \ETX(\ENQR\bpriority"
  packedFileDescriptor :: Proxy GPUOptions'Experimental'VirtualDevices -> ByteString
packedFileDescriptor _ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor GPUOptions'Experimental'VirtualDevices)
fieldsByTag
    = let
        memoryLimitMb__field_descriptor :: FieldDescriptor GPUOptions'Experimental'VirtualDevices
memoryLimitMb__field_descriptor
          = String
-> FieldTypeDescriptor Float
-> FieldAccessor GPUOptions'Experimental'VirtualDevices Float
-> FieldDescriptor GPUOptions'Experimental'VirtualDevices
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "memory_limit_mb"
              (ScalarField Float -> FieldTypeDescriptor Float
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Float
Data.ProtoLens.FloatField ::
                 Data.ProtoLens.FieldTypeDescriptor Prelude.Float)
              (Packing
-> Lens' GPUOptions'Experimental'VirtualDevices [Float]
-> FieldAccessor GPUOptions'Experimental'VirtualDevices Float
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Packed
                 (forall s a (f :: * -> *).
(HasField s "memoryLimitMb" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"memoryLimitMb")) ::
              Data.ProtoLens.FieldDescriptor GPUOptions'Experimental'VirtualDevices
        priority__field_descriptor :: FieldDescriptor GPUOptions'Experimental'VirtualDevices
priority__field_descriptor
          = String
-> FieldTypeDescriptor Int32
-> FieldAccessor GPUOptions'Experimental'VirtualDevices Int32
-> FieldDescriptor GPUOptions'Experimental'VirtualDevices
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "priority"
              (ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.Int32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
              (Packing
-> Lens' GPUOptions'Experimental'VirtualDevices [Int32]
-> FieldAccessor GPUOptions'Experimental'VirtualDevices Int32
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Packed (forall s a (f :: * -> *).
(HasField s "priority" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"priority")) ::
              Data.ProtoLens.FieldDescriptor GPUOptions'Experimental'VirtualDevices
      in
        [(Tag, FieldDescriptor GPUOptions'Experimental'VirtualDevices)]
-> Map Tag (FieldDescriptor GPUOptions'Experimental'VirtualDevices)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag 1, FieldDescriptor GPUOptions'Experimental'VirtualDevices
memoryLimitMb__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 2, FieldDescriptor GPUOptions'Experimental'VirtualDevices
priority__field_descriptor)]
  unknownFields :: LensLike' f GPUOptions'Experimental'VirtualDevices FieldSet
unknownFields
    = (GPUOptions'Experimental'VirtualDevices -> FieldSet)
-> (GPUOptions'Experimental'VirtualDevices
    -> FieldSet -> GPUOptions'Experimental'VirtualDevices)
-> Lens' GPUOptions'Experimental'VirtualDevices FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        GPUOptions'Experimental'VirtualDevices -> FieldSet
_GPUOptions'Experimental'VirtualDevices'_unknownFields
        (\ x__ :: GPUOptions'Experimental'VirtualDevices
x__ y__ :: FieldSet
y__
           -> GPUOptions'Experimental'VirtualDevices
x__
                {_GPUOptions'Experimental'VirtualDevices'_unknownFields :: FieldSet
_GPUOptions'Experimental'VirtualDevices'_unknownFields = FieldSet
y__})
  defMessage :: GPUOptions'Experimental'VirtualDevices
defMessage
    = $WGPUOptions'Experimental'VirtualDevices'_constructor :: Vector Float
-> Vector Int32
-> FieldSet
-> GPUOptions'Experimental'VirtualDevices
GPUOptions'Experimental'VirtualDevices'_constructor
        {_GPUOptions'Experimental'VirtualDevices'memoryLimitMb :: Vector Float
_GPUOptions'Experimental'VirtualDevices'memoryLimitMb = Vector Float
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _GPUOptions'Experimental'VirtualDevices'priority :: Vector Int32
_GPUOptions'Experimental'VirtualDevices'priority = Vector Int32
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _GPUOptions'Experimental'VirtualDevices'_unknownFields :: FieldSet
_GPUOptions'Experimental'VirtualDevices'_unknownFields = []}
  parseMessage :: Parser GPUOptions'Experimental'VirtualDevices
parseMessage
    = let
        loop ::
          GPUOptions'Experimental'VirtualDevices
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Prelude.Float
             -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Int.Int32
                -> Data.ProtoLens.Encoding.Bytes.Parser GPUOptions'Experimental'VirtualDevices
        loop :: GPUOptions'Experimental'VirtualDevices
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld Int32
-> Parser GPUOptions'Experimental'VirtualDevices
loop x :: GPUOptions'Experimental'VirtualDevices
x mutable'memoryLimitMb :: Growing Vector RealWorld Float
mutable'memoryLimitMb mutable'priority :: Growing Vector RealWorld Int32
mutable'priority
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do Vector Float
frozen'memoryLimitMb <- IO (Vector Float) -> Parser (Vector Float)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                (Growing Vector (PrimState IO) Float -> IO (Vector Float)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> m (v a)
Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                                   Growing Vector RealWorld Float
Growing Vector (PrimState IO) Float
mutable'memoryLimitMb)
                      Vector Int32
frozen'priority <- IO (Vector Int32) -> Parser (Vector Int32)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                           (Growing Vector (PrimState IO) Int32 -> IO (Vector Int32)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> m (v a)
Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                              Growing Vector RealWorld Int32
Growing Vector (PrimState IO) Int32
mutable'priority)
                      (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]))))
                      GPUOptions'Experimental'VirtualDevices
-> Parser GPUOptions'Experimental'VirtualDevices
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter
  GPUOptions'Experimental'VirtualDevices
  GPUOptions'Experimental'VirtualDevices
  FieldSet
  FieldSet
-> (FieldSet -> FieldSet)
-> GPUOptions'Experimental'VirtualDevices
-> GPUOptions'Experimental'VirtualDevices
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
  GPUOptions'Experimental'VirtualDevices
  GPUOptions'Experimental'VirtualDevices
  FieldSet
  FieldSet
Data.ProtoLens.unknownFields
                           (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t)
                           (Setter
  GPUOptions'Experimental'VirtualDevices
  GPUOptions'Experimental'VirtualDevices
  (Vector Float)
  (Vector Float)
-> Vector Float
-> GPUOptions'Experimental'VirtualDevices
-> GPUOptions'Experimental'VirtualDevices
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                              (forall s a (f :: * -> *).
(HasField s "vec'memoryLimitMb" a, Functor f) =>
(a -> f a) -> s -> 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'memoryLimitMb")
                              Vector Float
frozen'memoryLimitMb
                              (Setter
  GPUOptions'Experimental'VirtualDevices
  GPUOptions'Experimental'VirtualDevices
  (Vector Int32)
  (Vector Int32)
-> Vector Int32
-> GPUOptions'Experimental'VirtualDevices
-> GPUOptions'Experimental'VirtualDevices
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                 (forall s a (f :: * -> *).
(HasField s "vec'priority" a, Functor f) =>
(a -> f a) -> s -> 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'priority") Vector Int32
frozen'priority GPUOptions'Experimental'VirtualDevices
x)))
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        13
                          -> do !Float
y <- Parser Float -> String -> Parser Float
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        ((Word32 -> Float) -> Parser Word32 -> Parser Float
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                           Word32 -> Float
Data.ProtoLens.Encoding.Bytes.wordToFloat
                                           Parser Word32
Data.ProtoLens.Encoding.Bytes.getFixed32)
                                        "memory_limit_mb"
                                Growing Vector RealWorld Float
v <- IO (Growing Vector RealWorld Float)
-> Parser (Growing Vector RealWorld Float)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) Float
-> Float -> IO (Growing Vector (PrimState IO) Float)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> a -> m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.append
                                          Growing Vector RealWorld Float
Growing Vector (PrimState IO) Float
mutable'memoryLimitMb Float
y)
                                GPUOptions'Experimental'VirtualDevices
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld Int32
-> Parser GPUOptions'Experimental'VirtualDevices
loop GPUOptions'Experimental'VirtualDevices
x Growing Vector RealWorld Float
v Growing Vector RealWorld Int32
mutable'priority
                        10
                          -> do Growing Vector RealWorld Float
y <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                        Int
-> Parser (Growing Vector RealWorld Float)
-> Parser (Growing Vector RealWorld Float)
forall a. Int -> Parser a -> Parser a
Data.ProtoLens.Encoding.Bytes.isolate
                                          (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
                                          ((let
                                              ploop :: Growing v RealWorld Float -> Parser (Growing v RealWorld Float)
ploop qs :: Growing v RealWorld Float
qs
                                                = do Bool
packedEnd <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
                                                     if Bool
packedEnd then
                                                         Growing v RealWorld Float -> Parser (Growing v RealWorld Float)
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return Growing v RealWorld Float
qs
                                                     else
                                                         do !Float
q <- Parser Float -> String -> Parser Float
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                                                    ((Word32 -> Float) -> Parser Word32 -> Parser Float
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                                                       Word32 -> Float
Data.ProtoLens.Encoding.Bytes.wordToFloat
                                                                       Parser Word32
Data.ProtoLens.Encoding.Bytes.getFixed32)
                                                                    "memory_limit_mb"
                                                            Growing v RealWorld Float
qs' <- IO (Growing v RealWorld Float)
-> Parser (Growing v RealWorld Float)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                                     (Growing v (PrimState IO) Float
-> Float -> IO (Growing v (PrimState IO) Float)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> a -> m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.append
                                                                        Growing v RealWorld Float
Growing v (PrimState IO) Float
qs Float
q)
                                                            Growing v RealWorld Float -> Parser (Growing v RealWorld Float)
ploop Growing v RealWorld Float
qs'
                                            in forall (v :: * -> *).
Vector v Float =>
Growing v RealWorld Float -> Parser (Growing v RealWorld Float)
ploop)
                                             Growing Vector RealWorld Float
mutable'memoryLimitMb)
                                GPUOptions'Experimental'VirtualDevices
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld Int32
-> Parser GPUOptions'Experimental'VirtualDevices
loop GPUOptions'Experimental'VirtualDevices
x Growing Vector RealWorld Float
y Growing Vector RealWorld Int32
mutable'priority
                        16
                          -> do !Int32
y <- Parser Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        ((Word64 -> Int32) -> Parser Word64 -> Parser Int32
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                           Word64 -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                           Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                        "priority"
                                Growing Vector RealWorld Int32
v <- IO (Growing Vector RealWorld Int32)
-> Parser (Growing Vector RealWorld Int32)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) Int32
-> Int32 -> IO (Growing Vector (PrimState IO) Int32)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> a -> m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.append Growing Vector RealWorld Int32
Growing Vector (PrimState IO) Int32
mutable'priority Int32
y)
                                GPUOptions'Experimental'VirtualDevices
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld Int32
-> Parser GPUOptions'Experimental'VirtualDevices
loop GPUOptions'Experimental'VirtualDevices
x Growing Vector RealWorld Float
mutable'memoryLimitMb Growing Vector RealWorld Int32
v
                        18
                          -> do Growing Vector RealWorld Int32
y <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                        Int
-> Parser (Growing Vector RealWorld Int32)
-> Parser (Growing Vector RealWorld Int32)
forall a. Int -> Parser a -> Parser a
Data.ProtoLens.Encoding.Bytes.isolate
                                          (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
                                          ((let
                                              ploop :: Growing v RealWorld a -> Parser (Growing v RealWorld a)
ploop qs :: Growing v RealWorld a
qs
                                                = do Bool
packedEnd <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
                                                     if Bool
packedEnd then
                                                         Growing v RealWorld a -> Parser (Growing v RealWorld a)
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return Growing v RealWorld a
qs
                                                     else
                                                         do !a
q <- Parser a -> String -> Parser a
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                                                    ((Word64 -> a) -> Parser Word64 -> Parser a
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                                                       Word64 -> a
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                       Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                                                    "priority"
                                                            Growing v RealWorld a
qs' <- IO (Growing v RealWorld a) -> Parser (Growing v RealWorld a)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                                     (Growing v (PrimState IO) a -> a -> IO (Growing v (PrimState IO) a)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> a -> m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.append
                                                                        Growing v RealWorld a
Growing v (PrimState IO) a
qs a
q)
                                                            Growing v RealWorld a -> Parser (Growing v RealWorld a)
ploop Growing v RealWorld a
qs'
                                            in forall a (v :: * -> *).
(Num a, Vector v a) =>
Growing v RealWorld a -> Parser (Growing v RealWorld a)
ploop)
                                             Growing Vector RealWorld Int32
mutable'priority)
                                GPUOptions'Experimental'VirtualDevices
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld Int32
-> Parser GPUOptions'Experimental'VirtualDevices
loop GPUOptions'Experimental'VirtualDevices
x Growing Vector RealWorld Float
mutable'memoryLimitMb Growing Vector RealWorld Int32
y
                        wire :: Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                GPUOptions'Experimental'VirtualDevices
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld Int32
-> Parser GPUOptions'Experimental'VirtualDevices
loop
                                  (Setter
  GPUOptions'Experimental'VirtualDevices
  GPUOptions'Experimental'VirtualDevices
  FieldSet
  FieldSet
-> (FieldSet -> FieldSet)
-> GPUOptions'Experimental'VirtualDevices
-> GPUOptions'Experimental'VirtualDevices
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
  GPUOptions'Experimental'VirtualDevices
  GPUOptions'Experimental'VirtualDevices
  FieldSet
  FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) GPUOptions'Experimental'VirtualDevices
x)
                                  Growing Vector RealWorld Float
mutable'memoryLimitMb
                                  Growing Vector RealWorld Int32
mutable'priority
      in
        Parser GPUOptions'Experimental'VirtualDevices
-> String -> Parser GPUOptions'Experimental'VirtualDevices
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do Growing Vector RealWorld Float
mutable'memoryLimitMb <- IO (Growing Vector RealWorld Float)
-> Parser (Growing Vector RealWorld Float)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                         IO (Growing Vector RealWorld Float)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              Growing Vector RealWorld Int32
mutable'priority <- IO (Growing Vector RealWorld Int32)
-> Parser (Growing Vector RealWorld Int32)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                    IO (Growing Vector RealWorld Int32)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              GPUOptions'Experimental'VirtualDevices
-> Growing Vector RealWorld Float
-> Growing Vector RealWorld Int32
-> Parser GPUOptions'Experimental'VirtualDevices
loop
                GPUOptions'Experimental'VirtualDevices
forall msg. Message msg => msg
Data.ProtoLens.defMessage Growing Vector RealWorld Float
mutable'memoryLimitMb Growing Vector RealWorld Int32
mutable'priority)
          "VirtualDevices"
  buildMessage :: GPUOptions'Experimental'VirtualDevices -> Builder
buildMessage
    = \ _x :: GPUOptions'Experimental'VirtualDevices
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                p :: Vector Float
p = FoldLike
  (Vector Float)
  GPUOptions'Experimental'VirtualDevices
  GPUOptions'Experimental'VirtualDevices
  (Vector Float)
  (Vector Float)
-> GPUOptions'Experimental'VirtualDevices -> Vector Float
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                      (forall s a (f :: * -> *).
(HasField s "vec'memoryLimitMb" a, Functor f) =>
(a -> f a) -> s -> 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'memoryLimitMb") GPUOptions'Experimental'VirtualDevices
_x
              in
                if Vector Float -> Bool
forall (v :: * -> *) a. Vector v a => v a -> Bool
Data.Vector.Generic.null Vector Float
p then
                    Builder
forall a. Monoid a => a
Data.Monoid.mempty
                else
                    Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 10)
                      ((\ bs :: ByteString
bs
                          -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                  (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                               (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                         (Builder -> ByteString
Data.ProtoLens.Encoding.Bytes.runBuilder
                            ((Float -> Builder) -> Vector Float -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                               ((Word32 -> Builder) -> (Float -> Word32) -> Float -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                  Word32 -> Builder
Data.ProtoLens.Encoding.Bytes.putFixed32
                                  Float -> Word32
Data.ProtoLens.Encoding.Bytes.floatToWord)
                               Vector Float
p))))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   p :: Vector Int32
p = FoldLike
  (Vector Int32)
  GPUOptions'Experimental'VirtualDevices
  GPUOptions'Experimental'VirtualDevices
  (Vector Int32)
  (Vector Int32)
-> GPUOptions'Experimental'VirtualDevices -> Vector Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                         (forall s a (f :: * -> *).
(HasField s "vec'priority" a, Functor f) =>
(a -> f a) -> s -> 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'priority") GPUOptions'Experimental'VirtualDevices
_x
                 in
                   if Vector Int32 -> Bool
forall (v :: * -> *) a. Vector v a => v a -> Bool
Data.Vector.Generic.null Vector Int32
p then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 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
                               ((Int32 -> Builder) -> Vector Int32 -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                                  ((Word64 -> Builder) -> (Int32 -> Word64) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                     Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral)
                                  Vector Int32
p))))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  GPUOptions'Experimental'VirtualDevices
  GPUOptions'Experimental'VirtualDevices
  FieldSet
  FieldSet
-> GPUOptions'Experimental'VirtualDevices -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  GPUOptions'Experimental'VirtualDevices
  GPUOptions'Experimental'VirtualDevices
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields GPUOptions'Experimental'VirtualDevices
_x)))
instance Control.DeepSeq.NFData GPUOptions'Experimental'VirtualDevices where
  rnf :: GPUOptions'Experimental'VirtualDevices -> ()
rnf
    = \ x__ :: GPUOptions'Experimental'VirtualDevices
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (GPUOptions'Experimental'VirtualDevices -> FieldSet
_GPUOptions'Experimental'VirtualDevices'_unknownFields GPUOptions'Experimental'VirtualDevices
x__)
             (Vector Float -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (GPUOptions'Experimental'VirtualDevices -> Vector Float
_GPUOptions'Experimental'VirtualDevices'memoryLimitMb GPUOptions'Experimental'VirtualDevices
x__)
                (Vector Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (GPUOptions'Experimental'VirtualDevices -> Vector Int32
_GPUOptions'Experimental'VirtualDevices'priority GPUOptions'Experimental'VirtualDevices
x__) ()))
{- | Fields :
     
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.enableRecvScheduling' @:: Lens' GraphOptions Prelude.Bool@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.optimizerOptions' @:: Lens' GraphOptions OptimizerOptions@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.maybe'optimizerOptions' @:: Lens' GraphOptions (Prelude.Maybe OptimizerOptions)@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.buildCostModel' @:: Lens' GraphOptions Data.Int.Int64@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.buildCostModelAfter' @:: Lens' GraphOptions Data.Int.Int64@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.inferShapes' @:: Lens' GraphOptions Prelude.Bool@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.placePrunedGraph' @:: Lens' GraphOptions Prelude.Bool@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.enableBfloat16Sendrecv' @:: Lens' GraphOptions Prelude.Bool@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.timelineStep' @:: Lens' GraphOptions Data.Int.Int32@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.rewriteOptions' @:: Lens' GraphOptions Proto.Tensorflow.Core.Protobuf.RewriterConfig.RewriterConfig@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.maybe'rewriteOptions' @:: Lens' GraphOptions (Prelude.Maybe Proto.Tensorflow.Core.Protobuf.RewriterConfig.RewriterConfig)@ -}
data GraphOptions
  = GraphOptions'_constructor {GraphOptions -> Bool
_GraphOptions'enableRecvScheduling :: !Prelude.Bool,
                               GraphOptions -> Maybe OptimizerOptions
_GraphOptions'optimizerOptions :: !(Prelude.Maybe OptimizerOptions),
                               GraphOptions -> Int64
_GraphOptions'buildCostModel :: !Data.Int.Int64,
                               GraphOptions -> Int64
_GraphOptions'buildCostModelAfter :: !Data.Int.Int64,
                               GraphOptions -> Bool
_GraphOptions'inferShapes :: !Prelude.Bool,
                               GraphOptions -> Bool
_GraphOptions'placePrunedGraph :: !Prelude.Bool,
                               GraphOptions -> Bool
_GraphOptions'enableBfloat16Sendrecv :: !Prelude.Bool,
                               GraphOptions -> Int32
_GraphOptions'timelineStep :: !Data.Int.Int32,
                               GraphOptions -> Maybe RewriterConfig
_GraphOptions'rewriteOptions :: !(Prelude.Maybe Proto.Tensorflow.Core.Protobuf.RewriterConfig.RewriterConfig),
                               GraphOptions -> FieldSet
_GraphOptions'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (GraphOptions -> GraphOptions -> Bool
(GraphOptions -> GraphOptions -> Bool)
-> (GraphOptions -> GraphOptions -> Bool) -> Eq GraphOptions
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GraphOptions -> GraphOptions -> Bool
$c/= :: GraphOptions -> GraphOptions -> Bool
== :: GraphOptions -> GraphOptions -> Bool
$c== :: GraphOptions -> GraphOptions -> Bool
Prelude.Eq, Eq GraphOptions
Eq GraphOptions =>
(GraphOptions -> GraphOptions -> Ordering)
-> (GraphOptions -> GraphOptions -> Bool)
-> (GraphOptions -> GraphOptions -> Bool)
-> (GraphOptions -> GraphOptions -> Bool)
-> (GraphOptions -> GraphOptions -> Bool)
-> (GraphOptions -> GraphOptions -> GraphOptions)
-> (GraphOptions -> GraphOptions -> GraphOptions)
-> Ord GraphOptions
GraphOptions -> GraphOptions -> Bool
GraphOptions -> GraphOptions -> Ordering
GraphOptions -> GraphOptions -> GraphOptions
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 :: GraphOptions -> GraphOptions -> GraphOptions
$cmin :: GraphOptions -> GraphOptions -> GraphOptions
max :: GraphOptions -> GraphOptions -> GraphOptions
$cmax :: GraphOptions -> GraphOptions -> GraphOptions
>= :: GraphOptions -> GraphOptions -> Bool
$c>= :: GraphOptions -> GraphOptions -> Bool
> :: GraphOptions -> GraphOptions -> Bool
$c> :: GraphOptions -> GraphOptions -> Bool
<= :: GraphOptions -> GraphOptions -> Bool
$c<= :: GraphOptions -> GraphOptions -> Bool
< :: GraphOptions -> GraphOptions -> Bool
$c< :: GraphOptions -> GraphOptions -> Bool
compare :: GraphOptions -> GraphOptions -> Ordering
$ccompare :: GraphOptions -> GraphOptions -> Ordering
$cp1Ord :: Eq GraphOptions
Prelude.Ord)
instance Prelude.Show GraphOptions where
  showsPrec :: Int -> GraphOptions -> ShowS
showsPrec _ __x :: GraphOptions
__x __s :: String
__s
    = Char -> ShowS
Prelude.showChar
        '{'
        (String -> ShowS
Prelude.showString
           (GraphOptions -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort GraphOptions
__x) (Char -> ShowS
Prelude.showChar '}' String
__s))
instance Data.ProtoLens.Field.HasField GraphOptions "enableRecvScheduling" Prelude.Bool where
  fieldOf :: Proxy# "enableRecvScheduling"
-> (Bool -> f Bool) -> GraphOptions -> f GraphOptions
fieldOf _
    = ((Bool -> f Bool) -> GraphOptions -> f GraphOptions)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> GraphOptions
-> f GraphOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GraphOptions -> Bool)
-> (GraphOptions -> Bool -> GraphOptions)
-> Lens GraphOptions GraphOptions Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GraphOptions -> Bool
_GraphOptions'enableRecvScheduling
           (\ x__ :: GraphOptions
x__ y__ :: Bool
y__ -> GraphOptions
x__ {_GraphOptions'enableRecvScheduling :: Bool
_GraphOptions'enableRecvScheduling = Bool
y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GraphOptions "optimizerOptions" OptimizerOptions where
  fieldOf :: Proxy# "optimizerOptions"
-> (OptimizerOptions -> f OptimizerOptions)
-> GraphOptions
-> f GraphOptions
fieldOf _
    = ((Maybe OptimizerOptions -> f (Maybe OptimizerOptions))
 -> GraphOptions -> f GraphOptions)
-> ((OptimizerOptions -> f OptimizerOptions)
    -> Maybe OptimizerOptions -> f (Maybe OptimizerOptions))
-> (OptimizerOptions -> f OptimizerOptions)
-> GraphOptions
-> f GraphOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GraphOptions -> Maybe OptimizerOptions)
-> (GraphOptions -> Maybe OptimizerOptions -> GraphOptions)
-> Lens
     GraphOptions
     GraphOptions
     (Maybe OptimizerOptions)
     (Maybe OptimizerOptions)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GraphOptions -> Maybe OptimizerOptions
_GraphOptions'optimizerOptions
           (\ x__ :: GraphOptions
x__ y__ :: Maybe OptimizerOptions
y__ -> GraphOptions
x__ {_GraphOptions'optimizerOptions :: Maybe OptimizerOptions
_GraphOptions'optimizerOptions = Maybe OptimizerOptions
y__}))
        (OptimizerOptions -> Lens' (Maybe OptimizerOptions) OptimizerOptions
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens OptimizerOptions
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField GraphOptions "maybe'optimizerOptions" (Prelude.Maybe OptimizerOptions) where
  fieldOf :: Proxy# "maybe'optimizerOptions"
-> (Maybe OptimizerOptions -> f (Maybe OptimizerOptions))
-> GraphOptions
-> f GraphOptions
fieldOf _
    = ((Maybe OptimizerOptions -> f (Maybe OptimizerOptions))
 -> GraphOptions -> f GraphOptions)
-> ((Maybe OptimizerOptions -> f (Maybe OptimizerOptions))
    -> Maybe OptimizerOptions -> f (Maybe OptimizerOptions))
-> (Maybe OptimizerOptions -> f (Maybe OptimizerOptions))
-> GraphOptions
-> f GraphOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GraphOptions -> Maybe OptimizerOptions)
-> (GraphOptions -> Maybe OptimizerOptions -> GraphOptions)
-> Lens
     GraphOptions
     GraphOptions
     (Maybe OptimizerOptions)
     (Maybe OptimizerOptions)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GraphOptions -> Maybe OptimizerOptions
_GraphOptions'optimizerOptions
           (\ x__ :: GraphOptions
x__ y__ :: Maybe OptimizerOptions
y__ -> GraphOptions
x__ {_GraphOptions'optimizerOptions :: Maybe OptimizerOptions
_GraphOptions'optimizerOptions = Maybe OptimizerOptions
y__}))
        (Maybe OptimizerOptions -> f (Maybe OptimizerOptions))
-> Maybe OptimizerOptions -> f (Maybe OptimizerOptions)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GraphOptions "buildCostModel" Data.Int.Int64 where
  fieldOf :: Proxy# "buildCostModel"
-> (Int64 -> f Int64) -> GraphOptions -> f GraphOptions
fieldOf _
    = ((Int64 -> f Int64) -> GraphOptions -> f GraphOptions)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> GraphOptions
-> f GraphOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GraphOptions -> Int64)
-> (GraphOptions -> Int64 -> GraphOptions)
-> Lens GraphOptions GraphOptions Int64 Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GraphOptions -> Int64
_GraphOptions'buildCostModel
           (\ x__ :: GraphOptions
x__ y__ :: Int64
y__ -> GraphOptions
x__ {_GraphOptions'buildCostModel :: Int64
_GraphOptions'buildCostModel = Int64
y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GraphOptions "buildCostModelAfter" Data.Int.Int64 where
  fieldOf :: Proxy# "buildCostModelAfter"
-> (Int64 -> f Int64) -> GraphOptions -> f GraphOptions
fieldOf _
    = ((Int64 -> f Int64) -> GraphOptions -> f GraphOptions)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> GraphOptions
-> f GraphOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GraphOptions -> Int64)
-> (GraphOptions -> Int64 -> GraphOptions)
-> Lens GraphOptions GraphOptions Int64 Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GraphOptions -> Int64
_GraphOptions'buildCostModelAfter
           (\ x__ :: GraphOptions
x__ y__ :: Int64
y__ -> GraphOptions
x__ {_GraphOptions'buildCostModelAfter :: Int64
_GraphOptions'buildCostModelAfter = Int64
y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GraphOptions "inferShapes" Prelude.Bool where
  fieldOf :: Proxy# "inferShapes"
-> (Bool -> f Bool) -> GraphOptions -> f GraphOptions
fieldOf _
    = ((Bool -> f Bool) -> GraphOptions -> f GraphOptions)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> GraphOptions
-> f GraphOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GraphOptions -> Bool)
-> (GraphOptions -> Bool -> GraphOptions)
-> Lens GraphOptions GraphOptions Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GraphOptions -> Bool
_GraphOptions'inferShapes
           (\ x__ :: GraphOptions
x__ y__ :: Bool
y__ -> GraphOptions
x__ {_GraphOptions'inferShapes :: Bool
_GraphOptions'inferShapes = Bool
y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GraphOptions "placePrunedGraph" Prelude.Bool where
  fieldOf :: Proxy# "placePrunedGraph"
-> (Bool -> f Bool) -> GraphOptions -> f GraphOptions
fieldOf _
    = ((Bool -> f Bool) -> GraphOptions -> f GraphOptions)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> GraphOptions
-> f GraphOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GraphOptions -> Bool)
-> (GraphOptions -> Bool -> GraphOptions)
-> Lens GraphOptions GraphOptions Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GraphOptions -> Bool
_GraphOptions'placePrunedGraph
           (\ x__ :: GraphOptions
x__ y__ :: Bool
y__ -> GraphOptions
x__ {_GraphOptions'placePrunedGraph :: Bool
_GraphOptions'placePrunedGraph = Bool
y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GraphOptions "enableBfloat16Sendrecv" Prelude.Bool where
  fieldOf :: Proxy# "enableBfloat16Sendrecv"
-> (Bool -> f Bool) -> GraphOptions -> f GraphOptions
fieldOf _
    = ((Bool -> f Bool) -> GraphOptions -> f GraphOptions)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> GraphOptions
-> f GraphOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GraphOptions -> Bool)
-> (GraphOptions -> Bool -> GraphOptions)
-> Lens GraphOptions GraphOptions Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GraphOptions -> Bool
_GraphOptions'enableBfloat16Sendrecv
           (\ x__ :: GraphOptions
x__ y__ :: Bool
y__ -> GraphOptions
x__ {_GraphOptions'enableBfloat16Sendrecv :: Bool
_GraphOptions'enableBfloat16Sendrecv = Bool
y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GraphOptions "timelineStep" Data.Int.Int32 where
  fieldOf :: Proxy# "timelineStep"
-> (Int32 -> f Int32) -> GraphOptions -> f GraphOptions
fieldOf _
    = ((Int32 -> f Int32) -> GraphOptions -> f GraphOptions)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> GraphOptions
-> f GraphOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GraphOptions -> Int32)
-> (GraphOptions -> Int32 -> GraphOptions)
-> Lens GraphOptions GraphOptions Int32 Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GraphOptions -> Int32
_GraphOptions'timelineStep
           (\ x__ :: GraphOptions
x__ y__ :: Int32
y__ -> GraphOptions
x__ {_GraphOptions'timelineStep :: Int32
_GraphOptions'timelineStep = Int32
y__}))
        (Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GraphOptions "rewriteOptions" Proto.Tensorflow.Core.Protobuf.RewriterConfig.RewriterConfig where
  fieldOf :: Proxy# "rewriteOptions"
-> (RewriterConfig -> f RewriterConfig)
-> GraphOptions
-> f GraphOptions
fieldOf _
    = ((Maybe RewriterConfig -> f (Maybe RewriterConfig))
 -> GraphOptions -> f GraphOptions)
-> ((RewriterConfig -> f RewriterConfig)
    -> Maybe RewriterConfig -> f (Maybe RewriterConfig))
-> (RewriterConfig -> f RewriterConfig)
-> GraphOptions
-> f GraphOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GraphOptions -> Maybe RewriterConfig)
-> (GraphOptions -> Maybe RewriterConfig -> GraphOptions)
-> Lens
     GraphOptions
     GraphOptions
     (Maybe RewriterConfig)
     (Maybe RewriterConfig)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GraphOptions -> Maybe RewriterConfig
_GraphOptions'rewriteOptions
           (\ x__ :: GraphOptions
x__ y__ :: Maybe RewriterConfig
y__ -> GraphOptions
x__ {_GraphOptions'rewriteOptions :: Maybe RewriterConfig
_GraphOptions'rewriteOptions = Maybe RewriterConfig
y__}))
        (RewriterConfig -> Lens' (Maybe RewriterConfig) RewriterConfig
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens RewriterConfig
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField GraphOptions "maybe'rewriteOptions" (Prelude.Maybe Proto.Tensorflow.Core.Protobuf.RewriterConfig.RewriterConfig) where
  fieldOf :: Proxy# "maybe'rewriteOptions"
-> (Maybe RewriterConfig -> f (Maybe RewriterConfig))
-> GraphOptions
-> f GraphOptions
fieldOf _
    = ((Maybe RewriterConfig -> f (Maybe RewriterConfig))
 -> GraphOptions -> f GraphOptions)
-> ((Maybe RewriterConfig -> f (Maybe RewriterConfig))
    -> Maybe RewriterConfig -> f (Maybe RewriterConfig))
-> (Maybe RewriterConfig -> f (Maybe RewriterConfig))
-> GraphOptions
-> f GraphOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GraphOptions -> Maybe RewriterConfig)
-> (GraphOptions -> Maybe RewriterConfig -> GraphOptions)
-> Lens
     GraphOptions
     GraphOptions
     (Maybe RewriterConfig)
     (Maybe RewriterConfig)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GraphOptions -> Maybe RewriterConfig
_GraphOptions'rewriteOptions
           (\ x__ :: GraphOptions
x__ y__ :: Maybe RewriterConfig
y__ -> GraphOptions
x__ {_GraphOptions'rewriteOptions :: Maybe RewriterConfig
_GraphOptions'rewriteOptions = Maybe RewriterConfig
y__}))
        (Maybe RewriterConfig -> f (Maybe RewriterConfig))
-> Maybe RewriterConfig -> f (Maybe RewriterConfig)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message GraphOptions where
  messageName :: Proxy GraphOptions -> Text
messageName _ = String -> Text
Data.Text.pack "tensorflow.GraphOptions"
  packedMessageDescriptor :: Proxy GraphOptions -> ByteString
packedMessageDescriptor _
    = "\n\
      \\fGraphOptions\DC24\n\
      \\SYNenable_recv_scheduling\CAN\STX \SOH(\bR\DC4enableRecvScheduling\DC2I\n\
      \\DC1optimizer_options\CAN\ETX \SOH(\v2\FS.tensorflow.OptimizerOptionsR\DLEoptimizerOptions\DC2(\n\
      \\DLEbuild_cost_model\CAN\EOT \SOH(\ETXR\SObuildCostModel\DC23\n\
      \\SYNbuild_cost_model_after\CAN\t \SOH(\ETXR\DC3buildCostModelAfter\DC2!\n\
      \\finfer_shapes\CAN\ENQ \SOH(\bR\vinferShapes\DC2,\n\
      \\DC2place_pruned_graph\CAN\ACK \SOH(\bR\DLEplacePrunedGraph\DC28\n\
      \\CANenable_bfloat16_sendrecv\CAN\a \SOH(\bR\SYNenableBfloat16Sendrecv\DC2#\n\
      \\rtimeline_step\CAN\b \SOH(\ENQR\ftimelineStep\DC2C\n\
      \\SIrewrite_options\CAN\n\
      \ \SOH(\v2\SUB.tensorflow.RewriterConfigR\SOrewriteOptionsJ\EOT\b\SOH\DLE\STXR%skip_common_subexpression_elimination"
  packedFileDescriptor :: Proxy GraphOptions -> ByteString
packedFileDescriptor _ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor GraphOptions)
fieldsByTag
    = let
        enableRecvScheduling__field_descriptor :: FieldDescriptor GraphOptions
enableRecvScheduling__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor GraphOptions Bool
-> FieldDescriptor GraphOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "enable_recv_scheduling"
              (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 GraphOptions GraphOptions Bool Bool
-> FieldAccessor GraphOptions 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 "enableRecvScheduling" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"enableRecvScheduling")) ::
              Data.ProtoLens.FieldDescriptor GraphOptions
        optimizerOptions__field_descriptor :: FieldDescriptor GraphOptions
optimizerOptions__field_descriptor
          = String
-> FieldTypeDescriptor OptimizerOptions
-> FieldAccessor GraphOptions OptimizerOptions
-> FieldDescriptor GraphOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "optimizer_options"
              (MessageOrGroup -> FieldTypeDescriptor OptimizerOptions
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor OptimizerOptions)
              (Lens
  GraphOptions
  GraphOptions
  (Maybe OptimizerOptions)
  (Maybe OptimizerOptions)
-> FieldAccessor GraphOptions OptimizerOptions
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall s a (f :: * -> *).
(HasField s "maybe'optimizerOptions" a, Functor f) =>
(a -> f a) -> s -> 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'optimizerOptions")) ::
              Data.ProtoLens.FieldDescriptor GraphOptions
        buildCostModel__field_descriptor :: FieldDescriptor GraphOptions
buildCostModel__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor GraphOptions Int64
-> FieldDescriptor GraphOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "build_cost_model"
              (ScalarField Int64 -> FieldTypeDescriptor Int64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int64
Data.ProtoLens.Int64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64)
              (WireDefault Int64
-> Lens GraphOptions GraphOptions Int64 Int64
-> FieldAccessor GraphOptions Int64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "buildCostModel" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"buildCostModel")) ::
              Data.ProtoLens.FieldDescriptor GraphOptions
        buildCostModelAfter__field_descriptor :: FieldDescriptor GraphOptions
buildCostModelAfter__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor GraphOptions Int64
-> FieldDescriptor GraphOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "build_cost_model_after"
              (ScalarField Int64 -> FieldTypeDescriptor Int64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int64
Data.ProtoLens.Int64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64)
              (WireDefault Int64
-> Lens GraphOptions GraphOptions Int64 Int64
-> FieldAccessor GraphOptions Int64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "buildCostModelAfter" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"buildCostModelAfter")) ::
              Data.ProtoLens.FieldDescriptor GraphOptions
        inferShapes__field_descriptor :: FieldDescriptor GraphOptions
inferShapes__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor GraphOptions Bool
-> FieldDescriptor GraphOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "infer_shapes"
              (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 GraphOptions GraphOptions Bool Bool
-> FieldAccessor GraphOptions 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 "inferShapes" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"inferShapes")) ::
              Data.ProtoLens.FieldDescriptor GraphOptions
        placePrunedGraph__field_descriptor :: FieldDescriptor GraphOptions
placePrunedGraph__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor GraphOptions Bool
-> FieldDescriptor GraphOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "place_pruned_graph"
              (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 GraphOptions GraphOptions Bool Bool
-> FieldAccessor GraphOptions 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 "placePrunedGraph" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"placePrunedGraph")) ::
              Data.ProtoLens.FieldDescriptor GraphOptions
        enableBfloat16Sendrecv__field_descriptor :: FieldDescriptor GraphOptions
enableBfloat16Sendrecv__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor GraphOptions Bool
-> FieldDescriptor GraphOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "enable_bfloat16_sendrecv"
              (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 GraphOptions GraphOptions Bool Bool
-> FieldAccessor GraphOptions 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 "enableBfloat16Sendrecv" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"enableBfloat16Sendrecv")) ::
              Data.ProtoLens.FieldDescriptor GraphOptions
        timelineStep__field_descriptor :: FieldDescriptor GraphOptions
timelineStep__field_descriptor
          = String
-> FieldTypeDescriptor Int32
-> FieldAccessor GraphOptions Int32
-> FieldDescriptor GraphOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "timeline_step"
              (ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.Int32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
              (WireDefault Int32
-> Lens GraphOptions GraphOptions Int32 Int32
-> FieldAccessor GraphOptions Int32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "timelineStep" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"timelineStep")) ::
              Data.ProtoLens.FieldDescriptor GraphOptions
        rewriteOptions__field_descriptor :: FieldDescriptor GraphOptions
rewriteOptions__field_descriptor
          = String
-> FieldTypeDescriptor RewriterConfig
-> FieldAccessor GraphOptions RewriterConfig
-> FieldDescriptor GraphOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "rewrite_options"
              (MessageOrGroup -> FieldTypeDescriptor RewriterConfig
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Tensorflow.Core.Protobuf.RewriterConfig.RewriterConfig)
              (Lens
  GraphOptions
  GraphOptions
  (Maybe RewriterConfig)
  (Maybe RewriterConfig)
-> FieldAccessor GraphOptions RewriterConfig
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall s a (f :: * -> *).
(HasField s "maybe'rewriteOptions" a, Functor f) =>
(a -> f a) -> s -> 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'rewriteOptions")) ::
              Data.ProtoLens.FieldDescriptor GraphOptions
      in
        [(Tag, FieldDescriptor GraphOptions)]
-> Map Tag (FieldDescriptor GraphOptions)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag 2, FieldDescriptor GraphOptions
enableRecvScheduling__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 3, FieldDescriptor GraphOptions
optimizerOptions__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 4, FieldDescriptor GraphOptions
buildCostModel__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 9, FieldDescriptor GraphOptions
buildCostModelAfter__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 5, FieldDescriptor GraphOptions
inferShapes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 6, FieldDescriptor GraphOptions
placePrunedGraph__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 7, FieldDescriptor GraphOptions
enableBfloat16Sendrecv__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 8, FieldDescriptor GraphOptions
timelineStep__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 10, FieldDescriptor GraphOptions
rewriteOptions__field_descriptor)]
  unknownFields :: LensLike' f GraphOptions FieldSet
unknownFields
    = (GraphOptions -> FieldSet)
-> (GraphOptions -> FieldSet -> GraphOptions)
-> Lens' GraphOptions FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        GraphOptions -> FieldSet
_GraphOptions'_unknownFields
        (\ x__ :: GraphOptions
x__ y__ :: FieldSet
y__ -> GraphOptions
x__ {_GraphOptions'_unknownFields :: FieldSet
_GraphOptions'_unknownFields = FieldSet
y__})
  defMessage :: GraphOptions
defMessage
    = $WGraphOptions'_constructor :: Bool
-> Maybe OptimizerOptions
-> Int64
-> Int64
-> Bool
-> Bool
-> Bool
-> Int32
-> Maybe RewriterConfig
-> FieldSet
-> GraphOptions
GraphOptions'_constructor
        {_GraphOptions'enableRecvScheduling :: Bool
_GraphOptions'enableRecvScheduling = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GraphOptions'optimizerOptions :: Maybe OptimizerOptions
_GraphOptions'optimizerOptions = Maybe OptimizerOptions
forall a. Maybe a
Prelude.Nothing,
         _GraphOptions'buildCostModel :: Int64
_GraphOptions'buildCostModel = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GraphOptions'buildCostModelAfter :: Int64
_GraphOptions'buildCostModelAfter = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GraphOptions'inferShapes :: Bool
_GraphOptions'inferShapes = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GraphOptions'placePrunedGraph :: Bool
_GraphOptions'placePrunedGraph = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GraphOptions'enableBfloat16Sendrecv :: Bool
_GraphOptions'enableBfloat16Sendrecv = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GraphOptions'timelineStep :: Int32
_GraphOptions'timelineStep = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GraphOptions'rewriteOptions :: Maybe RewriterConfig
_GraphOptions'rewriteOptions = Maybe RewriterConfig
forall a. Maybe a
Prelude.Nothing,
         _GraphOptions'_unknownFields :: FieldSet
_GraphOptions'_unknownFields = []}
  parseMessage :: Parser GraphOptions
parseMessage
    = let
        loop ::
          GraphOptions -> Data.ProtoLens.Encoding.Bytes.Parser GraphOptions
        loop :: GraphOptions -> Parser GraphOptions
loop x :: GraphOptions
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]))))
                      GraphOptions -> Parser GraphOptions
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter GraphOptions GraphOptions FieldSet FieldSet
-> (FieldSet -> FieldSet) -> GraphOptions -> GraphOptions
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 GraphOptions GraphOptions FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) GraphOptions
x)
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        16
                          -> 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)
                                       "enable_recv_scheduling"
                                GraphOptions -> Parser GraphOptions
loop
                                  (Setter GraphOptions GraphOptions Bool Bool
-> Bool -> GraphOptions -> GraphOptions
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "enableRecvScheduling" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"enableRecvScheduling") Bool
y GraphOptions
x)
                        26
                          -> do OptimizerOptions
y <- Parser OptimizerOptions -> String -> Parser OptimizerOptions
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser OptimizerOptions -> Parser OptimizerOptions
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 OptimizerOptions
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       "optimizer_options"
                                GraphOptions -> Parser GraphOptions
loop
                                  (Setter GraphOptions GraphOptions OptimizerOptions OptimizerOptions
-> OptimizerOptions -> GraphOptions -> GraphOptions
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "optimizerOptions" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"optimizerOptions") OptimizerOptions
y GraphOptions
x)
                        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)
                                       "build_cost_model"
                                GraphOptions -> Parser GraphOptions
loop
                                  (Setter GraphOptions GraphOptions Int64 Int64
-> Int64 -> GraphOptions -> GraphOptions
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "buildCostModel" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"buildCostModel") Int64
y GraphOptions
x)
                        72
                          -> 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)
                                       "build_cost_model_after"
                                GraphOptions -> Parser GraphOptions
loop
                                  (Setter GraphOptions GraphOptions Int64 Int64
-> Int64 -> GraphOptions -> GraphOptions
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "buildCostModelAfter" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"buildCostModelAfter") Int64
y GraphOptions
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)
                                       "infer_shapes"
                                GraphOptions -> Parser GraphOptions
loop
                                  (Setter GraphOptions GraphOptions Bool Bool
-> Bool -> GraphOptions -> GraphOptions
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "inferShapes" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"inferShapes") Bool
y GraphOptions
x)
                        48
                          -> 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)
                                       "place_pruned_graph"
                                GraphOptions -> Parser GraphOptions
loop
                                  (Setter GraphOptions GraphOptions Bool Bool
-> Bool -> GraphOptions -> GraphOptions
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "placePrunedGraph" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"placePrunedGraph") Bool
y GraphOptions
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)
                                       "enable_bfloat16_sendrecv"
                                GraphOptions -> Parser GraphOptions
loop
                                  (Setter GraphOptions GraphOptions Bool Bool
-> Bool -> GraphOptions -> GraphOptions
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "enableBfloat16Sendrecv" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"enableBfloat16Sendrecv") Bool
y GraphOptions
x)
                        64
                          -> do Int32
y <- Parser Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int32) -> Parser Word64 -> Parser Int32
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       "timeline_step"
                                GraphOptions -> Parser GraphOptions
loop
                                  (Setter GraphOptions GraphOptions Int32 Int32
-> Int32 -> GraphOptions -> GraphOptions
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "timelineStep" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"timelineStep") Int32
y GraphOptions
x)
                        82
                          -> do RewriterConfig
y <- Parser RewriterConfig -> String -> Parser RewriterConfig
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser RewriterConfig -> Parser RewriterConfig
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 RewriterConfig
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       "rewrite_options"
                                GraphOptions -> Parser GraphOptions
loop
                                  (Setter GraphOptions GraphOptions RewriterConfig RewriterConfig
-> RewriterConfig -> GraphOptions -> GraphOptions
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "rewriteOptions" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"rewriteOptions") RewriterConfig
y GraphOptions
x)
                        wire :: Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                GraphOptions -> Parser GraphOptions
loop
                                  (Setter GraphOptions GraphOptions FieldSet FieldSet
-> (FieldSet -> FieldSet) -> GraphOptions -> GraphOptions
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 GraphOptions GraphOptions FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) GraphOptions
x)
      in
        Parser GraphOptions -> String -> Parser GraphOptions
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do GraphOptions -> Parser GraphOptions
loop GraphOptions
forall msg. Message msg => msg
Data.ProtoLens.defMessage) "GraphOptions"
  buildMessage :: GraphOptions -> Builder
buildMessage
    = \ _x :: GraphOptions
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Bool
_v
                  = FoldLike Bool GraphOptions GraphOptions Bool Bool
-> GraphOptions -> Bool
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                      (forall s a (f :: * -> *).
(HasField s "enableRecvScheduling" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"enableRecvScheduling") GraphOptions
_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 16)
                      ((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.<>)
                (case
                     FoldLike
  (Maybe OptimizerOptions)
  GraphOptions
  GraphOptions
  (Maybe OptimizerOptions)
  (Maybe OptimizerOptions)
-> GraphOptions -> Maybe OptimizerOptions
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                       (forall s a (f :: * -> *).
(HasField s "maybe'optimizerOptions" a, Functor f) =>
(a -> f a) -> s -> 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'optimizerOptions") GraphOptions
_x
                 of
                   Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just _v :: OptimizerOptions
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 26)
                          ((ByteString -> Builder)
-> (OptimizerOptions -> ByteString) -> OptimizerOptions -> 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))
                             OptimizerOptions -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                             OptimizerOptions
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: Int64
_v
                        = FoldLike Int64 GraphOptions GraphOptions Int64 Int64
-> GraphOptions -> Int64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                            (forall s a (f :: * -> *).
(HasField s "buildCostModel" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"buildCostModel") GraphOptions
_x
                    in
                      if Int64 -> Int64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int64
_v Int64
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 32)
                            ((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 Int64
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (let
                         _v :: Int64
_v
                           = FoldLike Int64 GraphOptions GraphOptions Int64 Int64
-> GraphOptions -> Int64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                               (forall s a (f :: * -> *).
(HasField s "buildCostModelAfter" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"buildCostModelAfter") GraphOptions
_x
                       in
                         if Int64 -> Int64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int64
_v Int64
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)
                               ((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 Int64
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (let
                            _v :: Bool
_v
                              = FoldLike Bool GraphOptions GraphOptions Bool Bool
-> GraphOptions -> Bool
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "inferShapes" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"inferShapes") GraphOptions
_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 GraphOptions GraphOptions Bool Bool
-> GraphOptions -> Bool
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                     (forall s a (f :: * -> *).
(HasField s "placePrunedGraph" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"placePrunedGraph") GraphOptions
_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 48)
                                     ((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 GraphOptions GraphOptions Bool Bool
-> GraphOptions -> Bool
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                        (forall s a (f :: * -> *).
(HasField s "enableBfloat16Sendrecv" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"enableBfloat16Sendrecv") GraphOptions
_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 :: Int32
_v
                                       = FoldLike Int32 GraphOptions GraphOptions Int32 Int32
-> GraphOptions -> Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                           (forall s a (f :: * -> *).
(HasField s "timelineStep" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"timelineStep") GraphOptions
_x
                                   in
                                     if Int32 -> Int32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int32
_v Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                         Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                     else
                                         Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 64)
                                           ((Word64 -> Builder) -> (Int32 -> Word64) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                              Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                              Int32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                              Int32
_v))
                                  (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (case
                                          FoldLike
  (Maybe RewriterConfig)
  GraphOptions
  GraphOptions
  (Maybe RewriterConfig)
  (Maybe RewriterConfig)
-> GraphOptions -> Maybe RewriterConfig
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                            (forall s a (f :: * -> *).
(HasField s "maybe'rewriteOptions" a, Functor f) =>
(a -> f a) -> s -> 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'rewriteOptions") GraphOptions
_x
                                      of
                                        Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                        (Prelude.Just _v :: RewriterConfig
_v)
                                          -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 82)
                                               ((ByteString -> Builder)
-> (RewriterConfig -> ByteString) -> RewriterConfig -> 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))
                                                  RewriterConfig -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                                  RewriterConfig
_v))
                                     (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                        (FoldLike FieldSet GraphOptions GraphOptions FieldSet FieldSet
-> GraphOptions -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet GraphOptions GraphOptions FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields GraphOptions
_x))))))))))
instance Control.DeepSeq.NFData GraphOptions where
  rnf :: GraphOptions -> ()
rnf
    = \ x__ :: GraphOptions
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (GraphOptions -> FieldSet
_GraphOptions'_unknownFields GraphOptions
x__)
             (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (GraphOptions -> Bool
_GraphOptions'enableRecvScheduling GraphOptions
x__)
                (Maybe OptimizerOptions -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (GraphOptions -> Maybe OptimizerOptions
_GraphOptions'optimizerOptions GraphOptions
x__)
                   (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (GraphOptions -> Int64
_GraphOptions'buildCostModel GraphOptions
x__)
                      (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (GraphOptions -> Int64
_GraphOptions'buildCostModelAfter GraphOptions
x__)
                         (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (GraphOptions -> Bool
_GraphOptions'inferShapes GraphOptions
x__)
                            (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (GraphOptions -> Bool
_GraphOptions'placePrunedGraph GraphOptions
x__)
                               (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (GraphOptions -> Bool
_GraphOptions'enableBfloat16Sendrecv GraphOptions
x__)
                                  (Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                     (GraphOptions -> Int32
_GraphOptions'timelineStep GraphOptions
x__)
                                     (Maybe RewriterConfig -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                        (GraphOptions -> Maybe RewriterConfig
_GraphOptions'rewriteOptions GraphOptions
x__) ())))))))))
{- | Fields :
     
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.doCommonSubexpressionElimination' @:: Lens' OptimizerOptions Prelude.Bool@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.doConstantFolding' @:: Lens' OptimizerOptions Prelude.Bool@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.maxFoldedConstantInBytes' @:: Lens' OptimizerOptions Data.Int.Int64@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.doFunctionInlining' @:: Lens' OptimizerOptions Prelude.Bool@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.optLevel' @:: Lens' OptimizerOptions OptimizerOptions'Level@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.globalJitLevel' @:: Lens' OptimizerOptions OptimizerOptions'GlobalJitLevel@ -}
data OptimizerOptions
  = OptimizerOptions'_constructor {OptimizerOptions -> Bool
_OptimizerOptions'doCommonSubexpressionElimination :: !Prelude.Bool,
                                   OptimizerOptions -> Bool
_OptimizerOptions'doConstantFolding :: !Prelude.Bool,
                                   OptimizerOptions -> Int64
_OptimizerOptions'maxFoldedConstantInBytes :: !Data.Int.Int64,
                                   OptimizerOptions -> Bool
_OptimizerOptions'doFunctionInlining :: !Prelude.Bool,
                                   OptimizerOptions -> OptimizerOptions'Level
_OptimizerOptions'optLevel :: !OptimizerOptions'Level,
                                   OptimizerOptions -> OptimizerOptions'GlobalJitLevel
_OptimizerOptions'globalJitLevel :: !OptimizerOptions'GlobalJitLevel,
                                   OptimizerOptions -> FieldSet
_OptimizerOptions'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (OptimizerOptions -> OptimizerOptions -> Bool
(OptimizerOptions -> OptimizerOptions -> Bool)
-> (OptimizerOptions -> OptimizerOptions -> Bool)
-> Eq OptimizerOptions
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: OptimizerOptions -> OptimizerOptions -> Bool
$c/= :: OptimizerOptions -> OptimizerOptions -> Bool
== :: OptimizerOptions -> OptimizerOptions -> Bool
$c== :: OptimizerOptions -> OptimizerOptions -> Bool
Prelude.Eq, Eq OptimizerOptions
Eq OptimizerOptions =>
(OptimizerOptions -> OptimizerOptions -> Ordering)
-> (OptimizerOptions -> OptimizerOptions -> Bool)
-> (OptimizerOptions -> OptimizerOptions -> Bool)
-> (OptimizerOptions -> OptimizerOptions -> Bool)
-> (OptimizerOptions -> OptimizerOptions -> Bool)
-> (OptimizerOptions -> OptimizerOptions -> OptimizerOptions)
-> (OptimizerOptions -> OptimizerOptions -> OptimizerOptions)
-> Ord OptimizerOptions
OptimizerOptions -> OptimizerOptions -> Bool
OptimizerOptions -> OptimizerOptions -> Ordering
OptimizerOptions -> OptimizerOptions -> OptimizerOptions
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 :: OptimizerOptions -> OptimizerOptions -> OptimizerOptions
$cmin :: OptimizerOptions -> OptimizerOptions -> OptimizerOptions
max :: OptimizerOptions -> OptimizerOptions -> OptimizerOptions
$cmax :: OptimizerOptions -> OptimizerOptions -> OptimizerOptions
>= :: OptimizerOptions -> OptimizerOptions -> Bool
$c>= :: OptimizerOptions -> OptimizerOptions -> Bool
> :: OptimizerOptions -> OptimizerOptions -> Bool
$c> :: OptimizerOptions -> OptimizerOptions -> Bool
<= :: OptimizerOptions -> OptimizerOptions -> Bool
$c<= :: OptimizerOptions -> OptimizerOptions -> Bool
< :: OptimizerOptions -> OptimizerOptions -> Bool
$c< :: OptimizerOptions -> OptimizerOptions -> Bool
compare :: OptimizerOptions -> OptimizerOptions -> Ordering
$ccompare :: OptimizerOptions -> OptimizerOptions -> Ordering
$cp1Ord :: Eq OptimizerOptions
Prelude.Ord)
instance Prelude.Show OptimizerOptions where
  showsPrec :: Int -> OptimizerOptions -> ShowS
showsPrec _ __x :: OptimizerOptions
__x __s :: String
__s
    = Char -> ShowS
Prelude.showChar
        '{'
        (String -> ShowS
Prelude.showString
           (OptimizerOptions -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort OptimizerOptions
__x) (Char -> ShowS
Prelude.showChar '}' String
__s))
instance Data.ProtoLens.Field.HasField OptimizerOptions "doCommonSubexpressionElimination" Prelude.Bool where
  fieldOf :: Proxy# "doCommonSubexpressionElimination"
-> (Bool -> f Bool) -> OptimizerOptions -> f OptimizerOptions
fieldOf _
    = ((Bool -> f Bool) -> OptimizerOptions -> f OptimizerOptions)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> OptimizerOptions
-> f OptimizerOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((OptimizerOptions -> Bool)
-> (OptimizerOptions -> Bool -> OptimizerOptions)
-> Lens OptimizerOptions OptimizerOptions Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           OptimizerOptions -> Bool
_OptimizerOptions'doCommonSubexpressionElimination
           (\ x__ :: OptimizerOptions
x__ y__ :: Bool
y__
              -> OptimizerOptions
x__ {_OptimizerOptions'doCommonSubexpressionElimination :: Bool
_OptimizerOptions'doCommonSubexpressionElimination = Bool
y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField OptimizerOptions "doConstantFolding" Prelude.Bool where
  fieldOf :: Proxy# "doConstantFolding"
-> (Bool -> f Bool) -> OptimizerOptions -> f OptimizerOptions
fieldOf _
    = ((Bool -> f Bool) -> OptimizerOptions -> f OptimizerOptions)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> OptimizerOptions
-> f OptimizerOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((OptimizerOptions -> Bool)
-> (OptimizerOptions -> Bool -> OptimizerOptions)
-> Lens OptimizerOptions OptimizerOptions Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           OptimizerOptions -> Bool
_OptimizerOptions'doConstantFolding
           (\ x__ :: OptimizerOptions
x__ y__ :: Bool
y__ -> OptimizerOptions
x__ {_OptimizerOptions'doConstantFolding :: Bool
_OptimizerOptions'doConstantFolding = Bool
y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField OptimizerOptions "maxFoldedConstantInBytes" Data.Int.Int64 where
  fieldOf :: Proxy# "maxFoldedConstantInBytes"
-> (Int64 -> f Int64) -> OptimizerOptions -> f OptimizerOptions
fieldOf _
    = ((Int64 -> f Int64) -> OptimizerOptions -> f OptimizerOptions)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> OptimizerOptions
-> f OptimizerOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((OptimizerOptions -> Int64)
-> (OptimizerOptions -> Int64 -> OptimizerOptions)
-> Lens OptimizerOptions OptimizerOptions Int64 Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           OptimizerOptions -> Int64
_OptimizerOptions'maxFoldedConstantInBytes
           (\ x__ :: OptimizerOptions
x__ y__ :: Int64
y__
              -> OptimizerOptions
x__ {_OptimizerOptions'maxFoldedConstantInBytes :: Int64
_OptimizerOptions'maxFoldedConstantInBytes = Int64
y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField OptimizerOptions "doFunctionInlining" Prelude.Bool where
  fieldOf :: Proxy# "doFunctionInlining"
-> (Bool -> f Bool) -> OptimizerOptions -> f OptimizerOptions
fieldOf _
    = ((Bool -> f Bool) -> OptimizerOptions -> f OptimizerOptions)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> OptimizerOptions
-> f OptimizerOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((OptimizerOptions -> Bool)
-> (OptimizerOptions -> Bool -> OptimizerOptions)
-> Lens OptimizerOptions OptimizerOptions Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           OptimizerOptions -> Bool
_OptimizerOptions'doFunctionInlining
           (\ x__ :: OptimizerOptions
x__ y__ :: Bool
y__ -> OptimizerOptions
x__ {_OptimizerOptions'doFunctionInlining :: Bool
_OptimizerOptions'doFunctionInlining = Bool
y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField OptimizerOptions "optLevel" OptimizerOptions'Level where
  fieldOf :: Proxy# "optLevel"
-> (OptimizerOptions'Level -> f OptimizerOptions'Level)
-> OptimizerOptions
-> f OptimizerOptions
fieldOf _
    = ((OptimizerOptions'Level -> f OptimizerOptions'Level)
 -> OptimizerOptions -> f OptimizerOptions)
-> ((OptimizerOptions'Level -> f OptimizerOptions'Level)
    -> OptimizerOptions'Level -> f OptimizerOptions'Level)
-> (OptimizerOptions'Level -> f OptimizerOptions'Level)
-> OptimizerOptions
-> f OptimizerOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((OptimizerOptions -> OptimizerOptions'Level)
-> (OptimizerOptions -> OptimizerOptions'Level -> OptimizerOptions)
-> Lens
     OptimizerOptions
     OptimizerOptions
     OptimizerOptions'Level
     OptimizerOptions'Level
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           OptimizerOptions -> OptimizerOptions'Level
_OptimizerOptions'optLevel
           (\ x__ :: OptimizerOptions
x__ y__ :: OptimizerOptions'Level
y__ -> OptimizerOptions
x__ {_OptimizerOptions'optLevel :: OptimizerOptions'Level
_OptimizerOptions'optLevel = OptimizerOptions'Level
y__}))
        (OptimizerOptions'Level -> f OptimizerOptions'Level)
-> OptimizerOptions'Level -> f OptimizerOptions'Level
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField OptimizerOptions "globalJitLevel" OptimizerOptions'GlobalJitLevel where
  fieldOf :: Proxy# "globalJitLevel"
-> (OptimizerOptions'GlobalJitLevel
    -> f OptimizerOptions'GlobalJitLevel)
-> OptimizerOptions
-> f OptimizerOptions
fieldOf _
    = ((OptimizerOptions'GlobalJitLevel
  -> f OptimizerOptions'GlobalJitLevel)
 -> OptimizerOptions -> f OptimizerOptions)
-> ((OptimizerOptions'GlobalJitLevel
     -> f OptimizerOptions'GlobalJitLevel)
    -> OptimizerOptions'GlobalJitLevel
    -> f OptimizerOptions'GlobalJitLevel)
-> (OptimizerOptions'GlobalJitLevel
    -> f OptimizerOptions'GlobalJitLevel)
-> OptimizerOptions
-> f OptimizerOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((OptimizerOptions -> OptimizerOptions'GlobalJitLevel)
-> (OptimizerOptions
    -> OptimizerOptions'GlobalJitLevel -> OptimizerOptions)
-> Lens
     OptimizerOptions
     OptimizerOptions
     OptimizerOptions'GlobalJitLevel
     OptimizerOptions'GlobalJitLevel
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           OptimizerOptions -> OptimizerOptions'GlobalJitLevel
_OptimizerOptions'globalJitLevel
           (\ x__ :: OptimizerOptions
x__ y__ :: OptimizerOptions'GlobalJitLevel
y__ -> OptimizerOptions
x__ {_OptimizerOptions'globalJitLevel :: OptimizerOptions'GlobalJitLevel
_OptimizerOptions'globalJitLevel = OptimizerOptions'GlobalJitLevel
y__}))
        (OptimizerOptions'GlobalJitLevel
 -> f OptimizerOptions'GlobalJitLevel)
-> OptimizerOptions'GlobalJitLevel
-> f OptimizerOptions'GlobalJitLevel
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message OptimizerOptions where
  messageName :: Proxy OptimizerOptions -> Text
messageName _ = String -> Text
Data.Text.pack "tensorflow.OptimizerOptions"
  packedMessageDescriptor :: Proxy OptimizerOptions -> ByteString
packedMessageDescriptor _
    = "\n\
      \\DLEOptimizerOptions\DC2M\n\
      \#do_common_subexpression_elimination\CAN\SOH \SOH(\bR doCommonSubexpressionElimination\DC2.\n\
      \\DC3do_constant_folding\CAN\STX \SOH(\bR\DC1doConstantFolding\DC2>\n\
      \\FSmax_folded_constant_in_bytes\CAN\ACK \SOH(\ETXR\CANmaxFoldedConstantInBytes\DC20\n\
      \\DC4do_function_inlining\CAN\EOT \SOH(\bR\DC2doFunctionInlining\DC2?\n\
      \\topt_level\CAN\ETX \SOH(\SO2\".tensorflow.OptimizerOptions.LevelR\boptLevel\DC2U\n\
      \\DLEglobal_jit_level\CAN\ENQ \SOH(\SO2+.tensorflow.OptimizerOptions.GlobalJitLevelR\SOglobalJitLevel\" \n\
      \\ENQLevel\DC2\ACK\n\
      \\STXL1\DLE\NUL\DC2\SI\n\
      \\STXL0\DLE\255\255\255\255\255\255\255\255\255\SOH\"C\n\
      \\SOGlobalJitLevel\DC2\v\n\
      \\aDEFAULT\DLE\NUL\DC2\DLE\n\
      \\ETXOFF\DLE\255\255\255\255\255\255\255\255\255\SOH\DC2\b\n\
      \\EOTON_1\DLE\SOH\DC2\b\n\
      \\EOTON_2\DLE\STX"
  packedFileDescriptor :: Proxy OptimizerOptions -> ByteString
packedFileDescriptor _ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor OptimizerOptions)
fieldsByTag
    = let
        doCommonSubexpressionElimination__field_descriptor :: FieldDescriptor OptimizerOptions
doCommonSubexpressionElimination__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor OptimizerOptions Bool
-> FieldDescriptor OptimizerOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "do_common_subexpression_elimination"
              (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 OptimizerOptions OptimizerOptions Bool Bool
-> FieldAccessor OptimizerOptions 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 "doCommonSubexpressionElimination" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                    @"doCommonSubexpressionElimination")) ::
              Data.ProtoLens.FieldDescriptor OptimizerOptions
        doConstantFolding__field_descriptor :: FieldDescriptor OptimizerOptions
doConstantFolding__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor OptimizerOptions Bool
-> FieldDescriptor OptimizerOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "do_constant_folding"
              (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 OptimizerOptions OptimizerOptions Bool Bool
-> FieldAccessor OptimizerOptions 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 "doConstantFolding" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"doConstantFolding")) ::
              Data.ProtoLens.FieldDescriptor OptimizerOptions
        maxFoldedConstantInBytes__field_descriptor :: FieldDescriptor OptimizerOptions
maxFoldedConstantInBytes__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor OptimizerOptions Int64
-> FieldDescriptor OptimizerOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "max_folded_constant_in_bytes"
              (ScalarField Int64 -> FieldTypeDescriptor Int64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int64
Data.ProtoLens.Int64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64)
              (WireDefault Int64
-> Lens OptimizerOptions OptimizerOptions Int64 Int64
-> FieldAccessor OptimizerOptions Int64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "maxFoldedConstantInBytes" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maxFoldedConstantInBytes")) ::
              Data.ProtoLens.FieldDescriptor OptimizerOptions
        doFunctionInlining__field_descriptor :: FieldDescriptor OptimizerOptions
doFunctionInlining__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor OptimizerOptions Bool
-> FieldDescriptor OptimizerOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "do_function_inlining"
              (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 OptimizerOptions OptimizerOptions Bool Bool
-> FieldAccessor OptimizerOptions 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 "doFunctionInlining" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"doFunctionInlining")) ::
              Data.ProtoLens.FieldDescriptor OptimizerOptions
        optLevel__field_descriptor :: FieldDescriptor OptimizerOptions
optLevel__field_descriptor
          = String
-> FieldTypeDescriptor OptimizerOptions'Level
-> FieldAccessor OptimizerOptions OptimizerOptions'Level
-> FieldDescriptor OptimizerOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "opt_level"
              (ScalarField OptimizerOptions'Level
-> FieldTypeDescriptor OptimizerOptions'Level
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField OptimizerOptions'Level
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor OptimizerOptions'Level)
              (WireDefault OptimizerOptions'Level
-> Lens
     OptimizerOptions
     OptimizerOptions
     OptimizerOptions'Level
     OptimizerOptions'Level
-> FieldAccessor OptimizerOptions OptimizerOptions'Level
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault OptimizerOptions'Level
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "optLevel" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"optLevel")) ::
              Data.ProtoLens.FieldDescriptor OptimizerOptions
        globalJitLevel__field_descriptor :: FieldDescriptor OptimizerOptions
globalJitLevel__field_descriptor
          = String
-> FieldTypeDescriptor OptimizerOptions'GlobalJitLevel
-> FieldAccessor OptimizerOptions OptimizerOptions'GlobalJitLevel
-> FieldDescriptor OptimizerOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "global_jit_level"
              (ScalarField OptimizerOptions'GlobalJitLevel
-> FieldTypeDescriptor OptimizerOptions'GlobalJitLevel
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField OptimizerOptions'GlobalJitLevel
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor OptimizerOptions'GlobalJitLevel)
              (WireDefault OptimizerOptions'GlobalJitLevel
-> Lens
     OptimizerOptions
     OptimizerOptions
     OptimizerOptions'GlobalJitLevel
     OptimizerOptions'GlobalJitLevel
-> FieldAccessor OptimizerOptions OptimizerOptions'GlobalJitLevel
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault OptimizerOptions'GlobalJitLevel
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "globalJitLevel" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"globalJitLevel")) ::
              Data.ProtoLens.FieldDescriptor OptimizerOptions
      in
        [(Tag, FieldDescriptor OptimizerOptions)]
-> Map Tag (FieldDescriptor OptimizerOptions)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag 1, 
            FieldDescriptor OptimizerOptions
doCommonSubexpressionElimination__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 2, FieldDescriptor OptimizerOptions
doConstantFolding__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 6, FieldDescriptor OptimizerOptions
maxFoldedConstantInBytes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 4, FieldDescriptor OptimizerOptions
doFunctionInlining__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 3, FieldDescriptor OptimizerOptions
optLevel__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 5, FieldDescriptor OptimizerOptions
globalJitLevel__field_descriptor)]
  unknownFields :: LensLike' f OptimizerOptions FieldSet
unknownFields
    = (OptimizerOptions -> FieldSet)
-> (OptimizerOptions -> FieldSet -> OptimizerOptions)
-> Lens' OptimizerOptions FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        OptimizerOptions -> FieldSet
_OptimizerOptions'_unknownFields
        (\ x__ :: OptimizerOptions
x__ y__ :: FieldSet
y__ -> OptimizerOptions
x__ {_OptimizerOptions'_unknownFields :: FieldSet
_OptimizerOptions'_unknownFields = FieldSet
y__})
  defMessage :: OptimizerOptions
defMessage
    = $WOptimizerOptions'_constructor :: Bool
-> Bool
-> Int64
-> Bool
-> OptimizerOptions'Level
-> OptimizerOptions'GlobalJitLevel
-> FieldSet
-> OptimizerOptions
OptimizerOptions'_constructor
        {_OptimizerOptions'doCommonSubexpressionElimination :: Bool
_OptimizerOptions'doCommonSubexpressionElimination = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _OptimizerOptions'doConstantFolding :: Bool
_OptimizerOptions'doConstantFolding = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _OptimizerOptions'maxFoldedConstantInBytes :: Int64
_OptimizerOptions'maxFoldedConstantInBytes = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _OptimizerOptions'doFunctionInlining :: Bool
_OptimizerOptions'doFunctionInlining = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _OptimizerOptions'optLevel :: OptimizerOptions'Level
_OptimizerOptions'optLevel = OptimizerOptions'Level
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _OptimizerOptions'globalJitLevel :: OptimizerOptions'GlobalJitLevel
_OptimizerOptions'globalJitLevel = OptimizerOptions'GlobalJitLevel
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _OptimizerOptions'_unknownFields :: FieldSet
_OptimizerOptions'_unknownFields = []}
  parseMessage :: Parser OptimizerOptions
parseMessage
    = let
        loop ::
          OptimizerOptions
          -> Data.ProtoLens.Encoding.Bytes.Parser OptimizerOptions
        loop :: OptimizerOptions -> Parser OptimizerOptions
loop x :: OptimizerOptions
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]))))
                      OptimizerOptions -> Parser OptimizerOptions
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter OptimizerOptions OptimizerOptions FieldSet FieldSet
-> (FieldSet -> FieldSet) -> OptimizerOptions -> OptimizerOptions
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 OptimizerOptions OptimizerOptions FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) OptimizerOptions
x)
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        8 -> 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)
                                       "do_common_subexpression_elimination"
                                OptimizerOptions -> Parser OptimizerOptions
loop
                                  (Setter OptimizerOptions OptimizerOptions Bool Bool
-> Bool -> OptimizerOptions -> OptimizerOptions
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "doCommonSubexpressionElimination" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                        @"doCommonSubexpressionElimination")
                                     Bool
y
                                     OptimizerOptions
x)
                        16
                          -> 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)
                                       "do_constant_folding"
                                OptimizerOptions -> Parser OptimizerOptions
loop
                                  (Setter OptimizerOptions OptimizerOptions Bool Bool
-> Bool -> OptimizerOptions -> OptimizerOptions
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "doConstantFolding" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"doConstantFolding") Bool
y OptimizerOptions
x)
                        48
                          -> 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)
                                       "max_folded_constant_in_bytes"
                                OptimizerOptions -> Parser OptimizerOptions
loop
                                  (Setter OptimizerOptions OptimizerOptions Int64 Int64
-> Int64 -> OptimizerOptions -> OptimizerOptions
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "maxFoldedConstantInBytes" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maxFoldedConstantInBytes") Int64
y OptimizerOptions
x)
                        32
                          -> 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)
                                       "do_function_inlining"
                                OptimizerOptions -> Parser OptimizerOptions
loop
                                  (Setter OptimizerOptions OptimizerOptions Bool Bool
-> Bool -> OptimizerOptions -> OptimizerOptions
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "doFunctionInlining" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"doFunctionInlining") Bool
y OptimizerOptions
x)
                        24
                          -> do OptimizerOptions'Level
y <- Parser OptimizerOptions'Level
-> String -> Parser OptimizerOptions'Level
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> OptimizerOptions'Level)
-> Parser Int -> Parser OptimizerOptions'Level
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> OptimizerOptions'Level
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))
                                       "opt_level"
                                OptimizerOptions -> Parser OptimizerOptions
loop
                                  (Setter
  OptimizerOptions
  OptimizerOptions
  OptimizerOptions'Level
  OptimizerOptions'Level
-> OptimizerOptions'Level -> OptimizerOptions -> OptimizerOptions
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "optLevel" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"optLevel") OptimizerOptions'Level
y OptimizerOptions
x)
                        40
                          -> do OptimizerOptions'GlobalJitLevel
y <- Parser OptimizerOptions'GlobalJitLevel
-> String -> Parser OptimizerOptions'GlobalJitLevel
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> OptimizerOptions'GlobalJitLevel)
-> Parser Int -> Parser OptimizerOptions'GlobalJitLevel
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> OptimizerOptions'GlobalJitLevel
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))
                                       "global_jit_level"
                                OptimizerOptions -> Parser OptimizerOptions
loop
                                  (Setter
  OptimizerOptions
  OptimizerOptions
  OptimizerOptions'GlobalJitLevel
  OptimizerOptions'GlobalJitLevel
-> OptimizerOptions'GlobalJitLevel
-> OptimizerOptions
-> OptimizerOptions
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "globalJitLevel" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"globalJitLevel") OptimizerOptions'GlobalJitLevel
y OptimizerOptions
x)
                        wire :: Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                OptimizerOptions -> Parser OptimizerOptions
loop
                                  (Setter OptimizerOptions OptimizerOptions FieldSet FieldSet
-> (FieldSet -> FieldSet) -> OptimizerOptions -> OptimizerOptions
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 OptimizerOptions OptimizerOptions FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) OptimizerOptions
x)
      in
        Parser OptimizerOptions -> String -> Parser OptimizerOptions
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do OptimizerOptions -> Parser OptimizerOptions
loop OptimizerOptions
forall msg. Message msg => msg
Data.ProtoLens.defMessage) "OptimizerOptions"
  buildMessage :: OptimizerOptions -> Builder
buildMessage
    = \ _x :: OptimizerOptions
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Bool
_v
                  = FoldLike Bool OptimizerOptions OptimizerOptions Bool Bool
-> OptimizerOptions -> Bool
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                      (forall s a (f :: * -> *).
(HasField s "doCommonSubexpressionElimination" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"doCommonSubexpressionElimination") OptimizerOptions
_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 8)
                      ((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 OptimizerOptions OptimizerOptions Bool Bool
-> OptimizerOptions -> Bool
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                         (forall s a (f :: * -> *).
(HasField s "doConstantFolding" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"doConstantFolding") OptimizerOptions
_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 16)
                         ((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 :: Int64
_v
                        = FoldLike Int64 OptimizerOptions OptimizerOptions Int64 Int64
-> OptimizerOptions -> Int64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                            (forall s a (f :: * -> *).
(HasField s "maxFoldedConstantInBytes" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maxFoldedConstantInBytes") OptimizerOptions
_x
                    in
                      if Int64 -> Int64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int64
_v Int64
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 48)
                            ((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 Int64
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (let
                         _v :: Bool
_v
                           = FoldLike Bool OptimizerOptions OptimizerOptions Bool Bool
-> OptimizerOptions -> Bool
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                               (forall s a (f :: * -> *).
(HasField s "doFunctionInlining" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"doFunctionInlining") OptimizerOptions
_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 32)
                               ((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 :: OptimizerOptions'Level
_v = FoldLike
  OptimizerOptions'Level
  OptimizerOptions
  OptimizerOptions
  OptimizerOptions'Level
  OptimizerOptions'Level
-> OptimizerOptions -> OptimizerOptions'Level
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "optLevel" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"optLevel") OptimizerOptions
_x
                          in
                            if OptimizerOptions'Level -> OptimizerOptions'Level -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) OptimizerOptions'Level
_v OptimizerOptions'Level
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            else
                                Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 24)
                                  ((Int -> Builder)
-> (OptimizerOptions'Level -> Int)
-> OptimizerOptions'Level
-> 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)
                                     OptimizerOptions'Level -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum
                                     OptimizerOptions'Level
_v))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (let
                               _v :: OptimizerOptions'GlobalJitLevel
_v
                                 = FoldLike
  OptimizerOptions'GlobalJitLevel
  OptimizerOptions
  OptimizerOptions
  OptimizerOptions'GlobalJitLevel
  OptimizerOptions'GlobalJitLevel
-> OptimizerOptions -> OptimizerOptions'GlobalJitLevel
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                     (forall s a (f :: * -> *).
(HasField s "globalJitLevel" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"globalJitLevel") OptimizerOptions
_x
                             in
                               if OptimizerOptions'GlobalJitLevel
-> OptimizerOptions'GlobalJitLevel -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) OptimizerOptions'GlobalJitLevel
_v OptimizerOptions'GlobalJitLevel
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)
                                     ((Int -> Builder)
-> (OptimizerOptions'GlobalJitLevel -> Int)
-> OptimizerOptions'GlobalJitLevel
-> 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)
                                        OptimizerOptions'GlobalJitLevel -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum
                                        OptimizerOptions'GlobalJitLevel
_v))
                            (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                               (FoldLike
  FieldSet OptimizerOptions OptimizerOptions FieldSet FieldSet
-> OptimizerOptions -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet OptimizerOptions OptimizerOptions FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields OptimizerOptions
_x)))))))
instance Control.DeepSeq.NFData OptimizerOptions where
  rnf :: OptimizerOptions -> ()
rnf
    = \ x__ :: OptimizerOptions
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (OptimizerOptions -> FieldSet
_OptimizerOptions'_unknownFields OptimizerOptions
x__)
             (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (OptimizerOptions -> Bool
_OptimizerOptions'doCommonSubexpressionElimination OptimizerOptions
x__)
                (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (OptimizerOptions -> Bool
_OptimizerOptions'doConstantFolding OptimizerOptions
x__)
                   (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (OptimizerOptions -> Int64
_OptimizerOptions'maxFoldedConstantInBytes OptimizerOptions
x__)
                      (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (OptimizerOptions -> Bool
_OptimizerOptions'doFunctionInlining OptimizerOptions
x__)
                         (OptimizerOptions'Level -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (OptimizerOptions -> OptimizerOptions'Level
_OptimizerOptions'optLevel OptimizerOptions
x__)
                            (OptimizerOptions'GlobalJitLevel -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (OptimizerOptions -> OptimizerOptions'GlobalJitLevel
_OptimizerOptions'globalJitLevel OptimizerOptions
x__) ()))))))
newtype OptimizerOptions'GlobalJitLevel'UnrecognizedValue
  = OptimizerOptions'GlobalJitLevel'UnrecognizedValue Data.Int.Int32
  deriving stock (OptimizerOptions'GlobalJitLevel'UnrecognizedValue
-> OptimizerOptions'GlobalJitLevel'UnrecognizedValue -> Bool
(OptimizerOptions'GlobalJitLevel'UnrecognizedValue
 -> OptimizerOptions'GlobalJitLevel'UnrecognizedValue -> Bool)
-> (OptimizerOptions'GlobalJitLevel'UnrecognizedValue
    -> OptimizerOptions'GlobalJitLevel'UnrecognizedValue -> Bool)
-> Eq OptimizerOptions'GlobalJitLevel'UnrecognizedValue
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: OptimizerOptions'GlobalJitLevel'UnrecognizedValue
-> OptimizerOptions'GlobalJitLevel'UnrecognizedValue -> Bool
$c/= :: OptimizerOptions'GlobalJitLevel'UnrecognizedValue
-> OptimizerOptions'GlobalJitLevel'UnrecognizedValue -> Bool
== :: OptimizerOptions'GlobalJitLevel'UnrecognizedValue
-> OptimizerOptions'GlobalJitLevel'UnrecognizedValue -> Bool
$c== :: OptimizerOptions'GlobalJitLevel'UnrecognizedValue
-> OptimizerOptions'GlobalJitLevel'UnrecognizedValue -> Bool
Prelude.Eq, Eq OptimizerOptions'GlobalJitLevel'UnrecognizedValue
Eq OptimizerOptions'GlobalJitLevel'UnrecognizedValue =>
(OptimizerOptions'GlobalJitLevel'UnrecognizedValue
 -> OptimizerOptions'GlobalJitLevel'UnrecognizedValue -> Ordering)
-> (OptimizerOptions'GlobalJitLevel'UnrecognizedValue
    -> OptimizerOptions'GlobalJitLevel'UnrecognizedValue -> Bool)
-> (OptimizerOptions'GlobalJitLevel'UnrecognizedValue
    -> OptimizerOptions'GlobalJitLevel'UnrecognizedValue -> Bool)
-> (OptimizerOptions'GlobalJitLevel'UnrecognizedValue
    -> OptimizerOptions'GlobalJitLevel'UnrecognizedValue -> Bool)
-> (OptimizerOptions'GlobalJitLevel'UnrecognizedValue
    -> OptimizerOptions'GlobalJitLevel'UnrecognizedValue -> Bool)
-> (OptimizerOptions'GlobalJitLevel'UnrecognizedValue
    -> OptimizerOptions'GlobalJitLevel'UnrecognizedValue
    -> OptimizerOptions'GlobalJitLevel'UnrecognizedValue)
-> (OptimizerOptions'GlobalJitLevel'UnrecognizedValue
    -> OptimizerOptions'GlobalJitLevel'UnrecognizedValue
    -> OptimizerOptions'GlobalJitLevel'UnrecognizedValue)
-> Ord OptimizerOptions'GlobalJitLevel'UnrecognizedValue
OptimizerOptions'GlobalJitLevel'UnrecognizedValue
-> OptimizerOptions'GlobalJitLevel'UnrecognizedValue -> Bool
OptimizerOptions'GlobalJitLevel'UnrecognizedValue
-> OptimizerOptions'GlobalJitLevel'UnrecognizedValue -> Ordering
OptimizerOptions'GlobalJitLevel'UnrecognizedValue
-> OptimizerOptions'GlobalJitLevel'UnrecognizedValue
-> OptimizerOptions'GlobalJitLevel'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 :: OptimizerOptions'GlobalJitLevel'UnrecognizedValue
-> OptimizerOptions'GlobalJitLevel'UnrecognizedValue
-> OptimizerOptions'GlobalJitLevel'UnrecognizedValue
$cmin :: OptimizerOptions'GlobalJitLevel'UnrecognizedValue
-> OptimizerOptions'GlobalJitLevel'UnrecognizedValue
-> OptimizerOptions'GlobalJitLevel'UnrecognizedValue
max :: OptimizerOptions'GlobalJitLevel'UnrecognizedValue
-> OptimizerOptions'GlobalJitLevel'UnrecognizedValue
-> OptimizerOptions'GlobalJitLevel'UnrecognizedValue
$cmax :: OptimizerOptions'GlobalJitLevel'UnrecognizedValue
-> OptimizerOptions'GlobalJitLevel'UnrecognizedValue
-> OptimizerOptions'GlobalJitLevel'UnrecognizedValue
>= :: OptimizerOptions'GlobalJitLevel'UnrecognizedValue
-> OptimizerOptions'GlobalJitLevel'UnrecognizedValue -> Bool
$c>= :: OptimizerOptions'GlobalJitLevel'UnrecognizedValue
-> OptimizerOptions'GlobalJitLevel'UnrecognizedValue -> Bool
> :: OptimizerOptions'GlobalJitLevel'UnrecognizedValue
-> OptimizerOptions'GlobalJitLevel'UnrecognizedValue -> Bool
$c> :: OptimizerOptions'GlobalJitLevel'UnrecognizedValue
-> OptimizerOptions'GlobalJitLevel'UnrecognizedValue -> Bool
<= :: OptimizerOptions'GlobalJitLevel'UnrecognizedValue
-> OptimizerOptions'GlobalJitLevel'UnrecognizedValue -> Bool
$c<= :: OptimizerOptions'GlobalJitLevel'UnrecognizedValue
-> OptimizerOptions'GlobalJitLevel'UnrecognizedValue -> Bool
< :: OptimizerOptions'GlobalJitLevel'UnrecognizedValue
-> OptimizerOptions'GlobalJitLevel'UnrecognizedValue -> Bool
$c< :: OptimizerOptions'GlobalJitLevel'UnrecognizedValue
-> OptimizerOptions'GlobalJitLevel'UnrecognizedValue -> Bool
compare :: OptimizerOptions'GlobalJitLevel'UnrecognizedValue
-> OptimizerOptions'GlobalJitLevel'UnrecognizedValue -> Ordering
$ccompare :: OptimizerOptions'GlobalJitLevel'UnrecognizedValue
-> OptimizerOptions'GlobalJitLevel'UnrecognizedValue -> Ordering
$cp1Ord :: Eq OptimizerOptions'GlobalJitLevel'UnrecognizedValue
Prelude.Ord, Int -> OptimizerOptions'GlobalJitLevel'UnrecognizedValue -> ShowS
[OptimizerOptions'GlobalJitLevel'UnrecognizedValue] -> ShowS
OptimizerOptions'GlobalJitLevel'UnrecognizedValue -> String
(Int -> OptimizerOptions'GlobalJitLevel'UnrecognizedValue -> ShowS)
-> (OptimizerOptions'GlobalJitLevel'UnrecognizedValue -> String)
-> ([OptimizerOptions'GlobalJitLevel'UnrecognizedValue] -> ShowS)
-> Show OptimizerOptions'GlobalJitLevel'UnrecognizedValue
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [OptimizerOptions'GlobalJitLevel'UnrecognizedValue] -> ShowS
$cshowList :: [OptimizerOptions'GlobalJitLevel'UnrecognizedValue] -> ShowS
show :: OptimizerOptions'GlobalJitLevel'UnrecognizedValue -> String
$cshow :: OptimizerOptions'GlobalJitLevel'UnrecognizedValue -> String
showsPrec :: Int -> OptimizerOptions'GlobalJitLevel'UnrecognizedValue -> ShowS
$cshowsPrec :: Int -> OptimizerOptions'GlobalJitLevel'UnrecognizedValue -> ShowS
Prelude.Show)
data OptimizerOptions'GlobalJitLevel
  = OptimizerOptions'OFF |
    OptimizerOptions'DEFAULT |
    OptimizerOptions'ON_1 |
    OptimizerOptions'ON_2 |
    OptimizerOptions'GlobalJitLevel'Unrecognized !OptimizerOptions'GlobalJitLevel'UnrecognizedValue
  deriving stock (Int -> OptimizerOptions'GlobalJitLevel -> ShowS
[OptimizerOptions'GlobalJitLevel] -> ShowS
OptimizerOptions'GlobalJitLevel -> String
(Int -> OptimizerOptions'GlobalJitLevel -> ShowS)
-> (OptimizerOptions'GlobalJitLevel -> String)
-> ([OptimizerOptions'GlobalJitLevel] -> ShowS)
-> Show OptimizerOptions'GlobalJitLevel
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [OptimizerOptions'GlobalJitLevel] -> ShowS
$cshowList :: [OptimizerOptions'GlobalJitLevel] -> ShowS
show :: OptimizerOptions'GlobalJitLevel -> String
$cshow :: OptimizerOptions'GlobalJitLevel -> String
showsPrec :: Int -> OptimizerOptions'GlobalJitLevel -> ShowS
$cshowsPrec :: Int -> OptimizerOptions'GlobalJitLevel -> ShowS
Prelude.Show, OptimizerOptions'GlobalJitLevel
-> OptimizerOptions'GlobalJitLevel -> Bool
(OptimizerOptions'GlobalJitLevel
 -> OptimizerOptions'GlobalJitLevel -> Bool)
-> (OptimizerOptions'GlobalJitLevel
    -> OptimizerOptions'GlobalJitLevel -> Bool)
-> Eq OptimizerOptions'GlobalJitLevel
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: OptimizerOptions'GlobalJitLevel
-> OptimizerOptions'GlobalJitLevel -> Bool
$c/= :: OptimizerOptions'GlobalJitLevel
-> OptimizerOptions'GlobalJitLevel -> Bool
== :: OptimizerOptions'GlobalJitLevel
-> OptimizerOptions'GlobalJitLevel -> Bool
$c== :: OptimizerOptions'GlobalJitLevel
-> OptimizerOptions'GlobalJitLevel -> Bool
Prelude.Eq, Eq OptimizerOptions'GlobalJitLevel
Eq OptimizerOptions'GlobalJitLevel =>
(OptimizerOptions'GlobalJitLevel
 -> OptimizerOptions'GlobalJitLevel -> Ordering)
-> (OptimizerOptions'GlobalJitLevel
    -> OptimizerOptions'GlobalJitLevel -> Bool)
-> (OptimizerOptions'GlobalJitLevel
    -> OptimizerOptions'GlobalJitLevel -> Bool)
-> (OptimizerOptions'GlobalJitLevel
    -> OptimizerOptions'GlobalJitLevel -> Bool)
-> (OptimizerOptions'GlobalJitLevel
    -> OptimizerOptions'GlobalJitLevel -> Bool)
-> (OptimizerOptions'GlobalJitLevel
    -> OptimizerOptions'GlobalJitLevel
    -> OptimizerOptions'GlobalJitLevel)
-> (OptimizerOptions'GlobalJitLevel
    -> OptimizerOptions'GlobalJitLevel
    -> OptimizerOptions'GlobalJitLevel)
-> Ord OptimizerOptions'GlobalJitLevel
OptimizerOptions'GlobalJitLevel
-> OptimizerOptions'GlobalJitLevel -> Bool
OptimizerOptions'GlobalJitLevel
-> OptimizerOptions'GlobalJitLevel -> Ordering
OptimizerOptions'GlobalJitLevel
-> OptimizerOptions'GlobalJitLevel
-> OptimizerOptions'GlobalJitLevel
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 :: OptimizerOptions'GlobalJitLevel
-> OptimizerOptions'GlobalJitLevel
-> OptimizerOptions'GlobalJitLevel
$cmin :: OptimizerOptions'GlobalJitLevel
-> OptimizerOptions'GlobalJitLevel
-> OptimizerOptions'GlobalJitLevel
max :: OptimizerOptions'GlobalJitLevel
-> OptimizerOptions'GlobalJitLevel
-> OptimizerOptions'GlobalJitLevel
$cmax :: OptimizerOptions'GlobalJitLevel
-> OptimizerOptions'GlobalJitLevel
-> OptimizerOptions'GlobalJitLevel
>= :: OptimizerOptions'GlobalJitLevel
-> OptimizerOptions'GlobalJitLevel -> Bool
$c>= :: OptimizerOptions'GlobalJitLevel
-> OptimizerOptions'GlobalJitLevel -> Bool
> :: OptimizerOptions'GlobalJitLevel
-> OptimizerOptions'GlobalJitLevel -> Bool
$c> :: OptimizerOptions'GlobalJitLevel
-> OptimizerOptions'GlobalJitLevel -> Bool
<= :: OptimizerOptions'GlobalJitLevel
-> OptimizerOptions'GlobalJitLevel -> Bool
$c<= :: OptimizerOptions'GlobalJitLevel
-> OptimizerOptions'GlobalJitLevel -> Bool
< :: OptimizerOptions'GlobalJitLevel
-> OptimizerOptions'GlobalJitLevel -> Bool
$c< :: OptimizerOptions'GlobalJitLevel
-> OptimizerOptions'GlobalJitLevel -> Bool
compare :: OptimizerOptions'GlobalJitLevel
-> OptimizerOptions'GlobalJitLevel -> Ordering
$ccompare :: OptimizerOptions'GlobalJitLevel
-> OptimizerOptions'GlobalJitLevel -> Ordering
$cp1Ord :: Eq OptimizerOptions'GlobalJitLevel
Prelude.Ord)
instance Data.ProtoLens.MessageEnum OptimizerOptions'GlobalJitLevel where
  maybeToEnum :: Int -> Maybe OptimizerOptions'GlobalJitLevel
maybeToEnum (-1) = OptimizerOptions'GlobalJitLevel
-> Maybe OptimizerOptions'GlobalJitLevel
forall a. a -> Maybe a
Prelude.Just OptimizerOptions'GlobalJitLevel
OptimizerOptions'OFF
  maybeToEnum 0 = OptimizerOptions'GlobalJitLevel
-> Maybe OptimizerOptions'GlobalJitLevel
forall a. a -> Maybe a
Prelude.Just OptimizerOptions'GlobalJitLevel
OptimizerOptions'DEFAULT
  maybeToEnum 1 = OptimizerOptions'GlobalJitLevel
-> Maybe OptimizerOptions'GlobalJitLevel
forall a. a -> Maybe a
Prelude.Just OptimizerOptions'GlobalJitLevel
OptimizerOptions'ON_1
  maybeToEnum 2 = OptimizerOptions'GlobalJitLevel
-> Maybe OptimizerOptions'GlobalJitLevel
forall a. a -> Maybe a
Prelude.Just OptimizerOptions'GlobalJitLevel
OptimizerOptions'ON_2
  maybeToEnum k :: Int
k
    = OptimizerOptions'GlobalJitLevel
-> Maybe OptimizerOptions'GlobalJitLevel
forall a. a -> Maybe a
Prelude.Just
        (OptimizerOptions'GlobalJitLevel'UnrecognizedValue
-> OptimizerOptions'GlobalJitLevel
OptimizerOptions'GlobalJitLevel'Unrecognized
           (Int32 -> OptimizerOptions'GlobalJitLevel'UnrecognizedValue
OptimizerOptions'GlobalJitLevel'UnrecognizedValue
              (Int -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int
k)))
  showEnum :: OptimizerOptions'GlobalJitLevel -> String
showEnum OptimizerOptions'DEFAULT = "DEFAULT"
  showEnum OptimizerOptions'OFF = "OFF"
  showEnum OptimizerOptions'ON_1 = "ON_1"
  showEnum OptimizerOptions'ON_2 = "ON_2"
  showEnum
    (OptimizerOptions'GlobalJitLevel'Unrecognized (OptimizerOptions'GlobalJitLevel'UnrecognizedValue k :: Int32
k))
    = Int32 -> String
forall a. Show a => a -> String
Prelude.show Int32
k
  readEnum :: String -> Maybe OptimizerOptions'GlobalJitLevel
readEnum k :: String
k
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k "DEFAULT" = OptimizerOptions'GlobalJitLevel
-> Maybe OptimizerOptions'GlobalJitLevel
forall a. a -> Maybe a
Prelude.Just OptimizerOptions'GlobalJitLevel
OptimizerOptions'DEFAULT
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k "OFF" = OptimizerOptions'GlobalJitLevel
-> Maybe OptimizerOptions'GlobalJitLevel
forall a. a -> Maybe a
Prelude.Just OptimizerOptions'GlobalJitLevel
OptimizerOptions'OFF
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k "ON_1" = OptimizerOptions'GlobalJitLevel
-> Maybe OptimizerOptions'GlobalJitLevel
forall a. a -> Maybe a
Prelude.Just OptimizerOptions'GlobalJitLevel
OptimizerOptions'ON_1
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k "ON_2" = OptimizerOptions'GlobalJitLevel
-> Maybe OptimizerOptions'GlobalJitLevel
forall a. a -> Maybe a
Prelude.Just OptimizerOptions'GlobalJitLevel
OptimizerOptions'ON_2
    | Bool
Prelude.otherwise
    = Maybe Int
-> (Int -> Maybe OptimizerOptions'GlobalJitLevel)
-> Maybe OptimizerOptions'GlobalJitLevel
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 OptimizerOptions'GlobalJitLevel
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum
instance Prelude.Bounded OptimizerOptions'GlobalJitLevel where
  minBound :: OptimizerOptions'GlobalJitLevel
minBound = OptimizerOptions'GlobalJitLevel
OptimizerOptions'OFF
  maxBound :: OptimizerOptions'GlobalJitLevel
maxBound = OptimizerOptions'GlobalJitLevel
OptimizerOptions'ON_2
instance Prelude.Enum OptimizerOptions'GlobalJitLevel where
  toEnum :: Int -> OptimizerOptions'GlobalJitLevel
toEnum k__ :: Int
k__
    = OptimizerOptions'GlobalJitLevel
-> (OptimizerOptions'GlobalJitLevel
    -> OptimizerOptions'GlobalJitLevel)
-> Maybe OptimizerOptions'GlobalJitLevel
-> OptimizerOptions'GlobalJitLevel
forall b a. b -> (a -> b) -> Maybe a -> b
Prelude.maybe
        (String -> OptimizerOptions'GlobalJitLevel
forall a. HasCallStack => String -> a
Prelude.error
           (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
              "toEnum: unknown value for enum GlobalJitLevel: "
              (Int -> String
forall a. Show a => a -> String
Prelude.show Int
k__)))
        OptimizerOptions'GlobalJitLevel -> OptimizerOptions'GlobalJitLevel
forall a. a -> a
Prelude.id
        (Int -> Maybe OptimizerOptions'GlobalJitLevel
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum Int
k__)
  fromEnum :: OptimizerOptions'GlobalJitLevel -> Int
fromEnum OptimizerOptions'OFF = -1
  fromEnum OptimizerOptions'DEFAULT = 0
  fromEnum OptimizerOptions'ON_1 = 1
  fromEnum OptimizerOptions'ON_2 = 2
  fromEnum
    (OptimizerOptions'GlobalJitLevel'Unrecognized (OptimizerOptions'GlobalJitLevel'UnrecognizedValue k :: Int32
k))
    = Int32 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
k
  succ :: OptimizerOptions'GlobalJitLevel -> OptimizerOptions'GlobalJitLevel
succ OptimizerOptions'ON_2
    = String -> OptimizerOptions'GlobalJitLevel
forall a. HasCallStack => String -> a
Prelude.error
        "OptimizerOptions'GlobalJitLevel.succ: bad argument OptimizerOptions'ON_2. This value would be out of bounds."
  succ OptimizerOptions'OFF = OptimizerOptions'GlobalJitLevel
OptimizerOptions'DEFAULT
  succ OptimizerOptions'DEFAULT = OptimizerOptions'GlobalJitLevel
OptimizerOptions'ON_1
  succ OptimizerOptions'ON_1 = OptimizerOptions'GlobalJitLevel
OptimizerOptions'ON_2
  succ (OptimizerOptions'GlobalJitLevel'Unrecognized _)
    = String -> OptimizerOptions'GlobalJitLevel
forall a. HasCallStack => String -> a
Prelude.error
        "OptimizerOptions'GlobalJitLevel.succ: bad argument: unrecognized value"
  pred :: OptimizerOptions'GlobalJitLevel -> OptimizerOptions'GlobalJitLevel
pred OptimizerOptions'OFF
    = String -> OptimizerOptions'GlobalJitLevel
forall a. HasCallStack => String -> a
Prelude.error
        "OptimizerOptions'GlobalJitLevel.pred: bad argument OptimizerOptions'OFF. This value would be out of bounds."
  pred OptimizerOptions'DEFAULT = OptimizerOptions'GlobalJitLevel
OptimizerOptions'OFF
  pred OptimizerOptions'ON_1 = OptimizerOptions'GlobalJitLevel
OptimizerOptions'DEFAULT
  pred OptimizerOptions'ON_2 = OptimizerOptions'GlobalJitLevel
OptimizerOptions'ON_1
  pred (OptimizerOptions'GlobalJitLevel'Unrecognized _)
    = String -> OptimizerOptions'GlobalJitLevel
forall a. HasCallStack => String -> a
Prelude.error
        "OptimizerOptions'GlobalJitLevel.pred: bad argument: unrecognized value"
  enumFrom :: OptimizerOptions'GlobalJitLevel
-> [OptimizerOptions'GlobalJitLevel]
enumFrom = OptimizerOptions'GlobalJitLevel
-> [OptimizerOptions'GlobalJitLevel]
forall a. (Enum a, Bounded a) => a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFrom
  enumFromTo :: OptimizerOptions'GlobalJitLevel
-> OptimizerOptions'GlobalJitLevel
-> [OptimizerOptions'GlobalJitLevel]
enumFromTo = OptimizerOptions'GlobalJitLevel
-> OptimizerOptions'GlobalJitLevel
-> [OptimizerOptions'GlobalJitLevel]
forall a. Enum a => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromTo
  enumFromThen :: OptimizerOptions'GlobalJitLevel
-> OptimizerOptions'GlobalJitLevel
-> [OptimizerOptions'GlobalJitLevel]
enumFromThen = OptimizerOptions'GlobalJitLevel
-> OptimizerOptions'GlobalJitLevel
-> [OptimizerOptions'GlobalJitLevel]
forall a. (Enum a, Bounded a) => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThen
  enumFromThenTo :: OptimizerOptions'GlobalJitLevel
-> OptimizerOptions'GlobalJitLevel
-> OptimizerOptions'GlobalJitLevel
-> [OptimizerOptions'GlobalJitLevel]
enumFromThenTo = OptimizerOptions'GlobalJitLevel
-> OptimizerOptions'GlobalJitLevel
-> OptimizerOptions'GlobalJitLevel
-> [OptimizerOptions'GlobalJitLevel]
forall a. Enum a => a -> a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThenTo
instance Data.ProtoLens.FieldDefault OptimizerOptions'GlobalJitLevel where
  fieldDefault :: OptimizerOptions'GlobalJitLevel
fieldDefault = OptimizerOptions'GlobalJitLevel
OptimizerOptions'OFF
instance Control.DeepSeq.NFData OptimizerOptions'GlobalJitLevel where
  rnf :: OptimizerOptions'GlobalJitLevel -> ()
rnf x__ :: OptimizerOptions'GlobalJitLevel
x__ = OptimizerOptions'GlobalJitLevel -> () -> ()
forall a b. a -> b -> b
Prelude.seq OptimizerOptions'GlobalJitLevel
x__ ()
newtype OptimizerOptions'Level'UnrecognizedValue
  = OptimizerOptions'Level'UnrecognizedValue Data.Int.Int32
  deriving stock (OptimizerOptions'Level'UnrecognizedValue
-> OptimizerOptions'Level'UnrecognizedValue -> Bool
(OptimizerOptions'Level'UnrecognizedValue
 -> OptimizerOptions'Level'UnrecognizedValue -> Bool)
-> (OptimizerOptions'Level'UnrecognizedValue
    -> OptimizerOptions'Level'UnrecognizedValue -> Bool)
-> Eq OptimizerOptions'Level'UnrecognizedValue
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: OptimizerOptions'Level'UnrecognizedValue
-> OptimizerOptions'Level'UnrecognizedValue -> Bool
$c/= :: OptimizerOptions'Level'UnrecognizedValue
-> OptimizerOptions'Level'UnrecognizedValue -> Bool
== :: OptimizerOptions'Level'UnrecognizedValue
-> OptimizerOptions'Level'UnrecognizedValue -> Bool
$c== :: OptimizerOptions'Level'UnrecognizedValue
-> OptimizerOptions'Level'UnrecognizedValue -> Bool
Prelude.Eq, Eq OptimizerOptions'Level'UnrecognizedValue
Eq OptimizerOptions'Level'UnrecognizedValue =>
(OptimizerOptions'Level'UnrecognizedValue
 -> OptimizerOptions'Level'UnrecognizedValue -> Ordering)
-> (OptimizerOptions'Level'UnrecognizedValue
    -> OptimizerOptions'Level'UnrecognizedValue -> Bool)
-> (OptimizerOptions'Level'UnrecognizedValue
    -> OptimizerOptions'Level'UnrecognizedValue -> Bool)
-> (OptimizerOptions'Level'UnrecognizedValue
    -> OptimizerOptions'Level'UnrecognizedValue -> Bool)
-> (OptimizerOptions'Level'UnrecognizedValue
    -> OptimizerOptions'Level'UnrecognizedValue -> Bool)
-> (OptimizerOptions'Level'UnrecognizedValue
    -> OptimizerOptions'Level'UnrecognizedValue
    -> OptimizerOptions'Level'UnrecognizedValue)
-> (OptimizerOptions'Level'UnrecognizedValue
    -> OptimizerOptions'Level'UnrecognizedValue
    -> OptimizerOptions'Level'UnrecognizedValue)
-> Ord OptimizerOptions'Level'UnrecognizedValue
OptimizerOptions'Level'UnrecognizedValue
-> OptimizerOptions'Level'UnrecognizedValue -> Bool
OptimizerOptions'Level'UnrecognizedValue
-> OptimizerOptions'Level'UnrecognizedValue -> Ordering
OptimizerOptions'Level'UnrecognizedValue
-> OptimizerOptions'Level'UnrecognizedValue
-> OptimizerOptions'Level'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 :: OptimizerOptions'Level'UnrecognizedValue
-> OptimizerOptions'Level'UnrecognizedValue
-> OptimizerOptions'Level'UnrecognizedValue
$cmin :: OptimizerOptions'Level'UnrecognizedValue
-> OptimizerOptions'Level'UnrecognizedValue
-> OptimizerOptions'Level'UnrecognizedValue
max :: OptimizerOptions'Level'UnrecognizedValue
-> OptimizerOptions'Level'UnrecognizedValue
-> OptimizerOptions'Level'UnrecognizedValue
$cmax :: OptimizerOptions'Level'UnrecognizedValue
-> OptimizerOptions'Level'UnrecognizedValue
-> OptimizerOptions'Level'UnrecognizedValue
>= :: OptimizerOptions'Level'UnrecognizedValue
-> OptimizerOptions'Level'UnrecognizedValue -> Bool
$c>= :: OptimizerOptions'Level'UnrecognizedValue
-> OptimizerOptions'Level'UnrecognizedValue -> Bool
> :: OptimizerOptions'Level'UnrecognizedValue
-> OptimizerOptions'Level'UnrecognizedValue -> Bool
$c> :: OptimizerOptions'Level'UnrecognizedValue
-> OptimizerOptions'Level'UnrecognizedValue -> Bool
<= :: OptimizerOptions'Level'UnrecognizedValue
-> OptimizerOptions'Level'UnrecognizedValue -> Bool
$c<= :: OptimizerOptions'Level'UnrecognizedValue
-> OptimizerOptions'Level'UnrecognizedValue -> Bool
< :: OptimizerOptions'Level'UnrecognizedValue
-> OptimizerOptions'Level'UnrecognizedValue -> Bool
$c< :: OptimizerOptions'Level'UnrecognizedValue
-> OptimizerOptions'Level'UnrecognizedValue -> Bool
compare :: OptimizerOptions'Level'UnrecognizedValue
-> OptimizerOptions'Level'UnrecognizedValue -> Ordering
$ccompare :: OptimizerOptions'Level'UnrecognizedValue
-> OptimizerOptions'Level'UnrecognizedValue -> Ordering
$cp1Ord :: Eq OptimizerOptions'Level'UnrecognizedValue
Prelude.Ord, Int -> OptimizerOptions'Level'UnrecognizedValue -> ShowS
[OptimizerOptions'Level'UnrecognizedValue] -> ShowS
OptimizerOptions'Level'UnrecognizedValue -> String
(Int -> OptimizerOptions'Level'UnrecognizedValue -> ShowS)
-> (OptimizerOptions'Level'UnrecognizedValue -> String)
-> ([OptimizerOptions'Level'UnrecognizedValue] -> ShowS)
-> Show OptimizerOptions'Level'UnrecognizedValue
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [OptimizerOptions'Level'UnrecognizedValue] -> ShowS
$cshowList :: [OptimizerOptions'Level'UnrecognizedValue] -> ShowS
show :: OptimizerOptions'Level'UnrecognizedValue -> String
$cshow :: OptimizerOptions'Level'UnrecognizedValue -> String
showsPrec :: Int -> OptimizerOptions'Level'UnrecognizedValue -> ShowS
$cshowsPrec :: Int -> OptimizerOptions'Level'UnrecognizedValue -> ShowS
Prelude.Show)
data OptimizerOptions'Level
  = OptimizerOptions'L0 |
    OptimizerOptions'L1 |
    OptimizerOptions'Level'Unrecognized !OptimizerOptions'Level'UnrecognizedValue
  deriving stock (Int -> OptimizerOptions'Level -> ShowS
[OptimizerOptions'Level] -> ShowS
OptimizerOptions'Level -> String
(Int -> OptimizerOptions'Level -> ShowS)
-> (OptimizerOptions'Level -> String)
-> ([OptimizerOptions'Level] -> ShowS)
-> Show OptimizerOptions'Level
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [OptimizerOptions'Level] -> ShowS
$cshowList :: [OptimizerOptions'Level] -> ShowS
show :: OptimizerOptions'Level -> String
$cshow :: OptimizerOptions'Level -> String
showsPrec :: Int -> OptimizerOptions'Level -> ShowS
$cshowsPrec :: Int -> OptimizerOptions'Level -> ShowS
Prelude.Show, OptimizerOptions'Level -> OptimizerOptions'Level -> Bool
(OptimizerOptions'Level -> OptimizerOptions'Level -> Bool)
-> (OptimizerOptions'Level -> OptimizerOptions'Level -> Bool)
-> Eq OptimizerOptions'Level
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: OptimizerOptions'Level -> OptimizerOptions'Level -> Bool
$c/= :: OptimizerOptions'Level -> OptimizerOptions'Level -> Bool
== :: OptimizerOptions'Level -> OptimizerOptions'Level -> Bool
$c== :: OptimizerOptions'Level -> OptimizerOptions'Level -> Bool
Prelude.Eq, Eq OptimizerOptions'Level
Eq OptimizerOptions'Level =>
(OptimizerOptions'Level -> OptimizerOptions'Level -> Ordering)
-> (OptimizerOptions'Level -> OptimizerOptions'Level -> Bool)
-> (OptimizerOptions'Level -> OptimizerOptions'Level -> Bool)
-> (OptimizerOptions'Level -> OptimizerOptions'Level -> Bool)
-> (OptimizerOptions'Level -> OptimizerOptions'Level -> Bool)
-> (OptimizerOptions'Level
    -> OptimizerOptions'Level -> OptimizerOptions'Level)
-> (OptimizerOptions'Level
    -> OptimizerOptions'Level -> OptimizerOptions'Level)
-> Ord OptimizerOptions'Level
OptimizerOptions'Level -> OptimizerOptions'Level -> Bool
OptimizerOptions'Level -> OptimizerOptions'Level -> Ordering
OptimizerOptions'Level
-> OptimizerOptions'Level -> OptimizerOptions'Level
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 :: OptimizerOptions'Level
-> OptimizerOptions'Level -> OptimizerOptions'Level
$cmin :: OptimizerOptions'Level
-> OptimizerOptions'Level -> OptimizerOptions'Level
max :: OptimizerOptions'Level
-> OptimizerOptions'Level -> OptimizerOptions'Level
$cmax :: OptimizerOptions'Level
-> OptimizerOptions'Level -> OptimizerOptions'Level
>= :: OptimizerOptions'Level -> OptimizerOptions'Level -> Bool
$c>= :: OptimizerOptions'Level -> OptimizerOptions'Level -> Bool
> :: OptimizerOptions'Level -> OptimizerOptions'Level -> Bool
$c> :: OptimizerOptions'Level -> OptimizerOptions'Level -> Bool
<= :: OptimizerOptions'Level -> OptimizerOptions'Level -> Bool
$c<= :: OptimizerOptions'Level -> OptimizerOptions'Level -> Bool
< :: OptimizerOptions'Level -> OptimizerOptions'Level -> Bool
$c< :: OptimizerOptions'Level -> OptimizerOptions'Level -> Bool
compare :: OptimizerOptions'Level -> OptimizerOptions'Level -> Ordering
$ccompare :: OptimizerOptions'Level -> OptimizerOptions'Level -> Ordering
$cp1Ord :: Eq OptimizerOptions'Level
Prelude.Ord)
instance Data.ProtoLens.MessageEnum OptimizerOptions'Level where
  maybeToEnum :: Int -> Maybe OptimizerOptions'Level
maybeToEnum (-1) = OptimizerOptions'Level -> Maybe OptimizerOptions'Level
forall a. a -> Maybe a
Prelude.Just OptimizerOptions'Level
OptimizerOptions'L0
  maybeToEnum 0 = OptimizerOptions'Level -> Maybe OptimizerOptions'Level
forall a. a -> Maybe a
Prelude.Just OptimizerOptions'Level
OptimizerOptions'L1
  maybeToEnum k :: Int
k
    = OptimizerOptions'Level -> Maybe OptimizerOptions'Level
forall a. a -> Maybe a
Prelude.Just
        (OptimizerOptions'Level'UnrecognizedValue -> OptimizerOptions'Level
OptimizerOptions'Level'Unrecognized
           (Int32 -> OptimizerOptions'Level'UnrecognizedValue
OptimizerOptions'Level'UnrecognizedValue
              (Int -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int
k)))
  showEnum :: OptimizerOptions'Level -> String
showEnum OptimizerOptions'L1 = "L1"
  showEnum OptimizerOptions'L0 = "L0"
  showEnum
    (OptimizerOptions'Level'Unrecognized (OptimizerOptions'Level'UnrecognizedValue k :: Int32
k))
    = Int32 -> String
forall a. Show a => a -> String
Prelude.show Int32
k
  readEnum :: String -> Maybe OptimizerOptions'Level
readEnum k :: String
k
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k "L1" = OptimizerOptions'Level -> Maybe OptimizerOptions'Level
forall a. a -> Maybe a
Prelude.Just OptimizerOptions'Level
OptimizerOptions'L1
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k "L0" = OptimizerOptions'Level -> Maybe OptimizerOptions'Level
forall a. a -> Maybe a
Prelude.Just OptimizerOptions'Level
OptimizerOptions'L0
    | Bool
Prelude.otherwise
    = Maybe Int
-> (Int -> Maybe OptimizerOptions'Level)
-> Maybe OptimizerOptions'Level
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 OptimizerOptions'Level
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum
instance Prelude.Bounded OptimizerOptions'Level where
  minBound :: OptimizerOptions'Level
minBound = OptimizerOptions'Level
OptimizerOptions'L0
  maxBound :: OptimizerOptions'Level
maxBound = OptimizerOptions'Level
OptimizerOptions'L1
instance Prelude.Enum OptimizerOptions'Level where
  toEnum :: Int -> OptimizerOptions'Level
toEnum k__ :: Int
k__
    = OptimizerOptions'Level
-> (OptimizerOptions'Level -> OptimizerOptions'Level)
-> Maybe OptimizerOptions'Level
-> OptimizerOptions'Level
forall b a. b -> (a -> b) -> Maybe a -> b
Prelude.maybe
        (String -> OptimizerOptions'Level
forall a. HasCallStack => String -> a
Prelude.error
           (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
              "toEnum: unknown value for enum Level: " (Int -> String
forall a. Show a => a -> String
Prelude.show Int
k__)))
        OptimizerOptions'Level -> OptimizerOptions'Level
forall a. a -> a
Prelude.id
        (Int -> Maybe OptimizerOptions'Level
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum Int
k__)
  fromEnum :: OptimizerOptions'Level -> Int
fromEnum OptimizerOptions'L0 = -1
  fromEnum OptimizerOptions'L1 = 0
  fromEnum
    (OptimizerOptions'Level'Unrecognized (OptimizerOptions'Level'UnrecognizedValue k :: Int32
k))
    = Int32 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
k
  succ :: OptimizerOptions'Level -> OptimizerOptions'Level
succ OptimizerOptions'L1
    = String -> OptimizerOptions'Level
forall a. HasCallStack => String -> a
Prelude.error
        "OptimizerOptions'Level.succ: bad argument OptimizerOptions'L1. This value would be out of bounds."
  succ OptimizerOptions'L0 = OptimizerOptions'Level
OptimizerOptions'L1
  succ (OptimizerOptions'Level'Unrecognized _)
    = String -> OptimizerOptions'Level
forall a. HasCallStack => String -> a
Prelude.error
        "OptimizerOptions'Level.succ: bad argument: unrecognized value"
  pred :: OptimizerOptions'Level -> OptimizerOptions'Level
pred OptimizerOptions'L0
    = String -> OptimizerOptions'Level
forall a. HasCallStack => String -> a
Prelude.error
        "OptimizerOptions'Level.pred: bad argument OptimizerOptions'L0. This value would be out of bounds."
  pred OptimizerOptions'L1 = OptimizerOptions'Level
OptimizerOptions'L0
  pred (OptimizerOptions'Level'Unrecognized _)
    = String -> OptimizerOptions'Level
forall a. HasCallStack => String -> a
Prelude.error
        "OptimizerOptions'Level.pred: bad argument: unrecognized value"
  enumFrom :: OptimizerOptions'Level -> [OptimizerOptions'Level]
enumFrom = OptimizerOptions'Level -> [OptimizerOptions'Level]
forall a. (Enum a, Bounded a) => a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFrom
  enumFromTo :: OptimizerOptions'Level
-> OptimizerOptions'Level -> [OptimizerOptions'Level]
enumFromTo = OptimizerOptions'Level
-> OptimizerOptions'Level -> [OptimizerOptions'Level]
forall a. Enum a => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromTo
  enumFromThen :: OptimizerOptions'Level
-> OptimizerOptions'Level -> [OptimizerOptions'Level]
enumFromThen = OptimizerOptions'Level
-> OptimizerOptions'Level -> [OptimizerOptions'Level]
forall a. (Enum a, Bounded a) => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThen
  enumFromThenTo :: OptimizerOptions'Level
-> OptimizerOptions'Level
-> OptimizerOptions'Level
-> [OptimizerOptions'Level]
enumFromThenTo = OptimizerOptions'Level
-> OptimizerOptions'Level
-> OptimizerOptions'Level
-> [OptimizerOptions'Level]
forall a. Enum a => a -> a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThenTo
instance Data.ProtoLens.FieldDefault OptimizerOptions'Level where
  fieldDefault :: OptimizerOptions'Level
fieldDefault = OptimizerOptions'Level
OptimizerOptions'L0
instance Control.DeepSeq.NFData OptimizerOptions'Level where
  rnf :: OptimizerOptions'Level -> ()
rnf x__ :: OptimizerOptions'Level
x__ = OptimizerOptions'Level -> () -> ()
forall a b. a -> b -> b
Prelude.seq OptimizerOptions'Level
x__ ()
{- | Fields :
     
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.useRpcForInprocessMaster' @:: Lens' RPCOptions Prelude.Bool@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.compressionAlgorithm' @:: Lens' RPCOptions Data.Text.Text@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.compressionLevel' @:: Lens' RPCOptions Data.Int.Int32@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.cacheRpcResponse' @:: Lens' RPCOptions Prelude.Bool@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.disableSessionConnectionSharing' @:: Lens' RPCOptions Prelude.Bool@ -}
data RPCOptions
  = RPCOptions'_constructor {RPCOptions -> Bool
_RPCOptions'useRpcForInprocessMaster :: !Prelude.Bool,
                             RPCOptions -> Text
_RPCOptions'compressionAlgorithm :: !Data.Text.Text,
                             RPCOptions -> Int32
_RPCOptions'compressionLevel :: !Data.Int.Int32,
                             RPCOptions -> Bool
_RPCOptions'cacheRpcResponse :: !Prelude.Bool,
                             RPCOptions -> Bool
_RPCOptions'disableSessionConnectionSharing :: !Prelude.Bool,
                             RPCOptions -> FieldSet
_RPCOptions'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RPCOptions -> RPCOptions -> Bool
(RPCOptions -> RPCOptions -> Bool)
-> (RPCOptions -> RPCOptions -> Bool) -> Eq RPCOptions
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: RPCOptions -> RPCOptions -> Bool
$c/= :: RPCOptions -> RPCOptions -> Bool
== :: RPCOptions -> RPCOptions -> Bool
$c== :: RPCOptions -> RPCOptions -> Bool
Prelude.Eq, Eq RPCOptions
Eq RPCOptions =>
(RPCOptions -> RPCOptions -> Ordering)
-> (RPCOptions -> RPCOptions -> Bool)
-> (RPCOptions -> RPCOptions -> Bool)
-> (RPCOptions -> RPCOptions -> Bool)
-> (RPCOptions -> RPCOptions -> Bool)
-> (RPCOptions -> RPCOptions -> RPCOptions)
-> (RPCOptions -> RPCOptions -> RPCOptions)
-> Ord RPCOptions
RPCOptions -> RPCOptions -> Bool
RPCOptions -> RPCOptions -> Ordering
RPCOptions -> RPCOptions -> RPCOptions
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 :: RPCOptions -> RPCOptions -> RPCOptions
$cmin :: RPCOptions -> RPCOptions -> RPCOptions
max :: RPCOptions -> RPCOptions -> RPCOptions
$cmax :: RPCOptions -> RPCOptions -> RPCOptions
>= :: RPCOptions -> RPCOptions -> Bool
$c>= :: RPCOptions -> RPCOptions -> Bool
> :: RPCOptions -> RPCOptions -> Bool
$c> :: RPCOptions -> RPCOptions -> Bool
<= :: RPCOptions -> RPCOptions -> Bool
$c<= :: RPCOptions -> RPCOptions -> Bool
< :: RPCOptions -> RPCOptions -> Bool
$c< :: RPCOptions -> RPCOptions -> Bool
compare :: RPCOptions -> RPCOptions -> Ordering
$ccompare :: RPCOptions -> RPCOptions -> Ordering
$cp1Ord :: Eq RPCOptions
Prelude.Ord)
instance Prelude.Show RPCOptions where
  showsPrec :: Int -> RPCOptions -> ShowS
showsPrec _ __x :: RPCOptions
__x __s :: String
__s
    = Char -> ShowS
Prelude.showChar
        '{'
        (String -> ShowS
Prelude.showString
           (RPCOptions -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RPCOptions
__x) (Char -> ShowS
Prelude.showChar '}' String
__s))
instance Data.ProtoLens.Field.HasField RPCOptions "useRpcForInprocessMaster" Prelude.Bool where
  fieldOf :: Proxy# "useRpcForInprocessMaster"
-> (Bool -> f Bool) -> RPCOptions -> f RPCOptions
fieldOf _
    = ((Bool -> f Bool) -> RPCOptions -> f RPCOptions)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> RPCOptions
-> f RPCOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RPCOptions -> Bool)
-> (RPCOptions -> Bool -> RPCOptions)
-> Lens RPCOptions RPCOptions Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RPCOptions -> Bool
_RPCOptions'useRpcForInprocessMaster
           (\ x__ :: RPCOptions
x__ y__ :: Bool
y__ -> RPCOptions
x__ {_RPCOptions'useRpcForInprocessMaster :: Bool
_RPCOptions'useRpcForInprocessMaster = Bool
y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RPCOptions "compressionAlgorithm" Data.Text.Text where
  fieldOf :: Proxy# "compressionAlgorithm"
-> (Text -> f Text) -> RPCOptions -> f RPCOptions
fieldOf _
    = ((Text -> f Text) -> RPCOptions -> f RPCOptions)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RPCOptions
-> f RPCOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RPCOptions -> Text)
-> (RPCOptions -> Text -> RPCOptions)
-> Lens RPCOptions RPCOptions Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RPCOptions -> Text
_RPCOptions'compressionAlgorithm
           (\ x__ :: RPCOptions
x__ y__ :: Text
y__ -> RPCOptions
x__ {_RPCOptions'compressionAlgorithm :: Text
_RPCOptions'compressionAlgorithm = Text
y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RPCOptions "compressionLevel" Data.Int.Int32 where
  fieldOf :: Proxy# "compressionLevel"
-> (Int32 -> f Int32) -> RPCOptions -> f RPCOptions
fieldOf _
    = ((Int32 -> f Int32) -> RPCOptions -> f RPCOptions)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> RPCOptions
-> f RPCOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RPCOptions -> Int32)
-> (RPCOptions -> Int32 -> RPCOptions)
-> Lens RPCOptions RPCOptions Int32 Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RPCOptions -> Int32
_RPCOptions'compressionLevel
           (\ x__ :: RPCOptions
x__ y__ :: Int32
y__ -> RPCOptions
x__ {_RPCOptions'compressionLevel :: Int32
_RPCOptions'compressionLevel = Int32
y__}))
        (Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RPCOptions "cacheRpcResponse" Prelude.Bool where
  fieldOf :: Proxy# "cacheRpcResponse"
-> (Bool -> f Bool) -> RPCOptions -> f RPCOptions
fieldOf _
    = ((Bool -> f Bool) -> RPCOptions -> f RPCOptions)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> RPCOptions
-> f RPCOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RPCOptions -> Bool)
-> (RPCOptions -> Bool -> RPCOptions)
-> Lens RPCOptions RPCOptions Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RPCOptions -> Bool
_RPCOptions'cacheRpcResponse
           (\ x__ :: RPCOptions
x__ y__ :: Bool
y__ -> RPCOptions
x__ {_RPCOptions'cacheRpcResponse :: Bool
_RPCOptions'cacheRpcResponse = Bool
y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RPCOptions "disableSessionConnectionSharing" Prelude.Bool where
  fieldOf :: Proxy# "disableSessionConnectionSharing"
-> (Bool -> f Bool) -> RPCOptions -> f RPCOptions
fieldOf _
    = ((Bool -> f Bool) -> RPCOptions -> f RPCOptions)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> RPCOptions
-> f RPCOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RPCOptions -> Bool)
-> (RPCOptions -> Bool -> RPCOptions)
-> Lens RPCOptions RPCOptions Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RPCOptions -> Bool
_RPCOptions'disableSessionConnectionSharing
           (\ x__ :: RPCOptions
x__ y__ :: Bool
y__
              -> RPCOptions
x__ {_RPCOptions'disableSessionConnectionSharing :: Bool
_RPCOptions'disableSessionConnectionSharing = Bool
y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message RPCOptions where
  messageName :: Proxy RPCOptions -> Text
messageName _ = String -> Text
Data.Text.pack "tensorflow.RPCOptions"
  packedMessageDescriptor :: Proxy RPCOptions -> ByteString
packedMessageDescriptor _
    = "\n\
      \\n\
      \RPCOptions\DC2>\n\
      \\FSuse_rpc_for_inprocess_master\CAN\SOH \SOH(\bR\CANuseRpcForInprocessMaster\DC23\n\
      \\NAKcompression_algorithm\CAN\STX \SOH(\tR\DC4compressionAlgorithm\DC2+\n\
      \\DC1compression_level\CAN\ETX \SOH(\ENQR\DLEcompressionLevel\DC2,\n\
      \\DC2cache_rpc_response\CAN\EOT \SOH(\bR\DLEcacheRpcResponse\DC2K\n\
      \\"disable_session_connection_sharing\CAN\ENQ \SOH(\bR\USdisableSessionConnectionSharing"
  packedFileDescriptor :: Proxy RPCOptions -> ByteString
packedFileDescriptor _ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor RPCOptions)
fieldsByTag
    = let
        useRpcForInprocessMaster__field_descriptor :: FieldDescriptor RPCOptions
useRpcForInprocessMaster__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor RPCOptions Bool
-> FieldDescriptor RPCOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "use_rpc_for_inprocess_master"
              (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 RPCOptions RPCOptions Bool Bool
-> FieldAccessor RPCOptions 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 "useRpcForInprocessMaster" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"useRpcForInprocessMaster")) ::
              Data.ProtoLens.FieldDescriptor RPCOptions
        compressionAlgorithm__field_descriptor :: FieldDescriptor RPCOptions
compressionAlgorithm__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RPCOptions Text
-> FieldDescriptor RPCOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "compression_algorithm"
              (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 RPCOptions RPCOptions Text Text
-> FieldAccessor RPCOptions 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 "compressionAlgorithm" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"compressionAlgorithm")) ::
              Data.ProtoLens.FieldDescriptor RPCOptions
        compressionLevel__field_descriptor :: FieldDescriptor RPCOptions
compressionLevel__field_descriptor
          = String
-> FieldTypeDescriptor Int32
-> FieldAccessor RPCOptions Int32
-> FieldDescriptor RPCOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "compression_level"
              (ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.Int32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
              (WireDefault Int32
-> Lens RPCOptions RPCOptions Int32 Int32
-> FieldAccessor RPCOptions Int32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "compressionLevel" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"compressionLevel")) ::
              Data.ProtoLens.FieldDescriptor RPCOptions
        cacheRpcResponse__field_descriptor :: FieldDescriptor RPCOptions
cacheRpcResponse__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor RPCOptions Bool
-> FieldDescriptor RPCOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "cache_rpc_response"
              (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 RPCOptions RPCOptions Bool Bool
-> FieldAccessor RPCOptions 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 "cacheRpcResponse" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"cacheRpcResponse")) ::
              Data.ProtoLens.FieldDescriptor RPCOptions
        disableSessionConnectionSharing__field_descriptor :: FieldDescriptor RPCOptions
disableSessionConnectionSharing__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor RPCOptions Bool
-> FieldDescriptor RPCOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "disable_session_connection_sharing"
              (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 RPCOptions RPCOptions Bool Bool
-> FieldAccessor RPCOptions 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 "disableSessionConnectionSharing" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"disableSessionConnectionSharing")) ::
              Data.ProtoLens.FieldDescriptor RPCOptions
      in
        [(Tag, FieldDescriptor RPCOptions)]
-> Map Tag (FieldDescriptor RPCOptions)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag 1, 
            FieldDescriptor RPCOptions
useRpcForInprocessMaster__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 2, FieldDescriptor RPCOptions
compressionAlgorithm__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 3, FieldDescriptor RPCOptions
compressionLevel__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 4, FieldDescriptor RPCOptions
cacheRpcResponse__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 5, 
            FieldDescriptor RPCOptions
disableSessionConnectionSharing__field_descriptor)]
  unknownFields :: LensLike' f RPCOptions FieldSet
unknownFields
    = (RPCOptions -> FieldSet)
-> (RPCOptions -> FieldSet -> RPCOptions)
-> Lens' RPCOptions FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RPCOptions -> FieldSet
_RPCOptions'_unknownFields
        (\ x__ :: RPCOptions
x__ y__ :: FieldSet
y__ -> RPCOptions
x__ {_RPCOptions'_unknownFields :: FieldSet
_RPCOptions'_unknownFields = FieldSet
y__})
  defMessage :: RPCOptions
defMessage
    = $WRPCOptions'_constructor :: Bool -> Text -> Int32 -> Bool -> Bool -> FieldSet -> RPCOptions
RPCOptions'_constructor
        {_RPCOptions'useRpcForInprocessMaster :: Bool
_RPCOptions'useRpcForInprocessMaster = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RPCOptions'compressionAlgorithm :: Text
_RPCOptions'compressionAlgorithm = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RPCOptions'compressionLevel :: Int32
_RPCOptions'compressionLevel = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RPCOptions'cacheRpcResponse :: Bool
_RPCOptions'cacheRpcResponse = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RPCOptions'disableSessionConnectionSharing :: Bool
_RPCOptions'disableSessionConnectionSharing = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RPCOptions'_unknownFields :: FieldSet
_RPCOptions'_unknownFields = []}
  parseMessage :: Parser RPCOptions
parseMessage
    = let
        loop ::
          RPCOptions -> Data.ProtoLens.Encoding.Bytes.Parser RPCOptions
        loop :: RPCOptions -> Parser RPCOptions
loop x :: RPCOptions
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]))))
                      RPCOptions -> Parser RPCOptions
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter RPCOptions RPCOptions FieldSet FieldSet
-> (FieldSet -> FieldSet) -> RPCOptions -> RPCOptions
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 RPCOptions RPCOptions FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) RPCOptions
x)
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        8 -> 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)
                                       "use_rpc_for_inprocess_master"
                                RPCOptions -> Parser RPCOptions
loop
                                  (Setter RPCOptions RPCOptions Bool Bool
-> Bool -> RPCOptions -> RPCOptions
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "useRpcForInprocessMaster" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"useRpcForInprocessMaster") Bool
y RPCOptions
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))
                                       "compression_algorithm"
                                RPCOptions -> Parser RPCOptions
loop
                                  (Setter RPCOptions RPCOptions Text Text
-> Text -> RPCOptions -> RPCOptions
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "compressionAlgorithm" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"compressionAlgorithm") Text
y RPCOptions
x)
                        24
                          -> do Int32
y <- Parser Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int32) -> Parser Word64 -> Parser Int32
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       "compression_level"
                                RPCOptions -> Parser RPCOptions
loop
                                  (Setter RPCOptions RPCOptions Int32 Int32
-> Int32 -> RPCOptions -> RPCOptions
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "compressionLevel" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"compressionLevel") Int32
y RPCOptions
x)
                        32
                          -> 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)
                                       "cache_rpc_response"
                                RPCOptions -> Parser RPCOptions
loop
                                  (Setter RPCOptions RPCOptions Bool Bool
-> Bool -> RPCOptions -> RPCOptions
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "cacheRpcResponse" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"cacheRpcResponse") Bool
y RPCOptions
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)
                                       "disable_session_connection_sharing"
                                RPCOptions -> Parser RPCOptions
loop
                                  (Setter RPCOptions RPCOptions Bool Bool
-> Bool -> RPCOptions -> RPCOptions
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "disableSessionConnectionSharing" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"disableSessionConnectionSharing")
                                     Bool
y
                                     RPCOptions
x)
                        wire :: Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                RPCOptions -> Parser RPCOptions
loop
                                  (Setter RPCOptions RPCOptions FieldSet FieldSet
-> (FieldSet -> FieldSet) -> RPCOptions -> RPCOptions
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 RPCOptions RPCOptions FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) RPCOptions
x)
      in
        Parser RPCOptions -> String -> Parser RPCOptions
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do RPCOptions -> Parser RPCOptions
loop RPCOptions
forall msg. Message msg => msg
Data.ProtoLens.defMessage) "RPCOptions"
  buildMessage :: RPCOptions -> Builder
buildMessage
    = \ _x :: RPCOptions
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Bool
_v
                  = FoldLike Bool RPCOptions RPCOptions Bool Bool -> RPCOptions -> Bool
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                      (forall s a (f :: * -> *).
(HasField s "useRpcForInprocessMaster" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"useRpcForInprocessMaster") RPCOptions
_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 8)
                      ((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 :: Text
_v
                     = FoldLike Text RPCOptions RPCOptions Text Text -> RPCOptions -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                         (forall s a (f :: * -> *).
(HasField s "compressionAlgorithm" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"compressionAlgorithm") RPCOptions
_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 :: Int32
_v
                        = FoldLike Int32 RPCOptions RPCOptions Int32 Int32
-> RPCOptions -> Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                            (forall s a (f :: * -> *).
(HasField s "compressionLevel" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"compressionLevel") RPCOptions
_x
                    in
                      if Int32 -> Int32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int32
_v Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      else
                          Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 24)
                            ((Word64 -> Builder) -> (Int32 -> Word64) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                               Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (let
                         _v :: Bool
_v
                           = FoldLike Bool RPCOptions RPCOptions Bool Bool -> RPCOptions -> Bool
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                               (forall s a (f :: * -> *).
(HasField s "cacheRpcResponse" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"cacheRpcResponse") RPCOptions
_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 32)
                               ((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 RPCOptions RPCOptions Bool Bool -> RPCOptions -> Bool
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                  (forall s a (f :: * -> *).
(HasField s "disableSessionConnectionSharing" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"disableSessionConnectionSharing") RPCOptions
_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))
                         (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                            (FoldLike FieldSet RPCOptions RPCOptions FieldSet FieldSet
-> RPCOptions -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet RPCOptions RPCOptions FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields RPCOptions
_x))))))
instance Control.DeepSeq.NFData RPCOptions where
  rnf :: RPCOptions -> ()
rnf
    = \ x__ :: RPCOptions
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RPCOptions -> FieldSet
_RPCOptions'_unknownFields RPCOptions
x__)
             (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (RPCOptions -> Bool
_RPCOptions'useRpcForInprocessMaster RPCOptions
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (RPCOptions -> Text
_RPCOptions'compressionAlgorithm RPCOptions
x__)
                   (Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (RPCOptions -> Int32
_RPCOptions'compressionLevel RPCOptions
x__)
                      (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (RPCOptions -> Bool
_RPCOptions'cacheRpcResponse RPCOptions
x__)
                         (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (RPCOptions -> Bool
_RPCOptions'disableSessionConnectionSharing RPCOptions
x__) ())))))
{- | Fields :
     
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.stepStats' @:: Lens' RunMetadata Proto.Tensorflow.Core.Framework.StepStats.StepStats@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.maybe'stepStats' @:: Lens' RunMetadata (Prelude.Maybe Proto.Tensorflow.Core.Framework.StepStats.StepStats)@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.costGraph' @:: Lens' RunMetadata Proto.Tensorflow.Core.Framework.CostGraph.CostGraphDef@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.maybe'costGraph' @:: Lens' RunMetadata (Prelude.Maybe Proto.Tensorflow.Core.Framework.CostGraph.CostGraphDef)@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.partitionGraphs' @:: Lens' RunMetadata [Proto.Tensorflow.Core.Framework.Graph.GraphDef]@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.vec'partitionGraphs' @:: Lens' RunMetadata (Data.Vector.Vector Proto.Tensorflow.Core.Framework.Graph.GraphDef)@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.functionGraphs' @:: Lens' RunMetadata [RunMetadata'FunctionGraphs]@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.vec'functionGraphs' @:: Lens' RunMetadata (Data.Vector.Vector RunMetadata'FunctionGraphs)@ -}
data RunMetadata
  = RunMetadata'_constructor {RunMetadata -> Maybe StepStats
_RunMetadata'stepStats :: !(Prelude.Maybe Proto.Tensorflow.Core.Framework.StepStats.StepStats),
                              RunMetadata -> Maybe CostGraphDef
_RunMetadata'costGraph :: !(Prelude.Maybe Proto.Tensorflow.Core.Framework.CostGraph.CostGraphDef),
                              RunMetadata -> Vector GraphDef
_RunMetadata'partitionGraphs :: !(Data.Vector.Vector Proto.Tensorflow.Core.Framework.Graph.GraphDef),
                              RunMetadata -> Vector RunMetadata'FunctionGraphs
_RunMetadata'functionGraphs :: !(Data.Vector.Vector RunMetadata'FunctionGraphs),
                              RunMetadata -> FieldSet
_RunMetadata'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RunMetadata -> RunMetadata -> Bool
(RunMetadata -> RunMetadata -> Bool)
-> (RunMetadata -> RunMetadata -> Bool) -> Eq RunMetadata
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: RunMetadata -> RunMetadata -> Bool
$c/= :: RunMetadata -> RunMetadata -> Bool
== :: RunMetadata -> RunMetadata -> Bool
$c== :: RunMetadata -> RunMetadata -> Bool
Prelude.Eq, Eq RunMetadata
Eq RunMetadata =>
(RunMetadata -> RunMetadata -> Ordering)
-> (RunMetadata -> RunMetadata -> Bool)
-> (RunMetadata -> RunMetadata -> Bool)
-> (RunMetadata -> RunMetadata -> Bool)
-> (RunMetadata -> RunMetadata -> Bool)
-> (RunMetadata -> RunMetadata -> RunMetadata)
-> (RunMetadata -> RunMetadata -> RunMetadata)
-> Ord RunMetadata
RunMetadata -> RunMetadata -> Bool
RunMetadata -> RunMetadata -> Ordering
RunMetadata -> RunMetadata -> RunMetadata
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 :: RunMetadata -> RunMetadata -> RunMetadata
$cmin :: RunMetadata -> RunMetadata -> RunMetadata
max :: RunMetadata -> RunMetadata -> RunMetadata
$cmax :: RunMetadata -> RunMetadata -> RunMetadata
>= :: RunMetadata -> RunMetadata -> Bool
$c>= :: RunMetadata -> RunMetadata -> Bool
> :: RunMetadata -> RunMetadata -> Bool
$c> :: RunMetadata -> RunMetadata -> Bool
<= :: RunMetadata -> RunMetadata -> Bool
$c<= :: RunMetadata -> RunMetadata -> Bool
< :: RunMetadata -> RunMetadata -> Bool
$c< :: RunMetadata -> RunMetadata -> Bool
compare :: RunMetadata -> RunMetadata -> Ordering
$ccompare :: RunMetadata -> RunMetadata -> Ordering
$cp1Ord :: Eq RunMetadata
Prelude.Ord)
instance Prelude.Show RunMetadata where
  showsPrec :: Int -> RunMetadata -> ShowS
showsPrec _ __x :: RunMetadata
__x __s :: String
__s
    = Char -> ShowS
Prelude.showChar
        '{'
        (String -> ShowS
Prelude.showString
           (RunMetadata -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RunMetadata
__x) (Char -> ShowS
Prelude.showChar '}' String
__s))
instance Data.ProtoLens.Field.HasField RunMetadata "stepStats" Proto.Tensorflow.Core.Framework.StepStats.StepStats where
  fieldOf :: Proxy# "stepStats"
-> (StepStats -> f StepStats) -> RunMetadata -> f RunMetadata
fieldOf _
    = ((Maybe StepStats -> f (Maybe StepStats))
 -> RunMetadata -> f RunMetadata)
-> ((StepStats -> f StepStats)
    -> Maybe StepStats -> f (Maybe StepStats))
-> (StepStats -> f StepStats)
-> RunMetadata
-> f RunMetadata
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RunMetadata -> Maybe StepStats)
-> (RunMetadata -> Maybe StepStats -> RunMetadata)
-> Lens RunMetadata RunMetadata (Maybe StepStats) (Maybe StepStats)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RunMetadata -> Maybe StepStats
_RunMetadata'stepStats
           (\ x__ :: RunMetadata
x__ y__ :: Maybe StepStats
y__ -> RunMetadata
x__ {_RunMetadata'stepStats :: Maybe StepStats
_RunMetadata'stepStats = Maybe StepStats
y__}))
        (StepStats -> Lens' (Maybe StepStats) StepStats
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens StepStats
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField RunMetadata "maybe'stepStats" (Prelude.Maybe Proto.Tensorflow.Core.Framework.StepStats.StepStats) where
  fieldOf :: Proxy# "maybe'stepStats"
-> (Maybe StepStats -> f (Maybe StepStats))
-> RunMetadata
-> f RunMetadata
fieldOf _
    = ((Maybe StepStats -> f (Maybe StepStats))
 -> RunMetadata -> f RunMetadata)
-> ((Maybe StepStats -> f (Maybe StepStats))
    -> Maybe StepStats -> f (Maybe StepStats))
-> (Maybe StepStats -> f (Maybe StepStats))
-> RunMetadata
-> f RunMetadata
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RunMetadata -> Maybe StepStats)
-> (RunMetadata -> Maybe StepStats -> RunMetadata)
-> Lens RunMetadata RunMetadata (Maybe StepStats) (Maybe StepStats)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RunMetadata -> Maybe StepStats
_RunMetadata'stepStats
           (\ x__ :: RunMetadata
x__ y__ :: Maybe StepStats
y__ -> RunMetadata
x__ {_RunMetadata'stepStats :: Maybe StepStats
_RunMetadata'stepStats = Maybe StepStats
y__}))
        (Maybe StepStats -> f (Maybe StepStats))
-> Maybe StepStats -> f (Maybe StepStats)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RunMetadata "costGraph" Proto.Tensorflow.Core.Framework.CostGraph.CostGraphDef where
  fieldOf :: Proxy# "costGraph"
-> (CostGraphDef -> f CostGraphDef) -> RunMetadata -> f RunMetadata
fieldOf _
    = ((Maybe CostGraphDef -> f (Maybe CostGraphDef))
 -> RunMetadata -> f RunMetadata)
-> ((CostGraphDef -> f CostGraphDef)
    -> Maybe CostGraphDef -> f (Maybe CostGraphDef))
-> (CostGraphDef -> f CostGraphDef)
-> RunMetadata
-> f RunMetadata
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RunMetadata -> Maybe CostGraphDef)
-> (RunMetadata -> Maybe CostGraphDef -> RunMetadata)
-> Lens
     RunMetadata RunMetadata (Maybe CostGraphDef) (Maybe CostGraphDef)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RunMetadata -> Maybe CostGraphDef
_RunMetadata'costGraph
           (\ x__ :: RunMetadata
x__ y__ :: Maybe CostGraphDef
y__ -> RunMetadata
x__ {_RunMetadata'costGraph :: Maybe CostGraphDef
_RunMetadata'costGraph = Maybe CostGraphDef
y__}))
        (CostGraphDef -> Lens' (Maybe CostGraphDef) CostGraphDef
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens CostGraphDef
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField RunMetadata "maybe'costGraph" (Prelude.Maybe Proto.Tensorflow.Core.Framework.CostGraph.CostGraphDef) where
  fieldOf :: Proxy# "maybe'costGraph"
-> (Maybe CostGraphDef -> f (Maybe CostGraphDef))
-> RunMetadata
-> f RunMetadata
fieldOf _
    = ((Maybe CostGraphDef -> f (Maybe CostGraphDef))
 -> RunMetadata -> f RunMetadata)
-> ((Maybe CostGraphDef -> f (Maybe CostGraphDef))
    -> Maybe CostGraphDef -> f (Maybe CostGraphDef))
-> (Maybe CostGraphDef -> f (Maybe CostGraphDef))
-> RunMetadata
-> f RunMetadata
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RunMetadata -> Maybe CostGraphDef)
-> (RunMetadata -> Maybe CostGraphDef -> RunMetadata)
-> Lens
     RunMetadata RunMetadata (Maybe CostGraphDef) (Maybe CostGraphDef)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RunMetadata -> Maybe CostGraphDef
_RunMetadata'costGraph
           (\ x__ :: RunMetadata
x__ y__ :: Maybe CostGraphDef
y__ -> RunMetadata
x__ {_RunMetadata'costGraph :: Maybe CostGraphDef
_RunMetadata'costGraph = Maybe CostGraphDef
y__}))
        (Maybe CostGraphDef -> f (Maybe CostGraphDef))
-> Maybe CostGraphDef -> f (Maybe CostGraphDef)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RunMetadata "partitionGraphs" [Proto.Tensorflow.Core.Framework.Graph.GraphDef] where
  fieldOf :: Proxy# "partitionGraphs"
-> ([GraphDef] -> f [GraphDef]) -> RunMetadata -> f RunMetadata
fieldOf _
    = ((Vector GraphDef -> f (Vector GraphDef))
 -> RunMetadata -> f RunMetadata)
-> (([GraphDef] -> f [GraphDef])
    -> Vector GraphDef -> f (Vector GraphDef))
-> ([GraphDef] -> f [GraphDef])
-> RunMetadata
-> f RunMetadata
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RunMetadata -> Vector GraphDef)
-> (RunMetadata -> Vector GraphDef -> RunMetadata)
-> Lens RunMetadata RunMetadata (Vector GraphDef) (Vector GraphDef)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RunMetadata -> Vector GraphDef
_RunMetadata'partitionGraphs
           (\ x__ :: RunMetadata
x__ y__ :: Vector GraphDef
y__ -> RunMetadata
x__ {_RunMetadata'partitionGraphs :: Vector GraphDef
_RunMetadata'partitionGraphs = Vector GraphDef
y__}))
        ((Vector GraphDef -> [GraphDef])
-> (Vector GraphDef -> [GraphDef] -> Vector GraphDef)
-> Lens (Vector GraphDef) (Vector GraphDef) [GraphDef] [GraphDef]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector GraphDef -> [GraphDef]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ _ y__ :: [GraphDef]
y__ -> [GraphDef] -> Vector GraphDef
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [GraphDef]
y__))
instance Data.ProtoLens.Field.HasField RunMetadata "vec'partitionGraphs" (Data.Vector.Vector Proto.Tensorflow.Core.Framework.Graph.GraphDef) where
  fieldOf :: Proxy# "vec'partitionGraphs"
-> (Vector GraphDef -> f (Vector GraphDef))
-> RunMetadata
-> f RunMetadata
fieldOf _
    = ((Vector GraphDef -> f (Vector GraphDef))
 -> RunMetadata -> f RunMetadata)
-> ((Vector GraphDef -> f (Vector GraphDef))
    -> Vector GraphDef -> f (Vector GraphDef))
-> (Vector GraphDef -> f (Vector GraphDef))
-> RunMetadata
-> f RunMetadata
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RunMetadata -> Vector GraphDef)
-> (RunMetadata -> Vector GraphDef -> RunMetadata)
-> Lens RunMetadata RunMetadata (Vector GraphDef) (Vector GraphDef)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RunMetadata -> Vector GraphDef
_RunMetadata'partitionGraphs
           (\ x__ :: RunMetadata
x__ y__ :: Vector GraphDef
y__ -> RunMetadata
x__ {_RunMetadata'partitionGraphs :: Vector GraphDef
_RunMetadata'partitionGraphs = Vector GraphDef
y__}))
        (Vector GraphDef -> f (Vector GraphDef))
-> Vector GraphDef -> f (Vector GraphDef)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RunMetadata "functionGraphs" [RunMetadata'FunctionGraphs] where
  fieldOf :: Proxy# "functionGraphs"
-> ([RunMetadata'FunctionGraphs] -> f [RunMetadata'FunctionGraphs])
-> RunMetadata
-> f RunMetadata
fieldOf _
    = ((Vector RunMetadata'FunctionGraphs
  -> f (Vector RunMetadata'FunctionGraphs))
 -> RunMetadata -> f RunMetadata)
-> (([RunMetadata'FunctionGraphs]
     -> f [RunMetadata'FunctionGraphs])
    -> Vector RunMetadata'FunctionGraphs
    -> f (Vector RunMetadata'FunctionGraphs))
-> ([RunMetadata'FunctionGraphs] -> f [RunMetadata'FunctionGraphs])
-> RunMetadata
-> f RunMetadata
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RunMetadata -> Vector RunMetadata'FunctionGraphs)
-> (RunMetadata
    -> Vector RunMetadata'FunctionGraphs -> RunMetadata)
-> Lens
     RunMetadata
     RunMetadata
     (Vector RunMetadata'FunctionGraphs)
     (Vector RunMetadata'FunctionGraphs)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RunMetadata -> Vector RunMetadata'FunctionGraphs
_RunMetadata'functionGraphs
           (\ x__ :: RunMetadata
x__ y__ :: Vector RunMetadata'FunctionGraphs
y__ -> RunMetadata
x__ {_RunMetadata'functionGraphs :: Vector RunMetadata'FunctionGraphs
_RunMetadata'functionGraphs = Vector RunMetadata'FunctionGraphs
y__}))
        ((Vector RunMetadata'FunctionGraphs -> [RunMetadata'FunctionGraphs])
-> (Vector RunMetadata'FunctionGraphs
    -> [RunMetadata'FunctionGraphs]
    -> Vector RunMetadata'FunctionGraphs)
-> Lens
     (Vector RunMetadata'FunctionGraphs)
     (Vector RunMetadata'FunctionGraphs)
     [RunMetadata'FunctionGraphs]
     [RunMetadata'FunctionGraphs]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector RunMetadata'FunctionGraphs -> [RunMetadata'FunctionGraphs]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ _ y__ :: [RunMetadata'FunctionGraphs]
y__ -> [RunMetadata'FunctionGraphs] -> Vector RunMetadata'FunctionGraphs
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [RunMetadata'FunctionGraphs]
y__))
instance Data.ProtoLens.Field.HasField RunMetadata "vec'functionGraphs" (Data.Vector.Vector RunMetadata'FunctionGraphs) where
  fieldOf :: Proxy# "vec'functionGraphs"
-> (Vector RunMetadata'FunctionGraphs
    -> f (Vector RunMetadata'FunctionGraphs))
-> RunMetadata
-> f RunMetadata
fieldOf _
    = ((Vector RunMetadata'FunctionGraphs
  -> f (Vector RunMetadata'FunctionGraphs))
 -> RunMetadata -> f RunMetadata)
-> ((Vector RunMetadata'FunctionGraphs
     -> f (Vector RunMetadata'FunctionGraphs))
    -> Vector RunMetadata'FunctionGraphs
    -> f (Vector RunMetadata'FunctionGraphs))
-> (Vector RunMetadata'FunctionGraphs
    -> f (Vector RunMetadata'FunctionGraphs))
-> RunMetadata
-> f RunMetadata
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RunMetadata -> Vector RunMetadata'FunctionGraphs)
-> (RunMetadata
    -> Vector RunMetadata'FunctionGraphs -> RunMetadata)
-> Lens
     RunMetadata
     RunMetadata
     (Vector RunMetadata'FunctionGraphs)
     (Vector RunMetadata'FunctionGraphs)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RunMetadata -> Vector RunMetadata'FunctionGraphs
_RunMetadata'functionGraphs
           (\ x__ :: RunMetadata
x__ y__ :: Vector RunMetadata'FunctionGraphs
y__ -> RunMetadata
x__ {_RunMetadata'functionGraphs :: Vector RunMetadata'FunctionGraphs
_RunMetadata'functionGraphs = Vector RunMetadata'FunctionGraphs
y__}))
        (Vector RunMetadata'FunctionGraphs
 -> f (Vector RunMetadata'FunctionGraphs))
-> Vector RunMetadata'FunctionGraphs
-> f (Vector RunMetadata'FunctionGraphs)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message RunMetadata where
  messageName :: Proxy RunMetadata -> Text
messageName _ = String -> Text
Data.Text.pack "tensorflow.RunMetadata"
  packedMessageDescriptor :: Proxy RunMetadata -> ByteString
packedMessageDescriptor _
    = "\n\
      \\vRunMetadata\DC24\n\
      \\n\
      \step_stats\CAN\SOH \SOH(\v2\NAK.tensorflow.StepStatsR\tstepStats\DC27\n\
      \\n\
      \cost_graph\CAN\STX \SOH(\v2\CAN.tensorflow.CostGraphDefR\tcostGraph\DC2?\n\
      \\DLEpartition_graphs\CAN\ETX \ETX(\v2\DC4.tensorflow.GraphDefR\SIpartitionGraphs\DC2O\n\
      \\SIfunction_graphs\CAN\EOT \ETX(\v2&.tensorflow.RunMetadata.FunctionGraphsR\SOfunctionGraphs\SUB\235\SOH\n\
      \\SOFunctionGraphs\DC2?\n\
      \\DLEpartition_graphs\CAN\SOH \ETX(\v2\DC4.tensorflow.GraphDefR\SIpartitionGraphs\DC2J\n\
      \\SYNpre_optimization_graph\CAN\STX \SOH(\v2\DC4.tensorflow.GraphDefR\DC4preOptimizationGraph\DC2L\n\
      \\ETBpost_optimization_graph\CAN\ETX \SOH(\v2\DC4.tensorflow.GraphDefR\NAKpostOptimizationGraph"
  packedFileDescriptor :: Proxy RunMetadata -> ByteString
packedFileDescriptor _ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor RunMetadata)
fieldsByTag
    = let
        stepStats__field_descriptor :: FieldDescriptor RunMetadata
stepStats__field_descriptor
          = String
-> FieldTypeDescriptor StepStats
-> FieldAccessor RunMetadata StepStats
-> FieldDescriptor RunMetadata
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "step_stats"
              (MessageOrGroup -> FieldTypeDescriptor StepStats
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Tensorflow.Core.Framework.StepStats.StepStats)
              (Lens RunMetadata RunMetadata (Maybe StepStats) (Maybe StepStats)
-> FieldAccessor RunMetadata StepStats
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall s a (f :: * -> *).
(HasField s "maybe'stepStats" a, Functor f) =>
(a -> f a) -> s -> 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'stepStats")) ::
              Data.ProtoLens.FieldDescriptor RunMetadata
        costGraph__field_descriptor :: FieldDescriptor RunMetadata
costGraph__field_descriptor
          = String
-> FieldTypeDescriptor CostGraphDef
-> FieldAccessor RunMetadata CostGraphDef
-> FieldDescriptor RunMetadata
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "cost_graph"
              (MessageOrGroup -> FieldTypeDescriptor CostGraphDef
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Tensorflow.Core.Framework.CostGraph.CostGraphDef)
              (Lens
  RunMetadata RunMetadata (Maybe CostGraphDef) (Maybe CostGraphDef)
-> FieldAccessor RunMetadata CostGraphDef
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall s a (f :: * -> *).
(HasField s "maybe'costGraph" a, Functor f) =>
(a -> f a) -> s -> 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'costGraph")) ::
              Data.ProtoLens.FieldDescriptor RunMetadata
        partitionGraphs__field_descriptor :: FieldDescriptor RunMetadata
partitionGraphs__field_descriptor
          = String
-> FieldTypeDescriptor GraphDef
-> FieldAccessor RunMetadata GraphDef
-> FieldDescriptor RunMetadata
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "partition_graphs"
              (MessageOrGroup -> FieldTypeDescriptor GraphDef
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Tensorflow.Core.Framework.Graph.GraphDef)
              (Packing
-> Lens' RunMetadata [GraphDef]
-> FieldAccessor RunMetadata GraphDef
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Unpacked
                 (forall s a (f :: * -> *).
(HasField s "partitionGraphs" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"partitionGraphs")) ::
              Data.ProtoLens.FieldDescriptor RunMetadata
        functionGraphs__field_descriptor :: FieldDescriptor RunMetadata
functionGraphs__field_descriptor
          = String
-> FieldTypeDescriptor RunMetadata'FunctionGraphs
-> FieldAccessor RunMetadata RunMetadata'FunctionGraphs
-> FieldDescriptor RunMetadata
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "function_graphs"
              (MessageOrGroup -> FieldTypeDescriptor RunMetadata'FunctionGraphs
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor RunMetadata'FunctionGraphs)
              (Packing
-> Lens' RunMetadata [RunMetadata'FunctionGraphs]
-> FieldAccessor RunMetadata RunMetadata'FunctionGraphs
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Unpacked
                 (forall s a (f :: * -> *).
(HasField s "functionGraphs" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"functionGraphs")) ::
              Data.ProtoLens.FieldDescriptor RunMetadata
      in
        [(Tag, FieldDescriptor RunMetadata)]
-> Map Tag (FieldDescriptor RunMetadata)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag 1, FieldDescriptor RunMetadata
stepStats__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 2, FieldDescriptor RunMetadata
costGraph__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 3, FieldDescriptor RunMetadata
partitionGraphs__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 4, FieldDescriptor RunMetadata
functionGraphs__field_descriptor)]
  unknownFields :: LensLike' f RunMetadata FieldSet
unknownFields
    = (RunMetadata -> FieldSet)
-> (RunMetadata -> FieldSet -> RunMetadata)
-> Lens' RunMetadata FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RunMetadata -> FieldSet
_RunMetadata'_unknownFields
        (\ x__ :: RunMetadata
x__ y__ :: FieldSet
y__ -> RunMetadata
x__ {_RunMetadata'_unknownFields :: FieldSet
_RunMetadata'_unknownFields = FieldSet
y__})
  defMessage :: RunMetadata
defMessage
    = $WRunMetadata'_constructor :: Maybe StepStats
-> Maybe CostGraphDef
-> Vector GraphDef
-> Vector RunMetadata'FunctionGraphs
-> FieldSet
-> RunMetadata
RunMetadata'_constructor
        {_RunMetadata'stepStats :: Maybe StepStats
_RunMetadata'stepStats = Maybe StepStats
forall a. Maybe a
Prelude.Nothing,
         _RunMetadata'costGraph :: Maybe CostGraphDef
_RunMetadata'costGraph = Maybe CostGraphDef
forall a. Maybe a
Prelude.Nothing,
         _RunMetadata'partitionGraphs :: Vector GraphDef
_RunMetadata'partitionGraphs = Vector GraphDef
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _RunMetadata'functionGraphs :: Vector RunMetadata'FunctionGraphs
_RunMetadata'functionGraphs = Vector RunMetadata'FunctionGraphs
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _RunMetadata'_unknownFields :: FieldSet
_RunMetadata'_unknownFields = []}
  parseMessage :: Parser RunMetadata
parseMessage
    = let
        loop ::
          RunMetadata
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld RunMetadata'FunctionGraphs
             -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Tensorflow.Core.Framework.Graph.GraphDef
                -> Data.ProtoLens.Encoding.Bytes.Parser RunMetadata
        loop :: RunMetadata
-> Growing Vector RealWorld RunMetadata'FunctionGraphs
-> Growing Vector RealWorld GraphDef
-> Parser RunMetadata
loop x :: RunMetadata
x mutable'functionGraphs :: Growing Vector RealWorld RunMetadata'FunctionGraphs
mutable'functionGraphs mutable'partitionGraphs :: Growing Vector RealWorld GraphDef
mutable'partitionGraphs
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do Vector RunMetadata'FunctionGraphs
frozen'functionGraphs <- IO (Vector RunMetadata'FunctionGraphs)
-> Parser (Vector RunMetadata'FunctionGraphs)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                 (Growing Vector (PrimState IO) RunMetadata'FunctionGraphs
-> IO (Vector RunMetadata'FunctionGraphs)
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 RunMetadata'FunctionGraphs
Growing Vector (PrimState IO) RunMetadata'FunctionGraphs
mutable'functionGraphs)
                      Vector GraphDef
frozen'partitionGraphs <- IO (Vector GraphDef) -> Parser (Vector GraphDef)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                  (Growing Vector (PrimState IO) GraphDef -> IO (Vector GraphDef)
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 GraphDef
Growing Vector (PrimState IO) GraphDef
mutable'partitionGraphs)
                      (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]))))
                      RunMetadata -> Parser RunMetadata
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter RunMetadata RunMetadata FieldSet FieldSet
-> (FieldSet -> FieldSet) -> RunMetadata -> RunMetadata
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 RunMetadata RunMetadata FieldSet FieldSet
Data.ProtoLens.unknownFields
                           (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t)
                           (Setter
  RunMetadata
  RunMetadata
  (Vector RunMetadata'FunctionGraphs)
  (Vector RunMetadata'FunctionGraphs)
-> Vector RunMetadata'FunctionGraphs -> RunMetadata -> RunMetadata
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                              (forall s a (f :: * -> *).
(HasField s "vec'functionGraphs" a, Functor f) =>
(a -> f a) -> s -> 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'functionGraphs")
                              Vector RunMetadata'FunctionGraphs
frozen'functionGraphs
                              (Setter RunMetadata RunMetadata (Vector GraphDef) (Vector GraphDef)
-> Vector GraphDef -> RunMetadata -> RunMetadata
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                 (forall s a (f :: * -> *).
(HasField s "vec'partitionGraphs" a, Functor f) =>
(a -> f a) -> s -> 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'partitionGraphs")
                                 Vector GraphDef
frozen'partitionGraphs
                                 RunMetadata
x)))
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        10
                          -> do StepStats
y <- Parser StepStats -> String -> Parser StepStats
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser StepStats -> Parser StepStats
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 StepStats
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       "step_stats"
                                RunMetadata
-> Growing Vector RealWorld RunMetadata'FunctionGraphs
-> Growing Vector RealWorld GraphDef
-> Parser RunMetadata
loop
                                  (Setter RunMetadata RunMetadata StepStats StepStats
-> StepStats -> RunMetadata -> RunMetadata
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "stepStats" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"stepStats") StepStats
y RunMetadata
x)
                                  Growing Vector RealWorld RunMetadata'FunctionGraphs
mutable'functionGraphs
                                  Growing Vector RealWorld GraphDef
mutable'partitionGraphs
                        18
                          -> do CostGraphDef
y <- Parser CostGraphDef -> String -> Parser CostGraphDef
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser CostGraphDef -> Parser CostGraphDef
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 CostGraphDef
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       "cost_graph"
                                RunMetadata
-> Growing Vector RealWorld RunMetadata'FunctionGraphs
-> Growing Vector RealWorld GraphDef
-> Parser RunMetadata
loop
                                  (Setter RunMetadata RunMetadata CostGraphDef CostGraphDef
-> CostGraphDef -> RunMetadata -> RunMetadata
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "costGraph" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"costGraph") CostGraphDef
y RunMetadata
x)
                                  Growing Vector RealWorld RunMetadata'FunctionGraphs
mutable'functionGraphs
                                  Growing Vector RealWorld GraphDef
mutable'partitionGraphs
                        26
                          -> do !GraphDef
y <- Parser GraphDef -> String -> Parser GraphDef
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Int -> Parser GraphDef -> Parser GraphDef
forall a. Int -> Parser a -> Parser a
Data.ProtoLens.Encoding.Bytes.isolate
                                              (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
                                              Parser GraphDef
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                        "partition_graphs"
                                Growing Vector RealWorld GraphDef
v <- IO (Growing Vector RealWorld GraphDef)
-> Parser (Growing Vector RealWorld GraphDef)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) GraphDef
-> GraphDef -> IO (Growing Vector (PrimState IO) GraphDef)
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 GraphDef
Growing Vector (PrimState IO) GraphDef
mutable'partitionGraphs GraphDef
y)
                                RunMetadata
-> Growing Vector RealWorld RunMetadata'FunctionGraphs
-> Growing Vector RealWorld GraphDef
-> Parser RunMetadata
loop RunMetadata
x Growing Vector RealWorld RunMetadata'FunctionGraphs
mutable'functionGraphs Growing Vector RealWorld GraphDef
v
                        34
                          -> do !RunMetadata'FunctionGraphs
y <- Parser RunMetadata'FunctionGraphs
-> String -> Parser RunMetadata'FunctionGraphs
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Int
-> Parser RunMetadata'FunctionGraphs
-> Parser RunMetadata'FunctionGraphs
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 RunMetadata'FunctionGraphs
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                        "function_graphs"
                                Growing Vector RealWorld RunMetadata'FunctionGraphs
v <- IO (Growing Vector RealWorld RunMetadata'FunctionGraphs)
-> Parser (Growing Vector RealWorld RunMetadata'FunctionGraphs)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) RunMetadata'FunctionGraphs
-> RunMetadata'FunctionGraphs
-> IO (Growing Vector (PrimState IO) RunMetadata'FunctionGraphs)
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 RunMetadata'FunctionGraphs
Growing Vector (PrimState IO) RunMetadata'FunctionGraphs
mutable'functionGraphs RunMetadata'FunctionGraphs
y)
                                RunMetadata
-> Growing Vector RealWorld RunMetadata'FunctionGraphs
-> Growing Vector RealWorld GraphDef
-> Parser RunMetadata
loop RunMetadata
x Growing Vector RealWorld RunMetadata'FunctionGraphs
v Growing Vector RealWorld GraphDef
mutable'partitionGraphs
                        wire :: Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                RunMetadata
-> Growing Vector RealWorld RunMetadata'FunctionGraphs
-> Growing Vector RealWorld GraphDef
-> Parser RunMetadata
loop
                                  (Setter RunMetadata RunMetadata FieldSet FieldSet
-> (FieldSet -> FieldSet) -> RunMetadata -> RunMetadata
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 RunMetadata RunMetadata FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) RunMetadata
x)
                                  Growing Vector RealWorld RunMetadata'FunctionGraphs
mutable'functionGraphs
                                  Growing Vector RealWorld GraphDef
mutable'partitionGraphs
      in
        Parser RunMetadata -> String -> Parser RunMetadata
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do Growing Vector RealWorld RunMetadata'FunctionGraphs
mutable'functionGraphs <- IO (Growing Vector RealWorld RunMetadata'FunctionGraphs)
-> Parser (Growing Vector RealWorld RunMetadata'FunctionGraphs)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                          IO (Growing Vector RealWorld RunMetadata'FunctionGraphs)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              Growing Vector RealWorld GraphDef
mutable'partitionGraphs <- IO (Growing Vector RealWorld GraphDef)
-> Parser (Growing Vector RealWorld GraphDef)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                           IO (Growing Vector RealWorld GraphDef)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              RunMetadata
-> Growing Vector RealWorld RunMetadata'FunctionGraphs
-> Growing Vector RealWorld GraphDef
-> Parser RunMetadata
loop
                RunMetadata
forall msg. Message msg => msg
Data.ProtoLens.defMessage
                Growing Vector RealWorld RunMetadata'FunctionGraphs
mutable'functionGraphs
                Growing Vector RealWorld GraphDef
mutable'partitionGraphs)
          "RunMetadata"
  buildMessage :: RunMetadata -> Builder
buildMessage
    = \ _x :: RunMetadata
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (case
                  FoldLike
  (Maybe StepStats)
  RunMetadata
  RunMetadata
  (Maybe StepStats)
  (Maybe StepStats)
-> RunMetadata -> Maybe StepStats
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                    (forall s a (f :: * -> *).
(HasField s "maybe'stepStats" a, Functor f) =>
(a -> f a) -> s -> 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'stepStats") RunMetadata
_x
              of
                Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                (Prelude.Just _v :: StepStats
_v)
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 10)
                       ((ByteString -> Builder)
-> (StepStats -> ByteString) -> StepStats -> 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))
                          StepStats -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                          StepStats
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (case
                     FoldLike
  (Maybe CostGraphDef)
  RunMetadata
  RunMetadata
  (Maybe CostGraphDef)
  (Maybe CostGraphDef)
-> RunMetadata -> Maybe CostGraphDef
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                       (forall s a (f :: * -> *).
(HasField s "maybe'costGraph" a, Functor f) =>
(a -> f a) -> s -> 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'costGraph") RunMetadata
_x
                 of
                   Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just _v :: CostGraphDef
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 18)
                          ((ByteString -> Builder)
-> (CostGraphDef -> ByteString) -> CostGraphDef -> 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))
                             CostGraphDef -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                             CostGraphDef
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   ((GraphDef -> Builder) -> Vector GraphDef -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                      (\ _v :: GraphDef
_v
                         -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                              (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 26)
                              ((ByteString -> Builder)
-> (GraphDef -> ByteString) -> GraphDef -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                 (\ bs :: ByteString
bs
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                            (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                         (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                 GraphDef -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                 GraphDef
_v))
                      (FoldLike
  (Vector GraphDef)
  RunMetadata
  RunMetadata
  (Vector GraphDef)
  (Vector GraphDef)
-> RunMetadata -> Vector GraphDef
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                         (forall s a (f :: * -> *).
(HasField s "vec'partitionGraphs" a, Functor f) =>
(a -> f a) -> s -> 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'partitionGraphs") RunMetadata
_x))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      ((RunMetadata'FunctionGraphs -> Builder)
-> Vector RunMetadata'FunctionGraphs -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                         (\ _v :: RunMetadata'FunctionGraphs
_v
                            -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                 (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 34)
                                 ((ByteString -> Builder)
-> (RunMetadata'FunctionGraphs -> ByteString)
-> RunMetadata'FunctionGraphs
-> 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))
                                    RunMetadata'FunctionGraphs -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                    RunMetadata'FunctionGraphs
_v))
                         (FoldLike
  (Vector RunMetadata'FunctionGraphs)
  RunMetadata
  RunMetadata
  (Vector RunMetadata'FunctionGraphs)
  (Vector RunMetadata'FunctionGraphs)
-> RunMetadata -> Vector RunMetadata'FunctionGraphs
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                            (forall s a (f :: * -> *).
(HasField s "vec'functionGraphs" a, Functor f) =>
(a -> f a) -> s -> 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'functionGraphs") RunMetadata
_x))
                      (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                         (FoldLike FieldSet RunMetadata RunMetadata FieldSet FieldSet
-> RunMetadata -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet RunMetadata RunMetadata FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields RunMetadata
_x)))))
instance Control.DeepSeq.NFData RunMetadata where
  rnf :: RunMetadata -> ()
rnf
    = \ x__ :: RunMetadata
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RunMetadata -> FieldSet
_RunMetadata'_unknownFields RunMetadata
x__)
             (Maybe StepStats -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (RunMetadata -> Maybe StepStats
_RunMetadata'stepStats RunMetadata
x__)
                (Maybe CostGraphDef -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (RunMetadata -> Maybe CostGraphDef
_RunMetadata'costGraph RunMetadata
x__)
                   (Vector GraphDef -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (RunMetadata -> Vector GraphDef
_RunMetadata'partitionGraphs RunMetadata
x__)
                      (Vector RunMetadata'FunctionGraphs -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (RunMetadata -> Vector RunMetadata'FunctionGraphs
_RunMetadata'functionGraphs RunMetadata
x__) ()))))
{- | Fields :
     
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.partitionGraphs' @:: Lens' RunMetadata'FunctionGraphs [Proto.Tensorflow.Core.Framework.Graph.GraphDef]@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.vec'partitionGraphs' @:: Lens' RunMetadata'FunctionGraphs (Data.Vector.Vector Proto.Tensorflow.Core.Framework.Graph.GraphDef)@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.preOptimizationGraph' @:: Lens' RunMetadata'FunctionGraphs Proto.Tensorflow.Core.Framework.Graph.GraphDef@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.maybe'preOptimizationGraph' @:: Lens' RunMetadata'FunctionGraphs (Prelude.Maybe Proto.Tensorflow.Core.Framework.Graph.GraphDef)@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.postOptimizationGraph' @:: Lens' RunMetadata'FunctionGraphs Proto.Tensorflow.Core.Framework.Graph.GraphDef@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.maybe'postOptimizationGraph' @:: Lens' RunMetadata'FunctionGraphs (Prelude.Maybe Proto.Tensorflow.Core.Framework.Graph.GraphDef)@ -}
data RunMetadata'FunctionGraphs
  = RunMetadata'FunctionGraphs'_constructor {RunMetadata'FunctionGraphs -> Vector GraphDef
_RunMetadata'FunctionGraphs'partitionGraphs :: !(Data.Vector.Vector Proto.Tensorflow.Core.Framework.Graph.GraphDef),
                                             RunMetadata'FunctionGraphs -> Maybe GraphDef
_RunMetadata'FunctionGraphs'preOptimizationGraph :: !(Prelude.Maybe Proto.Tensorflow.Core.Framework.Graph.GraphDef),
                                             RunMetadata'FunctionGraphs -> Maybe GraphDef
_RunMetadata'FunctionGraphs'postOptimizationGraph :: !(Prelude.Maybe Proto.Tensorflow.Core.Framework.Graph.GraphDef),
                                             RunMetadata'FunctionGraphs -> FieldSet
_RunMetadata'FunctionGraphs'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RunMetadata'FunctionGraphs -> RunMetadata'FunctionGraphs -> Bool
(RunMetadata'FunctionGraphs -> RunMetadata'FunctionGraphs -> Bool)
-> (RunMetadata'FunctionGraphs
    -> RunMetadata'FunctionGraphs -> Bool)
-> Eq RunMetadata'FunctionGraphs
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: RunMetadata'FunctionGraphs -> RunMetadata'FunctionGraphs -> Bool
$c/= :: RunMetadata'FunctionGraphs -> RunMetadata'FunctionGraphs -> Bool
== :: RunMetadata'FunctionGraphs -> RunMetadata'FunctionGraphs -> Bool
$c== :: RunMetadata'FunctionGraphs -> RunMetadata'FunctionGraphs -> Bool
Prelude.Eq, Eq RunMetadata'FunctionGraphs
Eq RunMetadata'FunctionGraphs =>
(RunMetadata'FunctionGraphs
 -> RunMetadata'FunctionGraphs -> Ordering)
-> (RunMetadata'FunctionGraphs
    -> RunMetadata'FunctionGraphs -> Bool)
-> (RunMetadata'FunctionGraphs
    -> RunMetadata'FunctionGraphs -> Bool)
-> (RunMetadata'FunctionGraphs
    -> RunMetadata'FunctionGraphs -> Bool)
-> (RunMetadata'FunctionGraphs
    -> RunMetadata'FunctionGraphs -> Bool)
-> (RunMetadata'FunctionGraphs
    -> RunMetadata'FunctionGraphs -> RunMetadata'FunctionGraphs)
-> (RunMetadata'FunctionGraphs
    -> RunMetadata'FunctionGraphs -> RunMetadata'FunctionGraphs)
-> Ord RunMetadata'FunctionGraphs
RunMetadata'FunctionGraphs -> RunMetadata'FunctionGraphs -> Bool
RunMetadata'FunctionGraphs
-> RunMetadata'FunctionGraphs -> Ordering
RunMetadata'FunctionGraphs
-> RunMetadata'FunctionGraphs -> RunMetadata'FunctionGraphs
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 :: RunMetadata'FunctionGraphs
-> RunMetadata'FunctionGraphs -> RunMetadata'FunctionGraphs
$cmin :: RunMetadata'FunctionGraphs
-> RunMetadata'FunctionGraphs -> RunMetadata'FunctionGraphs
max :: RunMetadata'FunctionGraphs
-> RunMetadata'FunctionGraphs -> RunMetadata'FunctionGraphs
$cmax :: RunMetadata'FunctionGraphs
-> RunMetadata'FunctionGraphs -> RunMetadata'FunctionGraphs
>= :: RunMetadata'FunctionGraphs -> RunMetadata'FunctionGraphs -> Bool
$c>= :: RunMetadata'FunctionGraphs -> RunMetadata'FunctionGraphs -> Bool
> :: RunMetadata'FunctionGraphs -> RunMetadata'FunctionGraphs -> Bool
$c> :: RunMetadata'FunctionGraphs -> RunMetadata'FunctionGraphs -> Bool
<= :: RunMetadata'FunctionGraphs -> RunMetadata'FunctionGraphs -> Bool
$c<= :: RunMetadata'FunctionGraphs -> RunMetadata'FunctionGraphs -> Bool
< :: RunMetadata'FunctionGraphs -> RunMetadata'FunctionGraphs -> Bool
$c< :: RunMetadata'FunctionGraphs -> RunMetadata'FunctionGraphs -> Bool
compare :: RunMetadata'FunctionGraphs
-> RunMetadata'FunctionGraphs -> Ordering
$ccompare :: RunMetadata'FunctionGraphs
-> RunMetadata'FunctionGraphs -> Ordering
$cp1Ord :: Eq RunMetadata'FunctionGraphs
Prelude.Ord)
instance Prelude.Show RunMetadata'FunctionGraphs where
  showsPrec :: Int -> RunMetadata'FunctionGraphs -> ShowS
showsPrec _ __x :: RunMetadata'FunctionGraphs
__x __s :: String
__s
    = Char -> ShowS
Prelude.showChar
        '{'
        (String -> ShowS
Prelude.showString
           (RunMetadata'FunctionGraphs -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RunMetadata'FunctionGraphs
__x) (Char -> ShowS
Prelude.showChar '}' String
__s))
instance Data.ProtoLens.Field.HasField RunMetadata'FunctionGraphs "partitionGraphs" [Proto.Tensorflow.Core.Framework.Graph.GraphDef] where
  fieldOf :: Proxy# "partitionGraphs"
-> ([GraphDef] -> f [GraphDef])
-> RunMetadata'FunctionGraphs
-> f RunMetadata'FunctionGraphs
fieldOf _
    = ((Vector GraphDef -> f (Vector GraphDef))
 -> RunMetadata'FunctionGraphs -> f RunMetadata'FunctionGraphs)
-> (([GraphDef] -> f [GraphDef])
    -> Vector GraphDef -> f (Vector GraphDef))
-> ([GraphDef] -> f [GraphDef])
-> RunMetadata'FunctionGraphs
-> f RunMetadata'FunctionGraphs
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RunMetadata'FunctionGraphs -> Vector GraphDef)
-> (RunMetadata'FunctionGraphs
    -> Vector GraphDef -> RunMetadata'FunctionGraphs)
-> Lens
     RunMetadata'FunctionGraphs
     RunMetadata'FunctionGraphs
     (Vector GraphDef)
     (Vector GraphDef)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RunMetadata'FunctionGraphs -> Vector GraphDef
_RunMetadata'FunctionGraphs'partitionGraphs
           (\ x__ :: RunMetadata'FunctionGraphs
x__ y__ :: Vector GraphDef
y__
              -> RunMetadata'FunctionGraphs
x__ {_RunMetadata'FunctionGraphs'partitionGraphs :: Vector GraphDef
_RunMetadata'FunctionGraphs'partitionGraphs = Vector GraphDef
y__}))
        ((Vector GraphDef -> [GraphDef])
-> (Vector GraphDef -> [GraphDef] -> Vector GraphDef)
-> Lens (Vector GraphDef) (Vector GraphDef) [GraphDef] [GraphDef]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector GraphDef -> [GraphDef]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ _ y__ :: [GraphDef]
y__ -> [GraphDef] -> Vector GraphDef
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [GraphDef]
y__))
instance Data.ProtoLens.Field.HasField RunMetadata'FunctionGraphs "vec'partitionGraphs" (Data.Vector.Vector Proto.Tensorflow.Core.Framework.Graph.GraphDef) where
  fieldOf :: Proxy# "vec'partitionGraphs"
-> (Vector GraphDef -> f (Vector GraphDef))
-> RunMetadata'FunctionGraphs
-> f RunMetadata'FunctionGraphs
fieldOf _
    = ((Vector GraphDef -> f (Vector GraphDef))
 -> RunMetadata'FunctionGraphs -> f RunMetadata'FunctionGraphs)
-> ((Vector GraphDef -> f (Vector GraphDef))
    -> Vector GraphDef -> f (Vector GraphDef))
-> (Vector GraphDef -> f (Vector GraphDef))
-> RunMetadata'FunctionGraphs
-> f RunMetadata'FunctionGraphs
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RunMetadata'FunctionGraphs -> Vector GraphDef)
-> (RunMetadata'FunctionGraphs
    -> Vector GraphDef -> RunMetadata'FunctionGraphs)
-> Lens
     RunMetadata'FunctionGraphs
     RunMetadata'FunctionGraphs
     (Vector GraphDef)
     (Vector GraphDef)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RunMetadata'FunctionGraphs -> Vector GraphDef
_RunMetadata'FunctionGraphs'partitionGraphs
           (\ x__ :: RunMetadata'FunctionGraphs
x__ y__ :: Vector GraphDef
y__
              -> RunMetadata'FunctionGraphs
x__ {_RunMetadata'FunctionGraphs'partitionGraphs :: Vector GraphDef
_RunMetadata'FunctionGraphs'partitionGraphs = Vector GraphDef
y__}))
        (Vector GraphDef -> f (Vector GraphDef))
-> Vector GraphDef -> f (Vector GraphDef)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RunMetadata'FunctionGraphs "preOptimizationGraph" Proto.Tensorflow.Core.Framework.Graph.GraphDef where
  fieldOf :: Proxy# "preOptimizationGraph"
-> (GraphDef -> f GraphDef)
-> RunMetadata'FunctionGraphs
-> f RunMetadata'FunctionGraphs
fieldOf _
    = ((Maybe GraphDef -> f (Maybe GraphDef))
 -> RunMetadata'FunctionGraphs -> f RunMetadata'FunctionGraphs)
-> ((GraphDef -> f GraphDef)
    -> Maybe GraphDef -> f (Maybe GraphDef))
-> (GraphDef -> f GraphDef)
-> RunMetadata'FunctionGraphs
-> f RunMetadata'FunctionGraphs
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RunMetadata'FunctionGraphs -> Maybe GraphDef)
-> (RunMetadata'FunctionGraphs
    -> Maybe GraphDef -> RunMetadata'FunctionGraphs)
-> Lens
     RunMetadata'FunctionGraphs
     RunMetadata'FunctionGraphs
     (Maybe GraphDef)
     (Maybe GraphDef)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RunMetadata'FunctionGraphs -> Maybe GraphDef
_RunMetadata'FunctionGraphs'preOptimizationGraph
           (\ x__ :: RunMetadata'FunctionGraphs
x__ y__ :: Maybe GraphDef
y__
              -> RunMetadata'FunctionGraphs
x__ {_RunMetadata'FunctionGraphs'preOptimizationGraph :: Maybe GraphDef
_RunMetadata'FunctionGraphs'preOptimizationGraph = Maybe GraphDef
y__}))
        (GraphDef -> Lens' (Maybe GraphDef) GraphDef
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens GraphDef
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField RunMetadata'FunctionGraphs "maybe'preOptimizationGraph" (Prelude.Maybe Proto.Tensorflow.Core.Framework.Graph.GraphDef) where
  fieldOf :: Proxy# "maybe'preOptimizationGraph"
-> (Maybe GraphDef -> f (Maybe GraphDef))
-> RunMetadata'FunctionGraphs
-> f RunMetadata'FunctionGraphs
fieldOf _
    = ((Maybe GraphDef -> f (Maybe GraphDef))
 -> RunMetadata'FunctionGraphs -> f RunMetadata'FunctionGraphs)
-> ((Maybe GraphDef -> f (Maybe GraphDef))
    -> Maybe GraphDef -> f (Maybe GraphDef))
-> (Maybe GraphDef -> f (Maybe GraphDef))
-> RunMetadata'FunctionGraphs
-> f RunMetadata'FunctionGraphs
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RunMetadata'FunctionGraphs -> Maybe GraphDef)
-> (RunMetadata'FunctionGraphs
    -> Maybe GraphDef -> RunMetadata'FunctionGraphs)
-> Lens
     RunMetadata'FunctionGraphs
     RunMetadata'FunctionGraphs
     (Maybe GraphDef)
     (Maybe GraphDef)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RunMetadata'FunctionGraphs -> Maybe GraphDef
_RunMetadata'FunctionGraphs'preOptimizationGraph
           (\ x__ :: RunMetadata'FunctionGraphs
x__ y__ :: Maybe GraphDef
y__
              -> RunMetadata'FunctionGraphs
x__ {_RunMetadata'FunctionGraphs'preOptimizationGraph :: Maybe GraphDef
_RunMetadata'FunctionGraphs'preOptimizationGraph = Maybe GraphDef
y__}))
        (Maybe GraphDef -> f (Maybe GraphDef))
-> Maybe GraphDef -> f (Maybe GraphDef)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RunMetadata'FunctionGraphs "postOptimizationGraph" Proto.Tensorflow.Core.Framework.Graph.GraphDef where
  fieldOf :: Proxy# "postOptimizationGraph"
-> (GraphDef -> f GraphDef)
-> RunMetadata'FunctionGraphs
-> f RunMetadata'FunctionGraphs
fieldOf _
    = ((Maybe GraphDef -> f (Maybe GraphDef))
 -> RunMetadata'FunctionGraphs -> f RunMetadata'FunctionGraphs)
-> ((GraphDef -> f GraphDef)
    -> Maybe GraphDef -> f (Maybe GraphDef))
-> (GraphDef -> f GraphDef)
-> RunMetadata'FunctionGraphs
-> f RunMetadata'FunctionGraphs
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RunMetadata'FunctionGraphs -> Maybe GraphDef)
-> (RunMetadata'FunctionGraphs
    -> Maybe GraphDef -> RunMetadata'FunctionGraphs)
-> Lens
     RunMetadata'FunctionGraphs
     RunMetadata'FunctionGraphs
     (Maybe GraphDef)
     (Maybe GraphDef)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RunMetadata'FunctionGraphs -> Maybe GraphDef
_RunMetadata'FunctionGraphs'postOptimizationGraph
           (\ x__ :: RunMetadata'FunctionGraphs
x__ y__ :: Maybe GraphDef
y__
              -> RunMetadata'FunctionGraphs
x__ {_RunMetadata'FunctionGraphs'postOptimizationGraph :: Maybe GraphDef
_RunMetadata'FunctionGraphs'postOptimizationGraph = Maybe GraphDef
y__}))
        (GraphDef -> Lens' (Maybe GraphDef) GraphDef
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens GraphDef
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField RunMetadata'FunctionGraphs "maybe'postOptimizationGraph" (Prelude.Maybe Proto.Tensorflow.Core.Framework.Graph.GraphDef) where
  fieldOf :: Proxy# "maybe'postOptimizationGraph"
-> (Maybe GraphDef -> f (Maybe GraphDef))
-> RunMetadata'FunctionGraphs
-> f RunMetadata'FunctionGraphs
fieldOf _
    = ((Maybe GraphDef -> f (Maybe GraphDef))
 -> RunMetadata'FunctionGraphs -> f RunMetadata'FunctionGraphs)
-> ((Maybe GraphDef -> f (Maybe GraphDef))
    -> Maybe GraphDef -> f (Maybe GraphDef))
-> (Maybe GraphDef -> f (Maybe GraphDef))
-> RunMetadata'FunctionGraphs
-> f RunMetadata'FunctionGraphs
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RunMetadata'FunctionGraphs -> Maybe GraphDef)
-> (RunMetadata'FunctionGraphs
    -> Maybe GraphDef -> RunMetadata'FunctionGraphs)
-> Lens
     RunMetadata'FunctionGraphs
     RunMetadata'FunctionGraphs
     (Maybe GraphDef)
     (Maybe GraphDef)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RunMetadata'FunctionGraphs -> Maybe GraphDef
_RunMetadata'FunctionGraphs'postOptimizationGraph
           (\ x__ :: RunMetadata'FunctionGraphs
x__ y__ :: Maybe GraphDef
y__
              -> RunMetadata'FunctionGraphs
x__ {_RunMetadata'FunctionGraphs'postOptimizationGraph :: Maybe GraphDef
_RunMetadata'FunctionGraphs'postOptimizationGraph = Maybe GraphDef
y__}))
        (Maybe GraphDef -> f (Maybe GraphDef))
-> Maybe GraphDef -> f (Maybe GraphDef)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message RunMetadata'FunctionGraphs where
  messageName :: Proxy RunMetadata'FunctionGraphs -> Text
messageName _
    = String -> Text
Data.Text.pack "tensorflow.RunMetadata.FunctionGraphs"
  packedMessageDescriptor :: Proxy RunMetadata'FunctionGraphs -> ByteString
packedMessageDescriptor _
    = "\n\
      \\SOFunctionGraphs\DC2?\n\
      \\DLEpartition_graphs\CAN\SOH \ETX(\v2\DC4.tensorflow.GraphDefR\SIpartitionGraphs\DC2J\n\
      \\SYNpre_optimization_graph\CAN\STX \SOH(\v2\DC4.tensorflow.GraphDefR\DC4preOptimizationGraph\DC2L\n\
      \\ETBpost_optimization_graph\CAN\ETX \SOH(\v2\DC4.tensorflow.GraphDefR\NAKpostOptimizationGraph"
  packedFileDescriptor :: Proxy RunMetadata'FunctionGraphs -> ByteString
packedFileDescriptor _ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor RunMetadata'FunctionGraphs)
fieldsByTag
    = let
        partitionGraphs__field_descriptor :: FieldDescriptor RunMetadata'FunctionGraphs
partitionGraphs__field_descriptor
          = String
-> FieldTypeDescriptor GraphDef
-> FieldAccessor RunMetadata'FunctionGraphs GraphDef
-> FieldDescriptor RunMetadata'FunctionGraphs
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "partition_graphs"
              (MessageOrGroup -> FieldTypeDescriptor GraphDef
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Tensorflow.Core.Framework.Graph.GraphDef)
              (Packing
-> Lens' RunMetadata'FunctionGraphs [GraphDef]
-> FieldAccessor RunMetadata'FunctionGraphs GraphDef
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Unpacked
                 (forall s a (f :: * -> *).
(HasField s "partitionGraphs" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"partitionGraphs")) ::
              Data.ProtoLens.FieldDescriptor RunMetadata'FunctionGraphs
        preOptimizationGraph__field_descriptor :: FieldDescriptor RunMetadata'FunctionGraphs
preOptimizationGraph__field_descriptor
          = String
-> FieldTypeDescriptor GraphDef
-> FieldAccessor RunMetadata'FunctionGraphs GraphDef
-> FieldDescriptor RunMetadata'FunctionGraphs
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "pre_optimization_graph"
              (MessageOrGroup -> FieldTypeDescriptor GraphDef
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Tensorflow.Core.Framework.Graph.GraphDef)
              (Lens
  RunMetadata'FunctionGraphs
  RunMetadata'FunctionGraphs
  (Maybe GraphDef)
  (Maybe GraphDef)
-> FieldAccessor RunMetadata'FunctionGraphs GraphDef
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall s a (f :: * -> *).
(HasField s "maybe'preOptimizationGraph" a, Functor f) =>
(a -> f a) -> s -> 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'preOptimizationGraph")) ::
              Data.ProtoLens.FieldDescriptor RunMetadata'FunctionGraphs
        postOptimizationGraph__field_descriptor :: FieldDescriptor RunMetadata'FunctionGraphs
postOptimizationGraph__field_descriptor
          = String
-> FieldTypeDescriptor GraphDef
-> FieldAccessor RunMetadata'FunctionGraphs GraphDef
-> FieldDescriptor RunMetadata'FunctionGraphs
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "post_optimization_graph"
              (MessageOrGroup -> FieldTypeDescriptor GraphDef
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Tensorflow.Core.Framework.Graph.GraphDef)
              (Lens
  RunMetadata'FunctionGraphs
  RunMetadata'FunctionGraphs
  (Maybe GraphDef)
  (Maybe GraphDef)
-> FieldAccessor RunMetadata'FunctionGraphs GraphDef
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall s a (f :: * -> *).
(HasField s "maybe'postOptimizationGraph" a, Functor f) =>
(a -> f a) -> s -> 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'postOptimizationGraph")) ::
              Data.ProtoLens.FieldDescriptor RunMetadata'FunctionGraphs
      in
        [(Tag, FieldDescriptor RunMetadata'FunctionGraphs)]
-> Map Tag (FieldDescriptor RunMetadata'FunctionGraphs)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag 1, FieldDescriptor RunMetadata'FunctionGraphs
partitionGraphs__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 2, FieldDescriptor RunMetadata'FunctionGraphs
preOptimizationGraph__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 3, FieldDescriptor RunMetadata'FunctionGraphs
postOptimizationGraph__field_descriptor)]
  unknownFields :: LensLike' f RunMetadata'FunctionGraphs FieldSet
unknownFields
    = (RunMetadata'FunctionGraphs -> FieldSet)
-> (RunMetadata'FunctionGraphs
    -> FieldSet -> RunMetadata'FunctionGraphs)
-> Lens' RunMetadata'FunctionGraphs FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RunMetadata'FunctionGraphs -> FieldSet
_RunMetadata'FunctionGraphs'_unknownFields
        (\ x__ :: RunMetadata'FunctionGraphs
x__ y__ :: FieldSet
y__
           -> RunMetadata'FunctionGraphs
x__ {_RunMetadata'FunctionGraphs'_unknownFields :: FieldSet
_RunMetadata'FunctionGraphs'_unknownFields = FieldSet
y__})
  defMessage :: RunMetadata'FunctionGraphs
defMessage
    = $WRunMetadata'FunctionGraphs'_constructor :: Vector GraphDef
-> Maybe GraphDef
-> Maybe GraphDef
-> FieldSet
-> RunMetadata'FunctionGraphs
RunMetadata'FunctionGraphs'_constructor
        {_RunMetadata'FunctionGraphs'partitionGraphs :: Vector GraphDef
_RunMetadata'FunctionGraphs'partitionGraphs = Vector GraphDef
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _RunMetadata'FunctionGraphs'preOptimizationGraph :: Maybe GraphDef
_RunMetadata'FunctionGraphs'preOptimizationGraph = Maybe GraphDef
forall a. Maybe a
Prelude.Nothing,
         _RunMetadata'FunctionGraphs'postOptimizationGraph :: Maybe GraphDef
_RunMetadata'FunctionGraphs'postOptimizationGraph = Maybe GraphDef
forall a. Maybe a
Prelude.Nothing,
         _RunMetadata'FunctionGraphs'_unknownFields :: FieldSet
_RunMetadata'FunctionGraphs'_unknownFields = []}
  parseMessage :: Parser RunMetadata'FunctionGraphs
parseMessage
    = let
        loop ::
          RunMetadata'FunctionGraphs
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Tensorflow.Core.Framework.Graph.GraphDef
             -> Data.ProtoLens.Encoding.Bytes.Parser RunMetadata'FunctionGraphs
        loop :: RunMetadata'FunctionGraphs
-> Growing Vector RealWorld GraphDef
-> Parser RunMetadata'FunctionGraphs
loop x :: RunMetadata'FunctionGraphs
x mutable'partitionGraphs :: Growing Vector RealWorld GraphDef
mutable'partitionGraphs
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do Vector GraphDef
frozen'partitionGraphs <- IO (Vector GraphDef) -> Parser (Vector GraphDef)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                  (Growing Vector (PrimState IO) GraphDef -> IO (Vector GraphDef)
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 GraphDef
Growing Vector (PrimState IO) GraphDef
mutable'partitionGraphs)
                      (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]))))
                      RunMetadata'FunctionGraphs -> Parser RunMetadata'FunctionGraphs
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter
  RunMetadata'FunctionGraphs
  RunMetadata'FunctionGraphs
  FieldSet
  FieldSet
-> (FieldSet -> FieldSet)
-> RunMetadata'FunctionGraphs
-> RunMetadata'FunctionGraphs
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
  RunMetadata'FunctionGraphs
  RunMetadata'FunctionGraphs
  FieldSet
  FieldSet
Data.ProtoLens.unknownFields
                           (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t)
                           (Setter
  RunMetadata'FunctionGraphs
  RunMetadata'FunctionGraphs
  (Vector GraphDef)
  (Vector GraphDef)
-> Vector GraphDef
-> RunMetadata'FunctionGraphs
-> RunMetadata'FunctionGraphs
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                              (forall s a (f :: * -> *).
(HasField s "vec'partitionGraphs" a, Functor f) =>
(a -> f a) -> s -> 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'partitionGraphs")
                              Vector GraphDef
frozen'partitionGraphs
                              RunMetadata'FunctionGraphs
x))
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        10
                          -> do !GraphDef
y <- Parser GraphDef -> String -> Parser GraphDef
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Int -> Parser GraphDef -> Parser GraphDef
forall a. Int -> Parser a -> Parser a
Data.ProtoLens.Encoding.Bytes.isolate
                                              (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
                                              Parser GraphDef
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                        "partition_graphs"
                                Growing Vector RealWorld GraphDef
v <- IO (Growing Vector RealWorld GraphDef)
-> Parser (Growing Vector RealWorld GraphDef)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) GraphDef
-> GraphDef -> IO (Growing Vector (PrimState IO) GraphDef)
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 GraphDef
Growing Vector (PrimState IO) GraphDef
mutable'partitionGraphs GraphDef
y)
                                RunMetadata'FunctionGraphs
-> Growing Vector RealWorld GraphDef
-> Parser RunMetadata'FunctionGraphs
loop RunMetadata'FunctionGraphs
x Growing Vector RealWorld GraphDef
v
                        18
                          -> do GraphDef
y <- Parser GraphDef -> String -> Parser GraphDef
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser GraphDef -> Parser GraphDef
forall a. Int -> Parser a -> Parser a
Data.ProtoLens.Encoding.Bytes.isolate
                                             (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len) Parser GraphDef
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       "pre_optimization_graph"
                                RunMetadata'FunctionGraphs
-> Growing Vector RealWorld GraphDef
-> Parser RunMetadata'FunctionGraphs
loop
                                  (Setter
  RunMetadata'FunctionGraphs
  RunMetadata'FunctionGraphs
  GraphDef
  GraphDef
-> GraphDef
-> RunMetadata'FunctionGraphs
-> RunMetadata'FunctionGraphs
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "preOptimizationGraph" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"preOptimizationGraph") GraphDef
y RunMetadata'FunctionGraphs
x)
                                  Growing Vector RealWorld GraphDef
mutable'partitionGraphs
                        26
                          -> do GraphDef
y <- Parser GraphDef -> String -> Parser GraphDef
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser GraphDef -> Parser GraphDef
forall a. Int -> Parser a -> Parser a
Data.ProtoLens.Encoding.Bytes.isolate
                                             (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len) Parser GraphDef
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       "post_optimization_graph"
                                RunMetadata'FunctionGraphs
-> Growing Vector RealWorld GraphDef
-> Parser RunMetadata'FunctionGraphs
loop
                                  (Setter
  RunMetadata'FunctionGraphs
  RunMetadata'FunctionGraphs
  GraphDef
  GraphDef
-> GraphDef
-> RunMetadata'FunctionGraphs
-> RunMetadata'FunctionGraphs
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "postOptimizationGraph" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"postOptimizationGraph") GraphDef
y RunMetadata'FunctionGraphs
x)
                                  Growing Vector RealWorld GraphDef
mutable'partitionGraphs
                        wire :: Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                RunMetadata'FunctionGraphs
-> Growing Vector RealWorld GraphDef
-> Parser RunMetadata'FunctionGraphs
loop
                                  (Setter
  RunMetadata'FunctionGraphs
  RunMetadata'FunctionGraphs
  FieldSet
  FieldSet
-> (FieldSet -> FieldSet)
-> RunMetadata'FunctionGraphs
-> RunMetadata'FunctionGraphs
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
  RunMetadata'FunctionGraphs
  RunMetadata'FunctionGraphs
  FieldSet
  FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) RunMetadata'FunctionGraphs
x)
                                  Growing Vector RealWorld GraphDef
mutable'partitionGraphs
      in
        Parser RunMetadata'FunctionGraphs
-> String -> Parser RunMetadata'FunctionGraphs
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do Growing Vector RealWorld GraphDef
mutable'partitionGraphs <- IO (Growing Vector RealWorld GraphDef)
-> Parser (Growing Vector RealWorld GraphDef)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                           IO (Growing Vector RealWorld GraphDef)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              RunMetadata'FunctionGraphs
-> Growing Vector RealWorld GraphDef
-> Parser RunMetadata'FunctionGraphs
loop RunMetadata'FunctionGraphs
forall msg. Message msg => msg
Data.ProtoLens.defMessage Growing Vector RealWorld GraphDef
mutable'partitionGraphs)
          "FunctionGraphs"
  buildMessage :: RunMetadata'FunctionGraphs -> Builder
buildMessage
    = \ _x :: RunMetadata'FunctionGraphs
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             ((GraphDef -> Builder) -> Vector GraphDef -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                (\ _v :: GraphDef
_v
                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 10)
                        ((ByteString -> Builder)
-> (GraphDef -> ByteString) -> GraphDef -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                           (\ bs :: ByteString
bs
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                      (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                   (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                           GraphDef -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                           GraphDef
_v))
                (FoldLike
  (Vector GraphDef)
  RunMetadata'FunctionGraphs
  RunMetadata'FunctionGraphs
  (Vector GraphDef)
  (Vector GraphDef)
-> RunMetadata'FunctionGraphs -> Vector GraphDef
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                   (forall s a (f :: * -> *).
(HasField s "vec'partitionGraphs" a, Functor f) =>
(a -> f a) -> s -> 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'partitionGraphs") RunMetadata'FunctionGraphs
_x))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (case
                     FoldLike
  (Maybe GraphDef)
  RunMetadata'FunctionGraphs
  RunMetadata'FunctionGraphs
  (Maybe GraphDef)
  (Maybe GraphDef)
-> RunMetadata'FunctionGraphs -> Maybe GraphDef
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                       (forall s a (f :: * -> *).
(HasField s "maybe'preOptimizationGraph" a, Functor f) =>
(a -> f a) -> s -> 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'preOptimizationGraph") RunMetadata'FunctionGraphs
_x
                 of
                   Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just _v :: GraphDef
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 18)
                          ((ByteString -> Builder)
-> (GraphDef -> ByteString) -> GraphDef -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ bs :: ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             GraphDef -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                             GraphDef
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (case
                        FoldLike
  (Maybe GraphDef)
  RunMetadata'FunctionGraphs
  RunMetadata'FunctionGraphs
  (Maybe GraphDef)
  (Maybe GraphDef)
-> RunMetadata'FunctionGraphs -> Maybe GraphDef
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                          (forall s a (f :: * -> *).
(HasField s "maybe'postOptimizationGraph" a, Functor f) =>
(a -> f a) -> s -> 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'postOptimizationGraph") RunMetadata'FunctionGraphs
_x
                    of
                      Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      (Prelude.Just _v :: GraphDef
_v)
                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 26)
                             ((ByteString -> Builder)
-> (GraphDef -> ByteString) -> GraphDef -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                (\ bs :: ByteString
bs
                                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                           (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                        (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                GraphDef -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                GraphDef
_v))
                   (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                      (FoldLike
  FieldSet
  RunMetadata'FunctionGraphs
  RunMetadata'FunctionGraphs
  FieldSet
  FieldSet
-> RunMetadata'FunctionGraphs -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  RunMetadata'FunctionGraphs
  RunMetadata'FunctionGraphs
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields RunMetadata'FunctionGraphs
_x))))
instance Control.DeepSeq.NFData RunMetadata'FunctionGraphs where
  rnf :: RunMetadata'FunctionGraphs -> ()
rnf
    = \ x__ :: RunMetadata'FunctionGraphs
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RunMetadata'FunctionGraphs -> FieldSet
_RunMetadata'FunctionGraphs'_unknownFields RunMetadata'FunctionGraphs
x__)
             (Vector GraphDef -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (RunMetadata'FunctionGraphs -> Vector GraphDef
_RunMetadata'FunctionGraphs'partitionGraphs RunMetadata'FunctionGraphs
x__)
                (Maybe GraphDef -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (RunMetadata'FunctionGraphs -> Maybe GraphDef
_RunMetadata'FunctionGraphs'preOptimizationGraph RunMetadata'FunctionGraphs
x__)
                   (Maybe GraphDef -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (RunMetadata'FunctionGraphs -> Maybe GraphDef
_RunMetadata'FunctionGraphs'postOptimizationGraph RunMetadata'FunctionGraphs
x__) ())))
{- | Fields :
     
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.traceLevel' @:: Lens' RunOptions RunOptions'TraceLevel@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.timeoutInMs' @:: Lens' RunOptions Data.Int.Int64@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.interOpThreadPool' @:: Lens' RunOptions Data.Int.Int32@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.outputPartitionGraphs' @:: Lens' RunOptions Prelude.Bool@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.debugOptions' @:: Lens' RunOptions Proto.Tensorflow.Core.Protobuf.Debug.DebugOptions@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.maybe'debugOptions' @:: Lens' RunOptions (Prelude.Maybe Proto.Tensorflow.Core.Protobuf.Debug.DebugOptions)@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.reportTensorAllocationsUponOom' @:: Lens' RunOptions Prelude.Bool@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.experimental' @:: Lens' RunOptions RunOptions'Experimental@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.maybe'experimental' @:: Lens' RunOptions (Prelude.Maybe RunOptions'Experimental)@ -}
data RunOptions
  = RunOptions'_constructor {RunOptions -> RunOptions'TraceLevel
_RunOptions'traceLevel :: !RunOptions'TraceLevel,
                             RunOptions -> Int64
_RunOptions'timeoutInMs :: !Data.Int.Int64,
                             RunOptions -> Int32
_RunOptions'interOpThreadPool :: !Data.Int.Int32,
                             RunOptions -> Bool
_RunOptions'outputPartitionGraphs :: !Prelude.Bool,
                             RunOptions -> Maybe DebugOptions
_RunOptions'debugOptions :: !(Prelude.Maybe Proto.Tensorflow.Core.Protobuf.Debug.DebugOptions),
                             RunOptions -> Bool
_RunOptions'reportTensorAllocationsUponOom :: !Prelude.Bool,
                             RunOptions -> Maybe RunOptions'Experimental
_RunOptions'experimental :: !(Prelude.Maybe RunOptions'Experimental),
                             RunOptions -> FieldSet
_RunOptions'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RunOptions -> RunOptions -> Bool
(RunOptions -> RunOptions -> Bool)
-> (RunOptions -> RunOptions -> Bool) -> Eq RunOptions
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: RunOptions -> RunOptions -> Bool
$c/= :: RunOptions -> RunOptions -> Bool
== :: RunOptions -> RunOptions -> Bool
$c== :: RunOptions -> RunOptions -> Bool
Prelude.Eq, Eq RunOptions
Eq RunOptions =>
(RunOptions -> RunOptions -> Ordering)
-> (RunOptions -> RunOptions -> Bool)
-> (RunOptions -> RunOptions -> Bool)
-> (RunOptions -> RunOptions -> Bool)
-> (RunOptions -> RunOptions -> Bool)
-> (RunOptions -> RunOptions -> RunOptions)
-> (RunOptions -> RunOptions -> RunOptions)
-> Ord RunOptions
RunOptions -> RunOptions -> Bool
RunOptions -> RunOptions -> Ordering
RunOptions -> RunOptions -> RunOptions
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 :: RunOptions -> RunOptions -> RunOptions
$cmin :: RunOptions -> RunOptions -> RunOptions
max :: RunOptions -> RunOptions -> RunOptions
$cmax :: RunOptions -> RunOptions -> RunOptions
>= :: RunOptions -> RunOptions -> Bool
$c>= :: RunOptions -> RunOptions -> Bool
> :: RunOptions -> RunOptions -> Bool
$c> :: RunOptions -> RunOptions -> Bool
<= :: RunOptions -> RunOptions -> Bool
$c<= :: RunOptions -> RunOptions -> Bool
< :: RunOptions -> RunOptions -> Bool
$c< :: RunOptions -> RunOptions -> Bool
compare :: RunOptions -> RunOptions -> Ordering
$ccompare :: RunOptions -> RunOptions -> Ordering
$cp1Ord :: Eq RunOptions
Prelude.Ord)
instance Prelude.Show RunOptions where
  showsPrec :: Int -> RunOptions -> ShowS
showsPrec _ __x :: RunOptions
__x __s :: String
__s
    = Char -> ShowS
Prelude.showChar
        '{'
        (String -> ShowS
Prelude.showString
           (RunOptions -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RunOptions
__x) (Char -> ShowS
Prelude.showChar '}' String
__s))
instance Data.ProtoLens.Field.HasField RunOptions "traceLevel" RunOptions'TraceLevel where
  fieldOf :: Proxy# "traceLevel"
-> (RunOptions'TraceLevel -> f RunOptions'TraceLevel)
-> RunOptions
-> f RunOptions
fieldOf _
    = ((RunOptions'TraceLevel -> f RunOptions'TraceLevel)
 -> RunOptions -> f RunOptions)
-> ((RunOptions'TraceLevel -> f RunOptions'TraceLevel)
    -> RunOptions'TraceLevel -> f RunOptions'TraceLevel)
-> (RunOptions'TraceLevel -> f RunOptions'TraceLevel)
-> RunOptions
-> f RunOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RunOptions -> RunOptions'TraceLevel)
-> (RunOptions -> RunOptions'TraceLevel -> RunOptions)
-> Lens
     RunOptions RunOptions RunOptions'TraceLevel RunOptions'TraceLevel
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RunOptions -> RunOptions'TraceLevel
_RunOptions'traceLevel
           (\ x__ :: RunOptions
x__ y__ :: RunOptions'TraceLevel
y__ -> RunOptions
x__ {_RunOptions'traceLevel :: RunOptions'TraceLevel
_RunOptions'traceLevel = RunOptions'TraceLevel
y__}))
        (RunOptions'TraceLevel -> f RunOptions'TraceLevel)
-> RunOptions'TraceLevel -> f RunOptions'TraceLevel
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RunOptions "timeoutInMs" Data.Int.Int64 where
  fieldOf :: Proxy# "timeoutInMs"
-> (Int64 -> f Int64) -> RunOptions -> f RunOptions
fieldOf _
    = ((Int64 -> f Int64) -> RunOptions -> f RunOptions)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> RunOptions
-> f RunOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RunOptions -> Int64)
-> (RunOptions -> Int64 -> RunOptions)
-> Lens RunOptions RunOptions Int64 Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RunOptions -> Int64
_RunOptions'timeoutInMs
           (\ x__ :: RunOptions
x__ y__ :: Int64
y__ -> RunOptions
x__ {_RunOptions'timeoutInMs :: Int64
_RunOptions'timeoutInMs = Int64
y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RunOptions "interOpThreadPool" Data.Int.Int32 where
  fieldOf :: Proxy# "interOpThreadPool"
-> (Int32 -> f Int32) -> RunOptions -> f RunOptions
fieldOf _
    = ((Int32 -> f Int32) -> RunOptions -> f RunOptions)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> RunOptions
-> f RunOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RunOptions -> Int32)
-> (RunOptions -> Int32 -> RunOptions)
-> Lens RunOptions RunOptions Int32 Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RunOptions -> Int32
_RunOptions'interOpThreadPool
           (\ x__ :: RunOptions
x__ y__ :: Int32
y__ -> RunOptions
x__ {_RunOptions'interOpThreadPool :: Int32
_RunOptions'interOpThreadPool = Int32
y__}))
        (Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RunOptions "outputPartitionGraphs" Prelude.Bool where
  fieldOf :: Proxy# "outputPartitionGraphs"
-> (Bool -> f Bool) -> RunOptions -> f RunOptions
fieldOf _
    = ((Bool -> f Bool) -> RunOptions -> f RunOptions)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> RunOptions
-> f RunOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RunOptions -> Bool)
-> (RunOptions -> Bool -> RunOptions)
-> Lens RunOptions RunOptions Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RunOptions -> Bool
_RunOptions'outputPartitionGraphs
           (\ x__ :: RunOptions
x__ y__ :: Bool
y__ -> RunOptions
x__ {_RunOptions'outputPartitionGraphs :: Bool
_RunOptions'outputPartitionGraphs = Bool
y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RunOptions "debugOptions" Proto.Tensorflow.Core.Protobuf.Debug.DebugOptions where
  fieldOf :: Proxy# "debugOptions"
-> (DebugOptions -> f DebugOptions) -> RunOptions -> f RunOptions
fieldOf _
    = ((Maybe DebugOptions -> f (Maybe DebugOptions))
 -> RunOptions -> f RunOptions)
-> ((DebugOptions -> f DebugOptions)
    -> Maybe DebugOptions -> f (Maybe DebugOptions))
-> (DebugOptions -> f DebugOptions)
-> RunOptions
-> f RunOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RunOptions -> Maybe DebugOptions)
-> (RunOptions -> Maybe DebugOptions -> RunOptions)
-> Lens
     RunOptions RunOptions (Maybe DebugOptions) (Maybe DebugOptions)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RunOptions -> Maybe DebugOptions
_RunOptions'debugOptions
           (\ x__ :: RunOptions
x__ y__ :: Maybe DebugOptions
y__ -> RunOptions
x__ {_RunOptions'debugOptions :: Maybe DebugOptions
_RunOptions'debugOptions = Maybe DebugOptions
y__}))
        (DebugOptions -> Lens' (Maybe DebugOptions) DebugOptions
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens DebugOptions
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField RunOptions "maybe'debugOptions" (Prelude.Maybe Proto.Tensorflow.Core.Protobuf.Debug.DebugOptions) where
  fieldOf :: Proxy# "maybe'debugOptions"
-> (Maybe DebugOptions -> f (Maybe DebugOptions))
-> RunOptions
-> f RunOptions
fieldOf _
    = ((Maybe DebugOptions -> f (Maybe DebugOptions))
 -> RunOptions -> f RunOptions)
-> ((Maybe DebugOptions -> f (Maybe DebugOptions))
    -> Maybe DebugOptions -> f (Maybe DebugOptions))
-> (Maybe DebugOptions -> f (Maybe DebugOptions))
-> RunOptions
-> f RunOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RunOptions -> Maybe DebugOptions)
-> (RunOptions -> Maybe DebugOptions -> RunOptions)
-> Lens
     RunOptions RunOptions (Maybe DebugOptions) (Maybe DebugOptions)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RunOptions -> Maybe DebugOptions
_RunOptions'debugOptions
           (\ x__ :: RunOptions
x__ y__ :: Maybe DebugOptions
y__ -> RunOptions
x__ {_RunOptions'debugOptions :: Maybe DebugOptions
_RunOptions'debugOptions = Maybe DebugOptions
y__}))
        (Maybe DebugOptions -> f (Maybe DebugOptions))
-> Maybe DebugOptions -> f (Maybe DebugOptions)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RunOptions "reportTensorAllocationsUponOom" Prelude.Bool where
  fieldOf :: Proxy# "reportTensorAllocationsUponOom"
-> (Bool -> f Bool) -> RunOptions -> f RunOptions
fieldOf _
    = ((Bool -> f Bool) -> RunOptions -> f RunOptions)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> RunOptions
-> f RunOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RunOptions -> Bool)
-> (RunOptions -> Bool -> RunOptions)
-> Lens RunOptions RunOptions Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RunOptions -> Bool
_RunOptions'reportTensorAllocationsUponOom
           (\ x__ :: RunOptions
x__ y__ :: Bool
y__
              -> RunOptions
x__ {_RunOptions'reportTensorAllocationsUponOom :: Bool
_RunOptions'reportTensorAllocationsUponOom = Bool
y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RunOptions "experimental" RunOptions'Experimental where
  fieldOf :: Proxy# "experimental"
-> (RunOptions'Experimental -> f RunOptions'Experimental)
-> RunOptions
-> f RunOptions
fieldOf _
    = ((Maybe RunOptions'Experimental
  -> f (Maybe RunOptions'Experimental))
 -> RunOptions -> f RunOptions)
-> ((RunOptions'Experimental -> f RunOptions'Experimental)
    -> Maybe RunOptions'Experimental
    -> f (Maybe RunOptions'Experimental))
-> (RunOptions'Experimental -> f RunOptions'Experimental)
-> RunOptions
-> f RunOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RunOptions -> Maybe RunOptions'Experimental)
-> (RunOptions -> Maybe RunOptions'Experimental -> RunOptions)
-> Lens
     RunOptions
     RunOptions
     (Maybe RunOptions'Experimental)
     (Maybe RunOptions'Experimental)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RunOptions -> Maybe RunOptions'Experimental
_RunOptions'experimental
           (\ x__ :: RunOptions
x__ y__ :: Maybe RunOptions'Experimental
y__ -> RunOptions
x__ {_RunOptions'experimental :: Maybe RunOptions'Experimental
_RunOptions'experimental = Maybe RunOptions'Experimental
y__}))
        (RunOptions'Experimental
-> Lens' (Maybe RunOptions'Experimental) RunOptions'Experimental
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens RunOptions'Experimental
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField RunOptions "maybe'experimental" (Prelude.Maybe RunOptions'Experimental) where
  fieldOf :: Proxy# "maybe'experimental"
-> (Maybe RunOptions'Experimental
    -> f (Maybe RunOptions'Experimental))
-> RunOptions
-> f RunOptions
fieldOf _
    = ((Maybe RunOptions'Experimental
  -> f (Maybe RunOptions'Experimental))
 -> RunOptions -> f RunOptions)
-> ((Maybe RunOptions'Experimental
     -> f (Maybe RunOptions'Experimental))
    -> Maybe RunOptions'Experimental
    -> f (Maybe RunOptions'Experimental))
-> (Maybe RunOptions'Experimental
    -> f (Maybe RunOptions'Experimental))
-> RunOptions
-> f RunOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RunOptions -> Maybe RunOptions'Experimental)
-> (RunOptions -> Maybe RunOptions'Experimental -> RunOptions)
-> Lens
     RunOptions
     RunOptions
     (Maybe RunOptions'Experimental)
     (Maybe RunOptions'Experimental)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RunOptions -> Maybe RunOptions'Experimental
_RunOptions'experimental
           (\ x__ :: RunOptions
x__ y__ :: Maybe RunOptions'Experimental
y__ -> RunOptions
x__ {_RunOptions'experimental :: Maybe RunOptions'Experimental
_RunOptions'experimental = Maybe RunOptions'Experimental
y__}))
        (Maybe RunOptions'Experimental
 -> f (Maybe RunOptions'Experimental))
-> Maybe RunOptions'Experimental
-> f (Maybe RunOptions'Experimental)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message RunOptions where
  messageName :: Proxy RunOptions -> Text
messageName _ = String -> Text
Data.Text.pack "tensorflow.RunOptions"
  packedMessageDescriptor :: Proxy RunOptions -> ByteString
packedMessageDescriptor _
    = "\n\
      \\n\
      \RunOptions\DC2B\n\
      \\vtrace_level\CAN\SOH \SOH(\SO2!.tensorflow.RunOptions.TraceLevelR\n\
      \traceLevel\DC2\"\n\
      \\rtimeout_in_ms\CAN\STX \SOH(\ETXR\vtimeoutInMs\DC2/\n\
      \\DC4inter_op_thread_pool\CAN\ETX \SOH(\ENQR\DC1interOpThreadPool\DC26\n\
      \\ETBoutput_partition_graphs\CAN\ENQ \SOH(\bR\NAKoutputPartitionGraphs\DC2=\n\
      \\rdebug_options\CAN\ACK \SOH(\v2\CAN.tensorflow.DebugOptionsR\fdebugOptions\DC2J\n\
      \\"report_tensor_allocations_upon_oom\CAN\a \SOH(\bR\RSreportTensorAllocationsUponOom\DC2G\n\
      \\fexperimental\CAN\b \SOH(\v2#.tensorflow.RunOptions.ExperimentalR\fexperimental\SUB\154\STX\n\
      \\fExperimental\DC20\n\
      \\DC4collective_graph_key\CAN\SOH \SOH(\ETXR\DC2collectiveGraphKey\DC2/\n\
      \\DC4use_run_handler_pool\CAN\STX \SOH(\bR\DC1useRunHandlerPool\DC2r\n\
      \\CANrun_handler_pool_options\CAN\ETX \SOH(\v29.tensorflow.RunOptions.Experimental.RunHandlerPoolOptionsR\NAKrunHandlerPoolOptions\SUB3\n\
      \\NAKRunHandlerPoolOptions\DC2\SUB\n\
      \\bpriority\CAN\SOH \SOH(\ETXR\bpriority\"R\n\
      \\n\
      \TraceLevel\DC2\f\n\
      \\bNO_TRACE\DLE\NUL\DC2\DC2\n\
      \\SOSOFTWARE_TRACE\DLE\SOH\DC2\DC2\n\
      \\SO\&HARDWARE_TRACE\DLE\STX\DC2\SO\n\
      \\n\
      \FULL_TRACE\DLE\ETXJ\EOT\b\EOT\DLE\ENQ"
  packedFileDescriptor :: Proxy RunOptions -> ByteString
packedFileDescriptor _ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor RunOptions)
fieldsByTag
    = let
        traceLevel__field_descriptor :: FieldDescriptor RunOptions
traceLevel__field_descriptor
          = String
-> FieldTypeDescriptor RunOptions'TraceLevel
-> FieldAccessor RunOptions RunOptions'TraceLevel
-> FieldDescriptor RunOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "trace_level"
              (ScalarField RunOptions'TraceLevel
-> FieldTypeDescriptor RunOptions'TraceLevel
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField RunOptions'TraceLevel
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor RunOptions'TraceLevel)
              (WireDefault RunOptions'TraceLevel
-> Lens
     RunOptions RunOptions RunOptions'TraceLevel RunOptions'TraceLevel
-> FieldAccessor RunOptions RunOptions'TraceLevel
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault RunOptions'TraceLevel
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "traceLevel" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"traceLevel")) ::
              Data.ProtoLens.FieldDescriptor RunOptions
        timeoutInMs__field_descriptor :: FieldDescriptor RunOptions
timeoutInMs__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor RunOptions Int64
-> FieldDescriptor RunOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "timeout_in_ms"
              (ScalarField Int64 -> FieldTypeDescriptor Int64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int64
Data.ProtoLens.Int64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64)
              (WireDefault Int64
-> Lens RunOptions RunOptions Int64 Int64
-> FieldAccessor RunOptions Int64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "timeoutInMs" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"timeoutInMs")) ::
              Data.ProtoLens.FieldDescriptor RunOptions
        interOpThreadPool__field_descriptor :: FieldDescriptor RunOptions
interOpThreadPool__field_descriptor
          = String
-> FieldTypeDescriptor Int32
-> FieldAccessor RunOptions Int32
-> FieldDescriptor RunOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "inter_op_thread_pool"
              (ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.Int32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
              (WireDefault Int32
-> Lens RunOptions RunOptions Int32 Int32
-> FieldAccessor RunOptions Int32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "interOpThreadPool" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"interOpThreadPool")) ::
              Data.ProtoLens.FieldDescriptor RunOptions
        outputPartitionGraphs__field_descriptor :: FieldDescriptor RunOptions
outputPartitionGraphs__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor RunOptions Bool
-> FieldDescriptor RunOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "output_partition_graphs"
              (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 RunOptions RunOptions Bool Bool
-> FieldAccessor RunOptions 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 "outputPartitionGraphs" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"outputPartitionGraphs")) ::
              Data.ProtoLens.FieldDescriptor RunOptions
        debugOptions__field_descriptor :: FieldDescriptor RunOptions
debugOptions__field_descriptor
          = String
-> FieldTypeDescriptor DebugOptions
-> FieldAccessor RunOptions DebugOptions
-> FieldDescriptor RunOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "debug_options"
              (MessageOrGroup -> FieldTypeDescriptor DebugOptions
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Tensorflow.Core.Protobuf.Debug.DebugOptions)
              (Lens
  RunOptions RunOptions (Maybe DebugOptions) (Maybe DebugOptions)
-> FieldAccessor RunOptions DebugOptions
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall s a (f :: * -> *).
(HasField s "maybe'debugOptions" a, Functor f) =>
(a -> f a) -> s -> 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'debugOptions")) ::
              Data.ProtoLens.FieldDescriptor RunOptions
        reportTensorAllocationsUponOom__field_descriptor :: FieldDescriptor RunOptions
reportTensorAllocationsUponOom__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor RunOptions Bool
-> FieldDescriptor RunOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "report_tensor_allocations_upon_oom"
              (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 RunOptions RunOptions Bool Bool
-> FieldAccessor RunOptions 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 "reportTensorAllocationsUponOom" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"reportTensorAllocationsUponOom")) ::
              Data.ProtoLens.FieldDescriptor RunOptions
        experimental__field_descriptor :: FieldDescriptor RunOptions
experimental__field_descriptor
          = String
-> FieldTypeDescriptor RunOptions'Experimental
-> FieldAccessor RunOptions RunOptions'Experimental
-> FieldDescriptor RunOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "experimental"
              (MessageOrGroup -> FieldTypeDescriptor RunOptions'Experimental
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor RunOptions'Experimental)
              (Lens
  RunOptions
  RunOptions
  (Maybe RunOptions'Experimental)
  (Maybe RunOptions'Experimental)
-> FieldAccessor RunOptions RunOptions'Experimental
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall s a (f :: * -> *).
(HasField s "maybe'experimental" a, Functor f) =>
(a -> f a) -> s -> 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'experimental")) ::
              Data.ProtoLens.FieldDescriptor RunOptions
      in
        [(Tag, FieldDescriptor RunOptions)]
-> Map Tag (FieldDescriptor RunOptions)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag 1, FieldDescriptor RunOptions
traceLevel__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 2, FieldDescriptor RunOptions
timeoutInMs__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 3, FieldDescriptor RunOptions
interOpThreadPool__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 5, FieldDescriptor RunOptions
outputPartitionGraphs__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 6, FieldDescriptor RunOptions
debugOptions__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 7, 
            FieldDescriptor RunOptions
reportTensorAllocationsUponOom__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 8, FieldDescriptor RunOptions
experimental__field_descriptor)]
  unknownFields :: LensLike' f RunOptions FieldSet
unknownFields
    = (RunOptions -> FieldSet)
-> (RunOptions -> FieldSet -> RunOptions)
-> Lens' RunOptions FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RunOptions -> FieldSet
_RunOptions'_unknownFields
        (\ x__ :: RunOptions
x__ y__ :: FieldSet
y__ -> RunOptions
x__ {_RunOptions'_unknownFields :: FieldSet
_RunOptions'_unknownFields = FieldSet
y__})
  defMessage :: RunOptions
defMessage
    = $WRunOptions'_constructor :: RunOptions'TraceLevel
-> Int64
-> Int32
-> Bool
-> Maybe DebugOptions
-> Bool
-> Maybe RunOptions'Experimental
-> FieldSet
-> RunOptions
RunOptions'_constructor
        {_RunOptions'traceLevel :: RunOptions'TraceLevel
_RunOptions'traceLevel = RunOptions'TraceLevel
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RunOptions'timeoutInMs :: Int64
_RunOptions'timeoutInMs = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RunOptions'interOpThreadPool :: Int32
_RunOptions'interOpThreadPool = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RunOptions'outputPartitionGraphs :: Bool
_RunOptions'outputPartitionGraphs = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RunOptions'debugOptions :: Maybe DebugOptions
_RunOptions'debugOptions = Maybe DebugOptions
forall a. Maybe a
Prelude.Nothing,
         _RunOptions'reportTensorAllocationsUponOom :: Bool
_RunOptions'reportTensorAllocationsUponOom = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RunOptions'experimental :: Maybe RunOptions'Experimental
_RunOptions'experimental = Maybe RunOptions'Experimental
forall a. Maybe a
Prelude.Nothing,
         _RunOptions'_unknownFields :: FieldSet
_RunOptions'_unknownFields = []}
  parseMessage :: Parser RunOptions
parseMessage
    = let
        loop ::
          RunOptions -> Data.ProtoLens.Encoding.Bytes.Parser RunOptions
        loop :: RunOptions -> Parser RunOptions
loop x :: RunOptions
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]))))
                      RunOptions -> Parser RunOptions
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter RunOptions RunOptions FieldSet FieldSet
-> (FieldSet -> FieldSet) -> RunOptions -> RunOptions
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 RunOptions RunOptions FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) RunOptions
x)
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        8 -> do RunOptions'TraceLevel
y <- Parser RunOptions'TraceLevel
-> String -> Parser RunOptions'TraceLevel
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> RunOptions'TraceLevel)
-> Parser Int -> Parser RunOptions'TraceLevel
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> RunOptions'TraceLevel
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))
                                       "trace_level"
                                RunOptions -> Parser RunOptions
loop
                                  (Setter
  RunOptions RunOptions RunOptions'TraceLevel RunOptions'TraceLevel
-> RunOptions'TraceLevel -> RunOptions -> RunOptions
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "traceLevel" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"traceLevel") RunOptions'TraceLevel
y RunOptions
x)
                        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)
                                       "timeout_in_ms"
                                RunOptions -> Parser RunOptions
loop
                                  (Setter RunOptions RunOptions Int64 Int64
-> Int64 -> RunOptions -> RunOptions
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "timeoutInMs" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"timeoutInMs") Int64
y RunOptions
x)
                        24
                          -> do Int32
y <- Parser Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int32) -> Parser Word64 -> Parser Int32
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       "inter_op_thread_pool"
                                RunOptions -> Parser RunOptions
loop
                                  (Setter RunOptions RunOptions Int32 Int32
-> Int32 -> RunOptions -> RunOptions
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "interOpThreadPool" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"interOpThreadPool") Int32
y RunOptions
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)
                                       "output_partition_graphs"
                                RunOptions -> Parser RunOptions
loop
                                  (Setter RunOptions RunOptions Bool Bool
-> Bool -> RunOptions -> RunOptions
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "outputPartitionGraphs" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"outputPartitionGraphs") Bool
y RunOptions
x)
                        50
                          -> do DebugOptions
y <- Parser DebugOptions -> String -> Parser DebugOptions
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser DebugOptions -> Parser DebugOptions
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 DebugOptions
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       "debug_options"
                                RunOptions -> Parser RunOptions
loop
                                  (Setter RunOptions RunOptions DebugOptions DebugOptions
-> DebugOptions -> RunOptions -> RunOptions
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "debugOptions" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"debugOptions") DebugOptions
y RunOptions
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)
                                       "report_tensor_allocations_upon_oom"
                                RunOptions -> Parser RunOptions
loop
                                  (Setter RunOptions RunOptions Bool Bool
-> Bool -> RunOptions -> RunOptions
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "reportTensorAllocationsUponOom" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"reportTensorAllocationsUponOom")
                                     Bool
y
                                     RunOptions
x)
                        66
                          -> do RunOptions'Experimental
y <- Parser RunOptions'Experimental
-> String -> Parser RunOptions'Experimental
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int
-> Parser RunOptions'Experimental -> Parser RunOptions'Experimental
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 RunOptions'Experimental
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       "experimental"
                                RunOptions -> Parser RunOptions
loop
                                  (Setter
  RunOptions
  RunOptions
  RunOptions'Experimental
  RunOptions'Experimental
-> RunOptions'Experimental -> RunOptions -> RunOptions
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "experimental" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"experimental") RunOptions'Experimental
y RunOptions
x)
                        wire :: Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                RunOptions -> Parser RunOptions
loop
                                  (Setter RunOptions RunOptions FieldSet FieldSet
-> (FieldSet -> FieldSet) -> RunOptions -> RunOptions
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 RunOptions RunOptions FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) RunOptions
x)
      in
        Parser RunOptions -> String -> Parser RunOptions
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do RunOptions -> Parser RunOptions
loop RunOptions
forall msg. Message msg => msg
Data.ProtoLens.defMessage) "RunOptions"
  buildMessage :: RunOptions -> Builder
buildMessage
    = \ _x :: RunOptions
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: RunOptions'TraceLevel
_v
                  = FoldLike
  RunOptions'TraceLevel
  RunOptions
  RunOptions
  RunOptions'TraceLevel
  RunOptions'TraceLevel
-> RunOptions -> RunOptions'TraceLevel
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "traceLevel" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"traceLevel") RunOptions
_x
              in
                if RunOptions'TraceLevel -> RunOptions'TraceLevel -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) RunOptions'TraceLevel
_v RunOptions'TraceLevel
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                    Builder
forall a. Monoid a => a
Data.Monoid.mempty
                else
                    Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 8)
                      ((Int -> Builder)
-> (RunOptions'TraceLevel -> Int)
-> RunOptions'TraceLevel
-> 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)
                         RunOptions'TraceLevel -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum
                         RunOptions'TraceLevel
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   _v :: Int64
_v
                     = FoldLike Int64 RunOptions RunOptions Int64 Int64
-> RunOptions -> Int64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "timeoutInMs" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"timeoutInMs") RunOptions
_x
                 in
                   if Int64 -> Int64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int64
_v Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 16)
                         ((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 Int64
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: Int32
_v
                        = FoldLike Int32 RunOptions RunOptions Int32 Int32
-> RunOptions -> Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                            (forall s a (f :: * -> *).
(HasField s "interOpThreadPool" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"interOpThreadPool") RunOptions
_x
                    in
                      if Int32 -> Int32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int32
_v Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      else
                          Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 24)
                            ((Word64 -> Builder) -> (Int32 -> Word64) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                               Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (let
                         _v :: Bool
_v
                           = FoldLike Bool RunOptions RunOptions Bool Bool -> RunOptions -> Bool
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                               (forall s a (f :: * -> *).
(HasField s "outputPartitionGraphs" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"outputPartitionGraphs") RunOptions
_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.<>)
                         (case
                              FoldLike
  (Maybe DebugOptions)
  RunOptions
  RunOptions
  (Maybe DebugOptions)
  (Maybe DebugOptions)
-> RunOptions -> Maybe DebugOptions
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                (forall s a (f :: * -> *).
(HasField s "maybe'debugOptions" a, Functor f) =>
(a -> f a) -> s -> 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'debugOptions") RunOptions
_x
                          of
                            Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            (Prelude.Just _v :: DebugOptions
_v)
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 50)
                                   ((ByteString -> Builder)
-> (DebugOptions -> ByteString) -> DebugOptions -> 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))
                                      DebugOptions -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                      DebugOptions
_v))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (let
                               _v :: Bool
_v
                                 = FoldLike Bool RunOptions RunOptions Bool Bool -> RunOptions -> Bool
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                     (forall s a (f :: * -> *).
(HasField s "reportTensorAllocationsUponOom" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"reportTensorAllocationsUponOom")
                                     RunOptions
_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.<>)
                               (case
                                    FoldLike
  (Maybe RunOptions'Experimental)
  RunOptions
  RunOptions
  (Maybe RunOptions'Experimental)
  (Maybe RunOptions'Experimental)
-> RunOptions -> Maybe RunOptions'Experimental
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                      (forall s a (f :: * -> *).
(HasField s "maybe'experimental" a, Functor f) =>
(a -> f a) -> s -> 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'experimental") RunOptions
_x
                                of
                                  Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                  (Prelude.Just _v :: RunOptions'Experimental
_v)
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 66)
                                         ((ByteString -> Builder)
-> (RunOptions'Experimental -> ByteString)
-> RunOptions'Experimental
-> 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))
                                            RunOptions'Experimental -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                            RunOptions'Experimental
_v))
                               (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                  (FoldLike FieldSet RunOptions RunOptions FieldSet FieldSet
-> RunOptions -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet RunOptions RunOptions FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields RunOptions
_x))))))))
instance Control.DeepSeq.NFData RunOptions where
  rnf :: RunOptions -> ()
rnf
    = \ x__ :: RunOptions
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RunOptions -> FieldSet
_RunOptions'_unknownFields RunOptions
x__)
             (RunOptions'TraceLevel -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (RunOptions -> RunOptions'TraceLevel
_RunOptions'traceLevel RunOptions
x__)
                (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (RunOptions -> Int64
_RunOptions'timeoutInMs RunOptions
x__)
                   (Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (RunOptions -> Int32
_RunOptions'interOpThreadPool RunOptions
x__)
                      (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (RunOptions -> Bool
_RunOptions'outputPartitionGraphs RunOptions
x__)
                         (Maybe DebugOptions -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (RunOptions -> Maybe DebugOptions
_RunOptions'debugOptions RunOptions
x__)
                            (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (RunOptions -> Bool
_RunOptions'reportTensorAllocationsUponOom RunOptions
x__)
                               (Maybe RunOptions'Experimental -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (RunOptions -> Maybe RunOptions'Experimental
_RunOptions'experimental RunOptions
x__) ())))))))
{- | Fields :
     
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.collectiveGraphKey' @:: Lens' RunOptions'Experimental Data.Int.Int64@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.useRunHandlerPool' @:: Lens' RunOptions'Experimental Prelude.Bool@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.runHandlerPoolOptions' @:: Lens' RunOptions'Experimental RunOptions'Experimental'RunHandlerPoolOptions@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.maybe'runHandlerPoolOptions' @:: Lens' RunOptions'Experimental (Prelude.Maybe RunOptions'Experimental'RunHandlerPoolOptions)@ -}
data RunOptions'Experimental
  = RunOptions'Experimental'_constructor {RunOptions'Experimental -> Int64
_RunOptions'Experimental'collectiveGraphKey :: !Data.Int.Int64,
                                          RunOptions'Experimental -> Bool
_RunOptions'Experimental'useRunHandlerPool :: !Prelude.Bool,
                                          RunOptions'Experimental
-> Maybe RunOptions'Experimental'RunHandlerPoolOptions
_RunOptions'Experimental'runHandlerPoolOptions :: !(Prelude.Maybe RunOptions'Experimental'RunHandlerPoolOptions),
                                          RunOptions'Experimental -> FieldSet
_RunOptions'Experimental'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RunOptions'Experimental -> RunOptions'Experimental -> Bool
(RunOptions'Experimental -> RunOptions'Experimental -> Bool)
-> (RunOptions'Experimental -> RunOptions'Experimental -> Bool)
-> Eq RunOptions'Experimental
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: RunOptions'Experimental -> RunOptions'Experimental -> Bool
$c/= :: RunOptions'Experimental -> RunOptions'Experimental -> Bool
== :: RunOptions'Experimental -> RunOptions'Experimental -> Bool
$c== :: RunOptions'Experimental -> RunOptions'Experimental -> Bool
Prelude.Eq, Eq RunOptions'Experimental
Eq RunOptions'Experimental =>
(RunOptions'Experimental -> RunOptions'Experimental -> Ordering)
-> (RunOptions'Experimental -> RunOptions'Experimental -> Bool)
-> (RunOptions'Experimental -> RunOptions'Experimental -> Bool)
-> (RunOptions'Experimental -> RunOptions'Experimental -> Bool)
-> (RunOptions'Experimental -> RunOptions'Experimental -> Bool)
-> (RunOptions'Experimental
    -> RunOptions'Experimental -> RunOptions'Experimental)
-> (RunOptions'Experimental
    -> RunOptions'Experimental -> RunOptions'Experimental)
-> Ord RunOptions'Experimental
RunOptions'Experimental -> RunOptions'Experimental -> Bool
RunOptions'Experimental -> RunOptions'Experimental -> Ordering
RunOptions'Experimental
-> RunOptions'Experimental -> RunOptions'Experimental
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 :: RunOptions'Experimental
-> RunOptions'Experimental -> RunOptions'Experimental
$cmin :: RunOptions'Experimental
-> RunOptions'Experimental -> RunOptions'Experimental
max :: RunOptions'Experimental
-> RunOptions'Experimental -> RunOptions'Experimental
$cmax :: RunOptions'Experimental
-> RunOptions'Experimental -> RunOptions'Experimental
>= :: RunOptions'Experimental -> RunOptions'Experimental -> Bool
$c>= :: RunOptions'Experimental -> RunOptions'Experimental -> Bool
> :: RunOptions'Experimental -> RunOptions'Experimental -> Bool
$c> :: RunOptions'Experimental -> RunOptions'Experimental -> Bool
<= :: RunOptions'Experimental -> RunOptions'Experimental -> Bool
$c<= :: RunOptions'Experimental -> RunOptions'Experimental -> Bool
< :: RunOptions'Experimental -> RunOptions'Experimental -> Bool
$c< :: RunOptions'Experimental -> RunOptions'Experimental -> Bool
compare :: RunOptions'Experimental -> RunOptions'Experimental -> Ordering
$ccompare :: RunOptions'Experimental -> RunOptions'Experimental -> Ordering
$cp1Ord :: Eq RunOptions'Experimental
Prelude.Ord)
instance Prelude.Show RunOptions'Experimental where
  showsPrec :: Int -> RunOptions'Experimental -> ShowS
showsPrec _ __x :: RunOptions'Experimental
__x __s :: String
__s
    = Char -> ShowS
Prelude.showChar
        '{'
        (String -> ShowS
Prelude.showString
           (RunOptions'Experimental -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RunOptions'Experimental
__x) (Char -> ShowS
Prelude.showChar '}' String
__s))
instance Data.ProtoLens.Field.HasField RunOptions'Experimental "collectiveGraphKey" Data.Int.Int64 where
  fieldOf :: Proxy# "collectiveGraphKey"
-> (Int64 -> f Int64)
-> RunOptions'Experimental
-> f RunOptions'Experimental
fieldOf _
    = ((Int64 -> f Int64)
 -> RunOptions'Experimental -> f RunOptions'Experimental)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> RunOptions'Experimental
-> f RunOptions'Experimental
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RunOptions'Experimental -> Int64)
-> (RunOptions'Experimental -> Int64 -> RunOptions'Experimental)
-> Lens RunOptions'Experimental RunOptions'Experimental Int64 Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RunOptions'Experimental -> Int64
_RunOptions'Experimental'collectiveGraphKey
           (\ x__ :: RunOptions'Experimental
x__ y__ :: Int64
y__
              -> RunOptions'Experimental
x__ {_RunOptions'Experimental'collectiveGraphKey :: Int64
_RunOptions'Experimental'collectiveGraphKey = Int64
y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RunOptions'Experimental "useRunHandlerPool" Prelude.Bool where
  fieldOf :: Proxy# "useRunHandlerPool"
-> (Bool -> f Bool)
-> RunOptions'Experimental
-> f RunOptions'Experimental
fieldOf _
    = ((Bool -> f Bool)
 -> RunOptions'Experimental -> f RunOptions'Experimental)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> RunOptions'Experimental
-> f RunOptions'Experimental
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RunOptions'Experimental -> Bool)
-> (RunOptions'Experimental -> Bool -> RunOptions'Experimental)
-> Lens RunOptions'Experimental RunOptions'Experimental Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RunOptions'Experimental -> Bool
_RunOptions'Experimental'useRunHandlerPool
           (\ x__ :: RunOptions'Experimental
x__ y__ :: Bool
y__
              -> RunOptions'Experimental
x__ {_RunOptions'Experimental'useRunHandlerPool :: Bool
_RunOptions'Experimental'useRunHandlerPool = Bool
y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RunOptions'Experimental "runHandlerPoolOptions" RunOptions'Experimental'RunHandlerPoolOptions where
  fieldOf :: Proxy# "runHandlerPoolOptions"
-> (RunOptions'Experimental'RunHandlerPoolOptions
    -> f RunOptions'Experimental'RunHandlerPoolOptions)
-> RunOptions'Experimental
-> f RunOptions'Experimental
fieldOf _
    = ((Maybe RunOptions'Experimental'RunHandlerPoolOptions
  -> f (Maybe RunOptions'Experimental'RunHandlerPoolOptions))
 -> RunOptions'Experimental -> f RunOptions'Experimental)
-> ((RunOptions'Experimental'RunHandlerPoolOptions
     -> f RunOptions'Experimental'RunHandlerPoolOptions)
    -> Maybe RunOptions'Experimental'RunHandlerPoolOptions
    -> f (Maybe RunOptions'Experimental'RunHandlerPoolOptions))
-> (RunOptions'Experimental'RunHandlerPoolOptions
    -> f RunOptions'Experimental'RunHandlerPoolOptions)
-> RunOptions'Experimental
-> f RunOptions'Experimental
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RunOptions'Experimental
 -> Maybe RunOptions'Experimental'RunHandlerPoolOptions)
-> (RunOptions'Experimental
    -> Maybe RunOptions'Experimental'RunHandlerPoolOptions
    -> RunOptions'Experimental)
-> Lens
     RunOptions'Experimental
     RunOptions'Experimental
     (Maybe RunOptions'Experimental'RunHandlerPoolOptions)
     (Maybe RunOptions'Experimental'RunHandlerPoolOptions)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RunOptions'Experimental
-> Maybe RunOptions'Experimental'RunHandlerPoolOptions
_RunOptions'Experimental'runHandlerPoolOptions
           (\ x__ :: RunOptions'Experimental
x__ y__ :: Maybe RunOptions'Experimental'RunHandlerPoolOptions
y__
              -> RunOptions'Experimental
x__ {_RunOptions'Experimental'runHandlerPoolOptions :: Maybe RunOptions'Experimental'RunHandlerPoolOptions
_RunOptions'Experimental'runHandlerPoolOptions = Maybe RunOptions'Experimental'RunHandlerPoolOptions
y__}))
        (RunOptions'Experimental'RunHandlerPoolOptions
-> Lens'
     (Maybe RunOptions'Experimental'RunHandlerPoolOptions)
     RunOptions'Experimental'RunHandlerPoolOptions
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens RunOptions'Experimental'RunHandlerPoolOptions
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField RunOptions'Experimental "maybe'runHandlerPoolOptions" (Prelude.Maybe RunOptions'Experimental'RunHandlerPoolOptions) where
  fieldOf :: Proxy# "maybe'runHandlerPoolOptions"
-> (Maybe RunOptions'Experimental'RunHandlerPoolOptions
    -> f (Maybe RunOptions'Experimental'RunHandlerPoolOptions))
-> RunOptions'Experimental
-> f RunOptions'Experimental
fieldOf _
    = ((Maybe RunOptions'Experimental'RunHandlerPoolOptions
  -> f (Maybe RunOptions'Experimental'RunHandlerPoolOptions))
 -> RunOptions'Experimental -> f RunOptions'Experimental)
-> ((Maybe RunOptions'Experimental'RunHandlerPoolOptions
     -> f (Maybe RunOptions'Experimental'RunHandlerPoolOptions))
    -> Maybe RunOptions'Experimental'RunHandlerPoolOptions
    -> f (Maybe RunOptions'Experimental'RunHandlerPoolOptions))
-> (Maybe RunOptions'Experimental'RunHandlerPoolOptions
    -> f (Maybe RunOptions'Experimental'RunHandlerPoolOptions))
-> RunOptions'Experimental
-> f RunOptions'Experimental
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RunOptions'Experimental
 -> Maybe RunOptions'Experimental'RunHandlerPoolOptions)
-> (RunOptions'Experimental
    -> Maybe RunOptions'Experimental'RunHandlerPoolOptions
    -> RunOptions'Experimental)
-> Lens
     RunOptions'Experimental
     RunOptions'Experimental
     (Maybe RunOptions'Experimental'RunHandlerPoolOptions)
     (Maybe RunOptions'Experimental'RunHandlerPoolOptions)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RunOptions'Experimental
-> Maybe RunOptions'Experimental'RunHandlerPoolOptions
_RunOptions'Experimental'runHandlerPoolOptions
           (\ x__ :: RunOptions'Experimental
x__ y__ :: Maybe RunOptions'Experimental'RunHandlerPoolOptions
y__
              -> RunOptions'Experimental
x__ {_RunOptions'Experimental'runHandlerPoolOptions :: Maybe RunOptions'Experimental'RunHandlerPoolOptions
_RunOptions'Experimental'runHandlerPoolOptions = Maybe RunOptions'Experimental'RunHandlerPoolOptions
y__}))
        (Maybe RunOptions'Experimental'RunHandlerPoolOptions
 -> f (Maybe RunOptions'Experimental'RunHandlerPoolOptions))
-> Maybe RunOptions'Experimental'RunHandlerPoolOptions
-> f (Maybe RunOptions'Experimental'RunHandlerPoolOptions)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message RunOptions'Experimental where
  messageName :: Proxy RunOptions'Experimental -> Text
messageName _ = String -> Text
Data.Text.pack "tensorflow.RunOptions.Experimental"
  packedMessageDescriptor :: Proxy RunOptions'Experimental -> ByteString
packedMessageDescriptor _
    = "\n\
      \\fExperimental\DC20\n\
      \\DC4collective_graph_key\CAN\SOH \SOH(\ETXR\DC2collectiveGraphKey\DC2/\n\
      \\DC4use_run_handler_pool\CAN\STX \SOH(\bR\DC1useRunHandlerPool\DC2r\n\
      \\CANrun_handler_pool_options\CAN\ETX \SOH(\v29.tensorflow.RunOptions.Experimental.RunHandlerPoolOptionsR\NAKrunHandlerPoolOptions\SUB3\n\
      \\NAKRunHandlerPoolOptions\DC2\SUB\n\
      \\bpriority\CAN\SOH \SOH(\ETXR\bpriority"
  packedFileDescriptor :: Proxy RunOptions'Experimental -> ByteString
packedFileDescriptor _ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor RunOptions'Experimental)
fieldsByTag
    = let
        collectiveGraphKey__field_descriptor :: FieldDescriptor RunOptions'Experimental
collectiveGraphKey__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor RunOptions'Experimental Int64
-> FieldDescriptor RunOptions'Experimental
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "collective_graph_key"
              (ScalarField Int64 -> FieldTypeDescriptor Int64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int64
Data.ProtoLens.Int64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64)
              (WireDefault Int64
-> Lens RunOptions'Experimental RunOptions'Experimental Int64 Int64
-> FieldAccessor RunOptions'Experimental Int64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "collectiveGraphKey" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"collectiveGraphKey")) ::
              Data.ProtoLens.FieldDescriptor RunOptions'Experimental
        useRunHandlerPool__field_descriptor :: FieldDescriptor RunOptions'Experimental
useRunHandlerPool__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor RunOptions'Experimental Bool
-> FieldDescriptor RunOptions'Experimental
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "use_run_handler_pool"
              (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 RunOptions'Experimental RunOptions'Experimental Bool Bool
-> FieldAccessor RunOptions'Experimental 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 "useRunHandlerPool" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"useRunHandlerPool")) ::
              Data.ProtoLens.FieldDescriptor RunOptions'Experimental
        runHandlerPoolOptions__field_descriptor :: FieldDescriptor RunOptions'Experimental
runHandlerPoolOptions__field_descriptor
          = String
-> FieldTypeDescriptor
     RunOptions'Experimental'RunHandlerPoolOptions
-> FieldAccessor
     RunOptions'Experimental
     RunOptions'Experimental'RunHandlerPoolOptions
-> FieldDescriptor RunOptions'Experimental
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "run_handler_pool_options"
              (MessageOrGroup
-> FieldTypeDescriptor
     RunOptions'Experimental'RunHandlerPoolOptions
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor RunOptions'Experimental'RunHandlerPoolOptions)
              (Lens
  RunOptions'Experimental
  RunOptions'Experimental
  (Maybe RunOptions'Experimental'RunHandlerPoolOptions)
  (Maybe RunOptions'Experimental'RunHandlerPoolOptions)
-> FieldAccessor
     RunOptions'Experimental
     RunOptions'Experimental'RunHandlerPoolOptions
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall s a (f :: * -> *).
(HasField s "maybe'runHandlerPoolOptions" a, Functor f) =>
(a -> f a) -> s -> 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'runHandlerPoolOptions")) ::
              Data.ProtoLens.FieldDescriptor RunOptions'Experimental
      in
        [(Tag, FieldDescriptor RunOptions'Experimental)]
-> Map Tag (FieldDescriptor RunOptions'Experimental)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag 1, FieldDescriptor RunOptions'Experimental
collectiveGraphKey__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 2, FieldDescriptor RunOptions'Experimental
useRunHandlerPool__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 3, FieldDescriptor RunOptions'Experimental
runHandlerPoolOptions__field_descriptor)]
  unknownFields :: LensLike' f RunOptions'Experimental FieldSet
unknownFields
    = (RunOptions'Experimental -> FieldSet)
-> (RunOptions'Experimental -> FieldSet -> RunOptions'Experimental)
-> Lens' RunOptions'Experimental FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RunOptions'Experimental -> FieldSet
_RunOptions'Experimental'_unknownFields
        (\ x__ :: RunOptions'Experimental
x__ y__ :: FieldSet
y__ -> RunOptions'Experimental
x__ {_RunOptions'Experimental'_unknownFields :: FieldSet
_RunOptions'Experimental'_unknownFields = FieldSet
y__})
  defMessage :: RunOptions'Experimental
defMessage
    = $WRunOptions'Experimental'_constructor :: Int64
-> Bool
-> Maybe RunOptions'Experimental'RunHandlerPoolOptions
-> FieldSet
-> RunOptions'Experimental
RunOptions'Experimental'_constructor
        {_RunOptions'Experimental'collectiveGraphKey :: Int64
_RunOptions'Experimental'collectiveGraphKey = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RunOptions'Experimental'useRunHandlerPool :: Bool
_RunOptions'Experimental'useRunHandlerPool = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RunOptions'Experimental'runHandlerPoolOptions :: Maybe RunOptions'Experimental'RunHandlerPoolOptions
_RunOptions'Experimental'runHandlerPoolOptions = Maybe RunOptions'Experimental'RunHandlerPoolOptions
forall a. Maybe a
Prelude.Nothing,
         _RunOptions'Experimental'_unknownFields :: FieldSet
_RunOptions'Experimental'_unknownFields = []}
  parseMessage :: Parser RunOptions'Experimental
parseMessage
    = let
        loop ::
          RunOptions'Experimental
          -> Data.ProtoLens.Encoding.Bytes.Parser RunOptions'Experimental
        loop :: RunOptions'Experimental -> Parser RunOptions'Experimental
loop x :: RunOptions'Experimental
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]))))
                      RunOptions'Experimental -> Parser RunOptions'Experimental
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter
  RunOptions'Experimental RunOptions'Experimental FieldSet FieldSet
-> (FieldSet -> FieldSet)
-> RunOptions'Experimental
-> RunOptions'Experimental
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
  RunOptions'Experimental RunOptions'Experimental FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) RunOptions'Experimental
x)
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        8 -> do Int64
y <- Parser Int64 -> String -> Parser Int64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int64) -> Parser Word64 -> Parser Int64
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       "collective_graph_key"
                                RunOptions'Experimental -> Parser RunOptions'Experimental
loop
                                  (Setter RunOptions'Experimental RunOptions'Experimental Int64 Int64
-> Int64 -> RunOptions'Experimental -> RunOptions'Experimental
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "collectiveGraphKey" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"collectiveGraphKey") Int64
y RunOptions'Experimental
x)
                        16
                          -> 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)
                                       "use_run_handler_pool"
                                RunOptions'Experimental -> Parser RunOptions'Experimental
loop
                                  (Setter RunOptions'Experimental RunOptions'Experimental Bool Bool
-> Bool -> RunOptions'Experimental -> RunOptions'Experimental
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "useRunHandlerPool" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"useRunHandlerPool") Bool
y RunOptions'Experimental
x)
                        26
                          -> do RunOptions'Experimental'RunHandlerPoolOptions
y <- Parser RunOptions'Experimental'RunHandlerPoolOptions
-> String -> Parser RunOptions'Experimental'RunHandlerPoolOptions
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int
-> Parser RunOptions'Experimental'RunHandlerPoolOptions
-> Parser RunOptions'Experimental'RunHandlerPoolOptions
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 RunOptions'Experimental'RunHandlerPoolOptions
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       "run_handler_pool_options"
                                RunOptions'Experimental -> Parser RunOptions'Experimental
loop
                                  (Setter
  RunOptions'Experimental
  RunOptions'Experimental
  RunOptions'Experimental'RunHandlerPoolOptions
  RunOptions'Experimental'RunHandlerPoolOptions
-> RunOptions'Experimental'RunHandlerPoolOptions
-> RunOptions'Experimental
-> RunOptions'Experimental
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "runHandlerPoolOptions" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"runHandlerPoolOptions") RunOptions'Experimental'RunHandlerPoolOptions
y RunOptions'Experimental
x)
                        wire :: Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                RunOptions'Experimental -> Parser RunOptions'Experimental
loop
                                  (Setter
  RunOptions'Experimental RunOptions'Experimental FieldSet FieldSet
-> (FieldSet -> FieldSet)
-> RunOptions'Experimental
-> RunOptions'Experimental
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
  RunOptions'Experimental RunOptions'Experimental FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) RunOptions'Experimental
x)
      in
        Parser RunOptions'Experimental
-> String -> Parser RunOptions'Experimental
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do RunOptions'Experimental -> Parser RunOptions'Experimental
loop RunOptions'Experimental
forall msg. Message msg => msg
Data.ProtoLens.defMessage) "Experimental"
  buildMessage :: RunOptions'Experimental -> Builder
buildMessage
    = \ _x :: RunOptions'Experimental
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Int64
_v
                  = FoldLike
  Int64 RunOptions'Experimental RunOptions'Experimental Int64 Int64
-> RunOptions'Experimental -> Int64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                      (forall s a (f :: * -> *).
(HasField s "collectiveGraphKey" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"collectiveGraphKey") RunOptions'Experimental
_x
              in
                if Int64 -> Int64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int64
_v Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                    Builder
forall a. Monoid a => a
Data.Monoid.mempty
                else
                    Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 8)
                      ((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 Int64
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   _v :: Bool
_v
                     = FoldLike
  Bool RunOptions'Experimental RunOptions'Experimental Bool Bool
-> RunOptions'Experimental -> Bool
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                         (forall s a (f :: * -> *).
(HasField s "useRunHandlerPool" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"useRunHandlerPool") RunOptions'Experimental
_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 16)
                         ((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.<>)
                   (case
                        FoldLike
  (Maybe RunOptions'Experimental'RunHandlerPoolOptions)
  RunOptions'Experimental
  RunOptions'Experimental
  (Maybe RunOptions'Experimental'RunHandlerPoolOptions)
  (Maybe RunOptions'Experimental'RunHandlerPoolOptions)
-> RunOptions'Experimental
-> Maybe RunOptions'Experimental'RunHandlerPoolOptions
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                          (forall s a (f :: * -> *).
(HasField s "maybe'runHandlerPoolOptions" a, Functor f) =>
(a -> f a) -> s -> 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'runHandlerPoolOptions") RunOptions'Experimental
_x
                    of
                      Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      (Prelude.Just _v :: RunOptions'Experimental'RunHandlerPoolOptions
_v)
                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 26)
                             ((ByteString -> Builder)
-> (RunOptions'Experimental'RunHandlerPoolOptions -> ByteString)
-> RunOptions'Experimental'RunHandlerPoolOptions
-> 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))
                                RunOptions'Experimental'RunHandlerPoolOptions -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                RunOptions'Experimental'RunHandlerPoolOptions
_v))
                   (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                      (FoldLike
  FieldSet
  RunOptions'Experimental
  RunOptions'Experimental
  FieldSet
  FieldSet
-> RunOptions'Experimental -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  RunOptions'Experimental
  RunOptions'Experimental
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields RunOptions'Experimental
_x))))
instance Control.DeepSeq.NFData RunOptions'Experimental where
  rnf :: RunOptions'Experimental -> ()
rnf
    = \ x__ :: RunOptions'Experimental
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RunOptions'Experimental -> FieldSet
_RunOptions'Experimental'_unknownFields RunOptions'Experimental
x__)
             (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (RunOptions'Experimental -> Int64
_RunOptions'Experimental'collectiveGraphKey RunOptions'Experimental
x__)
                (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (RunOptions'Experimental -> Bool
_RunOptions'Experimental'useRunHandlerPool RunOptions'Experimental
x__)
                   (Maybe RunOptions'Experimental'RunHandlerPoolOptions -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (RunOptions'Experimental
-> Maybe RunOptions'Experimental'RunHandlerPoolOptions
_RunOptions'Experimental'runHandlerPoolOptions RunOptions'Experimental
x__) ())))
{- | Fields :
     
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.priority' @:: Lens' RunOptions'Experimental'RunHandlerPoolOptions Data.Int.Int64@ -}
data RunOptions'Experimental'RunHandlerPoolOptions
  = RunOptions'Experimental'RunHandlerPoolOptions'_constructor {RunOptions'Experimental'RunHandlerPoolOptions -> Int64
_RunOptions'Experimental'RunHandlerPoolOptions'priority :: !Data.Int.Int64,
                                                                RunOptions'Experimental'RunHandlerPoolOptions -> FieldSet
_RunOptions'Experimental'RunHandlerPoolOptions'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RunOptions'Experimental'RunHandlerPoolOptions
-> RunOptions'Experimental'RunHandlerPoolOptions -> Bool
(RunOptions'Experimental'RunHandlerPoolOptions
 -> RunOptions'Experimental'RunHandlerPoolOptions -> Bool)
-> (RunOptions'Experimental'RunHandlerPoolOptions
    -> RunOptions'Experimental'RunHandlerPoolOptions -> Bool)
-> Eq RunOptions'Experimental'RunHandlerPoolOptions
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: RunOptions'Experimental'RunHandlerPoolOptions
-> RunOptions'Experimental'RunHandlerPoolOptions -> Bool
$c/= :: RunOptions'Experimental'RunHandlerPoolOptions
-> RunOptions'Experimental'RunHandlerPoolOptions -> Bool
== :: RunOptions'Experimental'RunHandlerPoolOptions
-> RunOptions'Experimental'RunHandlerPoolOptions -> Bool
$c== :: RunOptions'Experimental'RunHandlerPoolOptions
-> RunOptions'Experimental'RunHandlerPoolOptions -> Bool
Prelude.Eq, Eq RunOptions'Experimental'RunHandlerPoolOptions
Eq RunOptions'Experimental'RunHandlerPoolOptions =>
(RunOptions'Experimental'RunHandlerPoolOptions
 -> RunOptions'Experimental'RunHandlerPoolOptions -> Ordering)
-> (RunOptions'Experimental'RunHandlerPoolOptions
    -> RunOptions'Experimental'RunHandlerPoolOptions -> Bool)
-> (RunOptions'Experimental'RunHandlerPoolOptions
    -> RunOptions'Experimental'RunHandlerPoolOptions -> Bool)
-> (RunOptions'Experimental'RunHandlerPoolOptions
    -> RunOptions'Experimental'RunHandlerPoolOptions -> Bool)
-> (RunOptions'Experimental'RunHandlerPoolOptions
    -> RunOptions'Experimental'RunHandlerPoolOptions -> Bool)
-> (RunOptions'Experimental'RunHandlerPoolOptions
    -> RunOptions'Experimental'RunHandlerPoolOptions
    -> RunOptions'Experimental'RunHandlerPoolOptions)
-> (RunOptions'Experimental'RunHandlerPoolOptions
    -> RunOptions'Experimental'RunHandlerPoolOptions
    -> RunOptions'Experimental'RunHandlerPoolOptions)
-> Ord RunOptions'Experimental'RunHandlerPoolOptions
RunOptions'Experimental'RunHandlerPoolOptions
-> RunOptions'Experimental'RunHandlerPoolOptions -> Bool
RunOptions'Experimental'RunHandlerPoolOptions
-> RunOptions'Experimental'RunHandlerPoolOptions -> Ordering
RunOptions'Experimental'RunHandlerPoolOptions
-> RunOptions'Experimental'RunHandlerPoolOptions
-> RunOptions'Experimental'RunHandlerPoolOptions
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 :: RunOptions'Experimental'RunHandlerPoolOptions
-> RunOptions'Experimental'RunHandlerPoolOptions
-> RunOptions'Experimental'RunHandlerPoolOptions
$cmin :: RunOptions'Experimental'RunHandlerPoolOptions
-> RunOptions'Experimental'RunHandlerPoolOptions
-> RunOptions'Experimental'RunHandlerPoolOptions
max :: RunOptions'Experimental'RunHandlerPoolOptions
-> RunOptions'Experimental'RunHandlerPoolOptions
-> RunOptions'Experimental'RunHandlerPoolOptions
$cmax :: RunOptions'Experimental'RunHandlerPoolOptions
-> RunOptions'Experimental'RunHandlerPoolOptions
-> RunOptions'Experimental'RunHandlerPoolOptions
>= :: RunOptions'Experimental'RunHandlerPoolOptions
-> RunOptions'Experimental'RunHandlerPoolOptions -> Bool
$c>= :: RunOptions'Experimental'RunHandlerPoolOptions
-> RunOptions'Experimental'RunHandlerPoolOptions -> Bool
> :: RunOptions'Experimental'RunHandlerPoolOptions
-> RunOptions'Experimental'RunHandlerPoolOptions -> Bool
$c> :: RunOptions'Experimental'RunHandlerPoolOptions
-> RunOptions'Experimental'RunHandlerPoolOptions -> Bool
<= :: RunOptions'Experimental'RunHandlerPoolOptions
-> RunOptions'Experimental'RunHandlerPoolOptions -> Bool
$c<= :: RunOptions'Experimental'RunHandlerPoolOptions
-> RunOptions'Experimental'RunHandlerPoolOptions -> Bool
< :: RunOptions'Experimental'RunHandlerPoolOptions
-> RunOptions'Experimental'RunHandlerPoolOptions -> Bool
$c< :: RunOptions'Experimental'RunHandlerPoolOptions
-> RunOptions'Experimental'RunHandlerPoolOptions -> Bool
compare :: RunOptions'Experimental'RunHandlerPoolOptions
-> RunOptions'Experimental'RunHandlerPoolOptions -> Ordering
$ccompare :: RunOptions'Experimental'RunHandlerPoolOptions
-> RunOptions'Experimental'RunHandlerPoolOptions -> Ordering
$cp1Ord :: Eq RunOptions'Experimental'RunHandlerPoolOptions
Prelude.Ord)
instance Prelude.Show RunOptions'Experimental'RunHandlerPoolOptions where
  showsPrec :: Int -> RunOptions'Experimental'RunHandlerPoolOptions -> ShowS
showsPrec _ __x :: RunOptions'Experimental'RunHandlerPoolOptions
__x __s :: String
__s
    = Char -> ShowS
Prelude.showChar
        '{'
        (String -> ShowS
Prelude.showString
           (RunOptions'Experimental'RunHandlerPoolOptions -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RunOptions'Experimental'RunHandlerPoolOptions
__x) (Char -> ShowS
Prelude.showChar '}' String
__s))
instance Data.ProtoLens.Field.HasField RunOptions'Experimental'RunHandlerPoolOptions "priority" Data.Int.Int64 where
  fieldOf :: Proxy# "priority"
-> (Int64 -> f Int64)
-> RunOptions'Experimental'RunHandlerPoolOptions
-> f RunOptions'Experimental'RunHandlerPoolOptions
fieldOf _
    = ((Int64 -> f Int64)
 -> RunOptions'Experimental'RunHandlerPoolOptions
 -> f RunOptions'Experimental'RunHandlerPoolOptions)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> RunOptions'Experimental'RunHandlerPoolOptions
-> f RunOptions'Experimental'RunHandlerPoolOptions
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RunOptions'Experimental'RunHandlerPoolOptions -> Int64)
-> (RunOptions'Experimental'RunHandlerPoolOptions
    -> Int64 -> RunOptions'Experimental'RunHandlerPoolOptions)
-> Lens
     RunOptions'Experimental'RunHandlerPoolOptions
     RunOptions'Experimental'RunHandlerPoolOptions
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RunOptions'Experimental'RunHandlerPoolOptions -> Int64
_RunOptions'Experimental'RunHandlerPoolOptions'priority
           (\ x__ :: RunOptions'Experimental'RunHandlerPoolOptions
x__ y__ :: Int64
y__
              -> RunOptions'Experimental'RunHandlerPoolOptions
x__
                   {_RunOptions'Experimental'RunHandlerPoolOptions'priority :: Int64
_RunOptions'Experimental'RunHandlerPoolOptions'priority = Int64
y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message RunOptions'Experimental'RunHandlerPoolOptions where
  messageName :: Proxy RunOptions'Experimental'RunHandlerPoolOptions -> Text
messageName _
    = String -> Text
Data.Text.pack
        "tensorflow.RunOptions.Experimental.RunHandlerPoolOptions"
  packedMessageDescriptor :: Proxy RunOptions'Experimental'RunHandlerPoolOptions -> ByteString
packedMessageDescriptor _
    = "\n\
      \\NAKRunHandlerPoolOptions\DC2\SUB\n\
      \\bpriority\CAN\SOH \SOH(\ETXR\bpriority"
  packedFileDescriptor :: Proxy RunOptions'Experimental'RunHandlerPoolOptions -> ByteString
packedFileDescriptor _ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag (FieldDescriptor RunOptions'Experimental'RunHandlerPoolOptions)
fieldsByTag
    = let
        priority__field_descriptor :: FieldDescriptor RunOptions'Experimental'RunHandlerPoolOptions
priority__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor
     RunOptions'Experimental'RunHandlerPoolOptions Int64
-> FieldDescriptor RunOptions'Experimental'RunHandlerPoolOptions
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "priority"
              (ScalarField Int64 -> FieldTypeDescriptor Int64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int64
Data.ProtoLens.Int64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64)
              (WireDefault Int64
-> Lens
     RunOptions'Experimental'RunHandlerPoolOptions
     RunOptions'Experimental'RunHandlerPoolOptions
     Int64
     Int64
-> FieldAccessor
     RunOptions'Experimental'RunHandlerPoolOptions Int64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "priority" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"priority")) ::
              Data.ProtoLens.FieldDescriptor RunOptions'Experimental'RunHandlerPoolOptions
      in
        [(Tag,
  FieldDescriptor RunOptions'Experimental'RunHandlerPoolOptions)]
-> Map
     Tag (FieldDescriptor RunOptions'Experimental'RunHandlerPoolOptions)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag 1, FieldDescriptor RunOptions'Experimental'RunHandlerPoolOptions
priority__field_descriptor)]
  unknownFields :: LensLike' f RunOptions'Experimental'RunHandlerPoolOptions FieldSet
unknownFields
    = (RunOptions'Experimental'RunHandlerPoolOptions -> FieldSet)
-> (RunOptions'Experimental'RunHandlerPoolOptions
    -> FieldSet -> RunOptions'Experimental'RunHandlerPoolOptions)
-> Lens' RunOptions'Experimental'RunHandlerPoolOptions FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RunOptions'Experimental'RunHandlerPoolOptions -> FieldSet
_RunOptions'Experimental'RunHandlerPoolOptions'_unknownFields
        (\ x__ :: RunOptions'Experimental'RunHandlerPoolOptions
x__ y__ :: FieldSet
y__
           -> RunOptions'Experimental'RunHandlerPoolOptions
x__
                {_RunOptions'Experimental'RunHandlerPoolOptions'_unknownFields :: FieldSet
_RunOptions'Experimental'RunHandlerPoolOptions'_unknownFields = FieldSet
y__})
  defMessage :: RunOptions'Experimental'RunHandlerPoolOptions
defMessage
    = $WRunOptions'Experimental'RunHandlerPoolOptions'_constructor :: Int64 -> FieldSet -> RunOptions'Experimental'RunHandlerPoolOptions
RunOptions'Experimental'RunHandlerPoolOptions'_constructor
        {_RunOptions'Experimental'RunHandlerPoolOptions'priority :: Int64
_RunOptions'Experimental'RunHandlerPoolOptions'priority = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RunOptions'Experimental'RunHandlerPoolOptions'_unknownFields :: FieldSet
_RunOptions'Experimental'RunHandlerPoolOptions'_unknownFields = []}
  parseMessage :: Parser RunOptions'Experimental'RunHandlerPoolOptions
parseMessage
    = let
        loop ::
          RunOptions'Experimental'RunHandlerPoolOptions
          -> Data.ProtoLens.Encoding.Bytes.Parser RunOptions'Experimental'RunHandlerPoolOptions
        loop :: RunOptions'Experimental'RunHandlerPoolOptions
-> Parser RunOptions'Experimental'RunHandlerPoolOptions
loop x :: RunOptions'Experimental'RunHandlerPoolOptions
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]))))
                      RunOptions'Experimental'RunHandlerPoolOptions
-> Parser RunOptions'Experimental'RunHandlerPoolOptions
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter
  RunOptions'Experimental'RunHandlerPoolOptions
  RunOptions'Experimental'RunHandlerPoolOptions
  FieldSet
  FieldSet
-> (FieldSet -> FieldSet)
-> RunOptions'Experimental'RunHandlerPoolOptions
-> RunOptions'Experimental'RunHandlerPoolOptions
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
  RunOptions'Experimental'RunHandlerPoolOptions
  RunOptions'Experimental'RunHandlerPoolOptions
  FieldSet
  FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) RunOptions'Experimental'RunHandlerPoolOptions
x)
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        8 -> do Int64
y <- Parser Int64 -> String -> Parser Int64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int64) -> Parser Word64 -> Parser Int64
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       "priority"
                                RunOptions'Experimental'RunHandlerPoolOptions
-> Parser RunOptions'Experimental'RunHandlerPoolOptions
loop
                                  (Setter
  RunOptions'Experimental'RunHandlerPoolOptions
  RunOptions'Experimental'RunHandlerPoolOptions
  Int64
  Int64
-> Int64
-> RunOptions'Experimental'RunHandlerPoolOptions
-> RunOptions'Experimental'RunHandlerPoolOptions
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "priority" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"priority") Int64
y RunOptions'Experimental'RunHandlerPoolOptions
x)
                        wire :: Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                RunOptions'Experimental'RunHandlerPoolOptions
-> Parser RunOptions'Experimental'RunHandlerPoolOptions
loop
                                  (Setter
  RunOptions'Experimental'RunHandlerPoolOptions
  RunOptions'Experimental'RunHandlerPoolOptions
  FieldSet
  FieldSet
-> (FieldSet -> FieldSet)
-> RunOptions'Experimental'RunHandlerPoolOptions
-> RunOptions'Experimental'RunHandlerPoolOptions
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
  RunOptions'Experimental'RunHandlerPoolOptions
  RunOptions'Experimental'RunHandlerPoolOptions
  FieldSet
  FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) RunOptions'Experimental'RunHandlerPoolOptions
x)
      in
        Parser RunOptions'Experimental'RunHandlerPoolOptions
-> String -> Parser RunOptions'Experimental'RunHandlerPoolOptions
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do RunOptions'Experimental'RunHandlerPoolOptions
-> Parser RunOptions'Experimental'RunHandlerPoolOptions
loop RunOptions'Experimental'RunHandlerPoolOptions
forall msg. Message msg => msg
Data.ProtoLens.defMessage) "RunHandlerPoolOptions"
  buildMessage :: RunOptions'Experimental'RunHandlerPoolOptions -> Builder
buildMessage
    = \ _x :: RunOptions'Experimental'RunHandlerPoolOptions
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Int64
_v = FoldLike
  Int64
  RunOptions'Experimental'RunHandlerPoolOptions
  RunOptions'Experimental'RunHandlerPoolOptions
  Int64
  Int64
-> RunOptions'Experimental'RunHandlerPoolOptions -> Int64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "priority" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"priority") RunOptions'Experimental'RunHandlerPoolOptions
_x
              in
                if Int64 -> Int64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int64
_v Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                    Builder
forall a. Monoid a => a
Data.Monoid.mempty
                else
                    Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 8)
                      ((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 Int64
_v))
             (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                (FoldLike
  FieldSet
  RunOptions'Experimental'RunHandlerPoolOptions
  RunOptions'Experimental'RunHandlerPoolOptions
  FieldSet
  FieldSet
-> RunOptions'Experimental'RunHandlerPoolOptions -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  RunOptions'Experimental'RunHandlerPoolOptions
  RunOptions'Experimental'RunHandlerPoolOptions
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields RunOptions'Experimental'RunHandlerPoolOptions
_x))
instance Control.DeepSeq.NFData RunOptions'Experimental'RunHandlerPoolOptions where
  rnf :: RunOptions'Experimental'RunHandlerPoolOptions -> ()
rnf
    = \ x__ :: RunOptions'Experimental'RunHandlerPoolOptions
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RunOptions'Experimental'RunHandlerPoolOptions -> FieldSet
_RunOptions'Experimental'RunHandlerPoolOptions'_unknownFields RunOptions'Experimental'RunHandlerPoolOptions
x__)
             (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (RunOptions'Experimental'RunHandlerPoolOptions -> Int64
_RunOptions'Experimental'RunHandlerPoolOptions'priority RunOptions'Experimental'RunHandlerPoolOptions
x__) ())
newtype RunOptions'TraceLevel'UnrecognizedValue
  = RunOptions'TraceLevel'UnrecognizedValue Data.Int.Int32
  deriving stock (RunOptions'TraceLevel'UnrecognizedValue
-> RunOptions'TraceLevel'UnrecognizedValue -> Bool
(RunOptions'TraceLevel'UnrecognizedValue
 -> RunOptions'TraceLevel'UnrecognizedValue -> Bool)
-> (RunOptions'TraceLevel'UnrecognizedValue
    -> RunOptions'TraceLevel'UnrecognizedValue -> Bool)
-> Eq RunOptions'TraceLevel'UnrecognizedValue
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: RunOptions'TraceLevel'UnrecognizedValue
-> RunOptions'TraceLevel'UnrecognizedValue -> Bool
$c/= :: RunOptions'TraceLevel'UnrecognizedValue
-> RunOptions'TraceLevel'UnrecognizedValue -> Bool
== :: RunOptions'TraceLevel'UnrecognizedValue
-> RunOptions'TraceLevel'UnrecognizedValue -> Bool
$c== :: RunOptions'TraceLevel'UnrecognizedValue
-> RunOptions'TraceLevel'UnrecognizedValue -> Bool
Prelude.Eq, Eq RunOptions'TraceLevel'UnrecognizedValue
Eq RunOptions'TraceLevel'UnrecognizedValue =>
(RunOptions'TraceLevel'UnrecognizedValue
 -> RunOptions'TraceLevel'UnrecognizedValue -> Ordering)
-> (RunOptions'TraceLevel'UnrecognizedValue
    -> RunOptions'TraceLevel'UnrecognizedValue -> Bool)
-> (RunOptions'TraceLevel'UnrecognizedValue
    -> RunOptions'TraceLevel'UnrecognizedValue -> Bool)
-> (RunOptions'TraceLevel'UnrecognizedValue
    -> RunOptions'TraceLevel'UnrecognizedValue -> Bool)
-> (RunOptions'TraceLevel'UnrecognizedValue
    -> RunOptions'TraceLevel'UnrecognizedValue -> Bool)
-> (RunOptions'TraceLevel'UnrecognizedValue
    -> RunOptions'TraceLevel'UnrecognizedValue
    -> RunOptions'TraceLevel'UnrecognizedValue)
-> (RunOptions'TraceLevel'UnrecognizedValue
    -> RunOptions'TraceLevel'UnrecognizedValue
    -> RunOptions'TraceLevel'UnrecognizedValue)
-> Ord RunOptions'TraceLevel'UnrecognizedValue
RunOptions'TraceLevel'UnrecognizedValue
-> RunOptions'TraceLevel'UnrecognizedValue -> Bool
RunOptions'TraceLevel'UnrecognizedValue
-> RunOptions'TraceLevel'UnrecognizedValue -> Ordering
RunOptions'TraceLevel'UnrecognizedValue
-> RunOptions'TraceLevel'UnrecognizedValue
-> RunOptions'TraceLevel'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 :: RunOptions'TraceLevel'UnrecognizedValue
-> RunOptions'TraceLevel'UnrecognizedValue
-> RunOptions'TraceLevel'UnrecognizedValue
$cmin :: RunOptions'TraceLevel'UnrecognizedValue
-> RunOptions'TraceLevel'UnrecognizedValue
-> RunOptions'TraceLevel'UnrecognizedValue
max :: RunOptions'TraceLevel'UnrecognizedValue
-> RunOptions'TraceLevel'UnrecognizedValue
-> RunOptions'TraceLevel'UnrecognizedValue
$cmax :: RunOptions'TraceLevel'UnrecognizedValue
-> RunOptions'TraceLevel'UnrecognizedValue
-> RunOptions'TraceLevel'UnrecognizedValue
>= :: RunOptions'TraceLevel'UnrecognizedValue
-> RunOptions'TraceLevel'UnrecognizedValue -> Bool
$c>= :: RunOptions'TraceLevel'UnrecognizedValue
-> RunOptions'TraceLevel'UnrecognizedValue -> Bool
> :: RunOptions'TraceLevel'UnrecognizedValue
-> RunOptions'TraceLevel'UnrecognizedValue -> Bool
$c> :: RunOptions'TraceLevel'UnrecognizedValue
-> RunOptions'TraceLevel'UnrecognizedValue -> Bool
<= :: RunOptions'TraceLevel'UnrecognizedValue
-> RunOptions'TraceLevel'UnrecognizedValue -> Bool
$c<= :: RunOptions'TraceLevel'UnrecognizedValue
-> RunOptions'TraceLevel'UnrecognizedValue -> Bool
< :: RunOptions'TraceLevel'UnrecognizedValue
-> RunOptions'TraceLevel'UnrecognizedValue -> Bool
$c< :: RunOptions'TraceLevel'UnrecognizedValue
-> RunOptions'TraceLevel'UnrecognizedValue -> Bool
compare :: RunOptions'TraceLevel'UnrecognizedValue
-> RunOptions'TraceLevel'UnrecognizedValue -> Ordering
$ccompare :: RunOptions'TraceLevel'UnrecognizedValue
-> RunOptions'TraceLevel'UnrecognizedValue -> Ordering
$cp1Ord :: Eq RunOptions'TraceLevel'UnrecognizedValue
Prelude.Ord, Int -> RunOptions'TraceLevel'UnrecognizedValue -> ShowS
[RunOptions'TraceLevel'UnrecognizedValue] -> ShowS
RunOptions'TraceLevel'UnrecognizedValue -> String
(Int -> RunOptions'TraceLevel'UnrecognizedValue -> ShowS)
-> (RunOptions'TraceLevel'UnrecognizedValue -> String)
-> ([RunOptions'TraceLevel'UnrecognizedValue] -> ShowS)
-> Show RunOptions'TraceLevel'UnrecognizedValue
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [RunOptions'TraceLevel'UnrecognizedValue] -> ShowS
$cshowList :: [RunOptions'TraceLevel'UnrecognizedValue] -> ShowS
show :: RunOptions'TraceLevel'UnrecognizedValue -> String
$cshow :: RunOptions'TraceLevel'UnrecognizedValue -> String
showsPrec :: Int -> RunOptions'TraceLevel'UnrecognizedValue -> ShowS
$cshowsPrec :: Int -> RunOptions'TraceLevel'UnrecognizedValue -> ShowS
Prelude.Show)
data RunOptions'TraceLevel
  = RunOptions'NO_TRACE |
    RunOptions'SOFTWARE_TRACE |
    RunOptions'HARDWARE_TRACE |
    RunOptions'FULL_TRACE |
    RunOptions'TraceLevel'Unrecognized !RunOptions'TraceLevel'UnrecognizedValue
  deriving stock (Int -> RunOptions'TraceLevel -> ShowS
[RunOptions'TraceLevel] -> ShowS
RunOptions'TraceLevel -> String
(Int -> RunOptions'TraceLevel -> ShowS)
-> (RunOptions'TraceLevel -> String)
-> ([RunOptions'TraceLevel] -> ShowS)
-> Show RunOptions'TraceLevel
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [RunOptions'TraceLevel] -> ShowS
$cshowList :: [RunOptions'TraceLevel] -> ShowS
show :: RunOptions'TraceLevel -> String
$cshow :: RunOptions'TraceLevel -> String
showsPrec :: Int -> RunOptions'TraceLevel -> ShowS
$cshowsPrec :: Int -> RunOptions'TraceLevel -> ShowS
Prelude.Show, RunOptions'TraceLevel -> RunOptions'TraceLevel -> Bool
(RunOptions'TraceLevel -> RunOptions'TraceLevel -> Bool)
-> (RunOptions'TraceLevel -> RunOptions'TraceLevel -> Bool)
-> Eq RunOptions'TraceLevel
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: RunOptions'TraceLevel -> RunOptions'TraceLevel -> Bool
$c/= :: RunOptions'TraceLevel -> RunOptions'TraceLevel -> Bool
== :: RunOptions'TraceLevel -> RunOptions'TraceLevel -> Bool
$c== :: RunOptions'TraceLevel -> RunOptions'TraceLevel -> Bool
Prelude.Eq, Eq RunOptions'TraceLevel
Eq RunOptions'TraceLevel =>
(RunOptions'TraceLevel -> RunOptions'TraceLevel -> Ordering)
-> (RunOptions'TraceLevel -> RunOptions'TraceLevel -> Bool)
-> (RunOptions'TraceLevel -> RunOptions'TraceLevel -> Bool)
-> (RunOptions'TraceLevel -> RunOptions'TraceLevel -> Bool)
-> (RunOptions'TraceLevel -> RunOptions'TraceLevel -> Bool)
-> (RunOptions'TraceLevel
    -> RunOptions'TraceLevel -> RunOptions'TraceLevel)
-> (RunOptions'TraceLevel
    -> RunOptions'TraceLevel -> RunOptions'TraceLevel)
-> Ord RunOptions'TraceLevel
RunOptions'TraceLevel -> RunOptions'TraceLevel -> Bool
RunOptions'TraceLevel -> RunOptions'TraceLevel -> Ordering
RunOptions'TraceLevel
-> RunOptions'TraceLevel -> RunOptions'TraceLevel
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 :: RunOptions'TraceLevel
-> RunOptions'TraceLevel -> RunOptions'TraceLevel
$cmin :: RunOptions'TraceLevel
-> RunOptions'TraceLevel -> RunOptions'TraceLevel
max :: RunOptions'TraceLevel
-> RunOptions'TraceLevel -> RunOptions'TraceLevel
$cmax :: RunOptions'TraceLevel
-> RunOptions'TraceLevel -> RunOptions'TraceLevel
>= :: RunOptions'TraceLevel -> RunOptions'TraceLevel -> Bool
$c>= :: RunOptions'TraceLevel -> RunOptions'TraceLevel -> Bool
> :: RunOptions'TraceLevel -> RunOptions'TraceLevel -> Bool
$c> :: RunOptions'TraceLevel -> RunOptions'TraceLevel -> Bool
<= :: RunOptions'TraceLevel -> RunOptions'TraceLevel -> Bool
$c<= :: RunOptions'TraceLevel -> RunOptions'TraceLevel -> Bool
< :: RunOptions'TraceLevel -> RunOptions'TraceLevel -> Bool
$c< :: RunOptions'TraceLevel -> RunOptions'TraceLevel -> Bool
compare :: RunOptions'TraceLevel -> RunOptions'TraceLevel -> Ordering
$ccompare :: RunOptions'TraceLevel -> RunOptions'TraceLevel -> Ordering
$cp1Ord :: Eq RunOptions'TraceLevel
Prelude.Ord)
instance Data.ProtoLens.MessageEnum RunOptions'TraceLevel where
  maybeToEnum :: Int -> Maybe RunOptions'TraceLevel
maybeToEnum 0 = RunOptions'TraceLevel -> Maybe RunOptions'TraceLevel
forall a. a -> Maybe a
Prelude.Just RunOptions'TraceLevel
RunOptions'NO_TRACE
  maybeToEnum 1 = RunOptions'TraceLevel -> Maybe RunOptions'TraceLevel
forall a. a -> Maybe a
Prelude.Just RunOptions'TraceLevel
RunOptions'SOFTWARE_TRACE
  maybeToEnum 2 = RunOptions'TraceLevel -> Maybe RunOptions'TraceLevel
forall a. a -> Maybe a
Prelude.Just RunOptions'TraceLevel
RunOptions'HARDWARE_TRACE
  maybeToEnum 3 = RunOptions'TraceLevel -> Maybe RunOptions'TraceLevel
forall a. a -> Maybe a
Prelude.Just RunOptions'TraceLevel
RunOptions'FULL_TRACE
  maybeToEnum k :: Int
k
    = RunOptions'TraceLevel -> Maybe RunOptions'TraceLevel
forall a. a -> Maybe a
Prelude.Just
        (RunOptions'TraceLevel'UnrecognizedValue -> RunOptions'TraceLevel
RunOptions'TraceLevel'Unrecognized
           (Int32 -> RunOptions'TraceLevel'UnrecognizedValue
RunOptions'TraceLevel'UnrecognizedValue (Int -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int
k)))
  showEnum :: RunOptions'TraceLevel -> String
showEnum RunOptions'NO_TRACE = "NO_TRACE"
  showEnum RunOptions'SOFTWARE_TRACE = "SOFTWARE_TRACE"
  showEnum RunOptions'HARDWARE_TRACE = "HARDWARE_TRACE"
  showEnum RunOptions'FULL_TRACE = "FULL_TRACE"
  showEnum
    (RunOptions'TraceLevel'Unrecognized (RunOptions'TraceLevel'UnrecognizedValue k :: Int32
k))
    = Int32 -> String
forall a. Show a => a -> String
Prelude.show Int32
k
  readEnum :: String -> Maybe RunOptions'TraceLevel
readEnum k :: String
k
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k "NO_TRACE" = RunOptions'TraceLevel -> Maybe RunOptions'TraceLevel
forall a. a -> Maybe a
Prelude.Just RunOptions'TraceLevel
RunOptions'NO_TRACE
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k "SOFTWARE_TRACE"
    = RunOptions'TraceLevel -> Maybe RunOptions'TraceLevel
forall a. a -> Maybe a
Prelude.Just RunOptions'TraceLevel
RunOptions'SOFTWARE_TRACE
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k "HARDWARE_TRACE"
    = RunOptions'TraceLevel -> Maybe RunOptions'TraceLevel
forall a. a -> Maybe a
Prelude.Just RunOptions'TraceLevel
RunOptions'HARDWARE_TRACE
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k "FULL_TRACE" = RunOptions'TraceLevel -> Maybe RunOptions'TraceLevel
forall a. a -> Maybe a
Prelude.Just RunOptions'TraceLevel
RunOptions'FULL_TRACE
    | Bool
Prelude.otherwise
    = Maybe Int
-> (Int -> Maybe RunOptions'TraceLevel)
-> Maybe RunOptions'TraceLevel
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 RunOptions'TraceLevel
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum
instance Prelude.Bounded RunOptions'TraceLevel where
  minBound :: RunOptions'TraceLevel
minBound = RunOptions'TraceLevel
RunOptions'NO_TRACE
  maxBound :: RunOptions'TraceLevel
maxBound = RunOptions'TraceLevel
RunOptions'FULL_TRACE
instance Prelude.Enum RunOptions'TraceLevel where
  toEnum :: Int -> RunOptions'TraceLevel
toEnum k__ :: Int
k__
    = RunOptions'TraceLevel
-> (RunOptions'TraceLevel -> RunOptions'TraceLevel)
-> Maybe RunOptions'TraceLevel
-> RunOptions'TraceLevel
forall b a. b -> (a -> b) -> Maybe a -> b
Prelude.maybe
        (String -> RunOptions'TraceLevel
forall a. HasCallStack => String -> a
Prelude.error
           (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
              "toEnum: unknown value for enum TraceLevel: " (Int -> String
forall a. Show a => a -> String
Prelude.show Int
k__)))
        RunOptions'TraceLevel -> RunOptions'TraceLevel
forall a. a -> a
Prelude.id
        (Int -> Maybe RunOptions'TraceLevel
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum Int
k__)
  fromEnum :: RunOptions'TraceLevel -> Int
fromEnum RunOptions'NO_TRACE = 0
  fromEnum RunOptions'SOFTWARE_TRACE = 1
  fromEnum RunOptions'HARDWARE_TRACE = 2
  fromEnum RunOptions'FULL_TRACE = 3
  fromEnum
    (RunOptions'TraceLevel'Unrecognized (RunOptions'TraceLevel'UnrecognizedValue k :: Int32
k))
    = Int32 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
k
  succ :: RunOptions'TraceLevel -> RunOptions'TraceLevel
succ RunOptions'FULL_TRACE
    = String -> RunOptions'TraceLevel
forall a. HasCallStack => String -> a
Prelude.error
        "RunOptions'TraceLevel.succ: bad argument RunOptions'FULL_TRACE. This value would be out of bounds."
  succ RunOptions'NO_TRACE = RunOptions'TraceLevel
RunOptions'SOFTWARE_TRACE
  succ RunOptions'SOFTWARE_TRACE = RunOptions'TraceLevel
RunOptions'HARDWARE_TRACE
  succ RunOptions'HARDWARE_TRACE = RunOptions'TraceLevel
RunOptions'FULL_TRACE
  succ (RunOptions'TraceLevel'Unrecognized _)
    = String -> RunOptions'TraceLevel
forall a. HasCallStack => String -> a
Prelude.error
        "RunOptions'TraceLevel.succ: bad argument: unrecognized value"
  pred :: RunOptions'TraceLevel -> RunOptions'TraceLevel
pred RunOptions'NO_TRACE
    = String -> RunOptions'TraceLevel
forall a. HasCallStack => String -> a
Prelude.error
        "RunOptions'TraceLevel.pred: bad argument RunOptions'NO_TRACE. This value would be out of bounds."
  pred RunOptions'SOFTWARE_TRACE = RunOptions'TraceLevel
RunOptions'NO_TRACE
  pred RunOptions'HARDWARE_TRACE = RunOptions'TraceLevel
RunOptions'SOFTWARE_TRACE
  pred RunOptions'FULL_TRACE = RunOptions'TraceLevel
RunOptions'HARDWARE_TRACE
  pred (RunOptions'TraceLevel'Unrecognized _)
    = String -> RunOptions'TraceLevel
forall a. HasCallStack => String -> a
Prelude.error
        "RunOptions'TraceLevel.pred: bad argument: unrecognized value"
  enumFrom :: RunOptions'TraceLevel -> [RunOptions'TraceLevel]
enumFrom = RunOptions'TraceLevel -> [RunOptions'TraceLevel]
forall a. (Enum a, Bounded a) => a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFrom
  enumFromTo :: RunOptions'TraceLevel
-> RunOptions'TraceLevel -> [RunOptions'TraceLevel]
enumFromTo = RunOptions'TraceLevel
-> RunOptions'TraceLevel -> [RunOptions'TraceLevel]
forall a. Enum a => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromTo
  enumFromThen :: RunOptions'TraceLevel
-> RunOptions'TraceLevel -> [RunOptions'TraceLevel]
enumFromThen = RunOptions'TraceLevel
-> RunOptions'TraceLevel -> [RunOptions'TraceLevel]
forall a. (Enum a, Bounded a) => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThen
  enumFromThenTo :: RunOptions'TraceLevel
-> RunOptions'TraceLevel
-> RunOptions'TraceLevel
-> [RunOptions'TraceLevel]
enumFromThenTo = RunOptions'TraceLevel
-> RunOptions'TraceLevel
-> RunOptions'TraceLevel
-> [RunOptions'TraceLevel]
forall a. Enum a => a -> a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThenTo
instance Data.ProtoLens.FieldDefault RunOptions'TraceLevel where
  fieldDefault :: RunOptions'TraceLevel
fieldDefault = RunOptions'TraceLevel
RunOptions'NO_TRACE
instance Control.DeepSeq.NFData RunOptions'TraceLevel where
  rnf :: RunOptions'TraceLevel -> ()
rnf x__ :: RunOptions'TraceLevel
x__ = RunOptions'TraceLevel -> () -> ()
forall a b. a -> b -> b
Prelude.seq RunOptions'TraceLevel
x__ ()
{- | Fields :
     
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.name' @:: Lens' SessionMetadata Data.Text.Text@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.version' @:: Lens' SessionMetadata Data.Int.Int64@ -}
data SessionMetadata
  = SessionMetadata'_constructor {SessionMetadata -> Text
_SessionMetadata'name :: !Data.Text.Text,
                                  SessionMetadata -> Int64
_SessionMetadata'version :: !Data.Int.Int64,
                                  SessionMetadata -> FieldSet
_SessionMetadata'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (SessionMetadata -> SessionMetadata -> Bool
(SessionMetadata -> SessionMetadata -> Bool)
-> (SessionMetadata -> SessionMetadata -> Bool)
-> Eq SessionMetadata
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: SessionMetadata -> SessionMetadata -> Bool
$c/= :: SessionMetadata -> SessionMetadata -> Bool
== :: SessionMetadata -> SessionMetadata -> Bool
$c== :: SessionMetadata -> SessionMetadata -> Bool
Prelude.Eq, Eq SessionMetadata
Eq SessionMetadata =>
(SessionMetadata -> SessionMetadata -> Ordering)
-> (SessionMetadata -> SessionMetadata -> Bool)
-> (SessionMetadata -> SessionMetadata -> Bool)
-> (SessionMetadata -> SessionMetadata -> Bool)
-> (SessionMetadata -> SessionMetadata -> Bool)
-> (SessionMetadata -> SessionMetadata -> SessionMetadata)
-> (SessionMetadata -> SessionMetadata -> SessionMetadata)
-> Ord SessionMetadata
SessionMetadata -> SessionMetadata -> Bool
SessionMetadata -> SessionMetadata -> Ordering
SessionMetadata -> SessionMetadata -> SessionMetadata
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 :: SessionMetadata -> SessionMetadata -> SessionMetadata
$cmin :: SessionMetadata -> SessionMetadata -> SessionMetadata
max :: SessionMetadata -> SessionMetadata -> SessionMetadata
$cmax :: SessionMetadata -> SessionMetadata -> SessionMetadata
>= :: SessionMetadata -> SessionMetadata -> Bool
$c>= :: SessionMetadata -> SessionMetadata -> Bool
> :: SessionMetadata -> SessionMetadata -> Bool
$c> :: SessionMetadata -> SessionMetadata -> Bool
<= :: SessionMetadata -> SessionMetadata -> Bool
$c<= :: SessionMetadata -> SessionMetadata -> Bool
< :: SessionMetadata -> SessionMetadata -> Bool
$c< :: SessionMetadata -> SessionMetadata -> Bool
compare :: SessionMetadata -> SessionMetadata -> Ordering
$ccompare :: SessionMetadata -> SessionMetadata -> Ordering
$cp1Ord :: Eq SessionMetadata
Prelude.Ord)
instance Prelude.Show SessionMetadata where
  showsPrec :: Int -> SessionMetadata -> ShowS
showsPrec _ __x :: SessionMetadata
__x __s :: String
__s
    = Char -> ShowS
Prelude.showChar
        '{'
        (String -> ShowS
Prelude.showString
           (SessionMetadata -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort SessionMetadata
__x) (Char -> ShowS
Prelude.showChar '}' String
__s))
instance Data.ProtoLens.Field.HasField SessionMetadata "name" Data.Text.Text where
  fieldOf :: Proxy# "name"
-> (Text -> f Text) -> SessionMetadata -> f SessionMetadata
fieldOf _
    = ((Text -> f Text) -> SessionMetadata -> f SessionMetadata)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> SessionMetadata
-> f SessionMetadata
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SessionMetadata -> Text)
-> (SessionMetadata -> Text -> SessionMetadata)
-> Lens SessionMetadata SessionMetadata Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SessionMetadata -> Text
_SessionMetadata'name
           (\ x__ :: SessionMetadata
x__ y__ :: Text
y__ -> SessionMetadata
x__ {_SessionMetadata'name :: Text
_SessionMetadata'name = Text
y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SessionMetadata "version" Data.Int.Int64 where
  fieldOf :: Proxy# "version"
-> (Int64 -> f Int64) -> SessionMetadata -> f SessionMetadata
fieldOf _
    = ((Int64 -> f Int64) -> SessionMetadata -> f SessionMetadata)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> SessionMetadata
-> f SessionMetadata
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SessionMetadata -> Int64)
-> (SessionMetadata -> Int64 -> SessionMetadata)
-> Lens SessionMetadata SessionMetadata Int64 Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SessionMetadata -> Int64
_SessionMetadata'version
           (\ x__ :: SessionMetadata
x__ y__ :: Int64
y__ -> SessionMetadata
x__ {_SessionMetadata'version :: Int64
_SessionMetadata'version = Int64
y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message SessionMetadata where
  messageName :: Proxy SessionMetadata -> Text
messageName _ = String -> Text
Data.Text.pack "tensorflow.SessionMetadata"
  packedMessageDescriptor :: Proxy SessionMetadata -> ByteString
packedMessageDescriptor _
    = "\n\
      \\SISessionMetadata\DC2\DC2\n\
      \\EOTname\CAN\SOH \SOH(\tR\EOTname\DC2\CAN\n\
      \\aversion\CAN\STX \SOH(\ETXR\aversion"
  packedFileDescriptor :: Proxy SessionMetadata -> ByteString
packedFileDescriptor _ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor SessionMetadata)
fieldsByTag
    = let
        name__field_descriptor :: FieldDescriptor SessionMetadata
name__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor SessionMetadata Text
-> FieldDescriptor SessionMetadata
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "name"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens SessionMetadata SessionMetadata Text Text
-> FieldAccessor SessionMetadata 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 "name" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"name")) ::
              Data.ProtoLens.FieldDescriptor SessionMetadata
        version__field_descriptor :: FieldDescriptor SessionMetadata
version__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor SessionMetadata Int64
-> FieldDescriptor SessionMetadata
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "version"
              (ScalarField Int64 -> FieldTypeDescriptor Int64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int64
Data.ProtoLens.Int64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64)
              (WireDefault Int64
-> Lens SessionMetadata SessionMetadata Int64 Int64
-> FieldAccessor SessionMetadata Int64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall s a (f :: * -> *).
(HasField s "version" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"version")) ::
              Data.ProtoLens.FieldDescriptor SessionMetadata
      in
        [(Tag, FieldDescriptor SessionMetadata)]
-> Map Tag (FieldDescriptor SessionMetadata)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag 1, FieldDescriptor SessionMetadata
name__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 2, FieldDescriptor SessionMetadata
version__field_descriptor)]
  unknownFields :: LensLike' f SessionMetadata FieldSet
unknownFields
    = (SessionMetadata -> FieldSet)
-> (SessionMetadata -> FieldSet -> SessionMetadata)
-> Lens' SessionMetadata FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        SessionMetadata -> FieldSet
_SessionMetadata'_unknownFields
        (\ x__ :: SessionMetadata
x__ y__ :: FieldSet
y__ -> SessionMetadata
x__ {_SessionMetadata'_unknownFields :: FieldSet
_SessionMetadata'_unknownFields = FieldSet
y__})
  defMessage :: SessionMetadata
defMessage
    = $WSessionMetadata'_constructor :: Text -> Int64 -> FieldSet -> SessionMetadata
SessionMetadata'_constructor
        {_SessionMetadata'name :: Text
_SessionMetadata'name = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SessionMetadata'version :: Int64
_SessionMetadata'version = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SessionMetadata'_unknownFields :: FieldSet
_SessionMetadata'_unknownFields = []}
  parseMessage :: Parser SessionMetadata
parseMessage
    = let
        loop ::
          SessionMetadata
          -> Data.ProtoLens.Encoding.Bytes.Parser SessionMetadata
        loop :: SessionMetadata -> Parser SessionMetadata
loop x :: SessionMetadata
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]))))
                      SessionMetadata -> Parser SessionMetadata
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter SessionMetadata SessionMetadata FieldSet FieldSet
-> (FieldSet -> FieldSet) -> SessionMetadata -> SessionMetadata
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 SessionMetadata SessionMetadata FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) SessionMetadata
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))
                                       "name"
                                SessionMetadata -> Parser SessionMetadata
loop (Setter SessionMetadata SessionMetadata Text Text
-> Text -> SessionMetadata -> SessionMetadata
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "name" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"name") Text
y SessionMetadata
x)
                        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)
                                       "version"
                                SessionMetadata -> Parser SessionMetadata
loop (Setter SessionMetadata SessionMetadata Int64 Int64
-> Int64 -> SessionMetadata -> SessionMetadata
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "version" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"version") Int64
y SessionMetadata
x)
                        wire :: Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                SessionMetadata -> Parser SessionMetadata
loop
                                  (Setter SessionMetadata SessionMetadata FieldSet FieldSet
-> (FieldSet -> FieldSet) -> SessionMetadata -> SessionMetadata
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 SessionMetadata SessionMetadata FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) SessionMetadata
x)
      in
        Parser SessionMetadata -> String -> Parser SessionMetadata
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do SessionMetadata -> Parser SessionMetadata
loop SessionMetadata
forall msg. Message msg => msg
Data.ProtoLens.defMessage) "SessionMetadata"
  buildMessage :: SessionMetadata -> Builder
buildMessage
    = \ _x :: SessionMetadata
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Text
_v = FoldLike Text SessionMetadata SessionMetadata Text Text
-> SessionMetadata -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "name" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"name") SessionMetadata
_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 :: Int64
_v = FoldLike Int64 SessionMetadata SessionMetadata Int64 Int64
-> SessionMetadata -> Int64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "version" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"version") SessionMetadata
_x
                 in
                   if Int64 -> Int64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int64
_v Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 16)
                         ((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 Int64
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike FieldSet SessionMetadata SessionMetadata FieldSet FieldSet
-> SessionMetadata -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet SessionMetadata SessionMetadata FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields SessionMetadata
_x)))
instance Control.DeepSeq.NFData SessionMetadata where
  rnf :: SessionMetadata -> ()
rnf
    = \ x__ :: SessionMetadata
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (SessionMetadata -> FieldSet
_SessionMetadata'_unknownFields SessionMetadata
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (SessionMetadata -> Text
_SessionMetadata'name SessionMetadata
x__)
                (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (SessionMetadata -> Int64
_SessionMetadata'version SessionMetadata
x__) ()))
{- | Fields :
     
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.fromTensor' @:: Lens' TensorConnection Data.Text.Text@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.toTensor' @:: Lens' TensorConnection Data.Text.Text@ -}
data TensorConnection
  = TensorConnection'_constructor {TensorConnection -> Text
_TensorConnection'fromTensor :: !Data.Text.Text,
                                   TensorConnection -> Text
_TensorConnection'toTensor :: !Data.Text.Text,
                                   TensorConnection -> FieldSet
_TensorConnection'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (TensorConnection -> TensorConnection -> Bool
(TensorConnection -> TensorConnection -> Bool)
-> (TensorConnection -> TensorConnection -> Bool)
-> Eq TensorConnection
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: TensorConnection -> TensorConnection -> Bool
$c/= :: TensorConnection -> TensorConnection -> Bool
== :: TensorConnection -> TensorConnection -> Bool
$c== :: TensorConnection -> TensorConnection -> Bool
Prelude.Eq, Eq TensorConnection
Eq TensorConnection =>
(TensorConnection -> TensorConnection -> Ordering)
-> (TensorConnection -> TensorConnection -> Bool)
-> (TensorConnection -> TensorConnection -> Bool)
-> (TensorConnection -> TensorConnection -> Bool)
-> (TensorConnection -> TensorConnection -> Bool)
-> (TensorConnection -> TensorConnection -> TensorConnection)
-> (TensorConnection -> TensorConnection -> TensorConnection)
-> Ord TensorConnection
TensorConnection -> TensorConnection -> Bool
TensorConnection -> TensorConnection -> Ordering
TensorConnection -> TensorConnection -> TensorConnection
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 :: TensorConnection -> TensorConnection -> TensorConnection
$cmin :: TensorConnection -> TensorConnection -> TensorConnection
max :: TensorConnection -> TensorConnection -> TensorConnection
$cmax :: TensorConnection -> TensorConnection -> TensorConnection
>= :: TensorConnection -> TensorConnection -> Bool
$c>= :: TensorConnection -> TensorConnection -> Bool
> :: TensorConnection -> TensorConnection -> Bool
$c> :: TensorConnection -> TensorConnection -> Bool
<= :: TensorConnection -> TensorConnection -> Bool
$c<= :: TensorConnection -> TensorConnection -> Bool
< :: TensorConnection -> TensorConnection -> Bool
$c< :: TensorConnection -> TensorConnection -> Bool
compare :: TensorConnection -> TensorConnection -> Ordering
$ccompare :: TensorConnection -> TensorConnection -> Ordering
$cp1Ord :: Eq TensorConnection
Prelude.Ord)
instance Prelude.Show TensorConnection where
  showsPrec :: Int -> TensorConnection -> ShowS
showsPrec _ __x :: TensorConnection
__x __s :: String
__s
    = Char -> ShowS
Prelude.showChar
        '{'
        (String -> ShowS
Prelude.showString
           (TensorConnection -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort TensorConnection
__x) (Char -> ShowS
Prelude.showChar '}' String
__s))
instance Data.ProtoLens.Field.HasField TensorConnection "fromTensor" Data.Text.Text where
  fieldOf :: Proxy# "fromTensor"
-> (Text -> f Text) -> TensorConnection -> f TensorConnection
fieldOf _
    = ((Text -> f Text) -> TensorConnection -> f TensorConnection)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> TensorConnection
-> f TensorConnection
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorConnection -> Text)
-> (TensorConnection -> Text -> TensorConnection)
-> Lens TensorConnection TensorConnection Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorConnection -> Text
_TensorConnection'fromTensor
           (\ x__ :: TensorConnection
x__ y__ :: Text
y__ -> TensorConnection
x__ {_TensorConnection'fromTensor :: Text
_TensorConnection'fromTensor = Text
y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField TensorConnection "toTensor" Data.Text.Text where
  fieldOf :: Proxy# "toTensor"
-> (Text -> f Text) -> TensorConnection -> f TensorConnection
fieldOf _
    = ((Text -> f Text) -> TensorConnection -> f TensorConnection)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> TensorConnection
-> f TensorConnection
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TensorConnection -> Text)
-> (TensorConnection -> Text -> TensorConnection)
-> Lens TensorConnection TensorConnection Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TensorConnection -> Text
_TensorConnection'toTensor
           (\ x__ :: TensorConnection
x__ y__ :: Text
y__ -> TensorConnection
x__ {_TensorConnection'toTensor :: Text
_TensorConnection'toTensor = Text
y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message TensorConnection where
  messageName :: Proxy TensorConnection -> Text
messageName _ = String -> Text
Data.Text.pack "tensorflow.TensorConnection"
  packedMessageDescriptor :: Proxy TensorConnection -> ByteString
packedMessageDescriptor _
    = "\n\
      \\DLETensorConnection\DC2\US\n\
      \\vfrom_tensor\CAN\SOH \SOH(\tR\n\
      \fromTensor\DC2\ESC\n\
      \\tto_tensor\CAN\STX \SOH(\tR\btoTensor"
  packedFileDescriptor :: Proxy TensorConnection -> ByteString
packedFileDescriptor _ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor TensorConnection)
fieldsByTag
    = let
        fromTensor__field_descriptor :: FieldDescriptor TensorConnection
fromTensor__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor TensorConnection Text
-> FieldDescriptor TensorConnection
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "from_tensor"
              (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 TensorConnection TensorConnection Text Text
-> FieldAccessor TensorConnection 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 "fromTensor" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"fromTensor")) ::
              Data.ProtoLens.FieldDescriptor TensorConnection
        toTensor__field_descriptor :: FieldDescriptor TensorConnection
toTensor__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor TensorConnection Text
-> FieldDescriptor TensorConnection
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "to_tensor"
              (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 TensorConnection TensorConnection Text Text
-> FieldAccessor TensorConnection 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 "toTensor" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"toTensor")) ::
              Data.ProtoLens.FieldDescriptor TensorConnection
      in
        [(Tag, FieldDescriptor TensorConnection)]
-> Map Tag (FieldDescriptor TensorConnection)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag 1, FieldDescriptor TensorConnection
fromTensor__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 2, FieldDescriptor TensorConnection
toTensor__field_descriptor)]
  unknownFields :: LensLike' f TensorConnection FieldSet
unknownFields
    = (TensorConnection -> FieldSet)
-> (TensorConnection -> FieldSet -> TensorConnection)
-> Lens' TensorConnection FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        TensorConnection -> FieldSet
_TensorConnection'_unknownFields
        (\ x__ :: TensorConnection
x__ y__ :: FieldSet
y__ -> TensorConnection
x__ {_TensorConnection'_unknownFields :: FieldSet
_TensorConnection'_unknownFields = FieldSet
y__})
  defMessage :: TensorConnection
defMessage
    = $WTensorConnection'_constructor :: Text -> Text -> FieldSet -> TensorConnection
TensorConnection'_constructor
        {_TensorConnection'fromTensor :: Text
_TensorConnection'fromTensor = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _TensorConnection'toTensor :: Text
_TensorConnection'toTensor = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _TensorConnection'_unknownFields :: FieldSet
_TensorConnection'_unknownFields = []}
  parseMessage :: Parser TensorConnection
parseMessage
    = let
        loop ::
          TensorConnection
          -> Data.ProtoLens.Encoding.Bytes.Parser TensorConnection
        loop :: TensorConnection -> Parser TensorConnection
loop x :: TensorConnection
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]))))
                      TensorConnection -> Parser TensorConnection
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter TensorConnection TensorConnection FieldSet FieldSet
-> (FieldSet -> FieldSet) -> TensorConnection -> TensorConnection
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 TensorConnection TensorConnection FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) TensorConnection
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))
                                       "from_tensor"
                                TensorConnection -> Parser TensorConnection
loop
                                  (Setter TensorConnection TensorConnection Text Text
-> Text -> TensorConnection -> TensorConnection
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "fromTensor" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"fromTensor") Text
y TensorConnection
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))
                                       "to_tensor"
                                TensorConnection -> Parser TensorConnection
loop
                                  (Setter TensorConnection TensorConnection Text Text
-> Text -> TensorConnection -> TensorConnection
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "toTensor" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"toTensor") Text
y TensorConnection
x)
                        wire :: Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                TensorConnection -> Parser TensorConnection
loop
                                  (Setter TensorConnection TensorConnection FieldSet FieldSet
-> (FieldSet -> FieldSet) -> TensorConnection -> TensorConnection
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 TensorConnection TensorConnection FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) TensorConnection
x)
      in
        Parser TensorConnection -> String -> Parser TensorConnection
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do TensorConnection -> Parser TensorConnection
loop TensorConnection
forall msg. Message msg => msg
Data.ProtoLens.defMessage) "TensorConnection"
  buildMessage :: TensorConnection -> Builder
buildMessage
    = \ _x :: TensorConnection
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v
                  = FoldLike Text TensorConnection TensorConnection Text Text
-> TensorConnection -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "fromTensor" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"fromTensor") TensorConnection
_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 TensorConnection TensorConnection Text Text
-> TensorConnection -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "toTensor" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"toTensor") TensorConnection
_x
                 in
                   if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 18)
                         ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            (\ bs :: ByteString
bs
                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                       (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                    (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                            Text -> ByteString
Data.Text.Encoding.encodeUtf8
                            Text
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet TensorConnection TensorConnection FieldSet FieldSet
-> TensorConnection -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet TensorConnection TensorConnection FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields TensorConnection
_x)))
instance Control.DeepSeq.NFData TensorConnection where
  rnf :: TensorConnection -> ()
rnf
    = \ x__ :: TensorConnection
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (TensorConnection -> FieldSet
_TensorConnection'_unknownFields TensorConnection
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (TensorConnection -> Text
_TensorConnection'fromTensor TensorConnection
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (TensorConnection -> Text
_TensorConnection'toTensor TensorConnection
x__) ()))
{- | Fields :
     
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.numThreads' @:: Lens' ThreadPoolOptionProto Data.Int.Int32@
         * 'Proto.Tensorflow.Core.Protobuf.Config_Fields.globalName' @:: Lens' ThreadPoolOptionProto Data.Text.Text@ -}
data ThreadPoolOptionProto
  = ThreadPoolOptionProto'_constructor {ThreadPoolOptionProto -> Int32
_ThreadPoolOptionProto'numThreads :: !Data.Int.Int32,
                                        ThreadPoolOptionProto -> Text
_ThreadPoolOptionProto'globalName :: !Data.Text.Text,
                                        ThreadPoolOptionProto -> FieldSet
_ThreadPoolOptionProto'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ThreadPoolOptionProto -> ThreadPoolOptionProto -> Bool
(ThreadPoolOptionProto -> ThreadPoolOptionProto -> Bool)
-> (ThreadPoolOptionProto -> ThreadPoolOptionProto -> Bool)
-> Eq ThreadPoolOptionProto
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ThreadPoolOptionProto -> ThreadPoolOptionProto -> Bool
$c/= :: ThreadPoolOptionProto -> ThreadPoolOptionProto -> Bool
== :: ThreadPoolOptionProto -> ThreadPoolOptionProto -> Bool
$c== :: ThreadPoolOptionProto -> ThreadPoolOptionProto -> Bool
Prelude.Eq, Eq ThreadPoolOptionProto
Eq ThreadPoolOptionProto =>
(ThreadPoolOptionProto -> ThreadPoolOptionProto -> Ordering)
-> (ThreadPoolOptionProto -> ThreadPoolOptionProto -> Bool)
-> (ThreadPoolOptionProto -> ThreadPoolOptionProto -> Bool)
-> (ThreadPoolOptionProto -> ThreadPoolOptionProto -> Bool)
-> (ThreadPoolOptionProto -> ThreadPoolOptionProto -> Bool)
-> (ThreadPoolOptionProto
    -> ThreadPoolOptionProto -> ThreadPoolOptionProto)
-> (ThreadPoolOptionProto
    -> ThreadPoolOptionProto -> ThreadPoolOptionProto)
-> Ord ThreadPoolOptionProto
ThreadPoolOptionProto -> ThreadPoolOptionProto -> Bool
ThreadPoolOptionProto -> ThreadPoolOptionProto -> Ordering
ThreadPoolOptionProto
-> ThreadPoolOptionProto -> ThreadPoolOptionProto
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 :: ThreadPoolOptionProto
-> ThreadPoolOptionProto -> ThreadPoolOptionProto
$cmin :: ThreadPoolOptionProto
-> ThreadPoolOptionProto -> ThreadPoolOptionProto
max :: ThreadPoolOptionProto
-> ThreadPoolOptionProto -> ThreadPoolOptionProto
$cmax :: ThreadPoolOptionProto
-> ThreadPoolOptionProto -> ThreadPoolOptionProto
>= :: ThreadPoolOptionProto -> ThreadPoolOptionProto -> Bool
$c>= :: ThreadPoolOptionProto -> ThreadPoolOptionProto -> Bool
> :: ThreadPoolOptionProto -> ThreadPoolOptionProto -> Bool
$c> :: ThreadPoolOptionProto -> ThreadPoolOptionProto -> Bool
<= :: ThreadPoolOptionProto -> ThreadPoolOptionProto -> Bool
$c<= :: ThreadPoolOptionProto -> ThreadPoolOptionProto -> Bool
< :: ThreadPoolOptionProto -> ThreadPoolOptionProto -> Bool
$c< :: ThreadPoolOptionProto -> ThreadPoolOptionProto -> Bool
compare :: ThreadPoolOptionProto -> ThreadPoolOptionProto -> Ordering
$ccompare :: ThreadPoolOptionProto -> ThreadPoolOptionProto -> Ordering
$cp1Ord :: Eq ThreadPoolOptionProto
Prelude.Ord)
instance Prelude.Show ThreadPoolOptionProto where
  showsPrec :: Int -> ThreadPoolOptionProto -> ShowS
showsPrec _ __x :: ThreadPoolOptionProto
__x __s :: String
__s
    = Char -> ShowS
Prelude.showChar
        '{'
        (String -> ShowS
Prelude.showString
           (ThreadPoolOptionProto -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ThreadPoolOptionProto
__x) (Char -> ShowS
Prelude.showChar '}' String
__s))
instance Data.ProtoLens.Field.HasField ThreadPoolOptionProto "numThreads" Data.Int.Int32 where
  fieldOf :: Proxy# "numThreads"
-> (Int32 -> f Int32)
-> ThreadPoolOptionProto
-> f ThreadPoolOptionProto
fieldOf _
    = ((Int32 -> f Int32)
 -> ThreadPoolOptionProto -> f ThreadPoolOptionProto)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> ThreadPoolOptionProto
-> f ThreadPoolOptionProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ThreadPoolOptionProto -> Int32)
-> (ThreadPoolOptionProto -> Int32 -> ThreadPoolOptionProto)
-> Lens ThreadPoolOptionProto ThreadPoolOptionProto Int32 Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ThreadPoolOptionProto -> Int32
_ThreadPoolOptionProto'numThreads
           (\ x__ :: ThreadPoolOptionProto
x__ y__ :: Int32
y__ -> ThreadPoolOptionProto
x__ {_ThreadPoolOptionProto'numThreads :: Int32
_ThreadPoolOptionProto'numThreads = Int32
y__}))
        (Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ThreadPoolOptionProto "globalName" Data.Text.Text where
  fieldOf :: Proxy# "globalName"
-> (Text -> f Text)
-> ThreadPoolOptionProto
-> f ThreadPoolOptionProto
fieldOf _
    = ((Text -> f Text)
 -> ThreadPoolOptionProto -> f ThreadPoolOptionProto)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ThreadPoolOptionProto
-> f ThreadPoolOptionProto
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ThreadPoolOptionProto -> Text)
-> (ThreadPoolOptionProto -> Text -> ThreadPoolOptionProto)
-> Lens ThreadPoolOptionProto ThreadPoolOptionProto Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ThreadPoolOptionProto -> Text
_ThreadPoolOptionProto'globalName
           (\ x__ :: ThreadPoolOptionProto
x__ y__ :: Text
y__ -> ThreadPoolOptionProto
x__ {_ThreadPoolOptionProto'globalName :: Text
_ThreadPoolOptionProto'globalName = Text
y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ThreadPoolOptionProto where
  messageName :: Proxy ThreadPoolOptionProto -> Text
messageName _ = String -> Text
Data.Text.pack "tensorflow.ThreadPoolOptionProto"
  packedMessageDescriptor :: Proxy ThreadPoolOptionProto -> ByteString
packedMessageDescriptor _
    = "\n\
      \\NAKThreadPoolOptionProto\DC2\US\n\
      \\vnum_threads\CAN\SOH \SOH(\ENQR\n\
      \numThreads\DC2\US\n\
      \\vglobal_name\CAN\STX \SOH(\tR\n\
      \globalName"
  packedFileDescriptor :: Proxy ThreadPoolOptionProto -> ByteString
packedFileDescriptor _ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ThreadPoolOptionProto)
fieldsByTag
    = let
        numThreads__field_descriptor :: FieldDescriptor ThreadPoolOptionProto
numThreads__field_descriptor
          = String
-> FieldTypeDescriptor Int32
-> FieldAccessor ThreadPoolOptionProto Int32
-> FieldDescriptor ThreadPoolOptionProto
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "num_threads"
              (ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.Int32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
              (WireDefault Int32
-> Lens ThreadPoolOptionProto ThreadPoolOptionProto Int32 Int32
-> FieldAccessor ThreadPoolOptionProto Int32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "numThreads" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"numThreads")) ::
              Data.ProtoLens.FieldDescriptor ThreadPoolOptionProto
        globalName__field_descriptor :: FieldDescriptor ThreadPoolOptionProto
globalName__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ThreadPoolOptionProto Text
-> FieldDescriptor ThreadPoolOptionProto
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "global_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 ThreadPoolOptionProto ThreadPoolOptionProto Text Text
-> FieldAccessor ThreadPoolOptionProto 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 "globalName" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"globalName")) ::
              Data.ProtoLens.FieldDescriptor ThreadPoolOptionProto
      in
        [(Tag, FieldDescriptor ThreadPoolOptionProto)]
-> Map Tag (FieldDescriptor ThreadPoolOptionProto)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag 1, FieldDescriptor ThreadPoolOptionProto
numThreads__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 2, FieldDescriptor ThreadPoolOptionProto
globalName__field_descriptor)]
  unknownFields :: LensLike' f ThreadPoolOptionProto FieldSet
unknownFields
    = (ThreadPoolOptionProto -> FieldSet)
-> (ThreadPoolOptionProto -> FieldSet -> ThreadPoolOptionProto)
-> Lens' ThreadPoolOptionProto FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ThreadPoolOptionProto -> FieldSet
_ThreadPoolOptionProto'_unknownFields
        (\ x__ :: ThreadPoolOptionProto
x__ y__ :: FieldSet
y__ -> ThreadPoolOptionProto
x__ {_ThreadPoolOptionProto'_unknownFields :: FieldSet
_ThreadPoolOptionProto'_unknownFields = FieldSet
y__})
  defMessage :: ThreadPoolOptionProto
defMessage
    = $WThreadPoolOptionProto'_constructor :: Int32 -> Text -> FieldSet -> ThreadPoolOptionProto
ThreadPoolOptionProto'_constructor
        {_ThreadPoolOptionProto'numThreads :: Int32
_ThreadPoolOptionProto'numThreads = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ThreadPoolOptionProto'globalName :: Text
_ThreadPoolOptionProto'globalName = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ThreadPoolOptionProto'_unknownFields :: FieldSet
_ThreadPoolOptionProto'_unknownFields = []}
  parseMessage :: Parser ThreadPoolOptionProto
parseMessage
    = let
        loop ::
          ThreadPoolOptionProto
          -> Data.ProtoLens.Encoding.Bytes.Parser ThreadPoolOptionProto
        loop :: ThreadPoolOptionProto -> Parser ThreadPoolOptionProto
loop x :: ThreadPoolOptionProto
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]))))
                      ThreadPoolOptionProto -> Parser ThreadPoolOptionProto
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter
  ThreadPoolOptionProto ThreadPoolOptionProto FieldSet FieldSet
-> (FieldSet -> FieldSet)
-> ThreadPoolOptionProto
-> ThreadPoolOptionProto
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
  ThreadPoolOptionProto ThreadPoolOptionProto FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) ThreadPoolOptionProto
x)
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        8 -> do Int32
y <- Parser Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int32) -> Parser Word64 -> Parser Int32
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       "num_threads"
                                ThreadPoolOptionProto -> Parser ThreadPoolOptionProto
loop
                                  (Setter ThreadPoolOptionProto ThreadPoolOptionProto Int32 Int32
-> Int32 -> ThreadPoolOptionProto -> ThreadPoolOptionProto
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "numThreads" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"numThreads") Int32
y ThreadPoolOptionProto
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))
                                       "global_name"
                                ThreadPoolOptionProto -> Parser ThreadPoolOptionProto
loop
                                  (Setter ThreadPoolOptionProto ThreadPoolOptionProto Text Text
-> Text -> ThreadPoolOptionProto -> ThreadPoolOptionProto
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "globalName" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"globalName") Text
y ThreadPoolOptionProto
x)
                        wire :: Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                ThreadPoolOptionProto -> Parser ThreadPoolOptionProto
loop
                                  (Setter
  ThreadPoolOptionProto ThreadPoolOptionProto FieldSet FieldSet
-> (FieldSet -> FieldSet)
-> ThreadPoolOptionProto
-> ThreadPoolOptionProto
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
  ThreadPoolOptionProto ThreadPoolOptionProto FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) ThreadPoolOptionProto
x)
      in
        Parser ThreadPoolOptionProto
-> String -> Parser ThreadPoolOptionProto
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ThreadPoolOptionProto -> Parser ThreadPoolOptionProto
loop ThreadPoolOptionProto
forall msg. Message msg => msg
Data.ProtoLens.defMessage) "ThreadPoolOptionProto"
  buildMessage :: ThreadPoolOptionProto -> Builder
buildMessage
    = \ _x :: ThreadPoolOptionProto
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Int32
_v
                  = FoldLike
  Int32 ThreadPoolOptionProto ThreadPoolOptionProto Int32 Int32
-> ThreadPoolOptionProto -> Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "numThreads" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"numThreads") ThreadPoolOptionProto
_x
              in
                if Int32 -> Int32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int32
_v Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                    Builder
forall a. Monoid a => a
Data.Monoid.mempty
                else
                    Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 8)
                      ((Word64 -> Builder) -> (Int32 -> Word64) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                         Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   _v :: Text
_v
                     = FoldLike Text ThreadPoolOptionProto ThreadPoolOptionProto Text Text
-> ThreadPoolOptionProto -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "globalName" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"globalName") ThreadPoolOptionProto
_x
                 in
                   if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 18)
                         ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            (\ bs :: ByteString
bs
                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                       (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                    (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                            Text -> ByteString
Data.Text.Encoding.encodeUtf8
                            Text
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  ThreadPoolOptionProto
  ThreadPoolOptionProto
  FieldSet
  FieldSet
-> ThreadPoolOptionProto -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ThreadPoolOptionProto
  ThreadPoolOptionProto
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields ThreadPoolOptionProto
_x)))
instance Control.DeepSeq.NFData ThreadPoolOptionProto where
  rnf :: ThreadPoolOptionProto -> ()
rnf
    = \ x__ :: ThreadPoolOptionProto
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ThreadPoolOptionProto -> FieldSet
_ThreadPoolOptionProto'_unknownFields ThreadPoolOptionProto
x__)
             (Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ThreadPoolOptionProto -> Int32
_ThreadPoolOptionProto'numThreads ThreadPoolOptionProto
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ThreadPoolOptionProto -> Text
_ThreadPoolOptionProto'globalName ThreadPoolOptionProto
x__) ()))
packedFileDescriptor :: Data.ByteString.ByteString
packedFileDescriptor :: ByteString
packedFileDescriptor
  = "\n\
    \%tensorflow/core/protobuf/config.proto\DC2\n\
    \tensorflow\SUB*tensorflow/core/framework/cost_graph.proto\SUB%tensorflow/core/framework/graph.proto\SUB*tensorflow/core/framework/step_stats.proto\SUB&tensorflow/core/protobuf/cluster.proto\SUB$tensorflow/core/protobuf/debug.proto\SUB.tensorflow/core/protobuf/rewriter_config.proto\"\202\b\n\
    \\n\
    \GPUOptions\DC2D\n\
    \\USper_process_gpu_memory_fraction\CAN\SOH \SOH(\SOHR\ESCperProcessGpuMemoryFraction\DC2!\n\
    \\fallow_growth\CAN\EOT \SOH(\bR\vallowGrowth\DC2%\n\
    \\SOallocator_type\CAN\STX \SOH(\tR\rallocatorType\DC26\n\
    \\ETBdeferred_deletion_bytes\CAN\ETX \SOH(\ETXR\NAKdeferredDeletionBytes\DC2.\n\
    \\DC3visible_device_list\CAN\ENQ \SOH(\tR\DC1visibleDeviceList\DC2;\n\
    \\SUBpolling_active_delay_usecs\CAN\ACK \SOH(\ENQR\ETBpollingActiveDelayUsecs\DC2?\n\
    \\FSpolling_inactive_delay_msecs\CAN\a \SOH(\ENQR\EMpollingInactiveDelayMsecs\DC20\n\
    \\DC4force_gpu_compatible\CAN\b \SOH(\bR\DC2forceGpuCompatible\DC2G\n\
    \\fexperimental\CAN\t \SOH(\v2#.tensorflow.GPUOptions.ExperimentalR\fexperimental\SUB\202\EOT\n\
    \\fExperimental\DC2[\n\
    \\SIvirtual_devices\CAN\SOH \ETX(\v22.tensorflow.GPUOptions.Experimental.VirtualDevicesR\SOvirtualDevices\DC2,\n\
    \\DC2use_unified_memory\CAN\STX \SOH(\bR\DLEuseUnifiedMemory\DC2;\n\
    \\ESCnum_dev_to_dev_copy_streams\CAN\ETX \SOH(\ENQR\SYNnumDevToDevCopyStreams\DC22\n\
    \\NAKcollective_ring_order\CAN\EOT \SOH(\tR\DC3collectiveRingOrder\DC23\n\
    \\NAKtimestamped_allocator\CAN\ENQ \SOH(\bR\DC4timestampedAllocator\DC2=\n\
    \\ESCkernel_tracker_max_interval\CAN\a \SOH(\ENQR\CANkernelTrackerMaxInterval\DC27\n\
    \\CANkernel_tracker_max_bytes\CAN\b \SOH(\ENQR\NAKkernelTrackerMaxBytes\DC2;\n\
    \\SUBkernel_tracker_max_pending\CAN\t \SOH(\ENQR\ETBkernelTrackerMaxPending\SUBT\n\
    \\SOVirtualDevices\DC2&\n\
    \\SImemory_limit_mb\CAN\SOH \ETX(\STXR\rmemoryLimitMb\DC2\SUB\n\
    \\bpriority\CAN\STX \ETX(\ENQR\bpriority\"\130\EOT\n\
    \\DLEOptimizerOptions\DC2M\n\
    \#do_common_subexpression_elimination\CAN\SOH \SOH(\bR doCommonSubexpressionElimination\DC2.\n\
    \\DC3do_constant_folding\CAN\STX \SOH(\bR\DC1doConstantFolding\DC2>\n\
    \\FSmax_folded_constant_in_bytes\CAN\ACK \SOH(\ETXR\CANmaxFoldedConstantInBytes\DC20\n\
    \\DC4do_function_inlining\CAN\EOT \SOH(\bR\DC2doFunctionInlining\DC2?\n\
    \\topt_level\CAN\ETX \SOH(\SO2\".tensorflow.OptimizerOptions.LevelR\boptLevel\DC2U\n\
    \\DLEglobal_jit_level\CAN\ENQ \SOH(\SO2+.tensorflow.OptimizerOptions.GlobalJitLevelR\SOglobalJitLevel\" \n\
    \\ENQLevel\DC2\ACK\n\
    \\STXL1\DLE\NUL\DC2\SI\n\
    \\STXL0\DLE\255\255\255\255\255\255\255\255\255\SOH\"C\n\
    \\SOGlobalJitLevel\DC2\v\n\
    \\aDEFAULT\DLE\NUL\DC2\DLE\n\
    \\ETXOFF\DLE\255\255\255\255\255\255\255\255\255\SOH\DC2\b\n\
    \\EOTON_1\DLE\SOH\DC2\b\n\
    \\EOTON_2\DLE\STX\"\144\EOT\n\
    \\fGraphOptions\DC24\n\
    \\SYNenable_recv_scheduling\CAN\STX \SOH(\bR\DC4enableRecvScheduling\DC2I\n\
    \\DC1optimizer_options\CAN\ETX \SOH(\v2\FS.tensorflow.OptimizerOptionsR\DLEoptimizerOptions\DC2(\n\
    \\DLEbuild_cost_model\CAN\EOT \SOH(\ETXR\SObuildCostModel\DC23\n\
    \\SYNbuild_cost_model_after\CAN\t \SOH(\ETXR\DC3buildCostModelAfter\DC2!\n\
    \\finfer_shapes\CAN\ENQ \SOH(\bR\vinferShapes\DC2,\n\
    \\DC2place_pruned_graph\CAN\ACK \SOH(\bR\DLEplacePrunedGraph\DC28\n\
    \\CANenable_bfloat16_sendrecv\CAN\a \SOH(\bR\SYNenableBfloat16Sendrecv\DC2#\n\
    \\rtimeline_step\CAN\b \SOH(\ENQR\ftimelineStep\DC2C\n\
    \\SIrewrite_options\CAN\n\
    \ \SOH(\v2\SUB.tensorflow.RewriterConfigR\SOrewriteOptionsJ\EOT\b\SOH\DLE\STXR%skip_common_subexpression_elimination\"Y\n\
    \\NAKThreadPoolOptionProto\DC2\US\n\
    \\vnum_threads\CAN\SOH \SOH(\ENQR\n\
    \numThreads\DC2\US\n\
    \\vglobal_name\CAN\STX \SOH(\tR\n\
    \globalName\"\169\STX\n\
    \\n\
    \RPCOptions\DC2>\n\
    \\FSuse_rpc_for_inprocess_master\CAN\SOH \SOH(\bR\CANuseRpcForInprocessMaster\DC23\n\
    \\NAKcompression_algorithm\CAN\STX \SOH(\tR\DC4compressionAlgorithm\DC2+\n\
    \\DC1compression_level\CAN\ETX \SOH(\ENQR\DLEcompressionLevel\DC2,\n\
    \\DC2cache_rpc_response\CAN\EOT \SOH(\bR\DLEcacheRpcResponse\DC2K\n\
    \\"disable_session_connection_sharing\CAN\ENQ \SOH(\bR\USdisableSessionConnectionSharing\"?\n\
    \\SISessionMetadata\DC2\DC2\n\
    \\EOTname\CAN\SOH \SOH(\tR\EOTname\DC2\CAN\n\
    \\aversion\CAN\STX \SOH(\ETXR\aversion\"\139\DLE\n\
    \\vConfigProto\DC2K\n\
    \\fdevice_count\CAN\SOH \ETX(\v2(.tensorflow.ConfigProto.DeviceCountEntryR\vdeviceCount\DC2?\n\
    \\FSintra_op_parallelism_threads\CAN\STX \SOH(\ENQR\EMintraOpParallelismThreads\DC2?\n\
    \\FSinter_op_parallelism_threads\CAN\ENQ \SOH(\ENQR\EMinterOpParallelismThreads\DC25\n\
    \\ETBuse_per_session_threads\CAN\t \SOH(\bR\DC4usePerSessionThreads\DC2a\n\
    \\FSsession_inter_op_thread_pool\CAN\f \ETX(\v2!.tensorflow.ThreadPoolOptionProtoR\CANsessionInterOpThreadPool\DC2)\n\
    \\DLEplacement_period\CAN\ETX \SOH(\ENQR\SIplacementPeriod\DC2%\n\
    \\SOdevice_filters\CAN\EOT \ETX(\tR\rdeviceFilters\DC27\n\
    \\vgpu_options\CAN\ACK \SOH(\v2\SYN.tensorflow.GPUOptionsR\n\
    \gpuOptions\DC20\n\
    \\DC4allow_soft_placement\CAN\a \SOH(\bR\DC2allowSoftPlacement\DC20\n\
    \\DC4log_device_placement\CAN\b \SOH(\bR\DC2logDevicePlacement\DC2=\n\
    \\rgraph_options\CAN\n\
    \ \SOH(\v2\CAN.tensorflow.GraphOptionsR\fgraphOptions\DC25\n\
    \\ETBoperation_timeout_in_ms\CAN\v \SOH(\ETXR\DC4operationTimeoutInMs\DC27\n\
    \\vrpc_options\CAN\r \SOH(\v2\SYN.tensorflow.RPCOptionsR\n\
    \rpcOptions\DC27\n\
    \\vcluster_def\CAN\SO \SOH(\v2\SYN.tensorflow.ClusterDefR\n\
    \clusterDef\DC22\n\
    \\NAKisolate_session_state\CAN\SI \SOH(\bR\DC3isolateSessionState\DC2F\n\
    \ share_cluster_devices_in_session\CAN\DC1 \SOH(\bR\FSshareClusterDevicesInSession\DC2H\n\
    \\fexperimental\CAN\DLE \SOH(\v2$.tensorflow.ConfigProto.ExperimentalR\fexperimental\SUB>\n\
    \\DLEDeviceCountEntry\DC2\DLE\n\
    \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2\DC4\n\
    \\ENQvalue\CAN\STX \SOH(\ENQR\ENQvalue:\STX8\SOH\SUB\181\a\n\
    \\fExperimental\DC26\n\
    \\ETBcollective_group_leader\CAN\SOH \SOH(\tR\NAKcollectiveGroupLeader\DC2#\n\
    \\rexecutor_type\CAN\ETX \SOH(\tR\fexecutorType\DC2+\n\
    \\DC2recv_buf_max_chunk\CAN\EOT \SOH(\ENQR\SIrecvBufMaxChunk\DC2*\n\
    \\DC1use_numa_affinity\CAN\ENQ \SOH(\bR\SIuseNumaAffinity\DC2a\n\
    \-collective_deterministic_sequential_execution\CAN\ACK \SOH(\bR*collectiveDeterministicSequentialExecution\DC2'\n\
    \\SIcollective_nccl\CAN\a \SOH(\bR\SOcollectiveNccl\DC2a\n\
    \.share_session_state_in_clusterspec_propagation\CAN\b \SOH(\bR)shareSessionStateInClusterspecPropagation\DC26\n\
    \\ETBdisable_thread_spinning\CAN\t \SOH(\bR\NAKdisableThreadSpinning\DC2F\n\
    \ share_cluster_devices_in_session\CAN\n\
    \ \SOH(\bR\FSshareClusterDevicesInSession\DC2F\n\
    \\DLEsession_metadata\CAN\v \SOH(\v2\ESC.tensorflow.SessionMetadataR\SIsessionMetadata\DC29\n\
    \\EMoptimize_for_static_graph\CAN\f \SOH(\bR\SYNoptimizeForStaticGraph\DC2,\n\
    \\DC2enable_mlir_bridge\CAN\r \SOH(\bR\DLEenableMlirBridge\DC2C\n\
    \\RSenable_mlir_graph_optimization\CAN\DLE \SOH(\bR\ESCenableMlirGraphOptimization\DC2E\n\
    \\USdisable_output_partition_graphs\CAN\SO \SOH(\bR\FSdisableOutputPartitionGraphs\DC2=\n\
    \\ESCxla_fusion_autotuner_thresh\CAN\SI \SOH(\ETXR\CANxlaFusionAutotunerThreshJ\EOT\b\STX\DLE\ETX\"\168\ACK\n\
    \\n\
    \RunOptions\DC2B\n\
    \\vtrace_level\CAN\SOH \SOH(\SO2!.tensorflow.RunOptions.TraceLevelR\n\
    \traceLevel\DC2\"\n\
    \\rtimeout_in_ms\CAN\STX \SOH(\ETXR\vtimeoutInMs\DC2/\n\
    \\DC4inter_op_thread_pool\CAN\ETX \SOH(\ENQR\DC1interOpThreadPool\DC26\n\
    \\ETBoutput_partition_graphs\CAN\ENQ \SOH(\bR\NAKoutputPartitionGraphs\DC2=\n\
    \\rdebug_options\CAN\ACK \SOH(\v2\CAN.tensorflow.DebugOptionsR\fdebugOptions\DC2J\n\
    \\"report_tensor_allocations_upon_oom\CAN\a \SOH(\bR\RSreportTensorAllocationsUponOom\DC2G\n\
    \\fexperimental\CAN\b \SOH(\v2#.tensorflow.RunOptions.ExperimentalR\fexperimental\SUB\154\STX\n\
    \\fExperimental\DC20\n\
    \\DC4collective_graph_key\CAN\SOH \SOH(\ETXR\DC2collectiveGraphKey\DC2/\n\
    \\DC4use_run_handler_pool\CAN\STX \SOH(\bR\DC1useRunHandlerPool\DC2r\n\
    \\CANrun_handler_pool_options\CAN\ETX \SOH(\v29.tensorflow.RunOptions.Experimental.RunHandlerPoolOptionsR\NAKrunHandlerPoolOptions\SUB3\n\
    \\NAKRunHandlerPoolOptions\DC2\SUB\n\
    \\bpriority\CAN\SOH \SOH(\ETXR\bpriority\"R\n\
    \\n\
    \TraceLevel\DC2\f\n\
    \\bNO_TRACE\DLE\NUL\DC2\DC2\n\
    \\SOSOFTWARE_TRACE\DLE\SOH\DC2\DC2\n\
    \\SO\&HARDWARE_TRACE\DLE\STX\DC2\SO\n\
    \\n\
    \FULL_TRACE\DLE\ETXJ\EOT\b\EOT\DLE\ENQ\"\252\ETX\n\
    \\vRunMetadata\DC24\n\
    \\n\
    \step_stats\CAN\SOH \SOH(\v2\NAK.tensorflow.StepStatsR\tstepStats\DC27\n\
    \\n\
    \cost_graph\CAN\STX \SOH(\v2\CAN.tensorflow.CostGraphDefR\tcostGraph\DC2?\n\
    \\DLEpartition_graphs\CAN\ETX \ETX(\v2\DC4.tensorflow.GraphDefR\SIpartitionGraphs\DC2O\n\
    \\SIfunction_graphs\CAN\EOT \ETX(\v2&.tensorflow.RunMetadata.FunctionGraphsR\SOfunctionGraphs\SUB\235\SOH\n\
    \\SOFunctionGraphs\DC2?\n\
    \\DLEpartition_graphs\CAN\SOH \ETX(\v2\DC4.tensorflow.GraphDefR\SIpartitionGraphs\DC2J\n\
    \\SYNpre_optimization_graph\CAN\STX \SOH(\v2\DC4.tensorflow.GraphDefR\DC4preOptimizationGraph\DC2L\n\
    \\ETBpost_optimization_graph\CAN\ETX \SOH(\v2\DC4.tensorflow.GraphDefR\NAKpostOptimizationGraph\"P\n\
    \\DLETensorConnection\DC2\US\n\
    \\vfrom_tensor\CAN\SOH \SOH(\tR\n\
    \fromTensor\DC2\ESC\n\
    \\tto_tensor\CAN\STX \SOH(\tR\btoTensor\"\165\EOT\n\
    \\SICallableOptions\DC2\DC2\n\
    \\EOTfeed\CAN\SOH \ETX(\tR\EOTfeed\DC2\DC4\n\
    \\ENQfetch\CAN\STX \ETX(\tR\ENQfetch\DC2\SYN\n\
    \\ACKtarget\CAN\ETX \ETX(\tR\ACKtarget\DC27\n\
    \\vrun_options\CAN\EOT \SOH(\v2\SYN.tensorflow.RunOptionsR\n\
    \runOptions\DC2I\n\
    \\DC1tensor_connection\CAN\ENQ \ETX(\v2\FS.tensorflow.TensorConnectionR\DLEtensorConnection\DC2O\n\
    \\ffeed_devices\CAN\ACK \ETX(\v2,.tensorflow.CallableOptions.FeedDevicesEntryR\vfeedDevices\DC2R\n\
    \\rfetch_devices\CAN\a \ETX(\v2-.tensorflow.CallableOptions.FetchDevicesEntryR\ffetchDevices\DC2&\n\
    \\SIfetch_skip_sync\CAN\b \SOH(\bR\rfetchSkipSync\SUB>\n\
    \\DLEFeedDevicesEntry\DC2\DLE\n\
    \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2\DC4\n\
    \\ENQvalue\CAN\STX \SOH(\tR\ENQvalue:\STX8\SOH\SUB?\n\
    \\DC1FetchDevicesEntry\DC2\DLE\n\
    \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2\DC4\n\
    \\ENQvalue\CAN\STX \SOH(\tR\ENQvalue:\STX8\SOHBw\n\
    \\CANorg.tensorflow.frameworkB\fConfigProtosP\SOHZHgithub.com/tensorflow/tensorflow/tensorflow/go/core/core_protos_go_proto\248\SOH\SOHJ\232\150\STX\n\
    \\a\DC2\ENQ\NUL\NUL\167\ACK\SOH\n\
    \\b\n\
    \\SOH\f\DC2\ETX\NUL\NUL\DC2\n\
    \\b\n\
    \\SOH\STX\DC2\ETX\STX\NUL\DC3\n\
    \\t\n\
    \\STX\ETX\NUL\DC2\ETX\EOT\NUL4\n\
    \\t\n\
    \\STX\ETX\SOH\DC2\ETX\ENQ\NUL/\n\
    \\t\n\
    \\STX\ETX\STX\DC2\ETX\ACK\NUL4\n\
    \\t\n\
    \\STX\ETX\ETX\DC2\ETX\a\NUL0\n\
    \\t\n\
    \\STX\ETX\EOT\DC2\ETX\b\NUL.\n\
    \\t\n\
    \\STX\ETX\ENQ\DC2\ETX\t\NUL8\n\
    \\b\n\
    \\SOH\b\DC2\ETX\v\NUL\US\n\
    \\t\n\
    \\STX\b\US\DC2\ETX\v\NUL\US\n\
    \\b\n\
    \\SOH\b\DC2\ETX\f\NUL-\n\
    \\t\n\
    \\STX\b\b\DC2\ETX\f\NUL-\n\
    \\b\n\
    \\SOH\b\DC2\ETX\r\NUL\"\n\
    \\t\n\
    \\STX\b\n\
    \\DC2\ETX\r\NUL\"\n\
    \\b\n\
    \\SOH\b\DC2\ETX\SO\NUL1\n\
    \\t\n\
    \\STX\b\SOH\DC2\ETX\SO\NUL1\n\
    \\b\n\
    \\SOH\b\DC2\ETX\SI\NUL_\n\
    \\t\n\
    \\STX\b\v\DC2\ETX\SI\NUL_\n\
    \\v\n\
    \\STX\EOT\NUL\DC2\ENQ\DC1\NUL\205\SOH\SOH\n\
    \\n\
    \\n\
    \\ETX\EOT\NUL\SOH\DC2\ETX\DC1\b\DC2\n\
    \\226\a\n\
    \\EOT\EOT\NUL\STX\NUL\DC2\ETX#\STX-\SUB\212\a Fraction of the available GPU memory to allocate for each process.\n\
    \ 1 means to allocate all of the GPU memory, 0.5 means the process\n\
    \ allocates up to ~50% of the available GPU memory.\n\
    \\n\
    \ GPU memory is pre-allocated unless the allow_growth option is enabled.\n\
    \\n\
    \ If greater than 1.0, uses CUDA unified memory to potentially oversubscribe\n\
    \ the amount of memory available on the GPU device by using host memory as a\n\
    \ swap space. Accessing memory not available on the device will be\n\
    \ significantly slower as that would require memory transfer between the host\n\
    \ and the device. Options to reduce the memory requirement should be\n\
    \ considered before enabling this option as this may come with a negative\n\
    \ performance impact. Oversubscription using the unified memory requires\n\
    \ Pascal class or newer GPUs and it is currently only supported on the Linux\n\
    \ operating system. See\n\
    \ https://docs.nvidia.com/cuda/cuda-c-programming-guide/index.html#um-requirements\n\
    \ for the detailed requirements.\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(\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\NUL\ETX\DC2\ETX#+,\n\
    \\147\SOH\n\
    \\EOT\EOT\NUL\STX\SOH\DC2\ETX'\STX\CAN\SUB\133\SOH If true, the allocator does not pre-allocate the entire specified\n\
    \ GPU memory region, instead starting small and growing as needed.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SOH\ENQ\DC2\ETX'\STX\ACK\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SOH\SOH\DC2\ETX'\a\DC3\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SOH\ETX\DC2\ETX'\SYN\ETB\n\
    \\139\STX\n\
    \\EOT\EOT\NUL\STX\STX\DC2\ETX1\STX\FS\SUB\253\SOH The type of GPU allocation strategy to use.\n\
    \\n\
    \ Allowed values:\n\
    \ \"\": The empty string (default) uses a system-chosen default\n\
    \     which may change over time.\n\
    \\n\
    \ \"BFC\": A \"Best-fit with coalescing\" algorithm, simplified from a\n\
    \        version of dlmalloc.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\STX\ENQ\DC2\ETX1\STX\b\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\STX\SOH\DC2\ETX1\t\ETB\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\STX\ETX\DC2\ETX1\SUB\ESC\n\
    \\178\SOH\n\
    \\EOT\EOT\NUL\STX\ETX\DC2\ETX6\STX$\SUB\164\SOH Delay deletion of up to this many bytes to reduce the number of\n\
    \ interactions with gpu driver code.  If 0, the system chooses\n\
    \ a reasonable default (several MBs).\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ETX\ENQ\DC2\ETX6\STX\a\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ETX\SOH\DC2\ETX6\b\US\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ETX\ETX\DC2\ETX6\"#\n\
    \\220\t\n\
    \\EOT\EOT\NUL\STX\EOT\DC2\ETXM\STX!\SUB\206\t A comma-separated list of GPU ids that determines the 'visible'\n\
    \ to 'virtual' mapping of GPU devices.  For example, if TensorFlow\n\
    \ can see 8 GPU devices in the process, and one wanted to map\n\
    \ visible GPU devices 5 and 3 as \"/device:GPU:0\", and \"/device:GPU:1\",\n\
    \ then one would specify this field as \"5,3\".  This field is similar in\n\
    \ spirit to the CUDA_VISIBLE_DEVICES environment variable, except\n\
    \ it applies to the visible GPU devices in the process.\n\
    \\n\
    \ NOTE:\n\
    \ 1. The GPU driver provides the process with the visible GPUs\n\
    \    in an order which is not guaranteed to have any correlation to\n\
    \    the *physical* GPU id in the machine.  This field is used for\n\
    \    remapping \"visible\" to \"virtual\", which means this operates only\n\
    \    after the process starts.  Users are required to use vendor\n\
    \    specific mechanisms (e.g., CUDA_VISIBLE_DEVICES) to control the\n\
    \    physical to visible device mapping prior to invoking TensorFlow.\n\
    \ 2. In the code, the ids in this list are also called \"platform GPU id\"s,\n\
    \    and the 'virtual' ids of GPU devices (i.e. the ids in the device\n\
    \    name \"/device:GPU:<id>\") are also called \"TF GPU id\"s. Please\n\
    \    refer to third_party/tensorflow/core/common_runtime/gpu/gpu_id.h\n\
    \    for more information.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\EOT\ENQ\DC2\ETXM\STX\b\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\EOT\SOH\DC2\ETXM\t\FS\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\EOT\ETX\DC2\ETXM\US \n\
    \\193\SOH\n\
    \\EOT\EOT\NUL\STX\ENQ\DC2\ETXR\STX'\SUB\179\SOH In the event polling loop sleep this many microseconds between\n\
    \ PollEvents calls, when the queue is not empty.  If value is not\n\
    \ set or set to 0, gets set to a non-zero default.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ENQ\ENQ\DC2\ETXR\STX\a\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ENQ\SOH\DC2\ETXR\b\"\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ENQ\ETX\DC2\ETXR%&\n\
    \4\n\
    \\EOT\EOT\NUL\STX\ACK\DC2\ETXU\STX)\SUB' This field is deprecated and ignored.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ACK\ENQ\DC2\ETXU\STX\a\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ACK\SOH\DC2\ETXU\b$\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ACK\ETX\DC2\ETXU'(\n\
    \\154\ENQ\n\
    \\EOT\EOT\NUL\STX\a\DC2\ETXa\STX \SUB\140\ENQ Force all tensors to be gpu_compatible. On a GPU-enabled TensorFlow,\n\
    \ enabling this option forces all CPU tensors to be allocated with Cuda\n\
    \ pinned memory. Normally, TensorFlow will infer which tensors should be\n\
    \ allocated as the pinned memory. But in case where the inference is\n\
    \ incomplete, this option can significantly speed up the cross-device memory\n\
    \ copy performance as long as it fits the memory.\n\
    \ Note that this option is not something that should be\n\
    \ enabled by default for unknown or very large models, since all Cuda pinned\n\
    \ memory is unpageable, having too much pinned memory might negatively impact\n\
    \ the overall host system performance.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\a\ENQ\DC2\ETXa\STX\ACK\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\a\SOH\DC2\ETXa\a\ESC\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\a\ETX\DC2\ETXa\RS\US\n\
    \\r\n\
    \\EOT\EOT\NUL\ETX\NUL\DC2\ENQc\STX\199\SOH\ETX\n\
    \\f\n\
    \\ENQ\EOT\NUL\ETX\NUL\SOH\DC2\ETXc\n\
    \\SYN\n\
    \a\n\
    \\ACK\EOT\NUL\ETX\NUL\ETX\NUL\DC2\EOTf\EOT|\ENQ\SUBQ Configuration for breaking down a visible GPU into multiple \"virtual\"\n\
    \ devices.\n\
    \\n\
    \\SO\n\
    \\a\EOT\NUL\ETX\NUL\ETX\NUL\SOH\DC2\ETXf\f\SUB\n\
    \\165\ETX\n\
    \\b\EOT\NUL\ETX\NUL\ETX\NUL\STX\NUL\DC2\ETXo\ACK)\SUB\147\ETX Per \"virtual\" device memory limit, in MB. The number of elements in\n\
    \ the list is the number of virtual devices to create on the\n\
    \ corresponding visible GPU (see \"virtual_devices\" below).\n\
    \ If empty, it will create single virtual device taking all available\n\
    \ memory from the device.\n\
    \\n\
    \ For the concept of \"visible\" and \"virtual\" GPU, see the comments for\n\
    \ \"visible_device_list\" above for more information.\n\
    \\n\
    \\DLE\n\
    \\t\EOT\NUL\ETX\NUL\ETX\NUL\STX\NUL\EOT\DC2\ETXo\ACK\SO\n\
    \\DLE\n\
    \\t\EOT\NUL\ETX\NUL\ETX\NUL\STX\NUL\ENQ\DC2\ETXo\SI\DC4\n\
    \\DLE\n\
    \\t\EOT\NUL\ETX\NUL\ETX\NUL\STX\NUL\SOH\DC2\ETXo\NAK$\n\
    \\DLE\n\
    \\t\EOT\NUL\ETX\NUL\ETX\NUL\STX\NUL\ETX\DC2\ETXo'(\n\
    \\225\ETX\n\
    \\b\EOT\NUL\ETX\NUL\ETX\NUL\STX\SOH\DC2\ETX{\ACK\"\SUB\207\ETX Priority values to use with the virtual devices. Use the cuda function\n\
    \ cudaDeviceGetStreamPriorityRange to query for valid range of values for\n\
    \ priority.\n\
    \\n\
    \ On a P4000 GPU with cuda 10.1, the priority range reported was 0 for\n\
    \ least priority and -1 for greatest priority.\n\
    \\n\
    \ If this field is not specified, then the virtual devices will be\n\
    \ created with the default. If this field has values set, then the size\n\
    \ of this must match with the above memory_limit_mb.\n\
    \\n\
    \\DLE\n\
    \\t\EOT\NUL\ETX\NUL\ETX\NUL\STX\SOH\EOT\DC2\ETX{\ACK\SO\n\
    \\DLE\n\
    \\t\EOT\NUL\ETX\NUL\ETX\NUL\STX\SOH\ENQ\DC2\ETX{\SI\DC4\n\
    \\DLE\n\
    \\t\EOT\NUL\ETX\NUL\ETX\NUL\STX\SOH\SOH\DC2\ETX{\NAK\GS\n\
    \\DLE\n\
    \\t\EOT\NUL\ETX\NUL\ETX\NUL\STX\SOH\ETX\DC2\ETX{ !\n\
    \\174\t\n\
    \\ACK\EOT\NUL\ETX\NUL\STX\NUL\DC2\EOT\149\SOH\EOT0\SUB\157\t The multi virtual device settings. If empty (not set), it will create\n\
    \ single virtual device on each visible GPU, according to the settings\n\
    \ in \"visible_device_list\" above. Otherwise, the number of elements in the\n\
    \ list must be the same as the number of visible GPUs (after\n\
    \ \"visible_device_list\" filtering if it is set), and the string represented\n\
    \ device names (e.g. /device:GPU:<id>) will refer to the virtual\n\
    \ devices and have the <id> field assigned sequentially starting from 0,\n\
    \ according to the order they appear in this list and the \"memory_limit\"\n\
    \ list inside each element. For example,\n\
    \   visible_device_list = \"1,0\"\n\
    \   virtual_devices { memory_limit: 1GB memory_limit: 2GB }\n\
    \   virtual_devices {}\n\
    \ will create three virtual devices as:\n\
    \   /device:GPU:0 -> visible GPU 1 with 1GB memory\n\
    \   /device:GPU:1 -> visible GPU 1 with 2GB memory\n\
    \   /device:GPU:2 -> visible GPU 0 with all available memory\n\
    \\n\
    \ NOTE:\n\
    \ 1. It's invalid to set both this and \"per_process_gpu_memory_fraction\"\n\
    \    at the same time.\n\
    \ 2. Currently this setting is per-process, not per-session. Using\n\
    \    different settings in different sessions within same process will\n\
    \    result in undefined behavior.\n\
    \\n\
    \\SI\n\
    \\a\EOT\NUL\ETX\NUL\STX\NUL\EOT\DC2\EOT\149\SOH\EOT\f\n\
    \\SI\n\
    \\a\EOT\NUL\ETX\NUL\STX\NUL\ACK\DC2\EOT\149\SOH\r\ESC\n\
    \\SI\n\
    \\a\EOT\NUL\ETX\NUL\STX\NUL\SOH\DC2\EOT\149\SOH\FS+\n\
    \\SI\n\
    \\a\EOT\NUL\ETX\NUL\STX\NUL\ETX\DC2\EOT\149\SOH./\n\
    \\230\ETX\n\
    \\ACK\EOT\NUL\ETX\NUL\STX\SOH\DC2\EOT\158\SOH\EOT \SUB\213\ETX If true, uses CUDA unified memory for memory allocations. If\n\
    \ per_process_gpu_memory_fraction option is greater than 1.0, then unified\n\
    \ memory is used regardless of the value for this field. See comments for\n\
    \ per_process_gpu_memory_fraction field for more details and requirements\n\
    \ of the unified memory. This option is useful to oversubscribe memory if\n\
    \ multiple processes are sharing a single GPU while individually using less\n\
    \ than 1.0 per process memory fraction.\n\
    \\n\
    \\SI\n\
    \\a\EOT\NUL\ETX\NUL\STX\SOH\ENQ\DC2\EOT\158\SOH\EOT\b\n\
    \\SI\n\
    \\a\EOT\NUL\ETX\NUL\STX\SOH\SOH\DC2\EOT\158\SOH\t\ESC\n\
    \\SI\n\
    \\a\EOT\NUL\ETX\NUL\STX\SOH\ETX\DC2\EOT\158\SOH\RS\US\n\
    \\162\SOH\n\
    \\ACK\EOT\NUL\ETX\NUL\STX\STX\DC2\EOT\163\SOH\EOT*\SUB\145\SOH If > 1, the number of device-to-device copy streams to create\n\
    \ for each GPUDevice.  Default value is 0, which is automatically\n\
    \ converted to 1.\n\
    \\n\
    \\SI\n\
    \\a\EOT\NUL\ETX\NUL\STX\STX\ENQ\DC2\EOT\163\SOH\EOT\t\n\
    \\SI\n\
    \\a\EOT\NUL\ETX\NUL\STX\STX\SOH\DC2\EOT\163\SOH\n\
    \%\n\
    \\SI\n\
    \\a\EOT\NUL\ETX\NUL\STX\STX\ETX\DC2\EOT\163\SOH()\n\
    \\180\ETX\n\
    \\ACK\EOT\NUL\ETX\NUL\STX\ETX\DC2\EOT\171\SOH\EOT%\SUB\163\ETX If non-empty, defines a good GPU ring order on a single worker based on\n\
    \ device interconnect.  This assumes that all workers have the same GPU\n\
    \ topology.  Specify as a comma-separated string, e.g. \"3,2,1,0,7,6,5,4\".\n\
    \ This ring order is used by the RingReducer implementation of\n\
    \ CollectiveReduce, and serves as an override to automatic ring order\n\
    \ generation in OrderTaskDeviceMap() during CollectiveParam resolution.\n\
    \\n\
    \\SI\n\
    \\a\EOT\NUL\ETX\NUL\STX\ETX\ENQ\DC2\EOT\171\SOH\EOT\n\
    \\n\
    \\SI\n\
    \\a\EOT\NUL\ETX\NUL\STX\ETX\SOH\DC2\EOT\171\SOH\v \n\
    \\SI\n\
    \\a\EOT\NUL\ETX\NUL\STX\ETX\ETX\DC2\EOT\171\SOH#$\n\
    \\128\STX\n\
    \\ACK\EOT\NUL\ETX\NUL\STX\EOT\DC2\EOT\177\SOH\EOT#\SUB\239\SOH If true then extra work is done by GPUDevice and GPUBFCAllocator to\n\
    \ keep track of when GPU memory is freed and when kernels actually\n\
    \ complete so that we can know when a nominally free memory chunk\n\
    \ is really not subject to pending use.\n\
    \\n\
    \\SI\n\
    \\a\EOT\NUL\ETX\NUL\STX\EOT\ENQ\DC2\EOT\177\SOH\EOT\b\n\
    \\SI\n\
    \\a\EOT\NUL\ETX\NUL\STX\EOT\SOH\DC2\EOT\177\SOH\t\RS\n\
    \\SI\n\
    \\a\EOT\NUL\ETX\NUL\STX\EOT\ETX\DC2\EOT\177\SOH!\"\n\
    \\181\STX\n\
    \\ACK\EOT\NUL\ETX\NUL\STX\ENQ\DC2\EOT\187\SOH\EOT*\SUB\146\STX Parameters for GPUKernelTracker.  By default no kernel tracking is done.\n\
    \ Note that timestamped_allocator is only effective if some tracking is\n\
    \ specified.\n\
    \\n\
    \ If kernel_tracker_max_interval = n > 0, then a tracking event\n\
    \ is inserted after every n kernels without an event.\n\
    \2\DLE reserved id: 6\n\
    \\n\
    \\SI\n\
    \\a\EOT\NUL\ETX\NUL\STX\ENQ\ENQ\DC2\EOT\187\SOH\EOT\t\n\
    \\SI\n\
    \\a\EOT\NUL\ETX\NUL\STX\ENQ\SOH\DC2\EOT\187\SOH\n\
    \%\n\
    \\SI\n\
    \\a\EOT\NUL\ETX\NUL\STX\ENQ\ETX\DC2\EOT\187\SOH()\n\
    \\158\STX\n\
    \\ACK\EOT\NUL\ETX\NUL\STX\ACK\DC2\EOT\193\SOH\EOT'\SUB\141\STX If kernel_tracker_max_bytes = n > 0, then a tracking event is\n\
    \ inserted after every series of kernels allocating a sum of\n\
    \ memory >= n.  If one kernel allocates b * n bytes, then one\n\
    \ event will be inserted after it, but it will count as b against\n\
    \ the pending limit.\n\
    \\n\
    \\SI\n\
    \\a\EOT\NUL\ETX\NUL\STX\ACK\ENQ\DC2\EOT\193\SOH\EOT\t\n\
    \\SI\n\
    \\a\EOT\NUL\ETX\NUL\STX\ACK\SOH\DC2\EOT\193\SOH\n\
    \\"\n\
    \\SI\n\
    \\a\EOT\NUL\ETX\NUL\STX\ACK\ETX\DC2\EOT\193\SOH%&\n\
    \\209\SOH\n\
    \\ACK\EOT\NUL\ETX\NUL\STX\a\DC2\EOT\198\SOH\EOT)\SUB\192\SOH If kernel_tracker_max_pending > 0 then no more than this many\n\
    \ tracking events can be outstanding at a time.  An attempt to\n\
    \ launch an additional kernel will stall until an event\n\
    \ completes.\n\
    \\n\
    \\SI\n\
    \\a\EOT\NUL\ETX\NUL\STX\a\ENQ\DC2\EOT\198\SOH\EOT\t\n\
    \\SI\n\
    \\a\EOT\NUL\ETX\NUL\STX\a\SOH\DC2\EOT\198\SOH\n\
    \$\n\
    \\SI\n\
    \\a\EOT\NUL\ETX\NUL\STX\a\ETX\DC2\EOT\198\SOH'(\n\
    \\169\SOH\n\
    \\EOT\EOT\NUL\STX\b\DC2\EOT\204\SOH\STX \SUB\154\SOH Everything inside experimental is subject to change and is not subject\n\
    \ to API stability guarantees in\n\
    \ https://www.tensorflow.org/guide/version_compat.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\NUL\STX\b\ACK\DC2\EOT\204\SOH\STX\SO\n\
    \\r\n\
    \\ENQ\EOT\NUL\STX\b\SOH\DC2\EOT\204\SOH\SI\ESC\n\
    \\r\n\
    \\ENQ\EOT\NUL\STX\b\ETX\DC2\EOT\204\SOH\RS\US\n\
    \5\n\
    \\STX\EOT\SOH\DC2\ACK\208\SOH\NUL\253\SOH\SOH\SUB' Options passed to the graph optimizer\n\
    \\n\
    \\v\n\
    \\ETX\EOT\SOH\SOH\DC2\EOT\208\SOH\b\CAN\n\
    \S\n\
    \\EOT\EOT\SOH\STX\NUL\DC2\EOT\210\SOH\STX/\SUBE If true, optimize the graph using common subexpression elimination.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SOH\STX\NUL\ENQ\DC2\EOT\210\SOH\STX\ACK\n\
    \\r\n\
    \\ENQ\EOT\SOH\STX\NUL\SOH\DC2\EOT\210\SOH\a*\n\
    \\r\n\
    \\ENQ\EOT\SOH\STX\NUL\ETX\DC2\EOT\210\SOH-.\n\
    \L\n\
    \\EOT\EOT\SOH\STX\SOH\DC2\EOT\213\SOH\STX\US\SUB> If true, perform constant folding optimization on the graph.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SOH\STX\SOH\ENQ\DC2\EOT\213\SOH\STX\ACK\n\
    \\r\n\
    \\ENQ\EOT\SOH\STX\SOH\SOH\DC2\EOT\213\SOH\a\SUB\n\
    \\r\n\
    \\ENQ\EOT\SOH\STX\SOH\ETX\DC2\EOT\213\SOH\GS\RS\n\
    \\220\STX\n\
    \\EOT\EOT\SOH\STX\STX\DC2\EOT\220\SOH\STX)\SUB\205\STX Constant folding optimization replaces tensors whose values can be\n\
    \ predetermined, with constant nodes. To avoid inserting too large constants,\n\
    \ the size of each constant created can be limited. If this value is zero, a\n\
    \ default limit of 10 MiB will be applied. If constant folding optimization\n\
    \ is disabled, this value is ignored.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SOH\STX\STX\ENQ\DC2\EOT\220\SOH\STX\a\n\
    \\r\n\
    \\ENQ\EOT\SOH\STX\STX\SOH\DC2\EOT\220\SOH\b$\n\
    \\r\n\
    \\ENQ\EOT\SOH\STX\STX\ETX\DC2\EOT\220\SOH'(\n\
    \@\n\
    \\EOT\EOT\SOH\STX\ETX\DC2\EOT\223\SOH\STX \SUB2 If true, perform function inlining on the graph.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SOH\STX\ETX\ENQ\DC2\EOT\223\SOH\STX\ACK\n\
    \\r\n\
    \\ENQ\EOT\SOH\STX\ETX\SOH\DC2\EOT\223\SOH\a\ESC\n\
    \\r\n\
    \\ENQ\EOT\SOH\STX\ETX\ETX\DC2\EOT\223\SOH\RS\US\n\
    \$\n\
    \\EOT\EOT\SOH\EOT\NUL\DC2\ACK\226\SOH\STX\235\SOH\ETX\SUB\DC4 Optimization level\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SOH\EOT\NUL\SOH\DC2\EOT\226\SOH\a\f\n\
    \\132\SOH\n\
    \\ACK\EOT\SOH\EOT\NUL\STX\NUL\DC2\EOT\231\SOH\EOT\v\SUBt L1 is the default level.\n\
    \ Optimization performed at L1 :\n\
    \ 1. Common subexpression elimination\n\
    \ 2. Constant folding\n\
    \\n\
    \\SI\n\
    \\a\EOT\SOH\EOT\NUL\STX\NUL\SOH\DC2\EOT\231\SOH\EOT\ACK\n\
    \\SI\n\
    \\a\EOT\SOH\EOT\NUL\STX\NUL\STX\DC2\EOT\231\SOH\t\n\
    \\n\
    \\"\n\
    \\ACK\EOT\SOH\EOT\NUL\STX\SOH\DC2\EOT\234\SOH\EOT\f\SUB\DC2 No optimizations\n\
    \\n\
    \\SI\n\
    \\a\EOT\SOH\EOT\NUL\STX\SOH\SOH\DC2\EOT\234\SOH\EOT\ACK\n\
    \\SI\n\
    \\a\EOT\SOH\EOT\NUL\STX\SOH\STX\DC2\EOT\234\SOH\t\v\n\
    \\165\SOH\n\
    \\EOT\EOT\SOH\STX\EOT\DC2\EOT\239\SOH\STX\SYN\SUB\150\SOH Overall optimization level. The actual optimizations applied will be the\n\
    \ logical OR of the flags that this level implies and any flags already set.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SOH\STX\EOT\ACK\DC2\EOT\239\SOH\STX\a\n\
    \\r\n\
    \\ENQ\EOT\SOH\STX\EOT\SOH\DC2\EOT\239\SOH\b\DC1\n\
    \\r\n\
    \\ENQ\EOT\SOH\STX\EOT\ETX\DC2\EOT\239\SOH\DC4\NAK\n\
    \E\n\
    \\EOT\EOT\SOH\EOT\SOH\DC2\ACK\242\SOH\STX\251\SOH\ETX\SUB5 Control the use of the compiler/jit.  Experimental.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SOH\EOT\SOH\SOH\DC2\EOT\242\SOH\a\NAK\n\
    \L\n\
    \\ACK\EOT\SOH\EOT\SOH\STX\NUL\DC2\EOT\243\SOH\EOT\DLE\"< Default setting (\"off\" now, but later expected to be \"on\")\n\
    \\n\
    \\SI\n\
    \\a\EOT\SOH\EOT\SOH\STX\NUL\SOH\DC2\EOT\243\SOH\EOT\v\n\
    \\SI\n\
    \\a\EOT\SOH\EOT\SOH\STX\NUL\STX\DC2\EOT\243\SOH\SO\SI\n\
    \\SO\n\
    \\ACK\EOT\SOH\EOT\SOH\STX\SOH\DC2\EOT\244\SOH\EOT\r\n\
    \\SI\n\
    \\a\EOT\SOH\EOT\SOH\STX\SOH\SOH\DC2\EOT\244\SOH\EOT\a\n\
    \\SI\n\
    \\a\EOT\SOH\EOT\SOH\STX\SOH\STX\DC2\EOT\244\SOH\n\
    \\f\n\
    \\132\STX\n\
    \\ACK\EOT\SOH\EOT\SOH\STX\STX\DC2\EOT\249\SOH\EOT\r\SUB\243\SOH The following settings turn on compilation, with higher values being\n\
    \ more aggressive.  Higher values may reduce opportunities for parallelism\n\
    \ and may use more memory.  (At present, there is no distinction, but this\n\
    \ is expected to change.)\n\
    \\n\
    \\SI\n\
    \\a\EOT\SOH\EOT\SOH\STX\STX\SOH\DC2\EOT\249\SOH\EOT\b\n\
    \\SI\n\
    \\a\EOT\SOH\EOT\SOH\STX\STX\STX\DC2\EOT\249\SOH\v\f\n\
    \\SO\n\
    \\ACK\EOT\SOH\EOT\SOH\STX\ETX\DC2\EOT\250\SOH\EOT\r\n\
    \\SI\n\
    \\a\EOT\SOH\EOT\SOH\STX\ETX\SOH\DC2\EOT\250\SOH\EOT\b\n\
    \\SI\n\
    \\a\EOT\SOH\EOT\SOH\STX\ETX\STX\DC2\EOT\250\SOH\v\f\n\
    \\f\n\
    \\EOT\EOT\SOH\STX\ENQ\DC2\EOT\252\SOH\STX&\n\
    \\r\n\
    \\ENQ\EOT\SOH\STX\ENQ\ACK\DC2\EOT\252\SOH\STX\DLE\n\
    \\r\n\
    \\ENQ\EOT\SOH\STX\ENQ\SOH\DC2\EOT\252\SOH\DC1!\n\
    \\r\n\
    \\ENQ\EOT\SOH\STX\ENQ\ETX\DC2\EOT\252\SOH$%\n\
    \\f\n\
    \\STX\EOT\STX\DC2\ACK\255\SOH\NUL\172\STX\SOH\n\
    \\v\n\
    \\ETX\EOT\STX\SOH\DC2\EOT\255\SOH\b\DC4\n\
    \4\n\
    \\ETX\EOT\STX\n\
    \\DC2\EOT\129\STX\STX3\SUB' Removed, use optimizer_options below.\n\
    \\n\
    \\f\n\
    \\EOT\EOT\STX\n\
    \\NUL\DC2\EOT\129\STX\v2\n\
    \\v\n\
    \\ETX\EOT\STX\t\DC2\EOT\130\STX\STX\r\n\
    \\f\n\
    \\EOT\EOT\STX\t\NUL\DC2\EOT\130\STX\v\f\n\
    \\r\n\
    \\ENQ\EOT\STX\t\NUL\SOH\DC2\EOT\130\STX\v\f\n\
    \\r\n\
    \\ENQ\EOT\STX\t\NUL\STX\DC2\EOT\130\STX\v\f\n\
    \i\n\
    \\EOT\EOT\STX\STX\NUL\DC2\EOT\134\STX\STX\"\SUB[ If true, use control flow to schedule the activation of Recv nodes.\n\
    \ (Currently ignored.)\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\NUL\ENQ\DC2\EOT\134\STX\STX\ACK\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\NUL\SOH\DC2\EOT\134\STX\a\GS\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\NUL\ETX\DC2\EOT\134\STX !\n\
    \;\n\
    \\EOT\EOT\STX\STX\SOH\DC2\EOT\137\STX\STX)\SUB- Options controlling how graph is optimized.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\SOH\ACK\DC2\EOT\137\STX\STX\DC2\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\SOH\SOH\DC2\EOT\137\STX\DC3$\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\SOH\ETX\DC2\EOT\137\STX'(\n\
    \\168\SOH\n\
    \\EOT\EOT\STX\STX\STX\DC2\EOT\142\STX\STX\GS\SUB\153\SOH The number of steps to run before returning a cost model detailing\n\
    \ the memory usage and performance of each node of the graph. 0 means\n\
    \ no cost model.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\STX\ENQ\DC2\EOT\142\STX\STX\a\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\STX\SOH\DC2\EOT\142\STX\b\CAN\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\STX\ETX\DC2\EOT\142\STX\ESC\FS\n\
    \]\n\
    \\EOT\EOT\STX\STX\ETX\DC2\EOT\146\STX\STX#\SUBO The number of steps to skip before collecting statistics for the\n\
    \ cost model.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\ETX\ENQ\DC2\EOT\146\STX\STX\a\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\ETX\SOH\DC2\EOT\146\STX\b\RS\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\ETX\ETX\DC2\EOT\146\STX!\"\n\
    \k\n\
    \\EOT\EOT\STX\STX\EOT\DC2\EOT\150\STX\STX\CAN\SUB] Annotate each Node with Op output shape data, to the extent it can\n\
    \ be statically inferred.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\EOT\ENQ\DC2\EOT\150\STX\STX\ACK\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\EOT\SOH\DC2\EOT\150\STX\a\DC3\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\EOT\ETX\DC2\EOT\150\STX\SYN\ETB\n\
    \\238\STX\n\
    \\EOT\EOT\STX\STX\ENQ\DC2\EOT\159\STX\STX\RS\SUB\223\STX Only place the subgraphs that are run, rather than the entire graph.\n\
    \\n\
    \ This is useful for interactive graph building, where one might\n\
    \ produce graphs that cannot be placed during the debugging\n\
    \ process.  In particular, it allows the client to continue work in\n\
    \ a session after adding a node to a graph whose placement\n\
    \ constraints are unsatisfiable.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\ENQ\ENQ\DC2\EOT\159\STX\STX\ACK\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\ENQ\SOH\DC2\EOT\159\STX\a\EM\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\ENQ\ETX\DC2\EOT\159\STX\FS\GS\n\
    \M\n\
    \\EOT\EOT\STX\STX\ACK\DC2\EOT\162\STX\STX$\SUB? If true, transfer float values between processes as bfloat16.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\ACK\ENQ\DC2\EOT\162\STX\STX\ACK\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\ACK\SOH\DC2\EOT\162\STX\a\US\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\ACK\ETX\DC2\EOT\162\STX\"#\n\
    \~\n\
    \\EOT\EOT\STX\STX\a\DC2\EOT\166\STX\STX\SUB\SUBp If > 0, record a timeline every this many steps.\n\
    \ EXPERIMENTAL: This currently has no effect in MasterSession.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\a\ENQ\DC2\EOT\166\STX\STX\a\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\a\SOH\DC2\EOT\166\STX\b\NAK\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\a\ETX\DC2\EOT\166\STX\CAN\EM\n\
    \\216\SOH\n\
    \\EOT\EOT\STX\STX\b\DC2\EOT\171\STX\STX&\SUB\201\SOH Options that control the type and amount of graph rewriting.\n\
    \ Not currently configurable via the public Python API (i.e. there is no API\n\
    \ stability guarantee if you import RewriterConfig explicitly).\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\b\ACK\DC2\EOT\171\STX\STX\DLE\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\b\SOH\DC2\EOT\171\STX\DC1 \n\
    \\r\n\
    \\ENQ\EOT\STX\STX\b\ETX\DC2\EOT\171\STX#%\n\
    \\f\n\
    \\STX\EOT\ETX\DC2\ACK\174\STX\NUL\197\STX\SOH\n\
    \\v\n\
    \\ETX\EOT\ETX\SOH\DC2\EOT\174\STX\b\GS\n\
    \\187\SOH\n\
    \\EOT\EOT\ETX\STX\NUL\DC2\EOT\179\STX\STX\CAN\SUB\172\SOH The number of threads in the pool.\n\
    \\n\
    \ 0 means the system picks a value based on where this option proto is used\n\
    \ (see the declaration of the specific field for more info).\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\NUL\ENQ\DC2\EOT\179\STX\STX\a\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\NUL\SOH\DC2\EOT\179\STX\b\DC3\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\NUL\ETX\DC2\EOT\179\STX\SYN\ETB\n\
    \\247\ENQ\n\
    \\EOT\EOT\ETX\STX\SOH\DC2\EOT\196\STX\STX\EM\SUB\232\ENQ The global name of the threadpool.\n\
    \\n\
    \ If empty, then the threadpool is made and used according to the scope it's\n\
    \ in - e.g., for a session threadpool, it is used by that session only.\n\
    \\n\
    \ If non-empty, then:\n\
    \ - a global threadpool associated with this name is looked\n\
    \   up or created. This allows, for example, sharing one threadpool across\n\
    \   many sessions (e.g., like the default behavior, if\n\
    \   inter_op_parallelism_threads is not configured), but still partitioning\n\
    \   into a large and small pool.\n\
    \ - if the threadpool for this global_name already exists, then it is an\n\
    \   error if the existing pool was created using a different num_threads\n\
    \   value as is specified on this call.\n\
    \ - threadpools created this way are never garbage collected.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\SOH\ENQ\DC2\EOT\196\STX\STX\b\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\SOH\SOH\DC2\EOT\196\STX\t\DC4\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\SOH\ETX\DC2\EOT\196\STX\ETB\CAN\n\
    \\f\n\
    \\STX\EOT\EOT\DC2\ACK\199\STX\NUL\224\STX\SOH\n\
    \\v\n\
    \\ETX\EOT\EOT\SOH\DC2\EOT\199\STX\b\DC2\n\
    \\136\STX\n\
    \\EOT\EOT\EOT\STX\NUL\DC2\EOT\205\STX\STX(\SUB\249\SOH If true, always use RPC to contact the session target.\n\
    \\n\
    \ If false (the default option), TensorFlow may use an optimized\n\
    \ transport for client-master communication that avoids the RPC\n\
    \ stack. This option is primarily for used testing the RPC stack.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\NUL\ENQ\DC2\EOT\205\STX\STX\ACK\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\NUL\SOH\DC2\EOT\205\STX\a#\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\NUL\ETX\DC2\EOT\205\STX&'\n\
    \O\n\
    \\EOT\EOT\EOT\STX\SOH\DC2\EOT\208\STX\STX#\SUBA The compression algorithm to be used. One of \"deflate\", \"gzip\".\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\SOH\ENQ\DC2\EOT\208\STX\STX\b\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\SOH\SOH\DC2\EOT\208\STX\t\RS\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\SOH\ETX\DC2\EOT\208\STX!\"\n\
    \u\n\
    \\EOT\EOT\EOT\STX\STX\DC2\EOT\212\STX\STX\RS\SUBg If compression_algorithm is set, the compression level to be used.\n\
    \ From 0 (no compression), up to 3.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\STX\ENQ\DC2\EOT\212\STX\STX\a\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\STX\SOH\DC2\EOT\212\STX\b\EM\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\STX\ETX\DC2\EOT\212\STX\FS\GS\n\
    \\195\ETX\n\
    \\EOT\EOT\EOT\STX\ETX\DC2\EOT\220\STX\STX\RS\SUB\180\ETX Setting cache_rpc_response to true will enable sender side caching of\n\
    \ response for RecvTensorAsync and RecvBufAsync to allow receiver to retry\n\
    \ requests . This is only necessary when the network fabric is experiencing a\n\
    \ significant error rate.  Without it we'll fail a step on an network error,\n\
    \ while with it we'll be able to complete long steps (like complex\n\
    \ initializations) in the face of some network errors during RecvTensor.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\ETX\ENQ\DC2\EOT\220\STX\STX\ACK\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\ETX\SOH\DC2\EOT\220\STX\a\EM\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\ETX\ETX\DC2\EOT\220\STX\FS\GS\n\
    \O\n\
    \\EOT\EOT\EOT\STX\EOT\DC2\EOT\223\STX\STX.\SUBA Disables TCP connection sharing when opening a new RPC channel.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\EOT\ENQ\DC2\EOT\223\STX\STX\ACK\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\EOT\SOH\DC2\EOT\223\STX\a)\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\EOT\ETX\DC2\EOT\223\STX,-\n\
    \\173\STX\n\
    \\STX\EOT\ENQ\DC2\ACK\234\STX\NUL\239\STX\SOH\SUB\158\STX Metadata about the session.\n\
    \\n\
    \ This can be used by the runtime and the Ops for debugging, monitoring, etc.\n\
    \\n\
    \ The (name, version) tuple is expected to be a unique identifier for\n\
    \ sessions within the same process.\n\
    \\n\
    \ NOTE: This is currently used and propagated only by the direct session.\n\
    \\n\
    \\v\n\
    \\ETX\EOT\ENQ\SOH\DC2\EOT\234\STX\b\ETB\n\
    \\f\n\
    \\EOT\EOT\ENQ\STX\NUL\DC2\EOT\235\STX\STX\DC2\n\
    \\r\n\
    \\ENQ\EOT\ENQ\STX\NUL\ENQ\DC2\EOT\235\STX\STX\b\n\
    \\r\n\
    \\ENQ\EOT\ENQ\STX\NUL\SOH\DC2\EOT\235\STX\t\r\n\
    \\r\n\
    \\ENQ\EOT\ENQ\STX\NUL\ETX\DC2\EOT\235\STX\DLE\DC1\n\
    \B\n\
    \\EOT\EOT\ENQ\STX\SOH\DC2\EOT\238\STX\STX\DC4\SUB4 The version is optional. If set, needs to be >= 0.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ENQ\STX\SOH\ENQ\DC2\EOT\238\STX\STX\a\n\
    \\r\n\
    \\ENQ\EOT\ENQ\STX\SOH\SOH\DC2\EOT\238\STX\b\SI\n\
    \\r\n\
    \\ENQ\EOT\ENQ\STX\SOH\ETX\DC2\EOT\238\STX\DC2\DC3\n\
    \s\n\
    \\STX\EOT\ACK\DC2\ACK\243\STX\NUL\224\EOT\SOH\SUBe Session configuration parameters.\n\
    \ The system picks appropriate values for fields that are not set.\n\
    \\n\
    \\v\n\
    \\ETX\EOT\ACK\SOH\DC2\EOT\243\STX\b\DC3\n\
    \\213\SOH\n\
    \\EOT\EOT\ACK\STX\NUL\DC2\EOT\248\STX\STX&\SUB\198\SOH Map from device type name (e.g., \"CPU\" or \"GPU\" ) to maximum\n\
    \ number of devices of that type to use.  If a particular device\n\
    \ type is not found in the map, the system picks an appropriate\n\
    \ number.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\NUL\ACK\DC2\EOT\248\STX\STX\DC4\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\NUL\SOH\DC2\EOT\248\STX\NAK!\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\NUL\ETX\DC2\EOT\248\STX$%\n\
    \\238\ENQ\n\
    \\EOT\EOT\ACK\STX\SOH\DC2\EOT\136\ETX\STX)\SUB\223\ENQ The execution of an individual op (for some op types) can be\n\
    \ parallelized on a pool of intra_op_parallelism_threads.\n\
    \ 0 means the system picks an appropriate number.\n\
    \\n\
    \ If you create an ordinary session, e.g., from Python or C++,\n\
    \ then there is exactly one intra op thread pool per process.\n\
    \ The first session created determines the number of threads in this pool.\n\
    \ All subsequent sessions reuse/share this one global pool.\n\
    \\n\
    \ There are notable exceptions to the default behavior describe above:\n\
    \ 1. There is an environment variable  for overriding this thread pool,\n\
    \    named TF_OVERRIDE_GLOBAL_THREADPOOL.\n\
    \ 2. When connecting to a server, such as a remote `tf.train.Server`\n\
    \    instance, then this option will be ignored altogether.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\SOH\ENQ\DC2\EOT\136\ETX\STX\a\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\SOH\SOH\DC2\EOT\136\ETX\b$\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\SOH\ETX\DC2\EOT\136\ETX'(\n\
    \\189\ETX\n\
    \\EOT\EOT\ACK\STX\STX\DC2\EOT\147\ETX\STX)\SUB\174\ETX Nodes that perform blocking operations are enqueued on a pool of\n\
    \ inter_op_parallelism_threads available in each process.\n\
    \\n\
    \ 0 means the system picks an appropriate number.\n\
    \ Negative means all operations are performed in caller's thread.\n\
    \\n\
    \ Note that the first Session created in the process sets the\n\
    \ number of threads for all future sessions unless use_per_session_threads is\n\
    \ true or session_inter_op_thread_pool is configured.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\STX\ENQ\DC2\EOT\147\ETX\STX\a\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\STX\SOH\DC2\EOT\147\ETX\b$\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\STX\ETX\DC2\EOT\147\ETX'(\n\
    \\208\ETX\n\
    \\EOT\EOT\ACK\STX\ETX\DC2\EOT\158\ETX\STX#\SUB\193\ETX If true, use a new set of threads for this session rather than the global\n\
    \ pool of threads. Only supported by direct sessions.\n\
    \\n\
    \ If false, use the global threads created by the first session, or the\n\
    \ per-session thread pools configured by session_inter_op_thread_pool.\n\
    \\n\
    \ This option is deprecated. The same effect can be achieved by setting\n\
    \ session_inter_op_thread_pool to have one element, whose num_threads equals\n\
    \ inter_op_parallelism_threads.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\ETX\ENQ\DC2\EOT\158\ETX\STX\ACK\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\ETX\SOH\DC2\EOT\158\ETX\a\RS\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\ETX\ETX\DC2\EOT\158\ETX!\"\n\
    \\145\b\n\
    \\EOT\EOT\ACK\STX\EOT\DC2\EOT\179\ETX\STXC\SUB\130\b This option is experimental - it may be replaced with a different mechanism\n\
    \ in the future.\n\
    \\n\
    \ Configures session thread pools. If this is configured, then RunOptions for\n\
    \ a Run call can select the thread pool to use.\n\
    \\n\
    \ The intended use is for when some session invocations need to run in a\n\
    \ background pool limited to a small number of threads:\n\
    \ - For example, a session may be configured to have one large pool (for\n\
    \ regular compute) and one small pool (for periodic, low priority work);\n\
    \ using the small pool is currently the mechanism for limiting the inter-op\n\
    \ parallelism of the low priority work.  Note that it does not limit the\n\
    \ parallelism of work spawned by a single op kernel implementation.\n\
    \ - Using this setting is normally not needed in training, but may help some\n\
    \ serving use cases.\n\
    \ - It is also generally recommended to set the global_name field of this\n\
    \ proto, to avoid creating multiple large pools. It is typically better to\n\
    \ run the non-low-priority work, even across sessions, in a single large\n\
    \ pool.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\EOT\EOT\DC2\EOT\179\ETX\STX\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\EOT\ACK\DC2\EOT\179\ETX\v \n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\EOT\SOH\DC2\EOT\179\ETX!=\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\EOT\ETX\DC2\EOT\179\ETX@B\n\
    \\189\SOH\n\
    \\EOT\EOT\ACK\STX\ENQ\DC2\EOT\184\ETX\STX\GS\SUB\174\SOH Assignment of Nodes to Devices is recomputed every placement_period\n\
    \ steps until the system warms up (at which point the recomputation\n\
    \ typically slows down automatically).\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\ENQ\ENQ\DC2\EOT\184\ETX\STX\a\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\ENQ\SOH\DC2\EOT\184\ETX\b\CAN\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\ENQ\ETX\DC2\EOT\184\ETX\ESC\FS\n\
    \\197\SOH\n\
    \\EOT\EOT\ACK\STX\ACK\DC2\EOT\189\ETX\STX%\SUB\182\SOH When any filters are present sessions will ignore all devices which do not\n\
    \ match the filters. Each filter can be partially specified, e.g. \"/job:ps\"\n\
    \ \"/job:worker/replica:3\", etc.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\ACK\EOT\DC2\EOT\189\ETX\STX\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\ACK\ENQ\DC2\EOT\189\ETX\v\DC1\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\ACK\SOH\DC2\EOT\189\ETX\DC2 \n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\ACK\ETX\DC2\EOT\189\ETX#$\n\
    \/\n\
    \\EOT\EOT\ACK\STX\a\DC2\EOT\192\ETX\STX\GS\SUB! Options that apply to all GPUs.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\a\ACK\DC2\EOT\192\ETX\STX\f\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\a\SOH\DC2\EOT\192\ETX\r\CAN\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\a\ETX\DC2\EOT\192\ETX\ESC\FS\n\
    \\154\STX\n\
    \\EOT\EOT\ACK\STX\b\DC2\EOT\201\ETX\STX \SUB\139\STX Whether soft placement is allowed. If allow_soft_placement is true,\n\
    \ an op will be placed on CPU if\n\
    \   1. there's no GPU implementation for the OP\n\
    \ or\n\
    \   2. no GPU devices are known or registered\n\
    \ or\n\
    \   3. need to co-locate with reftype input(s) which are from CPU.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\b\ENQ\DC2\EOT\201\ETX\STX\ACK\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\b\SOH\DC2\EOT\201\ETX\a\ESC\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\b\ETX\DC2\EOT\201\ETX\RS\US\n\
    \;\n\
    \\EOT\EOT\ACK\STX\t\DC2\EOT\204\ETX\STX \SUB- Whether device placements should be logged.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\t\ENQ\DC2\EOT\204\ETX\STX\ACK\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\t\SOH\DC2\EOT\204\ETX\a\ESC\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\t\ETX\DC2\EOT\204\ETX\RS\US\n\
    \1\n\
    \\EOT\EOT\ACK\STX\n\
    \\DC2\EOT\207\ETX\STX\"\SUB# Options that apply to all graphs.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\n\
    \\ACK\DC2\EOT\207\ETX\STX\SO\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\n\
    \\SOH\DC2\EOT\207\ETX\SI\FS\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\n\
    \\ETX\DC2\EOT\207\ETX\US!\n\
    \\206\SOH\n\
    \\EOT\EOT\ACK\STX\v\DC2\EOT\212\ETX\STX%\SUB\191\SOH Global timeout for all blocking operations in this session.  If non-zero,\n\
    \ and not overridden on a per-operation basis, this value will be used as the\n\
    \ deadline for all blocking operations.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\v\ENQ\DC2\EOT\212\ETX\STX\a\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\v\SOH\DC2\EOT\212\ETX\b\US\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\v\ETX\DC2\EOT\212\ETX\"$\n\
    \R\n\
    \\EOT\EOT\ACK\STX\f\DC2\EOT\215\ETX\STX\RS\SUBD Options that apply when this session uses the distributed runtime.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\f\ACK\DC2\EOT\215\ETX\STX\f\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\f\SOH\DC2\EOT\215\ETX\r\CAN\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\f\ETX\DC2\EOT\215\ETX\ESC\GS\n\
    \D\n\
    \\EOT\EOT\ACK\STX\r\DC2\EOT\218\ETX\STX\RS\SUB6 Optional list of all workers to use in this session.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\r\ACK\DC2\EOT\218\ETX\STX\f\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\r\SOH\DC2\EOT\218\ETX\r\CAN\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\r\ETX\DC2\EOT\218\ETX\ESC\GS\n\
    \\225\SOH\n\
    \\EOT\EOT\ACK\STX\SO\DC2\EOT\223\ETX\STX\"\SUB\210\SOH If true, any resources such as Variables used in the session will not be\n\
    \ shared with other sessions. However, when clusterspec propagation is\n\
    \ enabled, this field is ignored and sessions are always isolated.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\SO\ENQ\DC2\EOT\223\ETX\STX\ACK\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\SO\SOH\DC2\EOT\223\ETX\a\FS\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\SO\ETX\DC2\EOT\223\ETX\US!\n\
    \\202\SOH\n\
    \\EOT\EOT\ACK\STX\SI\DC2\EOT\229\ETX\STX-\SUB\187\SOH When true, WorkerSessions are created with device attributes from the\n\
    \ full cluster.\n\
    \ This is helpful when a worker wants to partition a graph\n\
    \ (for example during a PartitionedCallOp).\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\SI\ENQ\DC2\EOT\229\ETX\STX\ACK\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\SI\SOH\DC2\EOT\229\ETX\a'\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\SI\ETX\DC2\EOT\229\ETX*,\n\
    \\171\SOH\n\
    \\EOT\EOT\ACK\ETX\SOH\DC2\ACK\234\ETX\STX\219\EOT\ETX\SUB\154\SOH Everything inside Experimental is subject to change and is not subject\n\
    \ to API stability guarantees in\n\
    \ https://www.tensorflow.org/guide/version_compat.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ACK\ETX\SOH\SOH\DC2\EOT\234\ETX\n\
    \\SYN\n\
    \1\n\
    \\ACK\EOT\ACK\ETX\SOH\STX\NUL\DC2\EOT\236\ETX\EOT'\SUB! Task name for group resolution.\n\
    \\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\NUL\ENQ\DC2\EOT\236\ETX\EOT\n\
    \\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\NUL\SOH\DC2\EOT\236\ETX\v\"\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\NUL\ETX\DC2\EOT\236\ETX%&\n\
    \\214\SOH\n\
    \\ENQ\EOT\ACK\ETX\SOH\t\DC2\EOT\242\ETX\EOT\SI\SUB\198\SOH We removed the flag client_handles_error_formatting. Marking the tag\n\
    \ number as reserved.\n\
    \ TODO(shikharagarwal): Should we just remove this tag so that it can be\n\
    \ used in future for other purpose?\n\
    \\n\
    \\SO\n\
    \\ACK\EOT\ACK\ETX\SOH\t\NUL\DC2\EOT\242\ETX\r\SO\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\t\NUL\SOH\DC2\EOT\242\ETX\r\SO\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\t\NUL\STX\DC2\EOT\242\ETX\r\SO\n\
    \q\n\
    \\ACK\EOT\ACK\ETX\SOH\STX\SOH\DC2\EOT\246\ETX\EOT\GS\SUBa Which executor to use, the default executor will be used\n\
    \ if it is an empty string or \"DEFAULT\"\n\
    \\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\SOH\ENQ\DC2\EOT\246\ETX\EOT\n\
    \\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\SOH\SOH\DC2\EOT\246\ETX\v\CAN\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\SOH\ETX\DC2\EOT\246\ETX\ESC\FS\n\
    \\204\SOH\n\
    \\ACK\EOT\ACK\ETX\SOH\STX\STX\DC2\EOT\251\ETX\EOT!\SUB\187\SOH Guidance to formatting of large RecvBuf fields for transfer.\n\
    \ Any positive value sets the max chunk size.  0 defaults to 4096.\n\
    \ Any negative value indicates no max, i.e. one chunk only.\n\
    \\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\STX\ENQ\DC2\EOT\251\ETX\EOT\t\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\STX\SOH\DC2\EOT\251\ETX\n\
    \\FS\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\STX\ETX\DC2\EOT\251\ETX\US \n\
    \\221\SOH\n\
    \\ACK\EOT\ACK\ETX\SOH\STX\ETX\DC2\EOT\128\EOT\EOT\US\SUB\204\SOH If true, and supported by the platform, the runtime will attempt to\n\
    \ use NUMA affinity where applicable.  One consequence will be the\n\
    \ existence of as many CPU devices as there are available NUMA nodes.\n\
    \\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\ETX\ENQ\DC2\EOT\128\EOT\EOT\b\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\ETX\SOH\DC2\EOT\128\EOT\t\SUB\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\ETX\ETX\DC2\EOT\128\EOT\GS\RS\n\
    \\140\SOH\n\
    \\ACK\EOT\ACK\ETX\SOH\STX\EOT\DC2\EOT\132\EOT\EOT;\SUB| If true, make collective op execution order sequential and deterministic\n\
    \ for potentially concurrent collective instances.\n\
    \\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\EOT\ENQ\DC2\EOT\132\EOT\EOT\b\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\EOT\SOH\DC2\EOT\132\EOT\t6\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\EOT\ETX\DC2\EOT\132\EOT9:\n\
    \]\n\
    \\ACK\EOT\ACK\ETX\SOH\STX\ENQ\DC2\EOT\136\EOT\EOT\GS\SUBM If true, use NCCL for CollectiveOps.  This feature is highly\n\
    \ experimental.\n\
    \\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\ENQ\ENQ\DC2\EOT\136\EOT\EOT\b\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\ENQ\SOH\DC2\EOT\136\EOT\t\CAN\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\ENQ\ETX\DC2\EOT\136\EOT\ESC\FS\n\
    \\218\a\n\
    \\ACK\EOT\ACK\ETX\SOH\STX\ACK\DC2\EOT\158\EOT\EOT<\SUB\201\a In the following, session state means the value of a variable, elements\n\
    \ in a hash table, or any other resource, accessible by worker sessions\n\
    \ held by a TF server.\n\
    \\n\
    \ When ClusterSpec propagation is enabled, the value of\n\
    \ isolate_session_state is ignored when deciding whether to share session\n\
    \ states in a TF server (for backwards compatibility reasons).\n\
    \ - If share_session_state_in_clusterspec_propagation is true, the session\n\
    \ states are shared.\n\
    \ - If share_session_state_in_clusterspec_propagation is false, session\n\
    \ states are isolated.\n\
    \\n\
    \ When clusterspec propagation is not used, the value of\n\
    \ share_session_state_in_clusterspec_propagation is ignored when deciding\n\
    \ whether to share session states in a TF server.\n\
    \ - If isolate_session_state is true, session states are isolated.\n\
    \ - If isolate_session_state is false, session states are shared.\n\
    \\n\
    \ TODO(b/129330037): Add a single API that consistently treats\n\
    \ isolate_session_state and ClusterSpec propagation.\n\
    \\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\ACK\ENQ\DC2\EOT\158\EOT\EOT\b\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\ACK\SOH\DC2\EOT\158\EOT\t7\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\ACK\ETX\DC2\EOT\158\EOT:;\n\
    \\242\SOH\n\
    \\ACK\EOT\ACK\ETX\SOH\STX\a\DC2\EOT\164\EOT\EOT%\SUB\225\SOH If using a direct session, disable spinning while waiting for work in\n\
    \ the thread pool. This may result in higher latency for completing ops,\n\
    \ but in the case where there is a lot of spinning may result in lower\n\
    \ CPU usage.\n\
    \\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\a\ENQ\DC2\EOT\164\EOT\EOT\b\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\a\SOH\DC2\EOT\164\EOT\t \n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\a\ETX\DC2\EOT\164\EOT#$\n\
    \\128\SOH\n\
    \\ACK\EOT\ACK\ETX\SOH\STX\b\DC2\EOT\168\EOT\EOT/\SUBp This was promoted to a non-experimental API. Please use\n\
    \ ConfigProto.share_cluster_devices_in_session instead.\n\
    \\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\b\ENQ\DC2\EOT\168\EOT\EOT\b\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\b\SOH\DC2\EOT\168\EOT\t)\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\b\ETX\DC2\EOT\168\EOT,.\n\
    \\207\SOH\n\
    \\ACK\EOT\ACK\ETX\SOH\STX\t\DC2\EOT\176\EOT\EOT*\SUB\190\SOH Metadata about the session.\n\
    \\n\
    \ If set, this can be used by the runtime and the Ops for debugging,\n\
    \ monitoring, etc.\n\
    \\n\
    \ NOTE: This is currently used and propagated only by the direct session.\n\
    \\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\t\ACK\DC2\EOT\176\EOT\EOT\DC3\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\t\SOH\DC2\EOT\176\EOT\DC4$\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\t\ETX\DC2\EOT\176\EOT')\n\
    \\152\STX\n\
    \\ACK\EOT\ACK\ETX\SOH\STX\n\
    \\DC2\EOT\184\EOT\EOT(\SUB\135\STX If true, the session may treat the graph as being static for optimization\n\
    \ purposes.\n\
    \\n\
    \ If this option is set to true when a session is created, the full\n\
    \ GraphDef must be passed in a single call to Session::Create(), and\n\
    \ Session::Extend() may not be supported.\n\
    \\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\n\
    \\ENQ\DC2\EOT\184\EOT\EOT\b\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\n\
    \\SOH\DC2\EOT\184\EOT\t\"\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\n\
    \\ETX\DC2\EOT\184\EOT%'\n\
    \\134\ENQ\n\
    \\ACK\EOT\ACK\ETX\SOH\STX\v\DC2\EOT\197\EOT\EOT!\SUB\245\EOT Whether to enable the MLIR-based TF->XLA bridge.\n\
    \\n\
    \ This is a replacement to the existing bridge, and not ready for\n\
    \ production usage yet.\n\
    \ If this option is set to true when a session is created, MLIR is used to\n\
    \ perform the set of graph transformations to put the graph in a form that\n\
    \ can be executed with delegation of some computations to an accelerator.\n\
    \ This builds on the model of XLA where a subset of the graph is\n\
    \ encapsulated and attached to a \"compile\" operation, whose result is fed\n\
    \ to an \"execute\" operation. The kernel for these operations is responsible\n\
    \ to lower the encapsulated graph to a particular device.\n\
    \\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\v\ENQ\DC2\EOT\197\EOT\EOT\b\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\v\SOH\DC2\EOT\197\EOT\t\ESC\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\v\ETX\DC2\EOT\197\EOT\RS \n\
    \\152\STX\n\
    \\ACK\EOT\ACK\ETX\SOH\STX\f\DC2\EOT\204\EOT\EOT-\SUB\135\STX Whether to enable the MLIR-based Graph optimizations.\n\
    \\n\
    \ This will become a part of standard Tensorflow graph optimization\n\
    \ pipeline, currently this is only used for gradual migration and testing\n\
    \ new passes that are replacing existing optimizations in Grappler.\n\
    \\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\f\ENQ\DC2\EOT\204\EOT\EOT\b\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\f\SOH\DC2\EOT\204\EOT\t'\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\f\ETX\DC2\EOT\204\EOT*,\n\
    \\232\SOH\n\
    \\ACK\EOT\ACK\ETX\SOH\STX\r\DC2\EOT\211\EOT\EOT.\SUB\215\SOH If true, the session will not store an additional copy of the graph for\n\
    \ each subgraph.\n\
    \\n\
    \ If this option is set to true when a session is created, the\n\
    \ `RunOptions.output_partition_graphs` options must not be set.\n\
    \\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\r\ENQ\DC2\EOT\211\EOT\EOT\b\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\r\SOH\DC2\EOT\211\EOT\t(\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\r\ETX\DC2\EOT\211\EOT+-\n\
    \\141\STX\n\
    \\ACK\EOT\ACK\ETX\SOH\STX\SO\DC2\EOT\218\EOT\EOT+\SUB\252\SOH Minimum number of batches run through the XLA graph before XLA fusion\n\
    \ autotuner is enabled. Default value of zero disables the autotuner.\n\
    \\n\
    \ The XLA fusion autotuner can improve performance by executing a heuristic\n\
    \ search on the compiler parameters.\n\
    \\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\SO\ENQ\DC2\EOT\218\EOT\EOT\t\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\SO\SOH\DC2\EOT\218\EOT\n\
    \%\n\
    \\SI\n\
    \\a\EOT\ACK\ETX\SOH\STX\SO\ETX\DC2\EOT\218\EOT(*\n\
    \\f\n\
    \\EOT\EOT\ACK\STX\DLE\DC2\EOT\221\EOT\STX!\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\DLE\ACK\DC2\EOT\221\EOT\STX\SO\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\DLE\SOH\DC2\EOT\221\EOT\SI\ESC\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\DLE\ETX\DC2\EOT\221\EOT\RS \n\
    \0\n\
    \\STX\EOT\a\DC2\ACK\227\EOT\NUL\161\ENQ\SOH\SUB\" Options for a single Run() call.\n\
    \\n\
    \\v\n\
    \\ETX\EOT\a\SOH\DC2\EOT\227\EOT\b\DC2\n\
    \\132\SOH\n\
    \\EOT\EOT\a\EOT\NUL\DC2\ACK\230\EOT\STX\235\EOT\ETX\SUBt TODO(pbar) Turn this into a TraceOptions proto which allows\n\
    \ tracing to be controlled in a more orthogonal manner?\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\a\EOT\NUL\SOH\DC2\EOT\230\EOT\a\DC1\n\
    \\SO\n\
    \\ACK\EOT\a\EOT\NUL\STX\NUL\DC2\EOT\231\EOT\EOT\DC1\n\
    \\SI\n\
    \\a\EOT\a\EOT\NUL\STX\NUL\SOH\DC2\EOT\231\EOT\EOT\f\n\
    \\SI\n\
    \\a\EOT\a\EOT\NUL\STX\NUL\STX\DC2\EOT\231\EOT\SI\DLE\n\
    \\SO\n\
    \\ACK\EOT\a\EOT\NUL\STX\SOH\DC2\EOT\232\EOT\EOT\ETB\n\
    \\SI\n\
    \\a\EOT\a\EOT\NUL\STX\SOH\SOH\DC2\EOT\232\EOT\EOT\DC2\n\
    \\SI\n\
    \\a\EOT\a\EOT\NUL\STX\SOH\STX\DC2\EOT\232\EOT\NAK\SYN\n\
    \\SO\n\
    \\ACK\EOT\a\EOT\NUL\STX\STX\DC2\EOT\233\EOT\EOT\ETB\n\
    \\SI\n\
    \\a\EOT\a\EOT\NUL\STX\STX\SOH\DC2\EOT\233\EOT\EOT\DC2\n\
    \\SI\n\
    \\a\EOT\a\EOT\NUL\STX\STX\STX\DC2\EOT\233\EOT\NAK\SYN\n\
    \\SO\n\
    \\ACK\EOT\a\EOT\NUL\STX\ETX\DC2\EOT\234\EOT\EOT\DC3\n\
    \\SI\n\
    \\a\EOT\a\EOT\NUL\STX\ETX\SOH\DC2\EOT\234\EOT\EOT\SO\n\
    \\SI\n\
    \\a\EOT\a\EOT\NUL\STX\ETX\STX\DC2\EOT\234\EOT\DC1\DC2\n\
    \\f\n\
    \\EOT\EOT\a\STX\NUL\DC2\EOT\236\EOT\STX\GS\n\
    \\r\n\
    \\ENQ\EOT\a\STX\NUL\ACK\DC2\EOT\236\EOT\STX\f\n\
    \\r\n\
    \\ENQ\EOT\a\STX\NUL\SOH\DC2\EOT\236\EOT\r\CAN\n\
    \\r\n\
    \\ENQ\EOT\a\STX\NUL\ETX\DC2\EOT\236\EOT\ESC\FS\n\
    \G\n\
    \\EOT\EOT\a\STX\SOH\DC2\EOT\239\EOT\STX\SUB\SUB9 Time to wait for operation to complete in milliseconds.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\a\STX\SOH\ENQ\DC2\EOT\239\EOT\STX\a\n\
    \\r\n\
    \\ENQ\EOT\a\STX\SOH\SOH\DC2\EOT\239\EOT\b\NAK\n\
    \\r\n\
    \\ENQ\EOT\a\STX\SOH\ETX\DC2\EOT\239\EOT\CAN\EM\n\
    \\157\ETX\n\
    \\EOT\EOT\a\STX\STX\DC2\EOT\247\EOT\STX!\SUB\142\ETX The thread pool to use, if session_inter_op_thread_pool is configured.\n\
    \ To use the caller thread set this to -1 - this uses the caller thread\n\
    \ to execute Session::Run() and thus avoids a context switch. Using the\n\
    \ caller thread to execute Session::Run() should be done ONLY for simple\n\
    \ graphs, where the overhead of an additional context switch is\n\
    \ comparable with the overhead of Session::Run().\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\a\STX\STX\ENQ\DC2\EOT\247\EOT\STX\a\n\
    \\r\n\
    \\ENQ\EOT\a\STX\STX\SOH\DC2\EOT\247\EOT\b\FS\n\
    \\r\n\
    \\ENQ\EOT\a\STX\STX\ETX\DC2\EOT\247\EOT\US \n\
    \p\n\
    \\EOT\EOT\a\STX\ETX\DC2\EOT\251\EOT\STX#\SUBb Whether the partition graph(s) executed by the executor(s) should be\n\
    \ outputted via RunMetadata.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\a\STX\ETX\ENQ\DC2\EOT\251\EOT\STX\ACK\n\
    \\r\n\
    \\ENQ\EOT\a\STX\ETX\SOH\DC2\EOT\251\EOT\a\RS\n\
    \\r\n\
    \\ENQ\EOT\a\STX\ETX\ETX\DC2\EOT\251\EOT!\"\n\
    \T\n\
    \\EOT\EOT\a\STX\EOT\DC2\EOT\254\EOT\STX!\SUBF EXPERIMENTAL.  Options used to initialize DebuggerState, if enabled.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\a\STX\EOT\ACK\DC2\EOT\254\EOT\STX\SO\n\
    \\r\n\
    \\ENQ\EOT\a\STX\EOT\SOH\DC2\EOT\254\EOT\SI\FS\n\
    \\r\n\
    \\ENQ\EOT\a\STX\EOT\ETX\DC2\EOT\254\EOT\US \n\
    \\231\SOH\n\
    \\EOT\EOT\a\STX\ENQ\DC2\EOT\133\ENQ\STX.\SUB\216\SOH When enabled, causes tensor allocation information to be included in\n\
    \ the error message when the Run() call fails because the allocator ran\n\
    \ out of memory (OOM).\n\
    \\n\
    \ Enabling this option can slow down the Run() call.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\a\STX\ENQ\ENQ\DC2\EOT\133\ENQ\STX\ACK\n\
    \\r\n\
    \\ENQ\EOT\a\STX\ENQ\SOH\DC2\EOT\133\ENQ\a)\n\
    \\r\n\
    \\ENQ\EOT\a\STX\ENQ\ETX\DC2\EOT\133\ENQ,-\n\
    \\171\SOH\n\
    \\EOT\EOT\a\ETX\NUL\DC2\ACK\138\ENQ\STX\156\ENQ\ETX\SUB\154\SOH Everything inside Experimental is subject to change and is not subject\n\
    \ to API stability guarantees in\n\
    \ https://www.tensorflow.org/guide/version_compat.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\a\ETX\NUL\SOH\DC2\EOT\138\ENQ\n\
    \\SYN\n\
    \\236\SOH\n\
    \\ACK\EOT\a\ETX\NUL\STX\NUL\DC2\EOT\143\ENQ\EOT#\SUB\219\SOH If non-zero, declares that this graph is going to use collective\n\
    \ ops and must synchronize step_ids with any other graph with this\n\
    \ same group_key value (in a distributed computation where tasks\n\
    \ run disjoint graphs).\n\
    \\n\
    \\SI\n\
    \\a\EOT\a\ETX\NUL\STX\NUL\ENQ\DC2\EOT\143\ENQ\EOT\t\n\
    \\SI\n\
    \\a\EOT\a\ETX\NUL\STX\NUL\SOH\DC2\EOT\143\ENQ\n\
    \\RS\n\
    \\SI\n\
    \\a\EOT\a\ETX\NUL\STX\NUL\ETX\DC2\EOT\143\ENQ!\"\n\
    \\242\SOH\n\
    \\ACK\EOT\a\ETX\NUL\STX\SOH\DC2\EOT\148\ENQ\EOT\"\SUB\225\SOH If true, then operations (using the inter-op pool) across all\n\
    \ session::run() calls will be centrally scheduled, optimizing for (median\n\
    \ and tail) latency.\n\
    \ Consider using this option for CPU-bound workloads like inference.\n\
    \\n\
    \\SI\n\
    \\a\EOT\a\ETX\NUL\STX\SOH\ENQ\DC2\EOT\148\ENQ\EOT\b\n\
    \\SI\n\
    \\a\EOT\a\ETX\NUL\STX\SOH\SOH\DC2\EOT\148\ENQ\t\GS\n\
    \\SI\n\
    \\a\EOT\a\ETX\NUL\STX\SOH\ETX\DC2\EOT\148\ENQ !\n\
    \8\n\
    \\ACK\EOT\a\ETX\NUL\ETX\NUL\DC2\ACK\150\ENQ\EOT\154\ENQ\ENQ\SUB& Options for run handler thread pool.\n\
    \\n\
    \\SI\n\
    \\a\EOT\a\ETX\NUL\ETX\NUL\SOH\DC2\EOT\150\ENQ\f!\n\
    \\163\SOH\n\
    \\b\EOT\a\ETX\NUL\ETX\NUL\STX\NUL\DC2\EOT\153\ENQ\ACK\EM\SUB\144\SOH Priority of the request. The run handler thread pool will schedule ops\n\
    \ based on the priority number. The larger number means higher priority.\n\
    \\n\
    \\DC1\n\
    \\t\EOT\a\ETX\NUL\ETX\NUL\STX\NUL\ENQ\DC2\EOT\153\ENQ\ACK\v\n\
    \\DC1\n\
    \\t\EOT\a\ETX\NUL\ETX\NUL\STX\NUL\SOH\DC2\EOT\153\ENQ\f\DC4\n\
    \\DC1\n\
    \\t\EOT\a\ETX\NUL\ETX\NUL\STX\NUL\ETX\DC2\EOT\153\ENQ\ETB\CAN\n\
    \\SO\n\
    \\ACK\EOT\a\ETX\NUL\STX\STX\DC2\EOT\155\ENQ\EOT7\n\
    \\SI\n\
    \\a\EOT\a\ETX\NUL\STX\STX\ACK\DC2\EOT\155\ENQ\EOT\EM\n\
    \\SI\n\
    \\a\EOT\a\ETX\NUL\STX\STX\SOH\DC2\EOT\155\ENQ\SUB2\n\
    \\SI\n\
    \\a\EOT\a\ETX\NUL\STX\STX\ETX\DC2\EOT\155\ENQ56\n\
    \\f\n\
    \\EOT\EOT\a\STX\ACK\DC2\EOT\158\ENQ\STX \n\
    \\r\n\
    \\ENQ\EOT\a\STX\ACK\ACK\DC2\EOT\158\ENQ\STX\SO\n\
    \\r\n\
    \\ENQ\EOT\a\STX\ACK\SOH\DC2\EOT\158\ENQ\SI\ESC\n\
    \\r\n\
    \\ENQ\EOT\a\STX\ACK\ETX\DC2\EOT\158\ENQ\RS\US\n\
    \\v\n\
    \\ETX\EOT\a\t\DC2\EOT\160\ENQ\STX\r\n\
    \\f\n\
    \\EOT\EOT\a\t\NUL\DC2\EOT\160\ENQ\v\f\n\
    \\r\n\
    \\ENQ\EOT\a\t\NUL\SOH\DC2\EOT\160\ENQ\v\f\n\
    \\r\n\
    \\ENQ\EOT\a\t\NUL\STX\DC2\EOT\160\ENQ\v\f\n\
    \K\n\
    \\STX\EOT\b\DC2\ACK\164\ENQ\NUL\194\ENQ\SOH\SUB= Metadata output (i.e., non-Tensor) for a single Run() call.\n\
    \\n\
    \\v\n\
    \\ETX\EOT\b\SOH\DC2\EOT\164\ENQ\b\DC3\n\
    \\187\SOH\n\
    \\EOT\EOT\b\STX\NUL\DC2\EOT\168\ENQ\STX\ESC\SUB\172\SOH Statistics traced for this step. Populated if tracing is turned on via the\n\
    \ \"RunOptions\" proto.\n\
    \ EXPERIMENTAL: The format and set of events may change in future versions.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\b\STX\NUL\ACK\DC2\EOT\168\ENQ\STX\v\n\
    \\r\n\
    \\ENQ\EOT\b\STX\NUL\SOH\DC2\EOT\168\ENQ\f\SYN\n\
    \\r\n\
    \\ENQ\EOT\b\STX\NUL\ETX\DC2\EOT\168\ENQ\EM\SUB\n\
    \K\n\
    \\EOT\EOT\b\STX\SOH\DC2\EOT\171\ENQ\STX\RS\SUB= The cost graph for the computation defined by the run call.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\b\STX\SOH\ACK\DC2\EOT\171\ENQ\STX\SO\n\
    \\r\n\
    \\ENQ\EOT\b\STX\SOH\SOH\DC2\EOT\171\ENQ\SI\EM\n\
    \\r\n\
    \\ENQ\EOT\b\STX\SOH\ETX\DC2\EOT\171\ENQ\FS\GS\n\
    \?\n\
    \\EOT\EOT\b\STX\STX\DC2\EOT\174\ENQ\STX)\SUB1 Graphs of the partitions executed by executors.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\b\STX\STX\EOT\DC2\EOT\174\ENQ\STX\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\b\STX\STX\ACK\DC2\EOT\174\ENQ\v\DC3\n\
    \\r\n\
    \\ENQ\EOT\b\STX\STX\SOH\DC2\EOT\174\ENQ\DC4$\n\
    \\r\n\
    \\ENQ\EOT\b\STX\STX\ETX\DC2\EOT\174\ENQ'(\n\
    \\SO\n\
    \\EOT\EOT\b\ETX\NUL\DC2\ACK\176\ENQ\STX\182\ENQ\ETX\n\
    \\r\n\
    \\ENQ\EOT\b\ETX\NUL\SOH\DC2\EOT\176\ENQ\n\
    \\CAN\n\
    \W\n\
    \\ACK\EOT\b\ETX\NUL\STX\NUL\DC2\EOT\178\ENQ\EOT+\SUBG TODO(nareshmodi): Include some sort of function/cache-key identifier?\n\
    \\n\
    \\SI\n\
    \\a\EOT\b\ETX\NUL\STX\NUL\EOT\DC2\EOT\178\ENQ\EOT\f\n\
    \\SI\n\
    \\a\EOT\b\ETX\NUL\STX\NUL\ACK\DC2\EOT\178\ENQ\r\NAK\n\
    \\SI\n\
    \\a\EOT\b\ETX\NUL\STX\NUL\SOH\DC2\EOT\178\ENQ\SYN&\n\
    \\SI\n\
    \\a\EOT\b\ETX\NUL\STX\NUL\ETX\DC2\EOT\178\ENQ)*\n\
    \\SO\n\
    \\ACK\EOT\b\ETX\NUL\STX\SOH\DC2\EOT\180\ENQ\EOT(\n\
    \\SI\n\
    \\a\EOT\b\ETX\NUL\STX\SOH\ACK\DC2\EOT\180\ENQ\EOT\f\n\
    \\SI\n\
    \\a\EOT\b\ETX\NUL\STX\SOH\SOH\DC2\EOT\180\ENQ\r#\n\
    \\SI\n\
    \\a\EOT\b\ETX\NUL\STX\SOH\ETX\DC2\EOT\180\ENQ&'\n\
    \\SO\n\
    \\ACK\EOT\b\ETX\NUL\STX\STX\DC2\EOT\181\ENQ\EOT)\n\
    \\SI\n\
    \\a\EOT\b\ETX\NUL\STX\STX\ACK\DC2\EOT\181\ENQ\EOT\f\n\
    \\SI\n\
    \\a\EOT\b\ETX\NUL\STX\STX\SOH\DC2\EOT\181\ENQ\r$\n\
    \\SI\n\
    \\a\EOT\b\ETX\NUL\STX\STX\ETX\DC2\EOT\181\ENQ'(\n\
    \\184\ENQ\n\
    \\EOT\EOT\b\STX\ETX\DC2\EOT\193\ENQ\STX.\SUB\169\ENQ This is only populated for graphs that are run as functions in TensorFlow\n\
    \ V2. There will be an entry below for each function that is traced.\n\
    \ The main use cases of the post_optimization_graph and the partition_graphs\n\
    \ is to give the caller insight into the graphs that were actually run by the\n\
    \ runtime. Additional information (such as those in step_stats) will match\n\
    \ these graphs.\n\
    \ We also include the pre_optimization_graph since it is usually easier to\n\
    \ read, and is helpful in situations where the caller wants to get a high\n\
    \ level idea of what the built graph looks like (since the various graph\n\
    \ optimization passes might change the structure of the graph significantly).\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\b\STX\ETX\EOT\DC2\EOT\193\ENQ\STX\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\b\STX\ETX\ACK\DC2\EOT\193\ENQ\v\EM\n\
    \\r\n\
    \\ENQ\EOT\b\STX\ETX\SOH\DC2\EOT\193\ENQ\SUB)\n\
    \\r\n\
    \\ENQ\EOT\b\STX\ETX\ETX\DC2\EOT\193\ENQ,-\n\
    \I\n\
    \\STX\EOT\t\DC2\ACK\197\ENQ\NUL\205\ENQ\SOH\SUB; Defines a connection between two tensors in a `GraphDef`.\n\
    \\n\
    \\v\n\
    \\ETX\EOT\t\SOH\DC2\EOT\197\ENQ\b\CAN\n\
    \q\n\
    \\EOT\EOT\t\STX\NUL\DC2\EOT\200\ENQ\STX\EM\SUBc A tensor name. The value of this tensor will be substituted for\n\
    \ the tensor named in `to_tensor`.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\t\STX\NUL\ENQ\DC2\EOT\200\ENQ\STX\b\n\
    \\r\n\
    \\ENQ\EOT\t\STX\NUL\SOH\DC2\EOT\200\ENQ\t\DC4\n\
    \\r\n\
    \\ENQ\EOT\t\STX\NUL\ETX\DC2\EOT\200\ENQ\ETB\CAN\n\
    \y\n\
    \\EOT\EOT\t\STX\SOH\DC2\EOT\204\ENQ\STX\ETB\SUBk A tensor name. The value of this tensor will be bound to the\n\
    \ value of the tensor named in `from_tensor`.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\t\STX\SOH\ENQ\DC2\EOT\204\ENQ\STX\b\n\
    \\r\n\
    \\ENQ\EOT\t\STX\SOH\SOH\DC2\EOT\204\ENQ\t\DC2\n\
    \\r\n\
    \\ENQ\EOT\t\STX\SOH\ETX\DC2\EOT\204\ENQ\NAK\SYN\n\
    \\169\SOH\n\
    \\STX\EOT\n\
    \\DC2\ACK\211\ENQ\NUL\167\ACK\SOH\SUB\154\SOH Defines a subgraph in another `GraphDef` as a set of feed points and nodes\n\
    \ to be fetched or executed.\n\
    \\n\
    \ Compare with the arguments to `Session::Run()`.\n\
    \\n\
    \\v\n\
    \\ETX\EOT\n\
    \\SOH\DC2\EOT\211\ENQ\b\ETB\n\
    \U\n\
    \\EOT\EOT\n\
    \\STX\NUL\DC2\EOT\213\ENQ\STX\ESC\SUBG Tensors to be fed in the callable. Each feed is the name of a tensor.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\NUL\EOT\DC2\EOT\213\ENQ\STX\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\NUL\ENQ\DC2\EOT\213\ENQ\v\DC1\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\NUL\SOH\DC2\EOT\213\ENQ\DC2\SYN\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\NUL\ETX\DC2\EOT\213\ENQ\EM\SUB\n\
    \\226\SOH\n\
    \\EOT\EOT\n\
    \\STX\SOH\DC2\EOT\218\ENQ\STX\FS\SUB\211\SOH Fetches. A list of tensor names. The caller of the callable expects a\n\
    \ tensor to be returned for each fetch[i] (see RunStepResponse.tensor). The\n\
    \ order of specified fetches does not change the execution order.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\SOH\EOT\DC2\EOT\218\ENQ\STX\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\SOH\ENQ\DC2\EOT\218\ENQ\v\DC1\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\SOH\SOH\DC2\EOT\218\ENQ\DC2\ETB\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\SOH\ETX\DC2\EOT\218\ENQ\SUB\ESC\n\
    \\136\SOH\n\
    \\EOT\EOT\n\
    \\STX\STX\DC2\EOT\222\ENQ\STX\GS\SUBz Target Nodes. A list of node names. The named nodes will be run by the\n\
    \ callable but their outputs will not be returned.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\STX\EOT\DC2\EOT\222\ENQ\STX\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\STX\ENQ\DC2\EOT\222\ENQ\v\DC1\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\STX\SOH\DC2\EOT\222\ENQ\DC2\CAN\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\STX\ETX\DC2\EOT\222\ENQ\ESC\FS\n\
    \9\n\
    \\EOT\EOT\n\
    \\STX\ETX\DC2\EOT\225\ENQ\STX\GS\SUB+ Options that will be applied to each run.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\ETX\ACK\DC2\EOT\225\ENQ\STX\f\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\ETX\SOH\DC2\EOT\225\ENQ\r\CAN\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\ETX\ETX\DC2\EOT\225\ENQ\ESC\FS\n\
    \\176\SOH\n\
    \\EOT\EOT\n\
    \\STX\EOT\DC2\EOT\230\ENQ\STX2\SUB\161\SOH Tensors to be connected in the callable. Each TensorConnection denotes\n\
    \ a pair of tensors in the graph, between which an edge will be created\n\
    \ in the callable.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\EOT\EOT\DC2\EOT\230\ENQ\STX\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\EOT\ACK\DC2\EOT\230\ENQ\v\ESC\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\EOT\SOH\DC2\EOT\230\ENQ\FS-\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\EOT\ETX\DC2\EOT\230\ENQ01\n\
    \\183\r\n\
    \\EOT\EOT\n\
    \\STX\ENQ\DC2\EOT\151\ACK\STX'\SUB\168\r The Tensor objects fed in the callable and fetched from the callable\n\
    \ are expected to be backed by host (CPU) memory by default.\n\
    \\n\
    \ The options below allow changing that - feeding tensors backed by\n\
    \ device memory, or returning tensors that are backed by device memory.\n\
    \\n\
    \ The maps below map the name of a feed/fetch tensor (which appears in\n\
    \ 'feed' or 'fetch' fields above), to the fully qualified name of the device\n\
    \ owning the memory backing the contents of the tensor.\n\
    \\n\
    \ For example, creating a callable with the following options:\n\
    \\n\
    \ CallableOptions {\n\
    \   feed: \"a:0\"\n\
    \   feed: \"b:0\"\n\
    \\n\
    \   fetch: \"x:0\"\n\
    \   fetch: \"y:0\"\n\
    \\n\
    \   feed_devices: {\n\
    \     \"a:0\": \"/job:localhost/replica:0/task:0/device:GPU:0\"\n\
    \   }\n\
    \\n\
    \   fetch_devices: {\n\
    \     \"y:0\": \"/job:localhost/replica:0/task:0/device:GPU:0\"\n\
    \  }\n\
    \ }\n\
    \\n\
    \ means that the Callable expects:\n\
    \ - The first argument (\"a:0\") is a Tensor backed by GPU memory.\n\
    \ - The second argument (\"b:0\") is a Tensor backed by host memory.\n\
    \ and of its return values:\n\
    \ - The first output (\"x:0\") will be backed by host memory.\n\
    \ - The second output (\"y:0\") will be backed by GPU memory.\n\
    \\n\
    \ FEEDS:\n\
    \ It is the responsibility of the caller to ensure that the memory of the fed\n\
    \ tensors will be correctly initialized and synchronized before it is\n\
    \ accessed by operations executed during the call to Session::RunCallable().\n\
    \\n\
    \ This is typically ensured by using the TensorFlow memory allocators\n\
    \ (Device::GetAllocator()) to create the Tensor to be fed.\n\
    \\n\
    \ Alternatively, for CUDA-enabled GPU devices, this typically means that the\n\
    \ operation that produced the contents of the tensor has completed, i.e., the\n\
    \ CUDA stream has been synchronized (e.g., via cuCtxSynchronize() or\n\
    \ cuStreamSynchronize()).\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\ENQ\ACK\DC2\EOT\151\ACK\STX\NAK\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\ENQ\SOH\DC2\EOT\151\ACK\SYN\"\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\ENQ\ETX\DC2\EOT\151\ACK%&\n\
    \\f\n\
    \\EOT\EOT\n\
    \\STX\ACK\DC2\EOT\152\ACK\STX(\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\ACK\ACK\DC2\EOT\152\ACK\STX\NAK\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\ACK\SOH\DC2\EOT\152\ACK\SYN#\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\ACK\ETX\DC2\EOT\152\ACK&'\n\
    \\245\EOT\n\
    \\EOT\EOT\n\
    \\STX\a\DC2\EOT\164\ACK\STX\ESC\SUB\230\EOT By default, RunCallable() will synchronize the GPU stream before returning\n\
    \ fetched tensors on a GPU device, to ensure that the values in those tensors\n\
    \ have been produced. This simplifies interacting with the tensors, but\n\
    \ potentially incurs a performance hit.\n\
    \\n\
    \ If this options is set to true, the caller is responsible for ensuring\n\
    \ that the values in the fetched tensors have been produced before they are\n\
    \ used. The caller can do this by invoking `Device::Sync()` on the underlying\n\
    \ device(s), or by feeding the tensors back to the same Session using\n\
    \ `feed_devices` with the same corresponding device name.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\a\ENQ\DC2\EOT\164\ACK\STX\ACK\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\a\SOH\DC2\EOT\164\ACK\a\SYN\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\a\ETX\DC2\EOT\164\ACK\EM\SUBb\ACKproto3"