{- HLINT ignore -}
{- This file was auto-generated from opentelemetry/proto/metrics/v1/metrics.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.Opentelemetry.Proto.Metrics.V1.Metrics (
        AggregationTemporality(..), AggregationTemporality(),
        AggregationTemporality'UnrecognizedValue, DataPointFlags(..),
        DataPointFlags(), DataPointFlags'UnrecognizedValue, Exemplar(),
        Exemplar'Value(..), _Exemplar'AsDouble, _Exemplar'AsInt,
        ExponentialHistogram(), ExponentialHistogramDataPoint(),
        ExponentialHistogramDataPoint'Buckets(), Gauge(), Histogram(),
        HistogramDataPoint(), Metric(), Metric'Data(..), _Metric'Gauge,
        _Metric'Sum, _Metric'Histogram, _Metric'ExponentialHistogram,
        _Metric'Summary, MetricsData(), NumberDataPoint(),
        NumberDataPoint'Value(..), _NumberDataPoint'AsDouble,
        _NumberDataPoint'AsInt, ResourceMetrics(), ScopeMetrics(), Sum(),
        Summary(), SummaryDataPoint(), SummaryDataPoint'ValueAtQuantile()
    ) 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.Opentelemetry.Proto.Common.V1.Common
import qualified Proto.Opentelemetry.Proto.Resource.V1.Resource
newtype AggregationTemporality'UnrecognizedValue
  = AggregationTemporality'UnrecognizedValue Data.Int.Int32
  deriving stock (AggregationTemporality'UnrecognizedValue
-> AggregationTemporality'UnrecognizedValue -> Bool
(AggregationTemporality'UnrecognizedValue
 -> AggregationTemporality'UnrecognizedValue -> Bool)
-> (AggregationTemporality'UnrecognizedValue
    -> AggregationTemporality'UnrecognizedValue -> Bool)
-> Eq AggregationTemporality'UnrecognizedValue
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: AggregationTemporality'UnrecognizedValue
-> AggregationTemporality'UnrecognizedValue -> Bool
== :: AggregationTemporality'UnrecognizedValue
-> AggregationTemporality'UnrecognizedValue -> Bool
$c/= :: AggregationTemporality'UnrecognizedValue
-> AggregationTemporality'UnrecognizedValue -> Bool
/= :: AggregationTemporality'UnrecognizedValue
-> AggregationTemporality'UnrecognizedValue -> Bool
Prelude.Eq, Eq AggregationTemporality'UnrecognizedValue
Eq AggregationTemporality'UnrecognizedValue =>
(AggregationTemporality'UnrecognizedValue
 -> AggregationTemporality'UnrecognizedValue -> Ordering)
-> (AggregationTemporality'UnrecognizedValue
    -> AggregationTemporality'UnrecognizedValue -> Bool)
-> (AggregationTemporality'UnrecognizedValue
    -> AggregationTemporality'UnrecognizedValue -> Bool)
-> (AggregationTemporality'UnrecognizedValue
    -> AggregationTemporality'UnrecognizedValue -> Bool)
-> (AggregationTemporality'UnrecognizedValue
    -> AggregationTemporality'UnrecognizedValue -> Bool)
-> (AggregationTemporality'UnrecognizedValue
    -> AggregationTemporality'UnrecognizedValue
    -> AggregationTemporality'UnrecognizedValue)
-> (AggregationTemporality'UnrecognizedValue
    -> AggregationTemporality'UnrecognizedValue
    -> AggregationTemporality'UnrecognizedValue)
-> Ord AggregationTemporality'UnrecognizedValue
AggregationTemporality'UnrecognizedValue
-> AggregationTemporality'UnrecognizedValue -> Bool
AggregationTemporality'UnrecognizedValue
-> AggregationTemporality'UnrecognizedValue -> Ordering
AggregationTemporality'UnrecognizedValue
-> AggregationTemporality'UnrecognizedValue
-> AggregationTemporality'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
$ccompare :: AggregationTemporality'UnrecognizedValue
-> AggregationTemporality'UnrecognizedValue -> Ordering
compare :: AggregationTemporality'UnrecognizedValue
-> AggregationTemporality'UnrecognizedValue -> Ordering
$c< :: AggregationTemporality'UnrecognizedValue
-> AggregationTemporality'UnrecognizedValue -> Bool
< :: AggregationTemporality'UnrecognizedValue
-> AggregationTemporality'UnrecognizedValue -> Bool
$c<= :: AggregationTemporality'UnrecognizedValue
-> AggregationTemporality'UnrecognizedValue -> Bool
<= :: AggregationTemporality'UnrecognizedValue
-> AggregationTemporality'UnrecognizedValue -> Bool
$c> :: AggregationTemporality'UnrecognizedValue
-> AggregationTemporality'UnrecognizedValue -> Bool
> :: AggregationTemporality'UnrecognizedValue
-> AggregationTemporality'UnrecognizedValue -> Bool
$c>= :: AggregationTemporality'UnrecognizedValue
-> AggregationTemporality'UnrecognizedValue -> Bool
>= :: AggregationTemporality'UnrecognizedValue
-> AggregationTemporality'UnrecognizedValue -> Bool
$cmax :: AggregationTemporality'UnrecognizedValue
-> AggregationTemporality'UnrecognizedValue
-> AggregationTemporality'UnrecognizedValue
max :: AggregationTemporality'UnrecognizedValue
-> AggregationTemporality'UnrecognizedValue
-> AggregationTemporality'UnrecognizedValue
$cmin :: AggregationTemporality'UnrecognizedValue
-> AggregationTemporality'UnrecognizedValue
-> AggregationTemporality'UnrecognizedValue
min :: AggregationTemporality'UnrecognizedValue
-> AggregationTemporality'UnrecognizedValue
-> AggregationTemporality'UnrecognizedValue
Prelude.Ord, Int -> AggregationTemporality'UnrecognizedValue -> ShowS
[AggregationTemporality'UnrecognizedValue] -> ShowS
AggregationTemporality'UnrecognizedValue -> String
(Int -> AggregationTemporality'UnrecognizedValue -> ShowS)
-> (AggregationTemporality'UnrecognizedValue -> String)
-> ([AggregationTemporality'UnrecognizedValue] -> ShowS)
-> Show AggregationTemporality'UnrecognizedValue
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> AggregationTemporality'UnrecognizedValue -> ShowS
showsPrec :: Int -> AggregationTemporality'UnrecognizedValue -> ShowS
$cshow :: AggregationTemporality'UnrecognizedValue -> String
show :: AggregationTemporality'UnrecognizedValue -> String
$cshowList :: [AggregationTemporality'UnrecognizedValue] -> ShowS
showList :: [AggregationTemporality'UnrecognizedValue] -> ShowS
Prelude.Show)
data AggregationTemporality
  = AGGREGATION_TEMPORALITY_UNSPECIFIED |
    AGGREGATION_TEMPORALITY_DELTA |
    AGGREGATION_TEMPORALITY_CUMULATIVE |
    AggregationTemporality'Unrecognized !AggregationTemporality'UnrecognizedValue
  deriving stock (Int -> AggregationTemporality -> ShowS
[AggregationTemporality] -> ShowS
AggregationTemporality -> String
(Int -> AggregationTemporality -> ShowS)
-> (AggregationTemporality -> String)
-> ([AggregationTemporality] -> ShowS)
-> Show AggregationTemporality
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> AggregationTemporality -> ShowS
showsPrec :: Int -> AggregationTemporality -> ShowS
$cshow :: AggregationTemporality -> String
show :: AggregationTemporality -> String
$cshowList :: [AggregationTemporality] -> ShowS
showList :: [AggregationTemporality] -> ShowS
Prelude.Show, AggregationTemporality -> AggregationTemporality -> Bool
(AggregationTemporality -> AggregationTemporality -> Bool)
-> (AggregationTemporality -> AggregationTemporality -> Bool)
-> Eq AggregationTemporality
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: AggregationTemporality -> AggregationTemporality -> Bool
== :: AggregationTemporality -> AggregationTemporality -> Bool
$c/= :: AggregationTemporality -> AggregationTemporality -> Bool
/= :: AggregationTemporality -> AggregationTemporality -> Bool
Prelude.Eq, Eq AggregationTemporality
Eq AggregationTemporality =>
(AggregationTemporality -> AggregationTemporality -> Ordering)
-> (AggregationTemporality -> AggregationTemporality -> Bool)
-> (AggregationTemporality -> AggregationTemporality -> Bool)
-> (AggregationTemporality -> AggregationTemporality -> Bool)
-> (AggregationTemporality -> AggregationTemporality -> Bool)
-> (AggregationTemporality
    -> AggregationTemporality -> AggregationTemporality)
-> (AggregationTemporality
    -> AggregationTemporality -> AggregationTemporality)
-> Ord AggregationTemporality
AggregationTemporality -> AggregationTemporality -> Bool
AggregationTemporality -> AggregationTemporality -> Ordering
AggregationTemporality
-> AggregationTemporality -> AggregationTemporality
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
$ccompare :: AggregationTemporality -> AggregationTemporality -> Ordering
compare :: AggregationTemporality -> AggregationTemporality -> Ordering
$c< :: AggregationTemporality -> AggregationTemporality -> Bool
< :: AggregationTemporality -> AggregationTemporality -> Bool
$c<= :: AggregationTemporality -> AggregationTemporality -> Bool
<= :: AggregationTemporality -> AggregationTemporality -> Bool
$c> :: AggregationTemporality -> AggregationTemporality -> Bool
> :: AggregationTemporality -> AggregationTemporality -> Bool
$c>= :: AggregationTemporality -> AggregationTemporality -> Bool
>= :: AggregationTemporality -> AggregationTemporality -> Bool
$cmax :: AggregationTemporality
-> AggregationTemporality -> AggregationTemporality
max :: AggregationTemporality
-> AggregationTemporality -> AggregationTemporality
$cmin :: AggregationTemporality
-> AggregationTemporality -> AggregationTemporality
min :: AggregationTemporality
-> AggregationTemporality -> AggregationTemporality
Prelude.Ord)
instance Data.ProtoLens.MessageEnum AggregationTemporality where
  maybeToEnum :: Int -> Maybe AggregationTemporality
maybeToEnum Int
0 = AggregationTemporality -> Maybe AggregationTemporality
forall a. a -> Maybe a
Prelude.Just AggregationTemporality
AGGREGATION_TEMPORALITY_UNSPECIFIED
  maybeToEnum Int
1 = AggregationTemporality -> Maybe AggregationTemporality
forall a. a -> Maybe a
Prelude.Just AggregationTemporality
AGGREGATION_TEMPORALITY_DELTA
  maybeToEnum Int
2 = AggregationTemporality -> Maybe AggregationTemporality
forall a. a -> Maybe a
Prelude.Just AggregationTemporality
AGGREGATION_TEMPORALITY_CUMULATIVE
  maybeToEnum Int
k
    = AggregationTemporality -> Maybe AggregationTemporality
forall a. a -> Maybe a
Prelude.Just
        (AggregationTemporality'UnrecognizedValue -> AggregationTemporality
AggregationTemporality'Unrecognized
           (Int32 -> AggregationTemporality'UnrecognizedValue
AggregationTemporality'UnrecognizedValue
              (Int -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int
k)))
  showEnum :: AggregationTemporality -> String
showEnum AggregationTemporality
AGGREGATION_TEMPORALITY_UNSPECIFIED
    = String
"AGGREGATION_TEMPORALITY_UNSPECIFIED"
  showEnum AggregationTemporality
AGGREGATION_TEMPORALITY_DELTA
    = String
"AGGREGATION_TEMPORALITY_DELTA"
  showEnum AggregationTemporality
AGGREGATION_TEMPORALITY_CUMULATIVE
    = String
"AGGREGATION_TEMPORALITY_CUMULATIVE"
  showEnum
    (AggregationTemporality'Unrecognized (AggregationTemporality'UnrecognizedValue Int32
k))
    = Int32 -> String
forall a. Show a => a -> String
Prelude.show Int32
k
  readEnum :: String -> Maybe AggregationTemporality
readEnum String
k
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"AGGREGATION_TEMPORALITY_UNSPECIFIED"
    = AggregationTemporality -> Maybe AggregationTemporality
forall a. a -> Maybe a
Prelude.Just AggregationTemporality
AGGREGATION_TEMPORALITY_UNSPECIFIED
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"AGGREGATION_TEMPORALITY_DELTA"
    = AggregationTemporality -> Maybe AggregationTemporality
forall a. a -> Maybe a
Prelude.Just AggregationTemporality
AGGREGATION_TEMPORALITY_DELTA
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"AGGREGATION_TEMPORALITY_CUMULATIVE"
    = AggregationTemporality -> Maybe AggregationTemporality
forall a. a -> Maybe a
Prelude.Just AggregationTemporality
AGGREGATION_TEMPORALITY_CUMULATIVE
    | Bool
Prelude.otherwise
    = Maybe Int
-> (Int -> Maybe AggregationTemporality)
-> Maybe AggregationTemporality
forall a b. Maybe a -> (a -> Maybe b) -> Maybe b
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 AggregationTemporality
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum
instance Prelude.Bounded AggregationTemporality where
  minBound :: AggregationTemporality
minBound = AggregationTemporality
AGGREGATION_TEMPORALITY_UNSPECIFIED
  maxBound :: AggregationTemporality
maxBound = AggregationTemporality
AGGREGATION_TEMPORALITY_CUMULATIVE
instance Prelude.Enum AggregationTemporality where
  toEnum :: Int -> AggregationTemporality
toEnum Int
k__
    = AggregationTemporality
-> (AggregationTemporality -> AggregationTemporality)
-> Maybe AggregationTemporality
-> AggregationTemporality
forall b a. b -> (a -> b) -> Maybe a -> b
Prelude.maybe
        (String -> AggregationTemporality
forall a. HasCallStack => String -> a
Prelude.error
           (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
              String
"toEnum: unknown value for enum AggregationTemporality: "
              (Int -> String
forall a. Show a => a -> String
Prelude.show Int
k__)))
        AggregationTemporality -> AggregationTemporality
forall a. a -> a
Prelude.id (Int -> Maybe AggregationTemporality
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum Int
k__)
  fromEnum :: AggregationTemporality -> Int
fromEnum AggregationTemporality
AGGREGATION_TEMPORALITY_UNSPECIFIED = Int
0
  fromEnum AggregationTemporality
AGGREGATION_TEMPORALITY_DELTA = Int
1
  fromEnum AggregationTemporality
AGGREGATION_TEMPORALITY_CUMULATIVE = Int
2
  fromEnum
    (AggregationTemporality'Unrecognized (AggregationTemporality'UnrecognizedValue Int32
k))
    = Int32 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
k
  succ :: AggregationTemporality -> AggregationTemporality
succ AggregationTemporality
AGGREGATION_TEMPORALITY_CUMULATIVE
    = String -> AggregationTemporality
forall a. HasCallStack => String -> a
Prelude.error
        String
"AggregationTemporality.succ: bad argument AGGREGATION_TEMPORALITY_CUMULATIVE. This value would be out of bounds."
  succ AggregationTemporality
AGGREGATION_TEMPORALITY_UNSPECIFIED
    = AggregationTemporality
AGGREGATION_TEMPORALITY_DELTA
  succ AggregationTemporality
AGGREGATION_TEMPORALITY_DELTA
    = AggregationTemporality
AGGREGATION_TEMPORALITY_CUMULATIVE
  succ (AggregationTemporality'Unrecognized AggregationTemporality'UnrecognizedValue
_)
    = String -> AggregationTemporality
forall a. HasCallStack => String -> a
Prelude.error
        String
"AggregationTemporality.succ: bad argument: unrecognized value"
  pred :: AggregationTemporality -> AggregationTemporality
pred AggregationTemporality
AGGREGATION_TEMPORALITY_UNSPECIFIED
    = String -> AggregationTemporality
forall a. HasCallStack => String -> a
Prelude.error
        String
"AggregationTemporality.pred: bad argument AGGREGATION_TEMPORALITY_UNSPECIFIED. This value would be out of bounds."
  pred AggregationTemporality
AGGREGATION_TEMPORALITY_DELTA
    = AggregationTemporality
AGGREGATION_TEMPORALITY_UNSPECIFIED
  pred AggregationTemporality
AGGREGATION_TEMPORALITY_CUMULATIVE
    = AggregationTemporality
AGGREGATION_TEMPORALITY_DELTA
  pred (AggregationTemporality'Unrecognized AggregationTemporality'UnrecognizedValue
_)
    = String -> AggregationTemporality
forall a. HasCallStack => String -> a
Prelude.error
        String
"AggregationTemporality.pred: bad argument: unrecognized value"
  enumFrom :: AggregationTemporality -> [AggregationTemporality]
enumFrom = AggregationTemporality -> [AggregationTemporality]
forall a. (Enum a, Bounded a) => a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFrom
  enumFromTo :: AggregationTemporality
-> AggregationTemporality -> [AggregationTemporality]
enumFromTo = AggregationTemporality
-> AggregationTemporality -> [AggregationTemporality]
forall a. Enum a => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromTo
  enumFromThen :: AggregationTemporality
-> AggregationTemporality -> [AggregationTemporality]
enumFromThen = AggregationTemporality
-> AggregationTemporality -> [AggregationTemporality]
forall a. (Enum a, Bounded a) => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThen
  enumFromThenTo :: AggregationTemporality
-> AggregationTemporality
-> AggregationTemporality
-> [AggregationTemporality]
enumFromThenTo = AggregationTemporality
-> AggregationTemporality
-> AggregationTemporality
-> [AggregationTemporality]
forall a. Enum a => a -> a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThenTo
instance Data.ProtoLens.FieldDefault AggregationTemporality where
  fieldDefault :: AggregationTemporality
fieldDefault = AggregationTemporality
AGGREGATION_TEMPORALITY_UNSPECIFIED
instance Control.DeepSeq.NFData AggregationTemporality where
  rnf :: AggregationTemporality -> ()
rnf AggregationTemporality
x__ = AggregationTemporality -> () -> ()
forall a b. a -> b -> b
Prelude.seq AggregationTemporality
x__ ()
newtype DataPointFlags'UnrecognizedValue
  = DataPointFlags'UnrecognizedValue Data.Int.Int32
  deriving stock (DataPointFlags'UnrecognizedValue
-> DataPointFlags'UnrecognizedValue -> Bool
(DataPointFlags'UnrecognizedValue
 -> DataPointFlags'UnrecognizedValue -> Bool)
-> (DataPointFlags'UnrecognizedValue
    -> DataPointFlags'UnrecognizedValue -> Bool)
-> Eq DataPointFlags'UnrecognizedValue
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: DataPointFlags'UnrecognizedValue
-> DataPointFlags'UnrecognizedValue -> Bool
== :: DataPointFlags'UnrecognizedValue
-> DataPointFlags'UnrecognizedValue -> Bool
$c/= :: DataPointFlags'UnrecognizedValue
-> DataPointFlags'UnrecognizedValue -> Bool
/= :: DataPointFlags'UnrecognizedValue
-> DataPointFlags'UnrecognizedValue -> Bool
Prelude.Eq, Eq DataPointFlags'UnrecognizedValue
Eq DataPointFlags'UnrecognizedValue =>
(DataPointFlags'UnrecognizedValue
 -> DataPointFlags'UnrecognizedValue -> Ordering)
-> (DataPointFlags'UnrecognizedValue
    -> DataPointFlags'UnrecognizedValue -> Bool)
-> (DataPointFlags'UnrecognizedValue
    -> DataPointFlags'UnrecognizedValue -> Bool)
-> (DataPointFlags'UnrecognizedValue
    -> DataPointFlags'UnrecognizedValue -> Bool)
-> (DataPointFlags'UnrecognizedValue
    -> DataPointFlags'UnrecognizedValue -> Bool)
-> (DataPointFlags'UnrecognizedValue
    -> DataPointFlags'UnrecognizedValue
    -> DataPointFlags'UnrecognizedValue)
-> (DataPointFlags'UnrecognizedValue
    -> DataPointFlags'UnrecognizedValue
    -> DataPointFlags'UnrecognizedValue)
-> Ord DataPointFlags'UnrecognizedValue
DataPointFlags'UnrecognizedValue
-> DataPointFlags'UnrecognizedValue -> Bool
DataPointFlags'UnrecognizedValue
-> DataPointFlags'UnrecognizedValue -> Ordering
DataPointFlags'UnrecognizedValue
-> DataPointFlags'UnrecognizedValue
-> DataPointFlags'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
$ccompare :: DataPointFlags'UnrecognizedValue
-> DataPointFlags'UnrecognizedValue -> Ordering
compare :: DataPointFlags'UnrecognizedValue
-> DataPointFlags'UnrecognizedValue -> Ordering
$c< :: DataPointFlags'UnrecognizedValue
-> DataPointFlags'UnrecognizedValue -> Bool
< :: DataPointFlags'UnrecognizedValue
-> DataPointFlags'UnrecognizedValue -> Bool
$c<= :: DataPointFlags'UnrecognizedValue
-> DataPointFlags'UnrecognizedValue -> Bool
<= :: DataPointFlags'UnrecognizedValue
-> DataPointFlags'UnrecognizedValue -> Bool
$c> :: DataPointFlags'UnrecognizedValue
-> DataPointFlags'UnrecognizedValue -> Bool
> :: DataPointFlags'UnrecognizedValue
-> DataPointFlags'UnrecognizedValue -> Bool
$c>= :: DataPointFlags'UnrecognizedValue
-> DataPointFlags'UnrecognizedValue -> Bool
>= :: DataPointFlags'UnrecognizedValue
-> DataPointFlags'UnrecognizedValue -> Bool
$cmax :: DataPointFlags'UnrecognizedValue
-> DataPointFlags'UnrecognizedValue
-> DataPointFlags'UnrecognizedValue
max :: DataPointFlags'UnrecognizedValue
-> DataPointFlags'UnrecognizedValue
-> DataPointFlags'UnrecognizedValue
$cmin :: DataPointFlags'UnrecognizedValue
-> DataPointFlags'UnrecognizedValue
-> DataPointFlags'UnrecognizedValue
min :: DataPointFlags'UnrecognizedValue
-> DataPointFlags'UnrecognizedValue
-> DataPointFlags'UnrecognizedValue
Prelude.Ord, Int -> DataPointFlags'UnrecognizedValue -> ShowS
[DataPointFlags'UnrecognizedValue] -> ShowS
DataPointFlags'UnrecognizedValue -> String
(Int -> DataPointFlags'UnrecognizedValue -> ShowS)
-> (DataPointFlags'UnrecognizedValue -> String)
-> ([DataPointFlags'UnrecognizedValue] -> ShowS)
-> Show DataPointFlags'UnrecognizedValue
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> DataPointFlags'UnrecognizedValue -> ShowS
showsPrec :: Int -> DataPointFlags'UnrecognizedValue -> ShowS
$cshow :: DataPointFlags'UnrecognizedValue -> String
show :: DataPointFlags'UnrecognizedValue -> String
$cshowList :: [DataPointFlags'UnrecognizedValue] -> ShowS
showList :: [DataPointFlags'UnrecognizedValue] -> ShowS
Prelude.Show)
data DataPointFlags
  = DATA_POINT_FLAGS_DO_NOT_USE |
    DATA_POINT_FLAGS_NO_RECORDED_VALUE_MASK |
    DataPointFlags'Unrecognized !DataPointFlags'UnrecognizedValue
  deriving stock (Int -> DataPointFlags -> ShowS
[DataPointFlags] -> ShowS
DataPointFlags -> String
(Int -> DataPointFlags -> ShowS)
-> (DataPointFlags -> String)
-> ([DataPointFlags] -> ShowS)
-> Show DataPointFlags
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> DataPointFlags -> ShowS
showsPrec :: Int -> DataPointFlags -> ShowS
$cshow :: DataPointFlags -> String
show :: DataPointFlags -> String
$cshowList :: [DataPointFlags] -> ShowS
showList :: [DataPointFlags] -> ShowS
Prelude.Show, DataPointFlags -> DataPointFlags -> Bool
(DataPointFlags -> DataPointFlags -> Bool)
-> (DataPointFlags -> DataPointFlags -> Bool) -> Eq DataPointFlags
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: DataPointFlags -> DataPointFlags -> Bool
== :: DataPointFlags -> DataPointFlags -> Bool
$c/= :: DataPointFlags -> DataPointFlags -> Bool
/= :: DataPointFlags -> DataPointFlags -> Bool
Prelude.Eq, Eq DataPointFlags
Eq DataPointFlags =>
(DataPointFlags -> DataPointFlags -> Ordering)
-> (DataPointFlags -> DataPointFlags -> Bool)
-> (DataPointFlags -> DataPointFlags -> Bool)
-> (DataPointFlags -> DataPointFlags -> Bool)
-> (DataPointFlags -> DataPointFlags -> Bool)
-> (DataPointFlags -> DataPointFlags -> DataPointFlags)
-> (DataPointFlags -> DataPointFlags -> DataPointFlags)
-> Ord DataPointFlags
DataPointFlags -> DataPointFlags -> Bool
DataPointFlags -> DataPointFlags -> Ordering
DataPointFlags -> DataPointFlags -> DataPointFlags
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
$ccompare :: DataPointFlags -> DataPointFlags -> Ordering
compare :: DataPointFlags -> DataPointFlags -> Ordering
$c< :: DataPointFlags -> DataPointFlags -> Bool
< :: DataPointFlags -> DataPointFlags -> Bool
$c<= :: DataPointFlags -> DataPointFlags -> Bool
<= :: DataPointFlags -> DataPointFlags -> Bool
$c> :: DataPointFlags -> DataPointFlags -> Bool
> :: DataPointFlags -> DataPointFlags -> Bool
$c>= :: DataPointFlags -> DataPointFlags -> Bool
>= :: DataPointFlags -> DataPointFlags -> Bool
$cmax :: DataPointFlags -> DataPointFlags -> DataPointFlags
max :: DataPointFlags -> DataPointFlags -> DataPointFlags
$cmin :: DataPointFlags -> DataPointFlags -> DataPointFlags
min :: DataPointFlags -> DataPointFlags -> DataPointFlags
Prelude.Ord)
instance Data.ProtoLens.MessageEnum DataPointFlags where
  maybeToEnum :: Int -> Maybe DataPointFlags
maybeToEnum Int
0 = DataPointFlags -> Maybe DataPointFlags
forall a. a -> Maybe a
Prelude.Just DataPointFlags
DATA_POINT_FLAGS_DO_NOT_USE
  maybeToEnum Int
1
    = DataPointFlags -> Maybe DataPointFlags
forall a. a -> Maybe a
Prelude.Just DataPointFlags
DATA_POINT_FLAGS_NO_RECORDED_VALUE_MASK
  maybeToEnum Int
k
    = DataPointFlags -> Maybe DataPointFlags
forall a. a -> Maybe a
Prelude.Just
        (DataPointFlags'UnrecognizedValue -> DataPointFlags
DataPointFlags'Unrecognized
           (Int32 -> DataPointFlags'UnrecognizedValue
DataPointFlags'UnrecognizedValue (Int -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int
k)))
  showEnum :: DataPointFlags -> String
showEnum DataPointFlags
DATA_POINT_FLAGS_DO_NOT_USE
    = String
"DATA_POINT_FLAGS_DO_NOT_USE"
  showEnum DataPointFlags
DATA_POINT_FLAGS_NO_RECORDED_VALUE_MASK
    = String
"DATA_POINT_FLAGS_NO_RECORDED_VALUE_MASK"
  showEnum
    (DataPointFlags'Unrecognized (DataPointFlags'UnrecognizedValue Int32
k))
    = Int32 -> String
forall a. Show a => a -> String
Prelude.show Int32
k
  readEnum :: String -> Maybe DataPointFlags
readEnum String
k
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"DATA_POINT_FLAGS_DO_NOT_USE"
    = DataPointFlags -> Maybe DataPointFlags
forall a. a -> Maybe a
Prelude.Just DataPointFlags
DATA_POINT_FLAGS_DO_NOT_USE
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"DATA_POINT_FLAGS_NO_RECORDED_VALUE_MASK"
    = DataPointFlags -> Maybe DataPointFlags
forall a. a -> Maybe a
Prelude.Just DataPointFlags
DATA_POINT_FLAGS_NO_RECORDED_VALUE_MASK
    | Bool
Prelude.otherwise
    = Maybe Int -> (Int -> Maybe DataPointFlags) -> Maybe DataPointFlags
forall a b. Maybe a -> (a -> Maybe b) -> Maybe b
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 DataPointFlags
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum
instance Prelude.Bounded DataPointFlags where
  minBound :: DataPointFlags
minBound = DataPointFlags
DATA_POINT_FLAGS_DO_NOT_USE
  maxBound :: DataPointFlags
maxBound = DataPointFlags
DATA_POINT_FLAGS_NO_RECORDED_VALUE_MASK
instance Prelude.Enum DataPointFlags where
  toEnum :: Int -> DataPointFlags
toEnum Int
k__
    = DataPointFlags
-> (DataPointFlags -> DataPointFlags)
-> Maybe DataPointFlags
-> DataPointFlags
forall b a. b -> (a -> b) -> Maybe a -> b
Prelude.maybe
        (String -> DataPointFlags
forall a. HasCallStack => String -> a
Prelude.error
           (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
              String
"toEnum: unknown value for enum DataPointFlags: "
              (Int -> String
forall a. Show a => a -> String
Prelude.show Int
k__)))
        DataPointFlags -> DataPointFlags
forall a. a -> a
Prelude.id (Int -> Maybe DataPointFlags
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum Int
k__)
  fromEnum :: DataPointFlags -> Int
fromEnum DataPointFlags
DATA_POINT_FLAGS_DO_NOT_USE = Int
0
  fromEnum DataPointFlags
DATA_POINT_FLAGS_NO_RECORDED_VALUE_MASK = Int
1
  fromEnum
    (DataPointFlags'Unrecognized (DataPointFlags'UnrecognizedValue Int32
k))
    = Int32 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
k
  succ :: DataPointFlags -> DataPointFlags
succ DataPointFlags
DATA_POINT_FLAGS_NO_RECORDED_VALUE_MASK
    = String -> DataPointFlags
forall a. HasCallStack => String -> a
Prelude.error
        String
"DataPointFlags.succ: bad argument DATA_POINT_FLAGS_NO_RECORDED_VALUE_MASK. This value would be out of bounds."
  succ DataPointFlags
DATA_POINT_FLAGS_DO_NOT_USE
    = DataPointFlags
DATA_POINT_FLAGS_NO_RECORDED_VALUE_MASK
  succ (DataPointFlags'Unrecognized DataPointFlags'UnrecognizedValue
_)
    = String -> DataPointFlags
forall a. HasCallStack => String -> a
Prelude.error
        String
"DataPointFlags.succ: bad argument: unrecognized value"
  pred :: DataPointFlags -> DataPointFlags
pred DataPointFlags
DATA_POINT_FLAGS_DO_NOT_USE
    = String -> DataPointFlags
forall a. HasCallStack => String -> a
Prelude.error
        String
"DataPointFlags.pred: bad argument DATA_POINT_FLAGS_DO_NOT_USE. This value would be out of bounds."
  pred DataPointFlags
DATA_POINT_FLAGS_NO_RECORDED_VALUE_MASK
    = DataPointFlags
DATA_POINT_FLAGS_DO_NOT_USE
  pred (DataPointFlags'Unrecognized DataPointFlags'UnrecognizedValue
_)
    = String -> DataPointFlags
forall a. HasCallStack => String -> a
Prelude.error
        String
"DataPointFlags.pred: bad argument: unrecognized value"
  enumFrom :: DataPointFlags -> [DataPointFlags]
enumFrom = DataPointFlags -> [DataPointFlags]
forall a. (Enum a, Bounded a) => a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFrom
  enumFromTo :: DataPointFlags -> DataPointFlags -> [DataPointFlags]
enumFromTo = DataPointFlags -> DataPointFlags -> [DataPointFlags]
forall a. Enum a => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromTo
  enumFromThen :: DataPointFlags -> DataPointFlags -> [DataPointFlags]
enumFromThen = DataPointFlags -> DataPointFlags -> [DataPointFlags]
forall a. (Enum a, Bounded a) => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThen
  enumFromThenTo :: DataPointFlags
-> DataPointFlags -> DataPointFlags -> [DataPointFlags]
enumFromThenTo = DataPointFlags
-> DataPointFlags -> DataPointFlags -> [DataPointFlags]
forall a. Enum a => a -> a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThenTo
instance Data.ProtoLens.FieldDefault DataPointFlags where
  fieldDefault :: DataPointFlags
fieldDefault = DataPointFlags
DATA_POINT_FLAGS_DO_NOT_USE
instance Control.DeepSeq.NFData DataPointFlags where
  rnf :: DataPointFlags -> ()
rnf DataPointFlags
x__ = DataPointFlags -> () -> ()
forall a b. a -> b -> b
Prelude.seq DataPointFlags
x__ ()
{- | Fields :
     
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.filteredAttributes' @:: Lens' Exemplar [Proto.Opentelemetry.Proto.Common.V1.Common.KeyValue]@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.vec'filteredAttributes' @:: Lens' Exemplar (Data.Vector.Vector Proto.Opentelemetry.Proto.Common.V1.Common.KeyValue)@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.timeUnixNano' @:: Lens' Exemplar Data.Word.Word64@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.spanId' @:: Lens' Exemplar Data.ByteString.ByteString@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.traceId' @:: Lens' Exemplar Data.ByteString.ByteString@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.maybe'value' @:: Lens' Exemplar (Prelude.Maybe Exemplar'Value)@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.maybe'asDouble' @:: Lens' Exemplar (Prelude.Maybe Prelude.Double)@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.asDouble' @:: Lens' Exemplar Prelude.Double@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.maybe'asInt' @:: Lens' Exemplar (Prelude.Maybe Data.Int.Int64)@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.asInt' @:: Lens' Exemplar Data.Int.Int64@ -}
data Exemplar
  = Exemplar'_constructor {Exemplar -> Vector KeyValue
_Exemplar'filteredAttributes :: !(Data.Vector.Vector Proto.Opentelemetry.Proto.Common.V1.Common.KeyValue),
                           Exemplar -> Word64
_Exemplar'timeUnixNano :: !Data.Word.Word64,
                           Exemplar -> ByteString
_Exemplar'spanId :: !Data.ByteString.ByteString,
                           Exemplar -> ByteString
_Exemplar'traceId :: !Data.ByteString.ByteString,
                           Exemplar -> Maybe Exemplar'Value
_Exemplar'value :: !(Prelude.Maybe Exemplar'Value),
                           Exemplar -> FieldSet
_Exemplar'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (Exemplar -> Exemplar -> Bool
(Exemplar -> Exemplar -> Bool)
-> (Exemplar -> Exemplar -> Bool) -> Eq Exemplar
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: Exemplar -> Exemplar -> Bool
== :: Exemplar -> Exemplar -> Bool
$c/= :: Exemplar -> Exemplar -> Bool
/= :: Exemplar -> Exemplar -> Bool
Prelude.Eq, Eq Exemplar
Eq Exemplar =>
(Exemplar -> Exemplar -> Ordering)
-> (Exemplar -> Exemplar -> Bool)
-> (Exemplar -> Exemplar -> Bool)
-> (Exemplar -> Exemplar -> Bool)
-> (Exemplar -> Exemplar -> Bool)
-> (Exemplar -> Exemplar -> Exemplar)
-> (Exemplar -> Exemplar -> Exemplar)
-> Ord Exemplar
Exemplar -> Exemplar -> Bool
Exemplar -> Exemplar -> Ordering
Exemplar -> Exemplar -> Exemplar
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
$ccompare :: Exemplar -> Exemplar -> Ordering
compare :: Exemplar -> Exemplar -> Ordering
$c< :: Exemplar -> Exemplar -> Bool
< :: Exemplar -> Exemplar -> Bool
$c<= :: Exemplar -> Exemplar -> Bool
<= :: Exemplar -> Exemplar -> Bool
$c> :: Exemplar -> Exemplar -> Bool
> :: Exemplar -> Exemplar -> Bool
$c>= :: Exemplar -> Exemplar -> Bool
>= :: Exemplar -> Exemplar -> Bool
$cmax :: Exemplar -> Exemplar -> Exemplar
max :: Exemplar -> Exemplar -> Exemplar
$cmin :: Exemplar -> Exemplar -> Exemplar
min :: Exemplar -> Exemplar -> Exemplar
Prelude.Ord)
instance Prelude.Show Exemplar where
  showsPrec :: Int -> Exemplar -> ShowS
showsPrec Int
_ Exemplar
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (Exemplar -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort Exemplar
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
data Exemplar'Value
  = Exemplar'AsDouble !Prelude.Double |
    Exemplar'AsInt !Data.Int.Int64
  deriving stock (Int -> Exemplar'Value -> ShowS
[Exemplar'Value] -> ShowS
Exemplar'Value -> String
(Int -> Exemplar'Value -> ShowS)
-> (Exemplar'Value -> String)
-> ([Exemplar'Value] -> ShowS)
-> Show Exemplar'Value
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> Exemplar'Value -> ShowS
showsPrec :: Int -> Exemplar'Value -> ShowS
$cshow :: Exemplar'Value -> String
show :: Exemplar'Value -> String
$cshowList :: [Exemplar'Value] -> ShowS
showList :: [Exemplar'Value] -> ShowS
Prelude.Show, Exemplar'Value -> Exemplar'Value -> Bool
(Exemplar'Value -> Exemplar'Value -> Bool)
-> (Exemplar'Value -> Exemplar'Value -> Bool) -> Eq Exemplar'Value
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: Exemplar'Value -> Exemplar'Value -> Bool
== :: Exemplar'Value -> Exemplar'Value -> Bool
$c/= :: Exemplar'Value -> Exemplar'Value -> Bool
/= :: Exemplar'Value -> Exemplar'Value -> Bool
Prelude.Eq, Eq Exemplar'Value
Eq Exemplar'Value =>
(Exemplar'Value -> Exemplar'Value -> Ordering)
-> (Exemplar'Value -> Exemplar'Value -> Bool)
-> (Exemplar'Value -> Exemplar'Value -> Bool)
-> (Exemplar'Value -> Exemplar'Value -> Bool)
-> (Exemplar'Value -> Exemplar'Value -> Bool)
-> (Exemplar'Value -> Exemplar'Value -> Exemplar'Value)
-> (Exemplar'Value -> Exemplar'Value -> Exemplar'Value)
-> Ord Exemplar'Value
Exemplar'Value -> Exemplar'Value -> Bool
Exemplar'Value -> Exemplar'Value -> Ordering
Exemplar'Value -> Exemplar'Value -> Exemplar'Value
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
$ccompare :: Exemplar'Value -> Exemplar'Value -> Ordering
compare :: Exemplar'Value -> Exemplar'Value -> Ordering
$c< :: Exemplar'Value -> Exemplar'Value -> Bool
< :: Exemplar'Value -> Exemplar'Value -> Bool
$c<= :: Exemplar'Value -> Exemplar'Value -> Bool
<= :: Exemplar'Value -> Exemplar'Value -> Bool
$c> :: Exemplar'Value -> Exemplar'Value -> Bool
> :: Exemplar'Value -> Exemplar'Value -> Bool
$c>= :: Exemplar'Value -> Exemplar'Value -> Bool
>= :: Exemplar'Value -> Exemplar'Value -> Bool
$cmax :: Exemplar'Value -> Exemplar'Value -> Exemplar'Value
max :: Exemplar'Value -> Exemplar'Value -> Exemplar'Value
$cmin :: Exemplar'Value -> Exemplar'Value -> Exemplar'Value
min :: Exemplar'Value -> Exemplar'Value -> Exemplar'Value
Prelude.Ord)
instance Data.ProtoLens.Field.HasField Exemplar "filteredAttributes" [Proto.Opentelemetry.Proto.Common.V1.Common.KeyValue] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "filteredAttributes"
-> ([KeyValue] -> f [KeyValue]) -> Exemplar -> f Exemplar
fieldOf Proxy# "filteredAttributes"
_
    = ((Vector KeyValue -> f (Vector KeyValue))
 -> Exemplar -> f Exemplar)
-> (([KeyValue] -> f [KeyValue])
    -> Vector KeyValue -> f (Vector KeyValue))
-> ([KeyValue] -> f [KeyValue])
-> Exemplar
-> f Exemplar
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((Exemplar -> Vector KeyValue)
-> (Exemplar -> Vector KeyValue -> Exemplar)
-> Lens Exemplar Exemplar (Vector KeyValue) (Vector KeyValue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Exemplar -> Vector KeyValue
_Exemplar'filteredAttributes
           (\ Exemplar
x__ Vector KeyValue
y__ -> Exemplar
x__ {_Exemplar'filteredAttributes = y__}))
        ((Vector KeyValue -> [KeyValue])
-> (Vector KeyValue -> [KeyValue] -> Vector KeyValue)
-> Lens (Vector KeyValue) (Vector KeyValue) [KeyValue] [KeyValue]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector KeyValue -> [KeyValue]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector KeyValue
_ [KeyValue]
y__ -> [KeyValue] -> Vector KeyValue
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [KeyValue]
y__))
instance Data.ProtoLens.Field.HasField Exemplar "vec'filteredAttributes" (Data.Vector.Vector Proto.Opentelemetry.Proto.Common.V1.Common.KeyValue) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'filteredAttributes"
-> (Vector KeyValue -> f (Vector KeyValue))
-> Exemplar
-> f Exemplar
fieldOf Proxy# "vec'filteredAttributes"
_
    = ((Vector KeyValue -> f (Vector KeyValue))
 -> Exemplar -> f Exemplar)
-> ((Vector KeyValue -> f (Vector KeyValue))
    -> Vector KeyValue -> f (Vector KeyValue))
-> (Vector KeyValue -> f (Vector KeyValue))
-> Exemplar
-> f Exemplar
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((Exemplar -> Vector KeyValue)
-> (Exemplar -> Vector KeyValue -> Exemplar)
-> Lens Exemplar Exemplar (Vector KeyValue) (Vector KeyValue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Exemplar -> Vector KeyValue
_Exemplar'filteredAttributes
           (\ Exemplar
x__ Vector KeyValue
y__ -> Exemplar
x__ {_Exemplar'filteredAttributes = y__}))
        (Vector KeyValue -> f (Vector KeyValue))
-> Vector KeyValue -> f (Vector KeyValue)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField Exemplar "timeUnixNano" Data.Word.Word64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "timeUnixNano"
-> (Word64 -> f Word64) -> Exemplar -> f Exemplar
fieldOf Proxy# "timeUnixNano"
_
    = ((Word64 -> f Word64) -> Exemplar -> f Exemplar)
-> ((Word64 -> f Word64) -> Word64 -> f Word64)
-> (Word64 -> f Word64)
-> Exemplar
-> f Exemplar
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((Exemplar -> Word64)
-> (Exemplar -> Word64 -> Exemplar)
-> Lens Exemplar Exemplar Word64 Word64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Exemplar -> Word64
_Exemplar'timeUnixNano
           (\ Exemplar
x__ Word64
y__ -> Exemplar
x__ {_Exemplar'timeUnixNano = y__}))
        (Word64 -> f Word64) -> Word64 -> f Word64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField Exemplar "spanId" Data.ByteString.ByteString where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "spanId"
-> (ByteString -> f ByteString) -> Exemplar -> f Exemplar
fieldOf Proxy# "spanId"
_
    = ((ByteString -> f ByteString) -> Exemplar -> f Exemplar)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> Exemplar
-> f Exemplar
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((Exemplar -> ByteString)
-> (Exemplar -> ByteString -> Exemplar)
-> Lens Exemplar Exemplar ByteString ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Exemplar -> ByteString
_Exemplar'spanId (\ Exemplar
x__ ByteString
y__ -> Exemplar
x__ {_Exemplar'spanId = y__}))
        (ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField Exemplar "traceId" Data.ByteString.ByteString where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "traceId"
-> (ByteString -> f ByteString) -> Exemplar -> f Exemplar
fieldOf Proxy# "traceId"
_
    = ((ByteString -> f ByteString) -> Exemplar -> f Exemplar)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> Exemplar
-> f Exemplar
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((Exemplar -> ByteString)
-> (Exemplar -> ByteString -> Exemplar)
-> Lens Exemplar Exemplar ByteString ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Exemplar -> ByteString
_Exemplar'traceId (\ Exemplar
x__ ByteString
y__ -> Exemplar
x__ {_Exemplar'traceId = y__}))
        (ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField Exemplar "maybe'value" (Prelude.Maybe Exemplar'Value) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'value"
-> (Maybe Exemplar'Value -> f (Maybe Exemplar'Value))
-> Exemplar
-> f Exemplar
fieldOf Proxy# "maybe'value"
_
    = ((Maybe Exemplar'Value -> f (Maybe Exemplar'Value))
 -> Exemplar -> f Exemplar)
-> ((Maybe Exemplar'Value -> f (Maybe Exemplar'Value))
    -> Maybe Exemplar'Value -> f (Maybe Exemplar'Value))
-> (Maybe Exemplar'Value -> f (Maybe Exemplar'Value))
-> Exemplar
-> f Exemplar
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((Exemplar -> Maybe Exemplar'Value)
-> (Exemplar -> Maybe Exemplar'Value -> Exemplar)
-> Lens
     Exemplar Exemplar (Maybe Exemplar'Value) (Maybe Exemplar'Value)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Exemplar -> Maybe Exemplar'Value
_Exemplar'value (\ Exemplar
x__ Maybe Exemplar'Value
y__ -> Exemplar
x__ {_Exemplar'value = y__}))
        (Maybe Exemplar'Value -> f (Maybe Exemplar'Value))
-> Maybe Exemplar'Value -> f (Maybe Exemplar'Value)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField Exemplar "maybe'asDouble" (Prelude.Maybe Prelude.Double) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'asDouble"
-> (Maybe Double -> f (Maybe Double)) -> Exemplar -> f Exemplar
fieldOf Proxy# "maybe'asDouble"
_
    = ((Maybe Exemplar'Value -> f (Maybe Exemplar'Value))
 -> Exemplar -> f Exemplar)
-> ((Maybe Double -> f (Maybe Double))
    -> Maybe Exemplar'Value -> f (Maybe Exemplar'Value))
-> (Maybe Double -> f (Maybe Double))
-> Exemplar
-> f Exemplar
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((Exemplar -> Maybe Exemplar'Value)
-> (Exemplar -> Maybe Exemplar'Value -> Exemplar)
-> Lens
     Exemplar Exemplar (Maybe Exemplar'Value) (Maybe Exemplar'Value)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Exemplar -> Maybe Exemplar'Value
_Exemplar'value (\ Exemplar
x__ Maybe Exemplar'Value
y__ -> Exemplar
x__ {_Exemplar'value = y__}))
        ((Maybe Exemplar'Value -> Maybe Double)
-> (Maybe Exemplar'Value -> Maybe Double -> Maybe Exemplar'Value)
-> Lens
     (Maybe Exemplar'Value)
     (Maybe Exemplar'Value)
     (Maybe Double)
     (Maybe Double)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe Exemplar'Value
x__
              -> case Maybe Exemplar'Value
x__ of
                   (Prelude.Just (Exemplar'AsDouble Double
x__val)) -> Double -> Maybe Double
forall a. a -> Maybe a
Prelude.Just Double
x__val
                   Maybe Exemplar'Value
_otherwise -> Maybe Double
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe Exemplar'Value
_ Maybe Double
y__ -> (Double -> Exemplar'Value) -> Maybe Double -> Maybe Exemplar'Value
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap Double -> Exemplar'Value
Exemplar'AsDouble Maybe Double
y__))
instance Data.ProtoLens.Field.HasField Exemplar "asDouble" Prelude.Double where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "asDouble" -> (Double -> f Double) -> Exemplar -> f Exemplar
fieldOf Proxy# "asDouble"
_
    = ((Maybe Exemplar'Value -> f (Maybe Exemplar'Value))
 -> Exemplar -> f Exemplar)
-> ((Double -> f Double)
    -> Maybe Exemplar'Value -> f (Maybe Exemplar'Value))
-> (Double -> f Double)
-> Exemplar
-> f Exemplar
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((Exemplar -> Maybe Exemplar'Value)
-> (Exemplar -> Maybe Exemplar'Value -> Exemplar)
-> Lens
     Exemplar Exemplar (Maybe Exemplar'Value) (Maybe Exemplar'Value)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Exemplar -> Maybe Exemplar'Value
_Exemplar'value (\ Exemplar
x__ Maybe Exemplar'Value
y__ -> Exemplar
x__ {_Exemplar'value = y__}))
        (((Maybe Double -> f (Maybe Double))
 -> Maybe Exemplar'Value -> f (Maybe Exemplar'Value))
-> ((Double -> f Double) -> Maybe Double -> f (Maybe Double))
-> (Double -> f Double)
-> Maybe Exemplar'Value
-> f (Maybe Exemplar'Value)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe Exemplar'Value -> Maybe Double)
-> (Maybe Exemplar'Value -> Maybe Double -> Maybe Exemplar'Value)
-> Lens
     (Maybe Exemplar'Value)
     (Maybe Exemplar'Value)
     (Maybe Double)
     (Maybe Double)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe Exemplar'Value
x__
                 -> case Maybe Exemplar'Value
x__ of
                      (Prelude.Just (Exemplar'AsDouble Double
x__val)) -> Double -> Maybe Double
forall a. a -> Maybe a
Prelude.Just Double
x__val
                      Maybe Exemplar'Value
_otherwise -> Maybe Double
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe Exemplar'Value
_ Maybe Double
y__ -> (Double -> Exemplar'Value) -> Maybe Double -> Maybe Exemplar'Value
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap Double -> Exemplar'Value
Exemplar'AsDouble Maybe Double
y__))
           (Double -> Lens' (Maybe Double) Double
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Double
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault))
instance Data.ProtoLens.Field.HasField Exemplar "maybe'asInt" (Prelude.Maybe Data.Int.Int64) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'asInt"
-> (Maybe Int64 -> f (Maybe Int64)) -> Exemplar -> f Exemplar
fieldOf Proxy# "maybe'asInt"
_
    = ((Maybe Exemplar'Value -> f (Maybe Exemplar'Value))
 -> Exemplar -> f Exemplar)
-> ((Maybe Int64 -> f (Maybe Int64))
    -> Maybe Exemplar'Value -> f (Maybe Exemplar'Value))
-> (Maybe Int64 -> f (Maybe Int64))
-> Exemplar
-> f Exemplar
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((Exemplar -> Maybe Exemplar'Value)
-> (Exemplar -> Maybe Exemplar'Value -> Exemplar)
-> Lens
     Exemplar Exemplar (Maybe Exemplar'Value) (Maybe Exemplar'Value)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Exemplar -> Maybe Exemplar'Value
_Exemplar'value (\ Exemplar
x__ Maybe Exemplar'Value
y__ -> Exemplar
x__ {_Exemplar'value = y__}))
        ((Maybe Exemplar'Value -> Maybe Int64)
-> (Maybe Exemplar'Value -> Maybe Int64 -> Maybe Exemplar'Value)
-> Lens
     (Maybe Exemplar'Value)
     (Maybe Exemplar'Value)
     (Maybe Int64)
     (Maybe Int64)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe Exemplar'Value
x__
              -> case Maybe Exemplar'Value
x__ of
                   (Prelude.Just (Exemplar'AsInt Int64
x__val)) -> Int64 -> Maybe Int64
forall a. a -> Maybe a
Prelude.Just Int64
x__val
                   Maybe Exemplar'Value
_otherwise -> Maybe Int64
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe Exemplar'Value
_ Maybe Int64
y__ -> (Int64 -> Exemplar'Value) -> Maybe Int64 -> Maybe Exemplar'Value
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap Int64 -> Exemplar'Value
Exemplar'AsInt Maybe Int64
y__))
instance Data.ProtoLens.Field.HasField Exemplar "asInt" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "asInt" -> (Int64 -> f Int64) -> Exemplar -> f Exemplar
fieldOf Proxy# "asInt"
_
    = ((Maybe Exemplar'Value -> f (Maybe Exemplar'Value))
 -> Exemplar -> f Exemplar)
-> ((Int64 -> f Int64)
    -> Maybe Exemplar'Value -> f (Maybe Exemplar'Value))
-> (Int64 -> f Int64)
-> Exemplar
-> f Exemplar
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((Exemplar -> Maybe Exemplar'Value)
-> (Exemplar -> Maybe Exemplar'Value -> Exemplar)
-> Lens
     Exemplar Exemplar (Maybe Exemplar'Value) (Maybe Exemplar'Value)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Exemplar -> Maybe Exemplar'Value
_Exemplar'value (\ Exemplar
x__ Maybe Exemplar'Value
y__ -> Exemplar
x__ {_Exemplar'value = y__}))
        (((Maybe Int64 -> f (Maybe Int64))
 -> Maybe Exemplar'Value -> f (Maybe Exemplar'Value))
-> ((Int64 -> f Int64) -> Maybe Int64 -> f (Maybe Int64))
-> (Int64 -> f Int64)
-> Maybe Exemplar'Value
-> f (Maybe Exemplar'Value)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe Exemplar'Value -> Maybe Int64)
-> (Maybe Exemplar'Value -> Maybe Int64 -> Maybe Exemplar'Value)
-> Lens
     (Maybe Exemplar'Value)
     (Maybe Exemplar'Value)
     (Maybe Int64)
     (Maybe Int64)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe Exemplar'Value
x__
                 -> case Maybe Exemplar'Value
x__ of
                      (Prelude.Just (Exemplar'AsInt Int64
x__val)) -> Int64 -> Maybe Int64
forall a. a -> Maybe a
Prelude.Just Int64
x__val
                      Maybe Exemplar'Value
_otherwise -> Maybe Int64
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe Exemplar'Value
_ Maybe Int64
y__ -> (Int64 -> Exemplar'Value) -> Maybe Int64 -> Maybe Exemplar'Value
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap Int64 -> Exemplar'Value
Exemplar'AsInt Maybe Int64
y__))
           (Int64 -> Lens' (Maybe Int64) Int64
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault))
instance Data.ProtoLens.Message Exemplar where
  messageName :: Proxy Exemplar -> Text
messageName Proxy Exemplar
_
    = String -> Text
Data.Text.pack String
"opentelemetry.proto.metrics.v1.Exemplar"
  packedMessageDescriptor :: Proxy Exemplar -> ByteString
packedMessageDescriptor Proxy Exemplar
_
    = ByteString
"\n\
      \\bExemplar\DC2X\n\
      \\DC3filtered_attributes\CAN\a \ETX(\v2'.opentelemetry.proto.common.v1.KeyValueR\DC2filteredAttributes\DC2$\n\
      \\SOtime_unix_nano\CAN\STX \SOH(\ACKR\ftimeUnixNano\DC2\GS\n\
      \\tas_double\CAN\ETX \SOH(\SOHH\NULR\basDouble\DC2\ETB\n\
      \\ACKas_int\CAN\ACK \SOH(\DLEH\NULR\ENQasInt\DC2\ETB\n\
      \\aspan_id\CAN\EOT \SOH(\fR\ACKspanId\DC2\EM\n\
      \\btrace_id\CAN\ENQ \SOH(\fR\atraceIdB\a\n\
      \\ENQvalueJ\EOT\b\SOH\DLE\STX"
  packedFileDescriptor :: Proxy Exemplar -> ByteString
packedFileDescriptor Proxy Exemplar
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor Exemplar)
fieldsByTag
    = let
        filteredAttributes__field_descriptor :: FieldDescriptor Exemplar
filteredAttributes__field_descriptor
          = String
-> FieldTypeDescriptor KeyValue
-> FieldAccessor Exemplar KeyValue
-> FieldDescriptor Exemplar
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"filtered_attributes"
              (MessageOrGroup -> FieldTypeDescriptor KeyValue
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Opentelemetry.Proto.Common.V1.Common.KeyValue)
              (Packing
-> Lens' Exemplar [KeyValue] -> FieldAccessor Exemplar KeyValue
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Unpacked
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"filteredAttributes")) ::
              Data.ProtoLens.FieldDescriptor Exemplar
        timeUnixNano__field_descriptor :: FieldDescriptor Exemplar
timeUnixNano__field_descriptor
          = String
-> FieldTypeDescriptor Word64
-> FieldAccessor Exemplar Word64
-> FieldDescriptor Exemplar
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"time_unix_nano"
              (ScalarField Word64 -> FieldTypeDescriptor Word64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Word64
Data.ProtoLens.Fixed64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64)
              (WireDefault Word64
-> Lens Exemplar Exemplar Word64 Word64
-> FieldAccessor Exemplar Word64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Word64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"timeUnixNano")) ::
              Data.ProtoLens.FieldDescriptor Exemplar
        spanId__field_descriptor :: FieldDescriptor Exemplar
spanId__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor Exemplar ByteString
-> FieldDescriptor Exemplar
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"span_id"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (WireDefault ByteString
-> Lens Exemplar Exemplar ByteString ByteString
-> FieldAccessor Exemplar ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"spanId")) ::
              Data.ProtoLens.FieldDescriptor Exemplar
        traceId__field_descriptor :: FieldDescriptor Exemplar
traceId__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor Exemplar ByteString
-> FieldDescriptor Exemplar
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"trace_id"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (WireDefault ByteString
-> Lens Exemplar Exemplar ByteString ByteString
-> FieldAccessor Exemplar ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"traceId")) ::
              Data.ProtoLens.FieldDescriptor Exemplar
        asDouble__field_descriptor :: FieldDescriptor Exemplar
asDouble__field_descriptor
          = String
-> FieldTypeDescriptor Double
-> FieldAccessor Exemplar Double
-> FieldDescriptor Exemplar
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"as_double"
              (ScalarField Double -> FieldTypeDescriptor Double
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Double
Data.ProtoLens.DoubleField ::
                 Data.ProtoLens.FieldTypeDescriptor Prelude.Double)
              (Lens' Exemplar (Maybe Double) -> FieldAccessor Exemplar Double
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'asDouble")) ::
              Data.ProtoLens.FieldDescriptor Exemplar
        asInt__field_descriptor :: FieldDescriptor Exemplar
asInt__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor Exemplar Int64
-> FieldDescriptor Exemplar
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"as_int"
              (ScalarField Int64 -> FieldTypeDescriptor Int64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int64
Data.ProtoLens.SFixed64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64)
              (Lens' Exemplar (Maybe Int64) -> FieldAccessor Exemplar Int64
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'asInt")) ::
              Data.ProtoLens.FieldDescriptor Exemplar
      in
        [(Tag, FieldDescriptor Exemplar)]
-> Map Tag (FieldDescriptor Exemplar)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor Exemplar
filteredAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor Exemplar
timeUnixNano__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor Exemplar
spanId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor Exemplar
traceId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor Exemplar
asDouble__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor Exemplar
asInt__field_descriptor)]
  unknownFields :: Lens' Exemplar FieldSet
unknownFields
    = (Exemplar -> FieldSet)
-> (Exemplar -> FieldSet -> Exemplar) -> Lens' Exemplar FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        Exemplar -> FieldSet
_Exemplar'_unknownFields
        (\ Exemplar
x__ FieldSet
y__ -> Exemplar
x__ {_Exemplar'_unknownFields = y__})
  defMessage :: Exemplar
defMessage
    = Exemplar'_constructor
        {_Exemplar'filteredAttributes :: Vector KeyValue
_Exemplar'filteredAttributes = Vector KeyValue
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _Exemplar'timeUnixNano :: Word64
_Exemplar'timeUnixNano = Word64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _Exemplar'spanId :: ByteString
_Exemplar'spanId = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _Exemplar'traceId :: ByteString
_Exemplar'traceId = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _Exemplar'value :: Maybe Exemplar'Value
_Exemplar'value = Maybe Exemplar'Value
forall a. Maybe a
Prelude.Nothing, _Exemplar'_unknownFields :: FieldSet
_Exemplar'_unknownFields = []}
  parseMessage :: Parser Exemplar
parseMessage
    = let
        loop ::
          Exemplar
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Opentelemetry.Proto.Common.V1.Common.KeyValue
             -> Data.ProtoLens.Encoding.Bytes.Parser Exemplar
        loop :: Exemplar -> Growing Vector RealWorld KeyValue -> Parser Exemplar
loop Exemplar
x Growing Vector RealWorld KeyValue
mutable'filteredAttributes
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do Vector KeyValue
frozen'filteredAttributes <- IO (Vector KeyValue) -> Parser (Vector KeyValue)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                     (Growing Vector (PrimState IO) KeyValue -> IO (Vector KeyValue)
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 KeyValue
Growing Vector (PrimState IO) KeyValue
mutable'filteredAttributes)
                      (let missing :: [a]
missing = []
                       in
                         if [Any] -> Bool
forall a. [a] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
                             () -> Parser ()
forall a. a -> Parser a
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
                         else
                             String -> Parser ()
forall a. String -> Parser a
forall (m :: * -> *) a. MonadFail m => String -> m a
Prelude.fail
                               (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
                                  String
"Missing required fields: "
                                  ([String] -> String
forall a. Show a => a -> String
Prelude.show ([String]
forall a. [a]
missing :: [Prelude.String]))))
                      Exemplar -> Parser Exemplar
forall a. a -> Parser a
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter Exemplar Exemplar FieldSet FieldSet
-> (FieldSet -> FieldSet) -> Exemplar -> Exemplar
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                           LensLike' f Exemplar FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' Exemplar FieldSet
Setter Exemplar Exemplar FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t)
                           (Setter Exemplar Exemplar (Vector KeyValue) (Vector KeyValue)
-> Vector KeyValue -> Exemplar -> Exemplar
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                              (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'filteredAttributes")
                              Vector KeyValue
frozen'filteredAttributes Exemplar
x))
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        Word64
58
                          -> do !KeyValue
y <- Parser KeyValue -> String -> Parser KeyValue
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Int -> Parser KeyValue -> Parser KeyValue
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 KeyValue
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                        String
"filtered_attributes"
                                Growing Vector RealWorld KeyValue
v <- IO (Growing Vector RealWorld KeyValue)
-> Parser (Growing Vector RealWorld KeyValue)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) KeyValue
-> KeyValue -> IO (Growing Vector (PrimState IO) KeyValue)
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 KeyValue
Growing Vector (PrimState IO) KeyValue
mutable'filteredAttributes KeyValue
y)
                                Exemplar -> Growing Vector RealWorld KeyValue -> Parser Exemplar
loop Exemplar
x Growing Vector RealWorld KeyValue
v
                        Word64
17
                          -> do Word64
y <- Parser Word64 -> String -> Parser Word64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       Parser Word64
Data.ProtoLens.Encoding.Bytes.getFixed64 String
"time_unix_nano"
                                Exemplar -> Growing Vector RealWorld KeyValue -> Parser Exemplar
loop
                                  (Setter Exemplar Exemplar Word64 Word64
-> Word64 -> Exemplar -> Exemplar
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"timeUnixNano") Word64
y Exemplar
x)
                                  Growing Vector RealWorld KeyValue
mutable'filteredAttributes
                        Word64
34
                          -> do ByteString
y <- Parser ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser ByteString
Data.ProtoLens.Encoding.Bytes.getBytes
                                             (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len))
                                       String
"span_id"
                                Exemplar -> Growing Vector RealWorld KeyValue -> Parser Exemplar
loop
                                  (Setter Exemplar Exemplar ByteString ByteString
-> ByteString -> Exemplar -> Exemplar
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"spanId") ByteString
y Exemplar
x)
                                  Growing Vector RealWorld KeyValue
mutable'filteredAttributes
                        Word64
42
                          -> do ByteString
y <- Parser ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser ByteString
Data.ProtoLens.Encoding.Bytes.getBytes
                                             (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len))
                                       String
"trace_id"
                                Exemplar -> Growing Vector RealWorld KeyValue -> Parser Exemplar
loop
                                  (Setter Exemplar Exemplar ByteString ByteString
-> ByteString -> Exemplar -> Exemplar
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"traceId") ByteString
y Exemplar
x)
                                  Growing Vector RealWorld KeyValue
mutable'filteredAttributes
                        Word64
25
                          -> 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 a b. (a -> b) -> Parser a -> Parser b
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)
                                       String
"as_double"
                                Exemplar -> Growing Vector RealWorld KeyValue -> Parser Exemplar
loop
                                  (Setter Exemplar Exemplar Double Double
-> Double -> Exemplar -> Exemplar
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"asDouble") Double
y Exemplar
x)
                                  Growing Vector RealWorld KeyValue
mutable'filteredAttributes
                        Word64
49
                          -> 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 a b. (a -> b) -> Parser a -> Parser b
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.getFixed64)
                                       String
"as_int"
                                Exemplar -> Growing Vector RealWorld KeyValue -> Parser Exemplar
loop
                                  (Setter Exemplar Exemplar Int64 Int64
-> Int64 -> Exemplar -> Exemplar
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"asInt") Int64
y Exemplar
x)
                                  Growing Vector RealWorld KeyValue
mutable'filteredAttributes
                        Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                Exemplar -> Growing Vector RealWorld KeyValue -> Parser Exemplar
loop
                                  (Setter Exemplar Exemplar FieldSet FieldSet
-> (FieldSet -> FieldSet) -> Exemplar -> Exemplar
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                     LensLike' f Exemplar FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' Exemplar FieldSet
Setter Exemplar Exemplar FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) Exemplar
x)
                                  Growing Vector RealWorld KeyValue
mutable'filteredAttributes
      in
        Parser Exemplar -> String -> Parser Exemplar
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do Growing Vector RealWorld KeyValue
mutable'filteredAttributes <- IO (Growing Vector RealWorld KeyValue)
-> Parser (Growing Vector RealWorld KeyValue)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                              IO (Growing Vector RealWorld KeyValue)
IO (Growing Vector (PrimState IO) KeyValue)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              Exemplar -> Growing Vector RealWorld KeyValue -> Parser Exemplar
loop Exemplar
forall msg. Message msg => msg
Data.ProtoLens.defMessage Growing Vector RealWorld KeyValue
mutable'filteredAttributes)
          String
"Exemplar"
  buildMessage :: Exemplar -> Builder
buildMessage
    = \ Exemplar
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             ((KeyValue -> Builder) -> Vector KeyValue -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                (\ KeyValue
_v
                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
58)
                        ((ByteString -> Builder)
-> (KeyValue -> ByteString) -> KeyValue -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                           (\ 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))
                           KeyValue -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage KeyValue
_v))
                (FoldLike
  (Vector KeyValue)
  Exemplar
  Exemplar
  (Vector KeyValue)
  (Vector KeyValue)
-> Exemplar -> Vector KeyValue
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                   (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'filteredAttributes") Exemplar
_x))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   _v :: Word64
_v
                     = FoldLike Word64 Exemplar Exemplar Word64 Word64
-> Exemplar -> Word64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"timeUnixNano") Exemplar
_x
                 in
                   if Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Word64
_v Word64
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 Word64
17)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putFixed64 Word64
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: ByteString
_v = FoldLike ByteString Exemplar Exemplar ByteString ByteString
-> Exemplar -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"spanId") Exemplar
_x
                    in
                      if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      else
                          Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                            ((\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                               ByteString
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (let
                         _v :: ByteString
_v = FoldLike ByteString Exemplar Exemplar ByteString ByteString
-> Exemplar -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"traceId") Exemplar
_x
                       in
                         if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                             Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         else
                             Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                               ((\ ByteString
bs
                                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                           (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                        (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                  ByteString
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (case
                              FoldLike
  (Maybe Exemplar'Value)
  Exemplar
  Exemplar
  (Maybe Exemplar'Value)
  (Maybe Exemplar'Value)
-> Exemplar -> Maybe Exemplar'Value
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'value") Exemplar
_x
                          of
                            Maybe Exemplar'Value
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            (Prelude.Just (Exemplar'AsDouble Double
v))
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
25)
                                   ((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)
                            (Prelude.Just (Exemplar'AsInt Int64
v))
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
49)
                                   ((Word64 -> Builder) -> (Int64 -> Word64) -> Int64 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                      Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putFixed64 Int64 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                      Int64
v))
                         (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                            (FoldLike FieldSet Exemplar Exemplar FieldSet FieldSet
-> Exemplar -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet Exemplar Exemplar FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' Exemplar FieldSet
Data.ProtoLens.unknownFields Exemplar
_x))))))
instance Control.DeepSeq.NFData Exemplar where
  rnf :: Exemplar -> ()
rnf
    = \ Exemplar
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (Exemplar -> FieldSet
_Exemplar'_unknownFields Exemplar
x__)
             (Vector KeyValue -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (Exemplar -> Vector KeyValue
_Exemplar'filteredAttributes Exemplar
x__)
                (Word64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (Exemplar -> Word64
_Exemplar'timeUnixNano Exemplar
x__)
                   (ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (Exemplar -> ByteString
_Exemplar'spanId Exemplar
x__)
                      (ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (Exemplar -> ByteString
_Exemplar'traceId Exemplar
x__)
                         (Maybe Exemplar'Value -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (Exemplar -> Maybe Exemplar'Value
_Exemplar'value Exemplar
x__) ())))))
instance Control.DeepSeq.NFData Exemplar'Value where
  rnf :: Exemplar'Value -> ()
rnf (Exemplar'AsDouble Double
x__) = Double -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf Double
x__
  rnf (Exemplar'AsInt Int64
x__) = Int64 -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf Int64
x__
_Exemplar'AsDouble ::
  Data.ProtoLens.Prism.Prism' Exemplar'Value Prelude.Double
_Exemplar'AsDouble :: Prism' Exemplar'Value Double
_Exemplar'AsDouble
  = (Double -> Exemplar'Value)
-> (Exemplar'Value -> Maybe Double) -> Prism' Exemplar'Value Double
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      Double -> Exemplar'Value
Exemplar'AsDouble
      (\ Exemplar'Value
p__
         -> case Exemplar'Value
p__ of
              (Exemplar'AsDouble Double
p__val) -> Double -> Maybe Double
forall a. a -> Maybe a
Prelude.Just Double
p__val
              Exemplar'Value
_otherwise -> Maybe Double
forall a. Maybe a
Prelude.Nothing)
_Exemplar'AsInt ::
  Data.ProtoLens.Prism.Prism' Exemplar'Value Data.Int.Int64
_Exemplar'AsInt :: Prism' Exemplar'Value Int64
_Exemplar'AsInt
  = (Int64 -> Exemplar'Value)
-> (Exemplar'Value -> Maybe Int64) -> Prism' Exemplar'Value Int64
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      Int64 -> Exemplar'Value
Exemplar'AsInt
      (\ Exemplar'Value
p__
         -> case Exemplar'Value
p__ of
              (Exemplar'AsInt Int64
p__val) -> Int64 -> Maybe Int64
forall a. a -> Maybe a
Prelude.Just Int64
p__val
              Exemplar'Value
_otherwise -> Maybe Int64
forall a. Maybe a
Prelude.Nothing)
{- | Fields :
     
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.dataPoints' @:: Lens' ExponentialHistogram [ExponentialHistogramDataPoint]@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.vec'dataPoints' @:: Lens' ExponentialHistogram (Data.Vector.Vector ExponentialHistogramDataPoint)@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.aggregationTemporality' @:: Lens' ExponentialHistogram AggregationTemporality@ -}
data ExponentialHistogram
  = ExponentialHistogram'_constructor {ExponentialHistogram -> Vector ExponentialHistogramDataPoint
_ExponentialHistogram'dataPoints :: !(Data.Vector.Vector ExponentialHistogramDataPoint),
                                       ExponentialHistogram -> AggregationTemporality
_ExponentialHistogram'aggregationTemporality :: !AggregationTemporality,
                                       ExponentialHistogram -> FieldSet
_ExponentialHistogram'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ExponentialHistogram -> ExponentialHistogram -> Bool
(ExponentialHistogram -> ExponentialHistogram -> Bool)
-> (ExponentialHistogram -> ExponentialHistogram -> Bool)
-> Eq ExponentialHistogram
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ExponentialHistogram -> ExponentialHistogram -> Bool
== :: ExponentialHistogram -> ExponentialHistogram -> Bool
$c/= :: ExponentialHistogram -> ExponentialHistogram -> Bool
/= :: ExponentialHistogram -> ExponentialHistogram -> Bool
Prelude.Eq, Eq ExponentialHistogram
Eq ExponentialHistogram =>
(ExponentialHistogram -> ExponentialHistogram -> Ordering)
-> (ExponentialHistogram -> ExponentialHistogram -> Bool)
-> (ExponentialHistogram -> ExponentialHistogram -> Bool)
-> (ExponentialHistogram -> ExponentialHistogram -> Bool)
-> (ExponentialHistogram -> ExponentialHistogram -> Bool)
-> (ExponentialHistogram
    -> ExponentialHistogram -> ExponentialHistogram)
-> (ExponentialHistogram
    -> ExponentialHistogram -> ExponentialHistogram)
-> Ord ExponentialHistogram
ExponentialHistogram -> ExponentialHistogram -> Bool
ExponentialHistogram -> ExponentialHistogram -> Ordering
ExponentialHistogram
-> ExponentialHistogram -> ExponentialHistogram
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
$ccompare :: ExponentialHistogram -> ExponentialHistogram -> Ordering
compare :: ExponentialHistogram -> ExponentialHistogram -> Ordering
$c< :: ExponentialHistogram -> ExponentialHistogram -> Bool
< :: ExponentialHistogram -> ExponentialHistogram -> Bool
$c<= :: ExponentialHistogram -> ExponentialHistogram -> Bool
<= :: ExponentialHistogram -> ExponentialHistogram -> Bool
$c> :: ExponentialHistogram -> ExponentialHistogram -> Bool
> :: ExponentialHistogram -> ExponentialHistogram -> Bool
$c>= :: ExponentialHistogram -> ExponentialHistogram -> Bool
>= :: ExponentialHistogram -> ExponentialHistogram -> Bool
$cmax :: ExponentialHistogram
-> ExponentialHistogram -> ExponentialHistogram
max :: ExponentialHistogram
-> ExponentialHistogram -> ExponentialHistogram
$cmin :: ExponentialHistogram
-> ExponentialHistogram -> ExponentialHistogram
min :: ExponentialHistogram
-> ExponentialHistogram -> ExponentialHistogram
Prelude.Ord)
instance Prelude.Show ExponentialHistogram where
  showsPrec :: Int -> ExponentialHistogram -> ShowS
showsPrec Int
_ ExponentialHistogram
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ExponentialHistogram -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ExponentialHistogram
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ExponentialHistogram "dataPoints" [ExponentialHistogramDataPoint] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "dataPoints"
-> ([ExponentialHistogramDataPoint]
    -> f [ExponentialHistogramDataPoint])
-> ExponentialHistogram
-> f ExponentialHistogram
fieldOf Proxy# "dataPoints"
_
    = ((Vector ExponentialHistogramDataPoint
  -> f (Vector ExponentialHistogramDataPoint))
 -> ExponentialHistogram -> f ExponentialHistogram)
-> (([ExponentialHistogramDataPoint]
     -> f [ExponentialHistogramDataPoint])
    -> Vector ExponentialHistogramDataPoint
    -> f (Vector ExponentialHistogramDataPoint))
-> ([ExponentialHistogramDataPoint]
    -> f [ExponentialHistogramDataPoint])
-> ExponentialHistogram
-> f ExponentialHistogram
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExponentialHistogram -> Vector ExponentialHistogramDataPoint)
-> (ExponentialHistogram
    -> Vector ExponentialHistogramDataPoint -> ExponentialHistogram)
-> Lens
     ExponentialHistogram
     ExponentialHistogram
     (Vector ExponentialHistogramDataPoint)
     (Vector ExponentialHistogramDataPoint)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExponentialHistogram -> Vector ExponentialHistogramDataPoint
_ExponentialHistogram'dataPoints
           (\ ExponentialHistogram
x__ Vector ExponentialHistogramDataPoint
y__ -> ExponentialHistogram
x__ {_ExponentialHistogram'dataPoints = y__}))
        ((Vector ExponentialHistogramDataPoint
 -> [ExponentialHistogramDataPoint])
-> (Vector ExponentialHistogramDataPoint
    -> [ExponentialHistogramDataPoint]
    -> Vector ExponentialHistogramDataPoint)
-> Lens
     (Vector ExponentialHistogramDataPoint)
     (Vector ExponentialHistogramDataPoint)
     [ExponentialHistogramDataPoint]
     [ExponentialHistogramDataPoint]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector ExponentialHistogramDataPoint
-> [ExponentialHistogramDataPoint]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector ExponentialHistogramDataPoint
_ [ExponentialHistogramDataPoint]
y__ -> [ExponentialHistogramDataPoint]
-> Vector ExponentialHistogramDataPoint
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [ExponentialHistogramDataPoint]
y__))
instance Data.ProtoLens.Field.HasField ExponentialHistogram "vec'dataPoints" (Data.Vector.Vector ExponentialHistogramDataPoint) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'dataPoints"
-> (Vector ExponentialHistogramDataPoint
    -> f (Vector ExponentialHistogramDataPoint))
-> ExponentialHistogram
-> f ExponentialHistogram
fieldOf Proxy# "vec'dataPoints"
_
    = ((Vector ExponentialHistogramDataPoint
  -> f (Vector ExponentialHistogramDataPoint))
 -> ExponentialHistogram -> f ExponentialHistogram)
-> ((Vector ExponentialHistogramDataPoint
     -> f (Vector ExponentialHistogramDataPoint))
    -> Vector ExponentialHistogramDataPoint
    -> f (Vector ExponentialHistogramDataPoint))
-> (Vector ExponentialHistogramDataPoint
    -> f (Vector ExponentialHistogramDataPoint))
-> ExponentialHistogram
-> f ExponentialHistogram
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExponentialHistogram -> Vector ExponentialHistogramDataPoint)
-> (ExponentialHistogram
    -> Vector ExponentialHistogramDataPoint -> ExponentialHistogram)
-> Lens
     ExponentialHistogram
     ExponentialHistogram
     (Vector ExponentialHistogramDataPoint)
     (Vector ExponentialHistogramDataPoint)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExponentialHistogram -> Vector ExponentialHistogramDataPoint
_ExponentialHistogram'dataPoints
           (\ ExponentialHistogram
x__ Vector ExponentialHistogramDataPoint
y__ -> ExponentialHistogram
x__ {_ExponentialHistogram'dataPoints = y__}))
        (Vector ExponentialHistogramDataPoint
 -> f (Vector ExponentialHistogramDataPoint))
-> Vector ExponentialHistogramDataPoint
-> f (Vector ExponentialHistogramDataPoint)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ExponentialHistogram "aggregationTemporality" AggregationTemporality where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "aggregationTemporality"
-> (AggregationTemporality -> f AggregationTemporality)
-> ExponentialHistogram
-> f ExponentialHistogram
fieldOf Proxy# "aggregationTemporality"
_
    = ((AggregationTemporality -> f AggregationTemporality)
 -> ExponentialHistogram -> f ExponentialHistogram)
-> ((AggregationTemporality -> f AggregationTemporality)
    -> AggregationTemporality -> f AggregationTemporality)
-> (AggregationTemporality -> f AggregationTemporality)
-> ExponentialHistogram
-> f ExponentialHistogram
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExponentialHistogram -> AggregationTemporality)
-> (ExponentialHistogram
    -> AggregationTemporality -> ExponentialHistogram)
-> Lens
     ExponentialHistogram
     ExponentialHistogram
     AggregationTemporality
     AggregationTemporality
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExponentialHistogram -> AggregationTemporality
_ExponentialHistogram'aggregationTemporality
           (\ ExponentialHistogram
x__ AggregationTemporality
y__
              -> ExponentialHistogram
x__ {_ExponentialHistogram'aggregationTemporality = y__}))
        (AggregationTemporality -> f AggregationTemporality)
-> AggregationTemporality -> f AggregationTemporality
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ExponentialHistogram where
  messageName :: Proxy ExponentialHistogram -> Text
messageName Proxy ExponentialHistogram
_
    = String -> Text
Data.Text.pack
        String
"opentelemetry.proto.metrics.v1.ExponentialHistogram"
  packedMessageDescriptor :: Proxy ExponentialHistogram -> ByteString
packedMessageDescriptor Proxy ExponentialHistogram
_
    = ByteString
"\n\
      \\DC4ExponentialHistogram\DC2^\n\
      \\vdata_points\CAN\SOH \ETX(\v2=.opentelemetry.proto.metrics.v1.ExponentialHistogramDataPointR\n\
      \dataPoints\DC2o\n\
      \\ETBaggregation_temporality\CAN\STX \SOH(\SO26.opentelemetry.proto.metrics.v1.AggregationTemporalityR\SYNaggregationTemporality"
  packedFileDescriptor :: Proxy ExponentialHistogram -> ByteString
packedFileDescriptor Proxy ExponentialHistogram
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ExponentialHistogram)
fieldsByTag
    = let
        dataPoints__field_descriptor :: FieldDescriptor ExponentialHistogram
dataPoints__field_descriptor
          = String
-> FieldTypeDescriptor ExponentialHistogramDataPoint
-> FieldAccessor ExponentialHistogram ExponentialHistogramDataPoint
-> FieldDescriptor ExponentialHistogram
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"data_points"
              (MessageOrGroup -> FieldTypeDescriptor ExponentialHistogramDataPoint
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ExponentialHistogramDataPoint)
              (Packing
-> Lens' ExponentialHistogram [ExponentialHistogramDataPoint]
-> FieldAccessor ExponentialHistogram ExponentialHistogramDataPoint
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Unpacked
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"dataPoints")) ::
              Data.ProtoLens.FieldDescriptor ExponentialHistogram
        aggregationTemporality__field_descriptor :: FieldDescriptor ExponentialHistogram
aggregationTemporality__field_descriptor
          = String
-> FieldTypeDescriptor AggregationTemporality
-> FieldAccessor ExponentialHistogram AggregationTemporality
-> FieldDescriptor ExponentialHistogram
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"aggregation_temporality"
              (ScalarField AggregationTemporality
-> FieldTypeDescriptor AggregationTemporality
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField AggregationTemporality
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor AggregationTemporality)
              (WireDefault AggregationTemporality
-> Lens
     ExponentialHistogram
     ExponentialHistogram
     AggregationTemporality
     AggregationTemporality
-> FieldAccessor ExponentialHistogram AggregationTemporality
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault AggregationTemporality
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"aggregationTemporality")) ::
              Data.ProtoLens.FieldDescriptor ExponentialHistogram
      in
        [(Tag, FieldDescriptor ExponentialHistogram)]
-> Map Tag (FieldDescriptor ExponentialHistogram)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ExponentialHistogram
dataPoints__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ExponentialHistogram
aggregationTemporality__field_descriptor)]
  unknownFields :: Lens' ExponentialHistogram FieldSet
unknownFields
    = (ExponentialHistogram -> FieldSet)
-> (ExponentialHistogram -> FieldSet -> ExponentialHistogram)
-> Lens' ExponentialHistogram FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ExponentialHistogram -> FieldSet
_ExponentialHistogram'_unknownFields
        (\ ExponentialHistogram
x__ FieldSet
y__ -> ExponentialHistogram
x__ {_ExponentialHistogram'_unknownFields = y__})
  defMessage :: ExponentialHistogram
defMessage
    = ExponentialHistogram'_constructor
        {_ExponentialHistogram'dataPoints :: Vector ExponentialHistogramDataPoint
_ExponentialHistogram'dataPoints = Vector ExponentialHistogramDataPoint
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _ExponentialHistogram'aggregationTemporality :: AggregationTemporality
_ExponentialHistogram'aggregationTemporality = AggregationTemporality
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ExponentialHistogram'_unknownFields :: FieldSet
_ExponentialHistogram'_unknownFields = []}
  parseMessage :: Parser ExponentialHistogram
parseMessage
    = let
        loop ::
          ExponentialHistogram
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld ExponentialHistogramDataPoint
             -> Data.ProtoLens.Encoding.Bytes.Parser ExponentialHistogram
        loop :: ExponentialHistogram
-> Growing Vector RealWorld ExponentialHistogramDataPoint
-> Parser ExponentialHistogram
loop ExponentialHistogram
x Growing Vector RealWorld ExponentialHistogramDataPoint
mutable'dataPoints
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do Vector ExponentialHistogramDataPoint
frozen'dataPoints <- IO (Vector ExponentialHistogramDataPoint)
-> Parser (Vector ExponentialHistogramDataPoint)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                             (Growing Vector (PrimState IO) ExponentialHistogramDataPoint
-> IO (Vector ExponentialHistogramDataPoint)
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 ExponentialHistogramDataPoint
Growing Vector (PrimState IO) ExponentialHistogramDataPoint
mutable'dataPoints)
                      (let missing :: [a]
missing = []
                       in
                         if [Any] -> Bool
forall a. [a] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
                             () -> Parser ()
forall a. a -> Parser a
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
                         else
                             String -> Parser ()
forall a. String -> Parser a
forall (m :: * -> *) a. MonadFail m => String -> m a
Prelude.fail
                               (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
                                  String
"Missing required fields: "
                                  ([String] -> String
forall a. Show a => a -> String
Prelude.show ([String]
forall a. [a]
missing :: [Prelude.String]))))
                      ExponentialHistogram -> Parser ExponentialHistogram
forall a. a -> Parser a
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter ExponentialHistogram ExponentialHistogram FieldSet FieldSet
-> (FieldSet -> FieldSet)
-> ExponentialHistogram
-> ExponentialHistogram
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                           LensLike' f ExponentialHistogram FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ExponentialHistogram FieldSet
Setter ExponentialHistogram ExponentialHistogram FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t)
                           (Setter
  ExponentialHistogram
  ExponentialHistogram
  (Vector ExponentialHistogramDataPoint)
  (Vector ExponentialHistogramDataPoint)
-> Vector ExponentialHistogramDataPoint
-> ExponentialHistogram
-> ExponentialHistogram
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                              (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'dataPoints") Vector ExponentialHistogramDataPoint
frozen'dataPoints
                              ExponentialHistogram
x))
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        Word64
10
                          -> do !ExponentialHistogramDataPoint
y <- Parser ExponentialHistogramDataPoint
-> String -> Parser ExponentialHistogramDataPoint
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Int
-> Parser ExponentialHistogramDataPoint
-> Parser ExponentialHistogramDataPoint
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 ExponentialHistogramDataPoint
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                        String
"data_points"
                                Growing Vector RealWorld ExponentialHistogramDataPoint
v <- IO (Growing Vector RealWorld ExponentialHistogramDataPoint)
-> Parser (Growing Vector RealWorld ExponentialHistogramDataPoint)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) ExponentialHistogramDataPoint
-> ExponentialHistogramDataPoint
-> IO (Growing Vector (PrimState IO) ExponentialHistogramDataPoint)
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 ExponentialHistogramDataPoint
Growing Vector (PrimState IO) ExponentialHistogramDataPoint
mutable'dataPoints ExponentialHistogramDataPoint
y)
                                ExponentialHistogram
-> Growing Vector RealWorld ExponentialHistogramDataPoint
-> Parser ExponentialHistogram
loop ExponentialHistogram
x Growing Vector RealWorld ExponentialHistogramDataPoint
v
                        Word64
16
                          -> do AggregationTemporality
y <- Parser AggregationTemporality
-> String -> Parser AggregationTemporality
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> AggregationTemporality)
-> Parser Int -> Parser AggregationTemporality
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> AggregationTemporality
forall a. Enum a => Int -> a
Prelude.toEnum
                                          ((Word64 -> Int) -> Parser Word64 -> Parser Int
forall a b. (a -> b) -> Parser a -> Parser b
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))
                                       String
"aggregation_temporality"
                                ExponentialHistogram
-> Growing Vector RealWorld ExponentialHistogramDataPoint
-> Parser ExponentialHistogram
loop
                                  (Setter
  ExponentialHistogram
  ExponentialHistogram
  AggregationTemporality
  AggregationTemporality
-> AggregationTemporality
-> ExponentialHistogram
-> ExponentialHistogram
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"aggregationTemporality") AggregationTemporality
y ExponentialHistogram
x)
                                  Growing Vector RealWorld ExponentialHistogramDataPoint
mutable'dataPoints
                        Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                ExponentialHistogram
-> Growing Vector RealWorld ExponentialHistogramDataPoint
-> Parser ExponentialHistogram
loop
                                  (Setter ExponentialHistogram ExponentialHistogram FieldSet FieldSet
-> (FieldSet -> FieldSet)
-> ExponentialHistogram
-> ExponentialHistogram
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                     LensLike' f ExponentialHistogram FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ExponentialHistogram FieldSet
Setter ExponentialHistogram ExponentialHistogram FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) ExponentialHistogram
x)
                                  Growing Vector RealWorld ExponentialHistogramDataPoint
mutable'dataPoints
      in
        Parser ExponentialHistogram
-> String -> Parser ExponentialHistogram
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do Growing Vector RealWorld ExponentialHistogramDataPoint
mutable'dataPoints <- IO (Growing Vector RealWorld ExponentialHistogramDataPoint)
-> Parser (Growing Vector RealWorld ExponentialHistogramDataPoint)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                      IO (Growing Vector RealWorld ExponentialHistogramDataPoint)
IO (Growing Vector (PrimState IO) ExponentialHistogramDataPoint)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              ExponentialHistogram
-> Growing Vector RealWorld ExponentialHistogramDataPoint
-> Parser ExponentialHistogram
loop ExponentialHistogram
forall msg. Message msg => msg
Data.ProtoLens.defMessage Growing Vector RealWorld ExponentialHistogramDataPoint
mutable'dataPoints)
          String
"ExponentialHistogram"
  buildMessage :: ExponentialHistogram -> Builder
buildMessage
    = \ ExponentialHistogram
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             ((ExponentialHistogramDataPoint -> Builder)
-> Vector ExponentialHistogramDataPoint -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                (\ ExponentialHistogramDataPoint
_v
                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                        ((ByteString -> Builder)
-> (ExponentialHistogramDataPoint -> ByteString)
-> ExponentialHistogramDataPoint
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                           (\ 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))
                           ExponentialHistogramDataPoint -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ExponentialHistogramDataPoint
_v))
                (FoldLike
  (Vector ExponentialHistogramDataPoint)
  ExponentialHistogram
  ExponentialHistogram
  (Vector ExponentialHistogramDataPoint)
  (Vector ExponentialHistogramDataPoint)
-> ExponentialHistogram -> Vector ExponentialHistogramDataPoint
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                   (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'dataPoints") ExponentialHistogram
_x))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   _v :: AggregationTemporality
_v
                     = FoldLike
  AggregationTemporality
  ExponentialHistogram
  ExponentialHistogram
  AggregationTemporality
  AggregationTemporality
-> ExponentialHistogram -> AggregationTemporality
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                         (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"aggregationTemporality") ExponentialHistogram
_x
                 in
                   if AggregationTemporality -> AggregationTemporality -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) AggregationTemporality
_v AggregationTemporality
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 Word64
16)
                         ((Int -> Builder)
-> (AggregationTemporality -> Int)
-> AggregationTemporality
-> 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)
                            AggregationTemporality -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum AggregationTemporality
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  ExponentialHistogram
  ExponentialHistogram
  FieldSet
  FieldSet
-> ExponentialHistogram -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ExponentialHistogram
  ExponentialHistogram
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ExponentialHistogram FieldSet
Data.ProtoLens.unknownFields ExponentialHistogram
_x)))
instance Control.DeepSeq.NFData ExponentialHistogram where
  rnf :: ExponentialHistogram -> ()
rnf
    = \ ExponentialHistogram
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ExponentialHistogram -> FieldSet
_ExponentialHistogram'_unknownFields ExponentialHistogram
x__)
             (Vector ExponentialHistogramDataPoint -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ExponentialHistogram -> Vector ExponentialHistogramDataPoint
_ExponentialHistogram'dataPoints ExponentialHistogram
x__)
                (AggregationTemporality -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ExponentialHistogram -> AggregationTemporality
_ExponentialHistogram'aggregationTemporality ExponentialHistogram
x__) ()))
{- | Fields :
     
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.attributes' @:: Lens' ExponentialHistogramDataPoint [Proto.Opentelemetry.Proto.Common.V1.Common.KeyValue]@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.vec'attributes' @:: Lens' ExponentialHistogramDataPoint (Data.Vector.Vector Proto.Opentelemetry.Proto.Common.V1.Common.KeyValue)@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.startTimeUnixNano' @:: Lens' ExponentialHistogramDataPoint Data.Word.Word64@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.timeUnixNano' @:: Lens' ExponentialHistogramDataPoint Data.Word.Word64@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.count' @:: Lens' ExponentialHistogramDataPoint Data.Word.Word64@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.sum' @:: Lens' ExponentialHistogramDataPoint Prelude.Double@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.maybe'sum' @:: Lens' ExponentialHistogramDataPoint (Prelude.Maybe Prelude.Double)@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.scale' @:: Lens' ExponentialHistogramDataPoint Data.Int.Int32@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.zeroCount' @:: Lens' ExponentialHistogramDataPoint Data.Word.Word64@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.positive' @:: Lens' ExponentialHistogramDataPoint ExponentialHistogramDataPoint'Buckets@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.maybe'positive' @:: Lens' ExponentialHistogramDataPoint (Prelude.Maybe ExponentialHistogramDataPoint'Buckets)@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.negative' @:: Lens' ExponentialHistogramDataPoint ExponentialHistogramDataPoint'Buckets@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.maybe'negative' @:: Lens' ExponentialHistogramDataPoint (Prelude.Maybe ExponentialHistogramDataPoint'Buckets)@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.flags' @:: Lens' ExponentialHistogramDataPoint Data.Word.Word32@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.exemplars' @:: Lens' ExponentialHistogramDataPoint [Exemplar]@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.vec'exemplars' @:: Lens' ExponentialHistogramDataPoint (Data.Vector.Vector Exemplar)@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.min' @:: Lens' ExponentialHistogramDataPoint Prelude.Double@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.maybe'min' @:: Lens' ExponentialHistogramDataPoint (Prelude.Maybe Prelude.Double)@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.max' @:: Lens' ExponentialHistogramDataPoint Prelude.Double@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.maybe'max' @:: Lens' ExponentialHistogramDataPoint (Prelude.Maybe Prelude.Double)@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.zeroThreshold' @:: Lens' ExponentialHistogramDataPoint Prelude.Double@ -}
data ExponentialHistogramDataPoint
  = ExponentialHistogramDataPoint'_constructor {ExponentialHistogramDataPoint -> Vector KeyValue
_ExponentialHistogramDataPoint'attributes :: !(Data.Vector.Vector Proto.Opentelemetry.Proto.Common.V1.Common.KeyValue),
                                                ExponentialHistogramDataPoint -> Word64
_ExponentialHistogramDataPoint'startTimeUnixNano :: !Data.Word.Word64,
                                                ExponentialHistogramDataPoint -> Word64
_ExponentialHistogramDataPoint'timeUnixNano :: !Data.Word.Word64,
                                                ExponentialHistogramDataPoint -> Word64
_ExponentialHistogramDataPoint'count :: !Data.Word.Word64,
                                                ExponentialHistogramDataPoint -> Maybe Double
_ExponentialHistogramDataPoint'sum :: !(Prelude.Maybe Prelude.Double),
                                                ExponentialHistogramDataPoint -> Int32
_ExponentialHistogramDataPoint'scale :: !Data.Int.Int32,
                                                ExponentialHistogramDataPoint -> Word64
_ExponentialHistogramDataPoint'zeroCount :: !Data.Word.Word64,
                                                ExponentialHistogramDataPoint
-> Maybe ExponentialHistogramDataPoint'Buckets
_ExponentialHistogramDataPoint'positive :: !(Prelude.Maybe ExponentialHistogramDataPoint'Buckets),
                                                ExponentialHistogramDataPoint
-> Maybe ExponentialHistogramDataPoint'Buckets
_ExponentialHistogramDataPoint'negative :: !(Prelude.Maybe ExponentialHistogramDataPoint'Buckets),
                                                ExponentialHistogramDataPoint -> Word32
_ExponentialHistogramDataPoint'flags :: !Data.Word.Word32,
                                                ExponentialHistogramDataPoint -> Vector Exemplar
_ExponentialHistogramDataPoint'exemplars :: !(Data.Vector.Vector Exemplar),
                                                ExponentialHistogramDataPoint -> Maybe Double
_ExponentialHistogramDataPoint'min :: !(Prelude.Maybe Prelude.Double),
                                                ExponentialHistogramDataPoint -> Maybe Double
_ExponentialHistogramDataPoint'max :: !(Prelude.Maybe Prelude.Double),
                                                ExponentialHistogramDataPoint -> Double
_ExponentialHistogramDataPoint'zeroThreshold :: !Prelude.Double,
                                                ExponentialHistogramDataPoint -> FieldSet
_ExponentialHistogramDataPoint'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ExponentialHistogramDataPoint
-> ExponentialHistogramDataPoint -> Bool
(ExponentialHistogramDataPoint
 -> ExponentialHistogramDataPoint -> Bool)
-> (ExponentialHistogramDataPoint
    -> ExponentialHistogramDataPoint -> Bool)
-> Eq ExponentialHistogramDataPoint
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ExponentialHistogramDataPoint
-> ExponentialHistogramDataPoint -> Bool
== :: ExponentialHistogramDataPoint
-> ExponentialHistogramDataPoint -> Bool
$c/= :: ExponentialHistogramDataPoint
-> ExponentialHistogramDataPoint -> Bool
/= :: ExponentialHistogramDataPoint
-> ExponentialHistogramDataPoint -> Bool
Prelude.Eq, Eq ExponentialHistogramDataPoint
Eq ExponentialHistogramDataPoint =>
(ExponentialHistogramDataPoint
 -> ExponentialHistogramDataPoint -> Ordering)
-> (ExponentialHistogramDataPoint
    -> ExponentialHistogramDataPoint -> Bool)
-> (ExponentialHistogramDataPoint
    -> ExponentialHistogramDataPoint -> Bool)
-> (ExponentialHistogramDataPoint
    -> ExponentialHistogramDataPoint -> Bool)
-> (ExponentialHistogramDataPoint
    -> ExponentialHistogramDataPoint -> Bool)
-> (ExponentialHistogramDataPoint
    -> ExponentialHistogramDataPoint -> ExponentialHistogramDataPoint)
-> (ExponentialHistogramDataPoint
    -> ExponentialHistogramDataPoint -> ExponentialHistogramDataPoint)
-> Ord ExponentialHistogramDataPoint
ExponentialHistogramDataPoint
-> ExponentialHistogramDataPoint -> Bool
ExponentialHistogramDataPoint
-> ExponentialHistogramDataPoint -> Ordering
ExponentialHistogramDataPoint
-> ExponentialHistogramDataPoint -> ExponentialHistogramDataPoint
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
$ccompare :: ExponentialHistogramDataPoint
-> ExponentialHistogramDataPoint -> Ordering
compare :: ExponentialHistogramDataPoint
-> ExponentialHistogramDataPoint -> Ordering
$c< :: ExponentialHistogramDataPoint
-> ExponentialHistogramDataPoint -> Bool
< :: ExponentialHistogramDataPoint
-> ExponentialHistogramDataPoint -> Bool
$c<= :: ExponentialHistogramDataPoint
-> ExponentialHistogramDataPoint -> Bool
<= :: ExponentialHistogramDataPoint
-> ExponentialHistogramDataPoint -> Bool
$c> :: ExponentialHistogramDataPoint
-> ExponentialHistogramDataPoint -> Bool
> :: ExponentialHistogramDataPoint
-> ExponentialHistogramDataPoint -> Bool
$c>= :: ExponentialHistogramDataPoint
-> ExponentialHistogramDataPoint -> Bool
>= :: ExponentialHistogramDataPoint
-> ExponentialHistogramDataPoint -> Bool
$cmax :: ExponentialHistogramDataPoint
-> ExponentialHistogramDataPoint -> ExponentialHistogramDataPoint
max :: ExponentialHistogramDataPoint
-> ExponentialHistogramDataPoint -> ExponentialHistogramDataPoint
$cmin :: ExponentialHistogramDataPoint
-> ExponentialHistogramDataPoint -> ExponentialHistogramDataPoint
min :: ExponentialHistogramDataPoint
-> ExponentialHistogramDataPoint -> ExponentialHistogramDataPoint
Prelude.Ord)
instance Prelude.Show ExponentialHistogramDataPoint where
  showsPrec :: Int -> ExponentialHistogramDataPoint -> ShowS
showsPrec Int
_ ExponentialHistogramDataPoint
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ExponentialHistogramDataPoint -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ExponentialHistogramDataPoint
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ExponentialHistogramDataPoint "attributes" [Proto.Opentelemetry.Proto.Common.V1.Common.KeyValue] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "attributes"
-> ([KeyValue] -> f [KeyValue])
-> ExponentialHistogramDataPoint
-> f ExponentialHistogramDataPoint
fieldOf Proxy# "attributes"
_
    = ((Vector KeyValue -> f (Vector KeyValue))
 -> ExponentialHistogramDataPoint
 -> f ExponentialHistogramDataPoint)
-> (([KeyValue] -> f [KeyValue])
    -> Vector KeyValue -> f (Vector KeyValue))
-> ([KeyValue] -> f [KeyValue])
-> ExponentialHistogramDataPoint
-> f ExponentialHistogramDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExponentialHistogramDataPoint -> Vector KeyValue)
-> (ExponentialHistogramDataPoint
    -> Vector KeyValue -> ExponentialHistogramDataPoint)
-> Lens
     ExponentialHistogramDataPoint
     ExponentialHistogramDataPoint
     (Vector KeyValue)
     (Vector KeyValue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExponentialHistogramDataPoint -> Vector KeyValue
_ExponentialHistogramDataPoint'attributes
           (\ ExponentialHistogramDataPoint
x__ Vector KeyValue
y__
              -> ExponentialHistogramDataPoint
x__ {_ExponentialHistogramDataPoint'attributes = y__}))
        ((Vector KeyValue -> [KeyValue])
-> (Vector KeyValue -> [KeyValue] -> Vector KeyValue)
-> Lens (Vector KeyValue) (Vector KeyValue) [KeyValue] [KeyValue]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector KeyValue -> [KeyValue]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector KeyValue
_ [KeyValue]
y__ -> [KeyValue] -> Vector KeyValue
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [KeyValue]
y__))
instance Data.ProtoLens.Field.HasField ExponentialHistogramDataPoint "vec'attributes" (Data.Vector.Vector Proto.Opentelemetry.Proto.Common.V1.Common.KeyValue) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'attributes"
-> (Vector KeyValue -> f (Vector KeyValue))
-> ExponentialHistogramDataPoint
-> f ExponentialHistogramDataPoint
fieldOf Proxy# "vec'attributes"
_
    = ((Vector KeyValue -> f (Vector KeyValue))
 -> ExponentialHistogramDataPoint
 -> f ExponentialHistogramDataPoint)
-> ((Vector KeyValue -> f (Vector KeyValue))
    -> Vector KeyValue -> f (Vector KeyValue))
-> (Vector KeyValue -> f (Vector KeyValue))
-> ExponentialHistogramDataPoint
-> f ExponentialHistogramDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExponentialHistogramDataPoint -> Vector KeyValue)
-> (ExponentialHistogramDataPoint
    -> Vector KeyValue -> ExponentialHistogramDataPoint)
-> Lens
     ExponentialHistogramDataPoint
     ExponentialHistogramDataPoint
     (Vector KeyValue)
     (Vector KeyValue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExponentialHistogramDataPoint -> Vector KeyValue
_ExponentialHistogramDataPoint'attributes
           (\ ExponentialHistogramDataPoint
x__ Vector KeyValue
y__
              -> ExponentialHistogramDataPoint
x__ {_ExponentialHistogramDataPoint'attributes = y__}))
        (Vector KeyValue -> f (Vector KeyValue))
-> Vector KeyValue -> f (Vector KeyValue)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ExponentialHistogramDataPoint "startTimeUnixNano" Data.Word.Word64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "startTimeUnixNano"
-> (Word64 -> f Word64)
-> ExponentialHistogramDataPoint
-> f ExponentialHistogramDataPoint
fieldOf Proxy# "startTimeUnixNano"
_
    = ((Word64 -> f Word64)
 -> ExponentialHistogramDataPoint
 -> f ExponentialHistogramDataPoint)
-> ((Word64 -> f Word64) -> Word64 -> f Word64)
-> (Word64 -> f Word64)
-> ExponentialHistogramDataPoint
-> f ExponentialHistogramDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExponentialHistogramDataPoint -> Word64)
-> (ExponentialHistogramDataPoint
    -> Word64 -> ExponentialHistogramDataPoint)
-> Lens
     ExponentialHistogramDataPoint
     ExponentialHistogramDataPoint
     Word64
     Word64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExponentialHistogramDataPoint -> Word64
_ExponentialHistogramDataPoint'startTimeUnixNano
           (\ ExponentialHistogramDataPoint
x__ Word64
y__
              -> ExponentialHistogramDataPoint
x__ {_ExponentialHistogramDataPoint'startTimeUnixNano = y__}))
        (Word64 -> f Word64) -> Word64 -> f Word64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ExponentialHistogramDataPoint "timeUnixNano" Data.Word.Word64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "timeUnixNano"
-> (Word64 -> f Word64)
-> ExponentialHistogramDataPoint
-> f ExponentialHistogramDataPoint
fieldOf Proxy# "timeUnixNano"
_
    = ((Word64 -> f Word64)
 -> ExponentialHistogramDataPoint
 -> f ExponentialHistogramDataPoint)
-> ((Word64 -> f Word64) -> Word64 -> f Word64)
-> (Word64 -> f Word64)
-> ExponentialHistogramDataPoint
-> f ExponentialHistogramDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExponentialHistogramDataPoint -> Word64)
-> (ExponentialHistogramDataPoint
    -> Word64 -> ExponentialHistogramDataPoint)
-> Lens
     ExponentialHistogramDataPoint
     ExponentialHistogramDataPoint
     Word64
     Word64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExponentialHistogramDataPoint -> Word64
_ExponentialHistogramDataPoint'timeUnixNano
           (\ ExponentialHistogramDataPoint
x__ Word64
y__
              -> ExponentialHistogramDataPoint
x__ {_ExponentialHistogramDataPoint'timeUnixNano = y__}))
        (Word64 -> f Word64) -> Word64 -> f Word64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ExponentialHistogramDataPoint "count" Data.Word.Word64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "count"
-> (Word64 -> f Word64)
-> ExponentialHistogramDataPoint
-> f ExponentialHistogramDataPoint
fieldOf Proxy# "count"
_
    = ((Word64 -> f Word64)
 -> ExponentialHistogramDataPoint
 -> f ExponentialHistogramDataPoint)
-> ((Word64 -> f Word64) -> Word64 -> f Word64)
-> (Word64 -> f Word64)
-> ExponentialHistogramDataPoint
-> f ExponentialHistogramDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExponentialHistogramDataPoint -> Word64)
-> (ExponentialHistogramDataPoint
    -> Word64 -> ExponentialHistogramDataPoint)
-> Lens
     ExponentialHistogramDataPoint
     ExponentialHistogramDataPoint
     Word64
     Word64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExponentialHistogramDataPoint -> Word64
_ExponentialHistogramDataPoint'count
           (\ ExponentialHistogramDataPoint
x__ Word64
y__ -> ExponentialHistogramDataPoint
x__ {_ExponentialHistogramDataPoint'count = y__}))
        (Word64 -> f Word64) -> Word64 -> f Word64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ExponentialHistogramDataPoint "sum" Prelude.Double where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "sum"
-> (Double -> f Double)
-> ExponentialHistogramDataPoint
-> f ExponentialHistogramDataPoint
fieldOf Proxy# "sum"
_
    = ((Maybe Double -> f (Maybe Double))
 -> ExponentialHistogramDataPoint
 -> f ExponentialHistogramDataPoint)
-> ((Double -> f Double) -> Maybe Double -> f (Maybe Double))
-> (Double -> f Double)
-> ExponentialHistogramDataPoint
-> f ExponentialHistogramDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExponentialHistogramDataPoint -> Maybe Double)
-> (ExponentialHistogramDataPoint
    -> Maybe Double -> ExponentialHistogramDataPoint)
-> Lens
     ExponentialHistogramDataPoint
     ExponentialHistogramDataPoint
     (Maybe Double)
     (Maybe Double)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExponentialHistogramDataPoint -> Maybe Double
_ExponentialHistogramDataPoint'sum
           (\ ExponentialHistogramDataPoint
x__ Maybe Double
y__ -> ExponentialHistogramDataPoint
x__ {_ExponentialHistogramDataPoint'sum = y__}))
        (Double -> Lens' (Maybe Double) Double
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Double
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault)
instance Data.ProtoLens.Field.HasField ExponentialHistogramDataPoint "maybe'sum" (Prelude.Maybe Prelude.Double) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'sum"
-> (Maybe Double -> f (Maybe Double))
-> ExponentialHistogramDataPoint
-> f ExponentialHistogramDataPoint
fieldOf Proxy# "maybe'sum"
_
    = ((Maybe Double -> f (Maybe Double))
 -> ExponentialHistogramDataPoint
 -> f ExponentialHistogramDataPoint)
-> ((Maybe Double -> f (Maybe Double))
    -> Maybe Double -> f (Maybe Double))
-> (Maybe Double -> f (Maybe Double))
-> ExponentialHistogramDataPoint
-> f ExponentialHistogramDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExponentialHistogramDataPoint -> Maybe Double)
-> (ExponentialHistogramDataPoint
    -> Maybe Double -> ExponentialHistogramDataPoint)
-> Lens
     ExponentialHistogramDataPoint
     ExponentialHistogramDataPoint
     (Maybe Double)
     (Maybe Double)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExponentialHistogramDataPoint -> Maybe Double
_ExponentialHistogramDataPoint'sum
           (\ ExponentialHistogramDataPoint
x__ Maybe Double
y__ -> ExponentialHistogramDataPoint
x__ {_ExponentialHistogramDataPoint'sum = y__}))
        (Maybe Double -> f (Maybe Double))
-> Maybe Double -> f (Maybe Double)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ExponentialHistogramDataPoint "scale" Data.Int.Int32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scale"
-> (Int32 -> f Int32)
-> ExponentialHistogramDataPoint
-> f ExponentialHistogramDataPoint
fieldOf Proxy# "scale"
_
    = ((Int32 -> f Int32)
 -> ExponentialHistogramDataPoint
 -> f ExponentialHistogramDataPoint)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> ExponentialHistogramDataPoint
-> f ExponentialHistogramDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExponentialHistogramDataPoint -> Int32)
-> (ExponentialHistogramDataPoint
    -> Int32 -> ExponentialHistogramDataPoint)
-> Lens
     ExponentialHistogramDataPoint
     ExponentialHistogramDataPoint
     Int32
     Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExponentialHistogramDataPoint -> Int32
_ExponentialHistogramDataPoint'scale
           (\ ExponentialHistogramDataPoint
x__ Int32
y__ -> ExponentialHistogramDataPoint
x__ {_ExponentialHistogramDataPoint'scale = y__}))
        (Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ExponentialHistogramDataPoint "zeroCount" Data.Word.Word64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "zeroCount"
-> (Word64 -> f Word64)
-> ExponentialHistogramDataPoint
-> f ExponentialHistogramDataPoint
fieldOf Proxy# "zeroCount"
_
    = ((Word64 -> f Word64)
 -> ExponentialHistogramDataPoint
 -> f ExponentialHistogramDataPoint)
-> ((Word64 -> f Word64) -> Word64 -> f Word64)
-> (Word64 -> f Word64)
-> ExponentialHistogramDataPoint
-> f ExponentialHistogramDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExponentialHistogramDataPoint -> Word64)
-> (ExponentialHistogramDataPoint
    -> Word64 -> ExponentialHistogramDataPoint)
-> Lens
     ExponentialHistogramDataPoint
     ExponentialHistogramDataPoint
     Word64
     Word64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExponentialHistogramDataPoint -> Word64
_ExponentialHistogramDataPoint'zeroCount
           (\ ExponentialHistogramDataPoint
x__ Word64
y__
              -> ExponentialHistogramDataPoint
x__ {_ExponentialHistogramDataPoint'zeroCount = y__}))
        (Word64 -> f Word64) -> Word64 -> f Word64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ExponentialHistogramDataPoint "positive" ExponentialHistogramDataPoint'Buckets where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "positive"
-> (ExponentialHistogramDataPoint'Buckets
    -> f ExponentialHistogramDataPoint'Buckets)
-> ExponentialHistogramDataPoint
-> f ExponentialHistogramDataPoint
fieldOf Proxy# "positive"
_
    = ((Maybe ExponentialHistogramDataPoint'Buckets
  -> f (Maybe ExponentialHistogramDataPoint'Buckets))
 -> ExponentialHistogramDataPoint
 -> f ExponentialHistogramDataPoint)
-> ((ExponentialHistogramDataPoint'Buckets
     -> f ExponentialHistogramDataPoint'Buckets)
    -> Maybe ExponentialHistogramDataPoint'Buckets
    -> f (Maybe ExponentialHistogramDataPoint'Buckets))
-> (ExponentialHistogramDataPoint'Buckets
    -> f ExponentialHistogramDataPoint'Buckets)
-> ExponentialHistogramDataPoint
-> f ExponentialHistogramDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExponentialHistogramDataPoint
 -> Maybe ExponentialHistogramDataPoint'Buckets)
-> (ExponentialHistogramDataPoint
    -> Maybe ExponentialHistogramDataPoint'Buckets
    -> ExponentialHistogramDataPoint)
-> Lens
     ExponentialHistogramDataPoint
     ExponentialHistogramDataPoint
     (Maybe ExponentialHistogramDataPoint'Buckets)
     (Maybe ExponentialHistogramDataPoint'Buckets)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExponentialHistogramDataPoint
-> Maybe ExponentialHistogramDataPoint'Buckets
_ExponentialHistogramDataPoint'positive
           (\ ExponentialHistogramDataPoint
x__ Maybe ExponentialHistogramDataPoint'Buckets
y__ -> ExponentialHistogramDataPoint
x__ {_ExponentialHistogramDataPoint'positive = y__}))
        (ExponentialHistogramDataPoint'Buckets
-> Lens'
     (Maybe ExponentialHistogramDataPoint'Buckets)
     ExponentialHistogramDataPoint'Buckets
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens ExponentialHistogramDataPoint'Buckets
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField ExponentialHistogramDataPoint "maybe'positive" (Prelude.Maybe ExponentialHistogramDataPoint'Buckets) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'positive"
-> (Maybe ExponentialHistogramDataPoint'Buckets
    -> f (Maybe ExponentialHistogramDataPoint'Buckets))
-> ExponentialHistogramDataPoint
-> f ExponentialHistogramDataPoint
fieldOf Proxy# "maybe'positive"
_
    = ((Maybe ExponentialHistogramDataPoint'Buckets
  -> f (Maybe ExponentialHistogramDataPoint'Buckets))
 -> ExponentialHistogramDataPoint
 -> f ExponentialHistogramDataPoint)
-> ((Maybe ExponentialHistogramDataPoint'Buckets
     -> f (Maybe ExponentialHistogramDataPoint'Buckets))
    -> Maybe ExponentialHistogramDataPoint'Buckets
    -> f (Maybe ExponentialHistogramDataPoint'Buckets))
-> (Maybe ExponentialHistogramDataPoint'Buckets
    -> f (Maybe ExponentialHistogramDataPoint'Buckets))
-> ExponentialHistogramDataPoint
-> f ExponentialHistogramDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExponentialHistogramDataPoint
 -> Maybe ExponentialHistogramDataPoint'Buckets)
-> (ExponentialHistogramDataPoint
    -> Maybe ExponentialHistogramDataPoint'Buckets
    -> ExponentialHistogramDataPoint)
-> Lens
     ExponentialHistogramDataPoint
     ExponentialHistogramDataPoint
     (Maybe ExponentialHistogramDataPoint'Buckets)
     (Maybe ExponentialHistogramDataPoint'Buckets)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExponentialHistogramDataPoint
-> Maybe ExponentialHistogramDataPoint'Buckets
_ExponentialHistogramDataPoint'positive
           (\ ExponentialHistogramDataPoint
x__ Maybe ExponentialHistogramDataPoint'Buckets
y__ -> ExponentialHistogramDataPoint
x__ {_ExponentialHistogramDataPoint'positive = y__}))
        (Maybe ExponentialHistogramDataPoint'Buckets
 -> f (Maybe ExponentialHistogramDataPoint'Buckets))
-> Maybe ExponentialHistogramDataPoint'Buckets
-> f (Maybe ExponentialHistogramDataPoint'Buckets)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ExponentialHistogramDataPoint "negative" ExponentialHistogramDataPoint'Buckets where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "negative"
-> (ExponentialHistogramDataPoint'Buckets
    -> f ExponentialHistogramDataPoint'Buckets)
-> ExponentialHistogramDataPoint
-> f ExponentialHistogramDataPoint
fieldOf Proxy# "negative"
_
    = ((Maybe ExponentialHistogramDataPoint'Buckets
  -> f (Maybe ExponentialHistogramDataPoint'Buckets))
 -> ExponentialHistogramDataPoint
 -> f ExponentialHistogramDataPoint)
-> ((ExponentialHistogramDataPoint'Buckets
     -> f ExponentialHistogramDataPoint'Buckets)
    -> Maybe ExponentialHistogramDataPoint'Buckets
    -> f (Maybe ExponentialHistogramDataPoint'Buckets))
-> (ExponentialHistogramDataPoint'Buckets
    -> f ExponentialHistogramDataPoint'Buckets)
-> ExponentialHistogramDataPoint
-> f ExponentialHistogramDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExponentialHistogramDataPoint
 -> Maybe ExponentialHistogramDataPoint'Buckets)
-> (ExponentialHistogramDataPoint
    -> Maybe ExponentialHistogramDataPoint'Buckets
    -> ExponentialHistogramDataPoint)
-> Lens
     ExponentialHistogramDataPoint
     ExponentialHistogramDataPoint
     (Maybe ExponentialHistogramDataPoint'Buckets)
     (Maybe ExponentialHistogramDataPoint'Buckets)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExponentialHistogramDataPoint
-> Maybe ExponentialHistogramDataPoint'Buckets
_ExponentialHistogramDataPoint'negative
           (\ ExponentialHistogramDataPoint
x__ Maybe ExponentialHistogramDataPoint'Buckets
y__ -> ExponentialHistogramDataPoint
x__ {_ExponentialHistogramDataPoint'negative = y__}))
        (ExponentialHistogramDataPoint'Buckets
-> Lens'
     (Maybe ExponentialHistogramDataPoint'Buckets)
     ExponentialHistogramDataPoint'Buckets
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens ExponentialHistogramDataPoint'Buckets
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField ExponentialHistogramDataPoint "maybe'negative" (Prelude.Maybe ExponentialHistogramDataPoint'Buckets) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'negative"
-> (Maybe ExponentialHistogramDataPoint'Buckets
    -> f (Maybe ExponentialHistogramDataPoint'Buckets))
-> ExponentialHistogramDataPoint
-> f ExponentialHistogramDataPoint
fieldOf Proxy# "maybe'negative"
_
    = ((Maybe ExponentialHistogramDataPoint'Buckets
  -> f (Maybe ExponentialHistogramDataPoint'Buckets))
 -> ExponentialHistogramDataPoint
 -> f ExponentialHistogramDataPoint)
-> ((Maybe ExponentialHistogramDataPoint'Buckets
     -> f (Maybe ExponentialHistogramDataPoint'Buckets))
    -> Maybe ExponentialHistogramDataPoint'Buckets
    -> f (Maybe ExponentialHistogramDataPoint'Buckets))
-> (Maybe ExponentialHistogramDataPoint'Buckets
    -> f (Maybe ExponentialHistogramDataPoint'Buckets))
-> ExponentialHistogramDataPoint
-> f ExponentialHistogramDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExponentialHistogramDataPoint
 -> Maybe ExponentialHistogramDataPoint'Buckets)
-> (ExponentialHistogramDataPoint
    -> Maybe ExponentialHistogramDataPoint'Buckets
    -> ExponentialHistogramDataPoint)
-> Lens
     ExponentialHistogramDataPoint
     ExponentialHistogramDataPoint
     (Maybe ExponentialHistogramDataPoint'Buckets)
     (Maybe ExponentialHistogramDataPoint'Buckets)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExponentialHistogramDataPoint
-> Maybe ExponentialHistogramDataPoint'Buckets
_ExponentialHistogramDataPoint'negative
           (\ ExponentialHistogramDataPoint
x__ Maybe ExponentialHistogramDataPoint'Buckets
y__ -> ExponentialHistogramDataPoint
x__ {_ExponentialHistogramDataPoint'negative = y__}))
        (Maybe ExponentialHistogramDataPoint'Buckets
 -> f (Maybe ExponentialHistogramDataPoint'Buckets))
-> Maybe ExponentialHistogramDataPoint'Buckets
-> f (Maybe ExponentialHistogramDataPoint'Buckets)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ExponentialHistogramDataPoint "flags" Data.Word.Word32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "flags"
-> (Word32 -> f Word32)
-> ExponentialHistogramDataPoint
-> f ExponentialHistogramDataPoint
fieldOf Proxy# "flags"
_
    = ((Word32 -> f Word32)
 -> ExponentialHistogramDataPoint
 -> f ExponentialHistogramDataPoint)
-> ((Word32 -> f Word32) -> Word32 -> f Word32)
-> (Word32 -> f Word32)
-> ExponentialHistogramDataPoint
-> f ExponentialHistogramDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExponentialHistogramDataPoint -> Word32)
-> (ExponentialHistogramDataPoint
    -> Word32 -> ExponentialHistogramDataPoint)
-> Lens
     ExponentialHistogramDataPoint
     ExponentialHistogramDataPoint
     Word32
     Word32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExponentialHistogramDataPoint -> Word32
_ExponentialHistogramDataPoint'flags
           (\ ExponentialHistogramDataPoint
x__ Word32
y__ -> ExponentialHistogramDataPoint
x__ {_ExponentialHistogramDataPoint'flags = y__}))
        (Word32 -> f Word32) -> Word32 -> f Word32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ExponentialHistogramDataPoint "exemplars" [Exemplar] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "exemplars"
-> ([Exemplar] -> f [Exemplar])
-> ExponentialHistogramDataPoint
-> f ExponentialHistogramDataPoint
fieldOf Proxy# "exemplars"
_
    = ((Vector Exemplar -> f (Vector Exemplar))
 -> ExponentialHistogramDataPoint
 -> f ExponentialHistogramDataPoint)
-> (([Exemplar] -> f [Exemplar])
    -> Vector Exemplar -> f (Vector Exemplar))
-> ([Exemplar] -> f [Exemplar])
-> ExponentialHistogramDataPoint
-> f ExponentialHistogramDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExponentialHistogramDataPoint -> Vector Exemplar)
-> (ExponentialHistogramDataPoint
    -> Vector Exemplar -> ExponentialHistogramDataPoint)
-> Lens
     ExponentialHistogramDataPoint
     ExponentialHistogramDataPoint
     (Vector Exemplar)
     (Vector Exemplar)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExponentialHistogramDataPoint -> Vector Exemplar
_ExponentialHistogramDataPoint'exemplars
           (\ ExponentialHistogramDataPoint
x__ Vector Exemplar
y__
              -> ExponentialHistogramDataPoint
x__ {_ExponentialHistogramDataPoint'exemplars = y__}))
        ((Vector Exemplar -> [Exemplar])
-> (Vector Exemplar -> [Exemplar] -> Vector Exemplar)
-> Lens (Vector Exemplar) (Vector Exemplar) [Exemplar] [Exemplar]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Exemplar -> [Exemplar]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector Exemplar
_ [Exemplar]
y__ -> [Exemplar] -> Vector Exemplar
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Exemplar]
y__))
instance Data.ProtoLens.Field.HasField ExponentialHistogramDataPoint "vec'exemplars" (Data.Vector.Vector Exemplar) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'exemplars"
-> (Vector Exemplar -> f (Vector Exemplar))
-> ExponentialHistogramDataPoint
-> f ExponentialHistogramDataPoint
fieldOf Proxy# "vec'exemplars"
_
    = ((Vector Exemplar -> f (Vector Exemplar))
 -> ExponentialHistogramDataPoint
 -> f ExponentialHistogramDataPoint)
-> ((Vector Exemplar -> f (Vector Exemplar))
    -> Vector Exemplar -> f (Vector Exemplar))
-> (Vector Exemplar -> f (Vector Exemplar))
-> ExponentialHistogramDataPoint
-> f ExponentialHistogramDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExponentialHistogramDataPoint -> Vector Exemplar)
-> (ExponentialHistogramDataPoint
    -> Vector Exemplar -> ExponentialHistogramDataPoint)
-> Lens
     ExponentialHistogramDataPoint
     ExponentialHistogramDataPoint
     (Vector Exemplar)
     (Vector Exemplar)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExponentialHistogramDataPoint -> Vector Exemplar
_ExponentialHistogramDataPoint'exemplars
           (\ ExponentialHistogramDataPoint
x__ Vector Exemplar
y__
              -> ExponentialHistogramDataPoint
x__ {_ExponentialHistogramDataPoint'exemplars = y__}))
        (Vector Exemplar -> f (Vector Exemplar))
-> Vector Exemplar -> f (Vector Exemplar)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ExponentialHistogramDataPoint "min" Prelude.Double where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "min"
-> (Double -> f Double)
-> ExponentialHistogramDataPoint
-> f ExponentialHistogramDataPoint
fieldOf Proxy# "min"
_
    = ((Maybe Double -> f (Maybe Double))
 -> ExponentialHistogramDataPoint
 -> f ExponentialHistogramDataPoint)
-> ((Double -> f Double) -> Maybe Double -> f (Maybe Double))
-> (Double -> f Double)
-> ExponentialHistogramDataPoint
-> f ExponentialHistogramDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExponentialHistogramDataPoint -> Maybe Double)
-> (ExponentialHistogramDataPoint
    -> Maybe Double -> ExponentialHistogramDataPoint)
-> Lens
     ExponentialHistogramDataPoint
     ExponentialHistogramDataPoint
     (Maybe Double)
     (Maybe Double)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExponentialHistogramDataPoint -> Maybe Double
_ExponentialHistogramDataPoint'min
           (\ ExponentialHistogramDataPoint
x__ Maybe Double
y__ -> ExponentialHistogramDataPoint
x__ {_ExponentialHistogramDataPoint'min = y__}))
        (Double -> Lens' (Maybe Double) Double
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Double
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault)
instance Data.ProtoLens.Field.HasField ExponentialHistogramDataPoint "maybe'min" (Prelude.Maybe Prelude.Double) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'min"
-> (Maybe Double -> f (Maybe Double))
-> ExponentialHistogramDataPoint
-> f ExponentialHistogramDataPoint
fieldOf Proxy# "maybe'min"
_
    = ((Maybe Double -> f (Maybe Double))
 -> ExponentialHistogramDataPoint
 -> f ExponentialHistogramDataPoint)
-> ((Maybe Double -> f (Maybe Double))
    -> Maybe Double -> f (Maybe Double))
-> (Maybe Double -> f (Maybe Double))
-> ExponentialHistogramDataPoint
-> f ExponentialHistogramDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExponentialHistogramDataPoint -> Maybe Double)
-> (ExponentialHistogramDataPoint
    -> Maybe Double -> ExponentialHistogramDataPoint)
-> Lens
     ExponentialHistogramDataPoint
     ExponentialHistogramDataPoint
     (Maybe Double)
     (Maybe Double)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExponentialHistogramDataPoint -> Maybe Double
_ExponentialHistogramDataPoint'min
           (\ ExponentialHistogramDataPoint
x__ Maybe Double
y__ -> ExponentialHistogramDataPoint
x__ {_ExponentialHistogramDataPoint'min = y__}))
        (Maybe Double -> f (Maybe Double))
-> Maybe Double -> f (Maybe Double)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ExponentialHistogramDataPoint "max" Prelude.Double where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "max"
-> (Double -> f Double)
-> ExponentialHistogramDataPoint
-> f ExponentialHistogramDataPoint
fieldOf Proxy# "max"
_
    = ((Maybe Double -> f (Maybe Double))
 -> ExponentialHistogramDataPoint
 -> f ExponentialHistogramDataPoint)
-> ((Double -> f Double) -> Maybe Double -> f (Maybe Double))
-> (Double -> f Double)
-> ExponentialHistogramDataPoint
-> f ExponentialHistogramDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExponentialHistogramDataPoint -> Maybe Double)
-> (ExponentialHistogramDataPoint
    -> Maybe Double -> ExponentialHistogramDataPoint)
-> Lens
     ExponentialHistogramDataPoint
     ExponentialHistogramDataPoint
     (Maybe Double)
     (Maybe Double)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExponentialHistogramDataPoint -> Maybe Double
_ExponentialHistogramDataPoint'max
           (\ ExponentialHistogramDataPoint
x__ Maybe Double
y__ -> ExponentialHistogramDataPoint
x__ {_ExponentialHistogramDataPoint'max = y__}))
        (Double -> Lens' (Maybe Double) Double
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Double
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault)
instance Data.ProtoLens.Field.HasField ExponentialHistogramDataPoint "maybe'max" (Prelude.Maybe Prelude.Double) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'max"
-> (Maybe Double -> f (Maybe Double))
-> ExponentialHistogramDataPoint
-> f ExponentialHistogramDataPoint
fieldOf Proxy# "maybe'max"
_
    = ((Maybe Double -> f (Maybe Double))
 -> ExponentialHistogramDataPoint
 -> f ExponentialHistogramDataPoint)
-> ((Maybe Double -> f (Maybe Double))
    -> Maybe Double -> f (Maybe Double))
-> (Maybe Double -> f (Maybe Double))
-> ExponentialHistogramDataPoint
-> f ExponentialHistogramDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExponentialHistogramDataPoint -> Maybe Double)
-> (ExponentialHistogramDataPoint
    -> Maybe Double -> ExponentialHistogramDataPoint)
-> Lens
     ExponentialHistogramDataPoint
     ExponentialHistogramDataPoint
     (Maybe Double)
     (Maybe Double)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExponentialHistogramDataPoint -> Maybe Double
_ExponentialHistogramDataPoint'max
           (\ ExponentialHistogramDataPoint
x__ Maybe Double
y__ -> ExponentialHistogramDataPoint
x__ {_ExponentialHistogramDataPoint'max = y__}))
        (Maybe Double -> f (Maybe Double))
-> Maybe Double -> f (Maybe Double)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ExponentialHistogramDataPoint "zeroThreshold" Prelude.Double where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "zeroThreshold"
-> (Double -> f Double)
-> ExponentialHistogramDataPoint
-> f ExponentialHistogramDataPoint
fieldOf Proxy# "zeroThreshold"
_
    = ((Double -> f Double)
 -> ExponentialHistogramDataPoint
 -> f ExponentialHistogramDataPoint)
-> ((Double -> f Double) -> Double -> f Double)
-> (Double -> f Double)
-> ExponentialHistogramDataPoint
-> f ExponentialHistogramDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExponentialHistogramDataPoint -> Double)
-> (ExponentialHistogramDataPoint
    -> Double -> ExponentialHistogramDataPoint)
-> Lens
     ExponentialHistogramDataPoint
     ExponentialHistogramDataPoint
     Double
     Double
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExponentialHistogramDataPoint -> Double
_ExponentialHistogramDataPoint'zeroThreshold
           (\ ExponentialHistogramDataPoint
x__ Double
y__
              -> ExponentialHistogramDataPoint
x__ {_ExponentialHistogramDataPoint'zeroThreshold = y__}))
        (Double -> f Double) -> Double -> f Double
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ExponentialHistogramDataPoint where
  messageName :: Proxy ExponentialHistogramDataPoint -> Text
messageName Proxy ExponentialHistogramDataPoint
_
    = String -> Text
Data.Text.pack
        String
"opentelemetry.proto.metrics.v1.ExponentialHistogramDataPoint"
  packedMessageDescriptor :: Proxy ExponentialHistogramDataPoint -> ByteString
packedMessageDescriptor Proxy ExponentialHistogramDataPoint
_
    = ByteString
"\n\
      \\GSExponentialHistogramDataPoint\DC2G\n\
      \\n\
      \attributes\CAN\SOH \ETX(\v2'.opentelemetry.proto.common.v1.KeyValueR\n\
      \attributes\DC2/\n\
      \\DC4start_time_unix_nano\CAN\STX \SOH(\ACKR\DC1startTimeUnixNano\DC2$\n\
      \\SOtime_unix_nano\CAN\ETX \SOH(\ACKR\ftimeUnixNano\DC2\DC4\n\
      \\ENQcount\CAN\EOT \SOH(\ACKR\ENQcount\DC2\NAK\n\
      \\ETXsum\CAN\ENQ \SOH(\SOHH\NULR\ETXsum\136\SOH\SOH\DC2\DC4\n\
      \\ENQscale\CAN\ACK \SOH(\DC1R\ENQscale\DC2\GS\n\
      \\n\
      \zero_count\CAN\a \SOH(\ACKR\tzeroCount\DC2a\n\
      \\bpositive\CAN\b \SOH(\v2E.opentelemetry.proto.metrics.v1.ExponentialHistogramDataPoint.BucketsR\bpositive\DC2a\n\
      \\bnegative\CAN\t \SOH(\v2E.opentelemetry.proto.metrics.v1.ExponentialHistogramDataPoint.BucketsR\bnegative\DC2\DC4\n\
      \\ENQflags\CAN\n\
      \ \SOH(\rR\ENQflags\DC2F\n\
      \\texemplars\CAN\v \ETX(\v2(.opentelemetry.proto.metrics.v1.ExemplarR\texemplars\DC2\NAK\n\
      \\ETXmin\CAN\f \SOH(\SOHH\SOHR\ETXmin\136\SOH\SOH\DC2\NAK\n\
      \\ETXmax\CAN\r \SOH(\SOHH\STXR\ETXmax\136\SOH\SOH\DC2%\n\
      \\SOzero_threshold\CAN\SO \SOH(\SOHR\rzeroThreshold\SUBF\n\
      \\aBuckets\DC2\SYN\n\
      \\ACKoffset\CAN\SOH \SOH(\DC1R\ACKoffset\DC2#\n\
      \\rbucket_counts\CAN\STX \ETX(\EOTR\fbucketCountsB\ACK\n\
      \\EOT_sumB\ACK\n\
      \\EOT_minB\ACK\n\
      \\EOT_max"
  packedFileDescriptor :: Proxy ExponentialHistogramDataPoint -> ByteString
packedFileDescriptor Proxy ExponentialHistogramDataPoint
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ExponentialHistogramDataPoint)
fieldsByTag
    = let
        attributes__field_descriptor :: FieldDescriptor ExponentialHistogramDataPoint
attributes__field_descriptor
          = String
-> FieldTypeDescriptor KeyValue
-> FieldAccessor ExponentialHistogramDataPoint KeyValue
-> FieldDescriptor ExponentialHistogramDataPoint
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"attributes"
              (MessageOrGroup -> FieldTypeDescriptor KeyValue
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Opentelemetry.Proto.Common.V1.Common.KeyValue)
              (Packing
-> Lens' ExponentialHistogramDataPoint [KeyValue]
-> FieldAccessor ExponentialHistogramDataPoint KeyValue
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Unpacked
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"attributes")) ::
              Data.ProtoLens.FieldDescriptor ExponentialHistogramDataPoint
        startTimeUnixNano__field_descriptor :: FieldDescriptor ExponentialHistogramDataPoint
startTimeUnixNano__field_descriptor
          = String
-> FieldTypeDescriptor Word64
-> FieldAccessor ExponentialHistogramDataPoint Word64
-> FieldDescriptor ExponentialHistogramDataPoint
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"start_time_unix_nano"
              (ScalarField Word64 -> FieldTypeDescriptor Word64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Word64
Data.ProtoLens.Fixed64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64)
              (WireDefault Word64
-> Lens
     ExponentialHistogramDataPoint
     ExponentialHistogramDataPoint
     Word64
     Word64
-> FieldAccessor ExponentialHistogramDataPoint Word64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Word64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"startTimeUnixNano")) ::
              Data.ProtoLens.FieldDescriptor ExponentialHistogramDataPoint
        timeUnixNano__field_descriptor :: FieldDescriptor ExponentialHistogramDataPoint
timeUnixNano__field_descriptor
          = String
-> FieldTypeDescriptor Word64
-> FieldAccessor ExponentialHistogramDataPoint Word64
-> FieldDescriptor ExponentialHistogramDataPoint
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"time_unix_nano"
              (ScalarField Word64 -> FieldTypeDescriptor Word64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Word64
Data.ProtoLens.Fixed64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64)
              (WireDefault Word64
-> Lens
     ExponentialHistogramDataPoint
     ExponentialHistogramDataPoint
     Word64
     Word64
-> FieldAccessor ExponentialHistogramDataPoint Word64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Word64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"timeUnixNano")) ::
              Data.ProtoLens.FieldDescriptor ExponentialHistogramDataPoint
        count__field_descriptor :: FieldDescriptor ExponentialHistogramDataPoint
count__field_descriptor
          = String
-> FieldTypeDescriptor Word64
-> FieldAccessor ExponentialHistogramDataPoint Word64
-> FieldDescriptor ExponentialHistogramDataPoint
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"count"
              (ScalarField Word64 -> FieldTypeDescriptor Word64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Word64
Data.ProtoLens.Fixed64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64)
              (WireDefault Word64
-> Lens
     ExponentialHistogramDataPoint
     ExponentialHistogramDataPoint
     Word64
     Word64
-> FieldAccessor ExponentialHistogramDataPoint Word64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Word64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"count")) ::
              Data.ProtoLens.FieldDescriptor ExponentialHistogramDataPoint
        sum__field_descriptor :: FieldDescriptor ExponentialHistogramDataPoint
sum__field_descriptor
          = String
-> FieldTypeDescriptor Double
-> FieldAccessor ExponentialHistogramDataPoint Double
-> FieldDescriptor ExponentialHistogramDataPoint
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"sum"
              (ScalarField Double -> FieldTypeDescriptor Double
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Double
Data.ProtoLens.DoubleField ::
                 Data.ProtoLens.FieldTypeDescriptor Prelude.Double)
              (Lens
  ExponentialHistogramDataPoint
  ExponentialHistogramDataPoint
  (Maybe Double)
  (Maybe Double)
-> FieldAccessor ExponentialHistogramDataPoint Double
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'sum")) ::
              Data.ProtoLens.FieldDescriptor ExponentialHistogramDataPoint
        scale__field_descriptor :: FieldDescriptor ExponentialHistogramDataPoint
scale__field_descriptor
          = String
-> FieldTypeDescriptor Int32
-> FieldAccessor ExponentialHistogramDataPoint Int32
-> FieldDescriptor ExponentialHistogramDataPoint
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"scale"
              (ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.SInt32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
              (WireDefault Int32
-> Lens
     ExponentialHistogramDataPoint
     ExponentialHistogramDataPoint
     Int32
     Int32
-> FieldAccessor ExponentialHistogramDataPoint 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 (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"scale")) ::
              Data.ProtoLens.FieldDescriptor ExponentialHistogramDataPoint
        zeroCount__field_descriptor :: FieldDescriptor ExponentialHistogramDataPoint
zeroCount__field_descriptor
          = String
-> FieldTypeDescriptor Word64
-> FieldAccessor ExponentialHistogramDataPoint Word64
-> FieldDescriptor ExponentialHistogramDataPoint
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"zero_count"
              (ScalarField Word64 -> FieldTypeDescriptor Word64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Word64
Data.ProtoLens.Fixed64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64)
              (WireDefault Word64
-> Lens
     ExponentialHistogramDataPoint
     ExponentialHistogramDataPoint
     Word64
     Word64
-> FieldAccessor ExponentialHistogramDataPoint Word64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Word64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"zeroCount")) ::
              Data.ProtoLens.FieldDescriptor ExponentialHistogramDataPoint
        positive__field_descriptor :: FieldDescriptor ExponentialHistogramDataPoint
positive__field_descriptor
          = String
-> FieldTypeDescriptor ExponentialHistogramDataPoint'Buckets
-> FieldAccessor
     ExponentialHistogramDataPoint ExponentialHistogramDataPoint'Buckets
-> FieldDescriptor ExponentialHistogramDataPoint
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"positive"
              (MessageOrGroup
-> FieldTypeDescriptor ExponentialHistogramDataPoint'Buckets
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ExponentialHistogramDataPoint'Buckets)
              (Lens
  ExponentialHistogramDataPoint
  ExponentialHistogramDataPoint
  (Maybe ExponentialHistogramDataPoint'Buckets)
  (Maybe ExponentialHistogramDataPoint'Buckets)
-> FieldAccessor
     ExponentialHistogramDataPoint ExponentialHistogramDataPoint'Buckets
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'positive")) ::
              Data.ProtoLens.FieldDescriptor ExponentialHistogramDataPoint
        negative__field_descriptor :: FieldDescriptor ExponentialHistogramDataPoint
negative__field_descriptor
          = String
-> FieldTypeDescriptor ExponentialHistogramDataPoint'Buckets
-> FieldAccessor
     ExponentialHistogramDataPoint ExponentialHistogramDataPoint'Buckets
-> FieldDescriptor ExponentialHistogramDataPoint
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"negative"
              (MessageOrGroup
-> FieldTypeDescriptor ExponentialHistogramDataPoint'Buckets
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ExponentialHistogramDataPoint'Buckets)
              (Lens
  ExponentialHistogramDataPoint
  ExponentialHistogramDataPoint
  (Maybe ExponentialHistogramDataPoint'Buckets)
  (Maybe ExponentialHistogramDataPoint'Buckets)
-> FieldAccessor
     ExponentialHistogramDataPoint ExponentialHistogramDataPoint'Buckets
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'negative")) ::
              Data.ProtoLens.FieldDescriptor ExponentialHistogramDataPoint
        flags__field_descriptor :: FieldDescriptor ExponentialHistogramDataPoint
flags__field_descriptor
          = String
-> FieldTypeDescriptor Word32
-> FieldAccessor ExponentialHistogramDataPoint Word32
-> FieldDescriptor ExponentialHistogramDataPoint
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"flags"
              (ScalarField Word32 -> FieldTypeDescriptor Word32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Word32
Data.ProtoLens.UInt32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32)
              (WireDefault Word32
-> Lens
     ExponentialHistogramDataPoint
     ExponentialHistogramDataPoint
     Word32
     Word32
-> FieldAccessor ExponentialHistogramDataPoint Word32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Word32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"flags")) ::
              Data.ProtoLens.FieldDescriptor ExponentialHistogramDataPoint
        exemplars__field_descriptor :: FieldDescriptor ExponentialHistogramDataPoint
exemplars__field_descriptor
          = String
-> FieldTypeDescriptor Exemplar
-> FieldAccessor ExponentialHistogramDataPoint Exemplar
-> FieldDescriptor ExponentialHistogramDataPoint
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"exemplars"
              (MessageOrGroup -> FieldTypeDescriptor Exemplar
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Exemplar)
              (Packing
-> Lens' ExponentialHistogramDataPoint [Exemplar]
-> FieldAccessor ExponentialHistogramDataPoint Exemplar
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Unpacked
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"exemplars")) ::
              Data.ProtoLens.FieldDescriptor ExponentialHistogramDataPoint
        min__field_descriptor :: FieldDescriptor ExponentialHistogramDataPoint
min__field_descriptor
          = String
-> FieldTypeDescriptor Double
-> FieldAccessor ExponentialHistogramDataPoint Double
-> FieldDescriptor ExponentialHistogramDataPoint
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"min"
              (ScalarField Double -> FieldTypeDescriptor Double
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Double
Data.ProtoLens.DoubleField ::
                 Data.ProtoLens.FieldTypeDescriptor Prelude.Double)
              (Lens
  ExponentialHistogramDataPoint
  ExponentialHistogramDataPoint
  (Maybe Double)
  (Maybe Double)
-> FieldAccessor ExponentialHistogramDataPoint Double
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'min")) ::
              Data.ProtoLens.FieldDescriptor ExponentialHistogramDataPoint
        max__field_descriptor :: FieldDescriptor ExponentialHistogramDataPoint
max__field_descriptor
          = String
-> FieldTypeDescriptor Double
-> FieldAccessor ExponentialHistogramDataPoint Double
-> FieldDescriptor ExponentialHistogramDataPoint
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"max"
              (ScalarField Double -> FieldTypeDescriptor Double
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Double
Data.ProtoLens.DoubleField ::
                 Data.ProtoLens.FieldTypeDescriptor Prelude.Double)
              (Lens
  ExponentialHistogramDataPoint
  ExponentialHistogramDataPoint
  (Maybe Double)
  (Maybe Double)
-> FieldAccessor ExponentialHistogramDataPoint Double
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'max")) ::
              Data.ProtoLens.FieldDescriptor ExponentialHistogramDataPoint
        zeroThreshold__field_descriptor :: FieldDescriptor ExponentialHistogramDataPoint
zeroThreshold__field_descriptor
          = String
-> FieldTypeDescriptor Double
-> FieldAccessor ExponentialHistogramDataPoint Double
-> FieldDescriptor ExponentialHistogramDataPoint
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"zero_threshold"
              (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
     ExponentialHistogramDataPoint
     ExponentialHistogramDataPoint
     Double
     Double
-> FieldAccessor ExponentialHistogramDataPoint 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 (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"zeroThreshold")) ::
              Data.ProtoLens.FieldDescriptor ExponentialHistogramDataPoint
      in
        [(Tag, FieldDescriptor ExponentialHistogramDataPoint)]
-> Map Tag (FieldDescriptor ExponentialHistogramDataPoint)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ExponentialHistogramDataPoint
attributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ExponentialHistogramDataPoint
startTimeUnixNano__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor ExponentialHistogramDataPoint
timeUnixNano__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor ExponentialHistogramDataPoint
count__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor ExponentialHistogramDataPoint
sum__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor ExponentialHistogramDataPoint
scale__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor ExponentialHistogramDataPoint
zeroCount__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
8, FieldDescriptor ExponentialHistogramDataPoint
positive__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
9, FieldDescriptor ExponentialHistogramDataPoint
negative__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
10, FieldDescriptor ExponentialHistogramDataPoint
flags__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
11, FieldDescriptor ExponentialHistogramDataPoint
exemplars__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
12, FieldDescriptor ExponentialHistogramDataPoint
min__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
13, FieldDescriptor ExponentialHistogramDataPoint
max__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
14, FieldDescriptor ExponentialHistogramDataPoint
zeroThreshold__field_descriptor)]
  unknownFields :: Lens' ExponentialHistogramDataPoint FieldSet
unknownFields
    = (ExponentialHistogramDataPoint -> FieldSet)
-> (ExponentialHistogramDataPoint
    -> FieldSet -> ExponentialHistogramDataPoint)
-> Lens' ExponentialHistogramDataPoint FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ExponentialHistogramDataPoint -> FieldSet
_ExponentialHistogramDataPoint'_unknownFields
        (\ ExponentialHistogramDataPoint
x__ FieldSet
y__
           -> ExponentialHistogramDataPoint
x__ {_ExponentialHistogramDataPoint'_unknownFields = y__})
  defMessage :: ExponentialHistogramDataPoint
defMessage
    = ExponentialHistogramDataPoint'_constructor
        {_ExponentialHistogramDataPoint'attributes :: Vector KeyValue
_ExponentialHistogramDataPoint'attributes = Vector KeyValue
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _ExponentialHistogramDataPoint'startTimeUnixNano :: Word64
_ExponentialHistogramDataPoint'startTimeUnixNano = Word64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ExponentialHistogramDataPoint'timeUnixNano :: Word64
_ExponentialHistogramDataPoint'timeUnixNano = Word64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ExponentialHistogramDataPoint'count :: Word64
_ExponentialHistogramDataPoint'count = Word64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ExponentialHistogramDataPoint'sum :: Maybe Double
_ExponentialHistogramDataPoint'sum = Maybe Double
forall a. Maybe a
Prelude.Nothing,
         _ExponentialHistogramDataPoint'scale :: Int32
_ExponentialHistogramDataPoint'scale = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ExponentialHistogramDataPoint'zeroCount :: Word64
_ExponentialHistogramDataPoint'zeroCount = Word64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ExponentialHistogramDataPoint'positive :: Maybe ExponentialHistogramDataPoint'Buckets
_ExponentialHistogramDataPoint'positive = Maybe ExponentialHistogramDataPoint'Buckets
forall a. Maybe a
Prelude.Nothing,
         _ExponentialHistogramDataPoint'negative :: Maybe ExponentialHistogramDataPoint'Buckets
_ExponentialHistogramDataPoint'negative = Maybe ExponentialHistogramDataPoint'Buckets
forall a. Maybe a
Prelude.Nothing,
         _ExponentialHistogramDataPoint'flags :: Word32
_ExponentialHistogramDataPoint'flags = Word32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ExponentialHistogramDataPoint'exemplars :: Vector Exemplar
_ExponentialHistogramDataPoint'exemplars = Vector Exemplar
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _ExponentialHistogramDataPoint'min :: Maybe Double
_ExponentialHistogramDataPoint'min = Maybe Double
forall a. Maybe a
Prelude.Nothing,
         _ExponentialHistogramDataPoint'max :: Maybe Double
_ExponentialHistogramDataPoint'max = Maybe Double
forall a. Maybe a
Prelude.Nothing,
         _ExponentialHistogramDataPoint'zeroThreshold :: Double
_ExponentialHistogramDataPoint'zeroThreshold = Double
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ExponentialHistogramDataPoint'_unknownFields :: FieldSet
_ExponentialHistogramDataPoint'_unknownFields = []}
  parseMessage :: Parser ExponentialHistogramDataPoint
parseMessage
    = let
        loop ::
          ExponentialHistogramDataPoint
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Opentelemetry.Proto.Common.V1.Common.KeyValue
             -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Exemplar
                -> Data.ProtoLens.Encoding.Bytes.Parser ExponentialHistogramDataPoint
        loop :: ExponentialHistogramDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld Exemplar
-> Parser ExponentialHistogramDataPoint
loop ExponentialHistogramDataPoint
x Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld Exemplar
mutable'exemplars
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do Vector KeyValue
frozen'attributes <- IO (Vector KeyValue) -> Parser (Vector KeyValue)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                             (Growing Vector (PrimState IO) KeyValue -> IO (Vector KeyValue)
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 KeyValue
Growing Vector (PrimState IO) KeyValue
mutable'attributes)
                      Vector Exemplar
frozen'exemplars <- IO (Vector Exemplar) -> Parser (Vector Exemplar)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                            (Growing Vector (PrimState IO) Exemplar -> IO (Vector Exemplar)
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 Exemplar
Growing Vector (PrimState IO) Exemplar
mutable'exemplars)
                      (let missing :: [a]
missing = []
                       in
                         if [Any] -> Bool
forall a. [a] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
                             () -> Parser ()
forall a. a -> Parser a
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
                         else
                             String -> Parser ()
forall a. String -> Parser a
forall (m :: * -> *) a. MonadFail m => String -> m a
Prelude.fail
                               (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
                                  String
"Missing required fields: "
                                  ([String] -> String
forall a. Show a => a -> String
Prelude.show ([String]
forall a. [a]
missing :: [Prelude.String]))))
                      ExponentialHistogramDataPoint
-> Parser ExponentialHistogramDataPoint
forall a. a -> Parser a
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter
  ExponentialHistogramDataPoint
  ExponentialHistogramDataPoint
  FieldSet
  FieldSet
-> (FieldSet -> FieldSet)
-> ExponentialHistogramDataPoint
-> ExponentialHistogramDataPoint
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                           LensLike' f ExponentialHistogramDataPoint FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ExponentialHistogramDataPoint FieldSet
Setter
  ExponentialHistogramDataPoint
  ExponentialHistogramDataPoint
  FieldSet
  FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t)
                           (Setter
  ExponentialHistogramDataPoint
  ExponentialHistogramDataPoint
  (Vector KeyValue)
  (Vector KeyValue)
-> Vector KeyValue
-> ExponentialHistogramDataPoint
-> ExponentialHistogramDataPoint
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                              (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'attributes") Vector KeyValue
frozen'attributes
                              (Setter
  ExponentialHistogramDataPoint
  ExponentialHistogramDataPoint
  (Vector Exemplar)
  (Vector Exemplar)
-> Vector Exemplar
-> ExponentialHistogramDataPoint
-> ExponentialHistogramDataPoint
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'exemplars") Vector Exemplar
frozen'exemplars ExponentialHistogramDataPoint
x)))
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        Word64
10
                          -> do !KeyValue
y <- Parser KeyValue -> String -> Parser KeyValue
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Int -> Parser KeyValue -> Parser KeyValue
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 KeyValue
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                        String
"attributes"
                                Growing Vector RealWorld KeyValue
v <- IO (Growing Vector RealWorld KeyValue)
-> Parser (Growing Vector RealWorld KeyValue)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) KeyValue
-> KeyValue -> IO (Growing Vector (PrimState IO) KeyValue)
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 KeyValue
Growing Vector (PrimState IO) KeyValue
mutable'attributes KeyValue
y)
                                ExponentialHistogramDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld Exemplar
-> Parser ExponentialHistogramDataPoint
loop ExponentialHistogramDataPoint
x Growing Vector RealWorld KeyValue
v Growing Vector RealWorld Exemplar
mutable'exemplars
                        Word64
17
                          -> do Word64
y <- Parser Word64 -> String -> Parser Word64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       Parser Word64
Data.ProtoLens.Encoding.Bytes.getFixed64
                                       String
"start_time_unix_nano"
                                ExponentialHistogramDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld Exemplar
-> Parser ExponentialHistogramDataPoint
loop
                                  (Setter
  ExponentialHistogramDataPoint
  ExponentialHistogramDataPoint
  Word64
  Word64
-> Word64
-> ExponentialHistogramDataPoint
-> ExponentialHistogramDataPoint
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"startTimeUnixNano") Word64
y ExponentialHistogramDataPoint
x)
                                  Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld Exemplar
mutable'exemplars
                        Word64
25
                          -> do Word64
y <- Parser Word64 -> String -> Parser Word64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       Parser Word64
Data.ProtoLens.Encoding.Bytes.getFixed64 String
"time_unix_nano"
                                ExponentialHistogramDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld Exemplar
-> Parser ExponentialHistogramDataPoint
loop
                                  (Setter
  ExponentialHistogramDataPoint
  ExponentialHistogramDataPoint
  Word64
  Word64
-> Word64
-> ExponentialHistogramDataPoint
-> ExponentialHistogramDataPoint
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"timeUnixNano") Word64
y ExponentialHistogramDataPoint
x)
                                  Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld Exemplar
mutable'exemplars
                        Word64
33
                          -> do Word64
y <- Parser Word64 -> String -> Parser Word64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       Parser Word64
Data.ProtoLens.Encoding.Bytes.getFixed64 String
"count"
                                ExponentialHistogramDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld Exemplar
-> Parser ExponentialHistogramDataPoint
loop
                                  (Setter
  ExponentialHistogramDataPoint
  ExponentialHistogramDataPoint
  Word64
  Word64
-> Word64
-> ExponentialHistogramDataPoint
-> ExponentialHistogramDataPoint
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"count") Word64
y ExponentialHistogramDataPoint
x)
                                  Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld Exemplar
mutable'exemplars
                        Word64
41
                          -> 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 a b. (a -> b) -> Parser a -> Parser b
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)
                                       String
"sum"
                                ExponentialHistogramDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld Exemplar
-> Parser ExponentialHistogramDataPoint
loop
                                  (Setter
  ExponentialHistogramDataPoint
  ExponentialHistogramDataPoint
  Double
  Double
-> Double
-> ExponentialHistogramDataPoint
-> ExponentialHistogramDataPoint
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"sum") Double
y ExponentialHistogramDataPoint
x)
                                  Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld Exemplar
mutable'exemplars
                        Word64
48
                          -> do Int32
y <- Parser Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word32 -> Int32) -> Parser Word32 -> Parser Int32
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word32 -> Int32
Data.ProtoLens.Encoding.Bytes.wordToSignedInt32
                                          ((Word64 -> Word32) -> Parser Word64 -> Parser Word32
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                             Word64 -> Word32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                             Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt))
                                       String
"scale"
                                ExponentialHistogramDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld Exemplar
-> Parser ExponentialHistogramDataPoint
loop
                                  (Setter
  ExponentialHistogramDataPoint
  ExponentialHistogramDataPoint
  Int32
  Int32
-> Int32
-> ExponentialHistogramDataPoint
-> ExponentialHistogramDataPoint
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"scale") Int32
y ExponentialHistogramDataPoint
x)
                                  Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld Exemplar
mutable'exemplars
                        Word64
57
                          -> do Word64
y <- Parser Word64 -> String -> Parser Word64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       Parser Word64
Data.ProtoLens.Encoding.Bytes.getFixed64 String
"zero_count"
                                ExponentialHistogramDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld Exemplar
-> Parser ExponentialHistogramDataPoint
loop
                                  (Setter
  ExponentialHistogramDataPoint
  ExponentialHistogramDataPoint
  Word64
  Word64
-> Word64
-> ExponentialHistogramDataPoint
-> ExponentialHistogramDataPoint
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"zeroCount") Word64
y ExponentialHistogramDataPoint
x)
                                  Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld Exemplar
mutable'exemplars
                        Word64
66
                          -> do ExponentialHistogramDataPoint'Buckets
y <- Parser ExponentialHistogramDataPoint'Buckets
-> String -> Parser ExponentialHistogramDataPoint'Buckets
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int
-> Parser ExponentialHistogramDataPoint'Buckets
-> Parser ExponentialHistogramDataPoint'Buckets
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 ExponentialHistogramDataPoint'Buckets
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       String
"positive"
                                ExponentialHistogramDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld Exemplar
-> Parser ExponentialHistogramDataPoint
loop
                                  (Setter
  ExponentialHistogramDataPoint
  ExponentialHistogramDataPoint
  ExponentialHistogramDataPoint'Buckets
  ExponentialHistogramDataPoint'Buckets
-> ExponentialHistogramDataPoint'Buckets
-> ExponentialHistogramDataPoint
-> ExponentialHistogramDataPoint
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"positive") ExponentialHistogramDataPoint'Buckets
y ExponentialHistogramDataPoint
x)
                                  Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld Exemplar
mutable'exemplars
                        Word64
74
                          -> do ExponentialHistogramDataPoint'Buckets
y <- Parser ExponentialHistogramDataPoint'Buckets
-> String -> Parser ExponentialHistogramDataPoint'Buckets
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int
-> Parser ExponentialHistogramDataPoint'Buckets
-> Parser ExponentialHistogramDataPoint'Buckets
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 ExponentialHistogramDataPoint'Buckets
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       String
"negative"
                                ExponentialHistogramDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld Exemplar
-> Parser ExponentialHistogramDataPoint
loop
                                  (Setter
  ExponentialHistogramDataPoint
  ExponentialHistogramDataPoint
  ExponentialHistogramDataPoint'Buckets
  ExponentialHistogramDataPoint'Buckets
-> ExponentialHistogramDataPoint'Buckets
-> ExponentialHistogramDataPoint
-> ExponentialHistogramDataPoint
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"negative") ExponentialHistogramDataPoint'Buckets
y ExponentialHistogramDataPoint
x)
                                  Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld Exemplar
mutable'exemplars
                        Word64
80
                          -> do Word32
y <- Parser Word32 -> String -> Parser Word32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Word32) -> Parser Word64 -> Parser Word32
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Word32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"flags"
                                ExponentialHistogramDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld Exemplar
-> Parser ExponentialHistogramDataPoint
loop
                                  (Setter
  ExponentialHistogramDataPoint
  ExponentialHistogramDataPoint
  Word32
  Word32
-> Word32
-> ExponentialHistogramDataPoint
-> ExponentialHistogramDataPoint
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"flags") Word32
y ExponentialHistogramDataPoint
x)
                                  Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld Exemplar
mutable'exemplars
                        Word64
90
                          -> do !Exemplar
y <- Parser Exemplar -> String -> Parser Exemplar
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Int -> Parser Exemplar -> Parser Exemplar
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 Exemplar
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                        String
"exemplars"
                                Growing Vector RealWorld Exemplar
v <- IO (Growing Vector RealWorld Exemplar)
-> Parser (Growing Vector RealWorld Exemplar)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) Exemplar
-> Exemplar -> IO (Growing Vector (PrimState IO) Exemplar)
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 Exemplar
Growing Vector (PrimState IO) Exemplar
mutable'exemplars Exemplar
y)
                                ExponentialHistogramDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld Exemplar
-> Parser ExponentialHistogramDataPoint
loop ExponentialHistogramDataPoint
x Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld Exemplar
v
                        Word64
97
                          -> do Double
y <- Parser Double -> String -> Parser Double
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Double) -> Parser Word64 -> Parser Double
forall a b. (a -> b) -> Parser a -> Parser b
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)
                                       String
"min"
                                ExponentialHistogramDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld Exemplar
-> Parser ExponentialHistogramDataPoint
loop
                                  (Setter
  ExponentialHistogramDataPoint
  ExponentialHistogramDataPoint
  Double
  Double
-> Double
-> ExponentialHistogramDataPoint
-> ExponentialHistogramDataPoint
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"min") Double
y ExponentialHistogramDataPoint
x)
                                  Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld Exemplar
mutable'exemplars
                        Word64
105
                          -> 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 a b. (a -> b) -> Parser a -> Parser b
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)
                                       String
"max"
                                ExponentialHistogramDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld Exemplar
-> Parser ExponentialHistogramDataPoint
loop
                                  (Setter
  ExponentialHistogramDataPoint
  ExponentialHistogramDataPoint
  Double
  Double
-> Double
-> ExponentialHistogramDataPoint
-> ExponentialHistogramDataPoint
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"max") Double
y ExponentialHistogramDataPoint
x)
                                  Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld Exemplar
mutable'exemplars
                        Word64
113
                          -> 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 a b. (a -> b) -> Parser a -> Parser b
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)
                                       String
"zero_threshold"
                                ExponentialHistogramDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld Exemplar
-> Parser ExponentialHistogramDataPoint
loop
                                  (Setter
  ExponentialHistogramDataPoint
  ExponentialHistogramDataPoint
  Double
  Double
-> Double
-> ExponentialHistogramDataPoint
-> ExponentialHistogramDataPoint
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"zeroThreshold") Double
y ExponentialHistogramDataPoint
x)
                                  Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld Exemplar
mutable'exemplars
                        Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                ExponentialHistogramDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld Exemplar
-> Parser ExponentialHistogramDataPoint
loop
                                  (Setter
  ExponentialHistogramDataPoint
  ExponentialHistogramDataPoint
  FieldSet
  FieldSet
-> (FieldSet -> FieldSet)
-> ExponentialHistogramDataPoint
-> ExponentialHistogramDataPoint
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                     LensLike' f ExponentialHistogramDataPoint FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ExponentialHistogramDataPoint FieldSet
Setter
  ExponentialHistogramDataPoint
  ExponentialHistogramDataPoint
  FieldSet
  FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) ExponentialHistogramDataPoint
x)
                                  Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld Exemplar
mutable'exemplars
      in
        Parser ExponentialHistogramDataPoint
-> String -> Parser ExponentialHistogramDataPoint
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do Growing Vector RealWorld KeyValue
mutable'attributes <- IO (Growing Vector RealWorld KeyValue)
-> Parser (Growing Vector RealWorld KeyValue)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                      IO (Growing Vector RealWorld KeyValue)
IO (Growing Vector (PrimState IO) KeyValue)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              Growing Vector RealWorld Exemplar
mutable'exemplars <- IO (Growing Vector RealWorld Exemplar)
-> Parser (Growing Vector RealWorld Exemplar)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                     IO (Growing Vector RealWorld Exemplar)
IO (Growing Vector (PrimState IO) Exemplar)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              ExponentialHistogramDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld Exemplar
-> Parser ExponentialHistogramDataPoint
loop
                ExponentialHistogramDataPoint
forall msg. Message msg => msg
Data.ProtoLens.defMessage Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld Exemplar
mutable'exemplars)
          String
"ExponentialHistogramDataPoint"
  buildMessage :: ExponentialHistogramDataPoint -> Builder
buildMessage
    = \ ExponentialHistogramDataPoint
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             ((KeyValue -> Builder) -> Vector KeyValue -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                (\ KeyValue
_v
                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                        ((ByteString -> Builder)
-> (KeyValue -> ByteString) -> KeyValue -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                           (\ 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))
                           KeyValue -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage KeyValue
_v))
                (FoldLike
  (Vector KeyValue)
  ExponentialHistogramDataPoint
  ExponentialHistogramDataPoint
  (Vector KeyValue)
  (Vector KeyValue)
-> ExponentialHistogramDataPoint -> Vector KeyValue
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                   (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'attributes") ExponentialHistogramDataPoint
_x))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   _v :: Word64
_v
                     = FoldLike
  Word64
  ExponentialHistogramDataPoint
  ExponentialHistogramDataPoint
  Word64
  Word64
-> ExponentialHistogramDataPoint -> Word64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                         (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"startTimeUnixNano") ExponentialHistogramDataPoint
_x
                 in
                   if Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Word64
_v Word64
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 Word64
17)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putFixed64 Word64
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: Word64
_v
                        = FoldLike
  Word64
  ExponentialHistogramDataPoint
  ExponentialHistogramDataPoint
  Word64
  Word64
-> ExponentialHistogramDataPoint -> Word64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"timeUnixNano") ExponentialHistogramDataPoint
_x
                    in
                      if Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Word64
_v Word64
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 Word64
25)
                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putFixed64 Word64
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (let
                         _v :: Word64
_v = FoldLike
  Word64
  ExponentialHistogramDataPoint
  ExponentialHistogramDataPoint
  Word64
  Word64
-> ExponentialHistogramDataPoint -> Word64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"count") ExponentialHistogramDataPoint
_x
                       in
                         if Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Word64
_v Word64
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 Word64
33)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putFixed64 Word64
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (case
                              FoldLike
  (Maybe Double)
  ExponentialHistogramDataPoint
  ExponentialHistogramDataPoint
  (Maybe Double)
  (Maybe Double)
-> ExponentialHistogramDataPoint -> Maybe Double
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'sum") ExponentialHistogramDataPoint
_x
                          of
                            Maybe Double
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            (Prelude.Just Double
_v)
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
41)
                                   ((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 :: Int32
_v = FoldLike
  Int32
  ExponentialHistogramDataPoint
  ExponentialHistogramDataPoint
  Int32
  Int32
-> ExponentialHistogramDataPoint -> Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"scale") ExponentialHistogramDataPoint
_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 Word64
48)
                                     ((Word32 -> Builder) -> (Int32 -> Word32) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                        ((Word64 -> Builder) -> (Word32 -> Word64) -> Word32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                           Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                           Word32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral)
                                        Int32 -> Word32
Data.ProtoLens.Encoding.Bytes.signedInt32ToWord Int32
_v))
                            (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (let
                                  _v :: Word64
_v
                                    = FoldLike
  Word64
  ExponentialHistogramDataPoint
  ExponentialHistogramDataPoint
  Word64
  Word64
-> ExponentialHistogramDataPoint -> Word64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"zeroCount") ExponentialHistogramDataPoint
_x
                                in
                                  if Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Word64
_v Word64
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 Word64
57)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putFixed64 Word64
_v))
                               (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (case
                                       FoldLike
  (Maybe ExponentialHistogramDataPoint'Buckets)
  ExponentialHistogramDataPoint
  ExponentialHistogramDataPoint
  (Maybe ExponentialHistogramDataPoint'Buckets)
  (Maybe ExponentialHistogramDataPoint'Buckets)
-> ExponentialHistogramDataPoint
-> Maybe ExponentialHistogramDataPoint'Buckets
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                         (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'positive") ExponentialHistogramDataPoint
_x
                                   of
                                     Maybe ExponentialHistogramDataPoint'Buckets
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                     (Prelude.Just ExponentialHistogramDataPoint'Buckets
_v)
                                       -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
66)
                                            ((ByteString -> Builder)
-> (ExponentialHistogramDataPoint'Buckets -> ByteString)
-> ExponentialHistogramDataPoint'Buckets
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                               (\ 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))
                                               ExponentialHistogramDataPoint'Buckets -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ExponentialHistogramDataPoint'Buckets
_v))
                                  (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (case
                                          FoldLike
  (Maybe ExponentialHistogramDataPoint'Buckets)
  ExponentialHistogramDataPoint
  ExponentialHistogramDataPoint
  (Maybe ExponentialHistogramDataPoint'Buckets)
  (Maybe ExponentialHistogramDataPoint'Buckets)
-> ExponentialHistogramDataPoint
-> Maybe ExponentialHistogramDataPoint'Buckets
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                            (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'negative") ExponentialHistogramDataPoint
_x
                                      of
                                        Maybe ExponentialHistogramDataPoint'Buckets
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                        (Prelude.Just ExponentialHistogramDataPoint'Buckets
_v)
                                          -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
74)
                                               ((ByteString -> Builder)
-> (ExponentialHistogramDataPoint'Buckets -> ByteString)
-> ExponentialHistogramDataPoint'Buckets
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                  (\ 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))
                                                  ExponentialHistogramDataPoint'Buckets -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ExponentialHistogramDataPoint'Buckets
_v))
                                     (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (let
                                           _v :: Word32
_v
                                             = FoldLike
  Word32
  ExponentialHistogramDataPoint
  ExponentialHistogramDataPoint
  Word32
  Word32
-> ExponentialHistogramDataPoint -> Word32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"flags") ExponentialHistogramDataPoint
_x
                                         in
                                           if Word32 -> Word32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Word32
_v Word32
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 Word64
80)
                                                 ((Word64 -> Builder) -> (Word32 -> Word64) -> Word32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                    Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                    Word32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word32
_v))
                                        (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           ((Exemplar -> Builder) -> Vector Exemplar -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                                              (\ Exemplar
_v
                                                 -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
90)
                                                      ((ByteString -> Builder)
-> (Exemplar -> ByteString) -> Exemplar -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                         (\ 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))
                                                         Exemplar -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Exemplar
_v))
                                              (FoldLike
  (Vector Exemplar)
  ExponentialHistogramDataPoint
  ExponentialHistogramDataPoint
  (Vector Exemplar)
  (Vector Exemplar)
-> ExponentialHistogramDataPoint -> Vector Exemplar
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'exemplars") ExponentialHistogramDataPoint
_x))
                                           (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                              (case
                                                   FoldLike
  (Maybe Double)
  ExponentialHistogramDataPoint
  ExponentialHistogramDataPoint
  (Maybe Double)
  (Maybe Double)
-> ExponentialHistogramDataPoint -> Maybe Double
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                     (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'min") ExponentialHistogramDataPoint
_x
                                               of
                                                 Maybe Double
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                                 (Prelude.Just Double
_v)
                                                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
97)
                                                        ((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.<>)
                                                 (case
                                                      FoldLike
  (Maybe Double)
  ExponentialHistogramDataPoint
  ExponentialHistogramDataPoint
  (Maybe Double)
  (Maybe Double)
-> ExponentialHistogramDataPoint -> Maybe Double
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                        (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'max") ExponentialHistogramDataPoint
_x
                                                  of
                                                    Maybe Double
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                                    (Prelude.Just Double
_v)
                                                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                              Word64
105)
                                                           ((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 :: Double
_v
                                                         = FoldLike
  Double
  ExponentialHistogramDataPoint
  ExponentialHistogramDataPoint
  Double
  Double
-> ExponentialHistogramDataPoint -> Double
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                             (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                                @"zeroThreshold")
                                                             ExponentialHistogramDataPoint
_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
                                                                Word64
113)
                                                             ((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))
                                                    (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                                       (FoldLike
  FieldSet
  ExponentialHistogramDataPoint
  ExponentialHistogramDataPoint
  FieldSet
  FieldSet
-> ExponentialHistogramDataPoint -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                          FoldLike
  FieldSet
  ExponentialHistogramDataPoint
  ExponentialHistogramDataPoint
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ExponentialHistogramDataPoint FieldSet
Data.ProtoLens.unknownFields
                                                          ExponentialHistogramDataPoint
_x)))))))))))))))
instance Control.DeepSeq.NFData ExponentialHistogramDataPoint where
  rnf :: ExponentialHistogramDataPoint -> ()
rnf
    = \ ExponentialHistogramDataPoint
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ExponentialHistogramDataPoint -> FieldSet
_ExponentialHistogramDataPoint'_unknownFields ExponentialHistogramDataPoint
x__)
             (Vector KeyValue -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ExponentialHistogramDataPoint -> Vector KeyValue
_ExponentialHistogramDataPoint'attributes ExponentialHistogramDataPoint
x__)
                (Word64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ExponentialHistogramDataPoint -> Word64
_ExponentialHistogramDataPoint'startTimeUnixNano ExponentialHistogramDataPoint
x__)
                   (Word64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (ExponentialHistogramDataPoint -> Word64
_ExponentialHistogramDataPoint'timeUnixNano ExponentialHistogramDataPoint
x__)
                      (Word64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (ExponentialHistogramDataPoint -> Word64
_ExponentialHistogramDataPoint'count ExponentialHistogramDataPoint
x__)
                         (Maybe Double -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (ExponentialHistogramDataPoint -> Maybe Double
_ExponentialHistogramDataPoint'sum ExponentialHistogramDataPoint
x__)
                            (Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (ExponentialHistogramDataPoint -> Int32
_ExponentialHistogramDataPoint'scale ExponentialHistogramDataPoint
x__)
                               (Word64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (ExponentialHistogramDataPoint -> Word64
_ExponentialHistogramDataPoint'zeroCount ExponentialHistogramDataPoint
x__)
                                  (Maybe ExponentialHistogramDataPoint'Buckets -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                     (ExponentialHistogramDataPoint
-> Maybe ExponentialHistogramDataPoint'Buckets
_ExponentialHistogramDataPoint'positive ExponentialHistogramDataPoint
x__)
                                     (Maybe ExponentialHistogramDataPoint'Buckets -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                        (ExponentialHistogramDataPoint
-> Maybe ExponentialHistogramDataPoint'Buckets
_ExponentialHistogramDataPoint'negative ExponentialHistogramDataPoint
x__)
                                        (Word32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                           (ExponentialHistogramDataPoint -> Word32
_ExponentialHistogramDataPoint'flags ExponentialHistogramDataPoint
x__)
                                           (Vector Exemplar -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                              (ExponentialHistogramDataPoint -> Vector Exemplar
_ExponentialHistogramDataPoint'exemplars ExponentialHistogramDataPoint
x__)
                                              (Maybe Double -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                 (ExponentialHistogramDataPoint -> Maybe Double
_ExponentialHistogramDataPoint'min ExponentialHistogramDataPoint
x__)
                                                 (Maybe Double -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                    (ExponentialHistogramDataPoint -> Maybe Double
_ExponentialHistogramDataPoint'max ExponentialHistogramDataPoint
x__)
                                                    (Double -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                       (ExponentialHistogramDataPoint -> Double
_ExponentialHistogramDataPoint'zeroThreshold
                                                          ExponentialHistogramDataPoint
x__)
                                                       ()))))))))))))))
{- | Fields :
     
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.offset' @:: Lens' ExponentialHistogramDataPoint'Buckets Data.Int.Int32@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.bucketCounts' @:: Lens' ExponentialHistogramDataPoint'Buckets [Data.Word.Word64]@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.vec'bucketCounts' @:: Lens' ExponentialHistogramDataPoint'Buckets (Data.Vector.Unboxed.Vector Data.Word.Word64)@ -}
data ExponentialHistogramDataPoint'Buckets
  = ExponentialHistogramDataPoint'Buckets'_constructor {ExponentialHistogramDataPoint'Buckets -> Int32
_ExponentialHistogramDataPoint'Buckets'offset :: !Data.Int.Int32,
                                                        ExponentialHistogramDataPoint'Buckets -> Vector Word64
_ExponentialHistogramDataPoint'Buckets'bucketCounts :: !(Data.Vector.Unboxed.Vector Data.Word.Word64),
                                                        ExponentialHistogramDataPoint'Buckets -> FieldSet
_ExponentialHistogramDataPoint'Buckets'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ExponentialHistogramDataPoint'Buckets
-> ExponentialHistogramDataPoint'Buckets -> Bool
(ExponentialHistogramDataPoint'Buckets
 -> ExponentialHistogramDataPoint'Buckets -> Bool)
-> (ExponentialHistogramDataPoint'Buckets
    -> ExponentialHistogramDataPoint'Buckets -> Bool)
-> Eq ExponentialHistogramDataPoint'Buckets
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ExponentialHistogramDataPoint'Buckets
-> ExponentialHistogramDataPoint'Buckets -> Bool
== :: ExponentialHistogramDataPoint'Buckets
-> ExponentialHistogramDataPoint'Buckets -> Bool
$c/= :: ExponentialHistogramDataPoint'Buckets
-> ExponentialHistogramDataPoint'Buckets -> Bool
/= :: ExponentialHistogramDataPoint'Buckets
-> ExponentialHistogramDataPoint'Buckets -> Bool
Prelude.Eq, Eq ExponentialHistogramDataPoint'Buckets
Eq ExponentialHistogramDataPoint'Buckets =>
(ExponentialHistogramDataPoint'Buckets
 -> ExponentialHistogramDataPoint'Buckets -> Ordering)
-> (ExponentialHistogramDataPoint'Buckets
    -> ExponentialHistogramDataPoint'Buckets -> Bool)
-> (ExponentialHistogramDataPoint'Buckets
    -> ExponentialHistogramDataPoint'Buckets -> Bool)
-> (ExponentialHistogramDataPoint'Buckets
    -> ExponentialHistogramDataPoint'Buckets -> Bool)
-> (ExponentialHistogramDataPoint'Buckets
    -> ExponentialHistogramDataPoint'Buckets -> Bool)
-> (ExponentialHistogramDataPoint'Buckets
    -> ExponentialHistogramDataPoint'Buckets
    -> ExponentialHistogramDataPoint'Buckets)
-> (ExponentialHistogramDataPoint'Buckets
    -> ExponentialHistogramDataPoint'Buckets
    -> ExponentialHistogramDataPoint'Buckets)
-> Ord ExponentialHistogramDataPoint'Buckets
ExponentialHistogramDataPoint'Buckets
-> ExponentialHistogramDataPoint'Buckets -> Bool
ExponentialHistogramDataPoint'Buckets
-> ExponentialHistogramDataPoint'Buckets -> Ordering
ExponentialHistogramDataPoint'Buckets
-> ExponentialHistogramDataPoint'Buckets
-> ExponentialHistogramDataPoint'Buckets
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
$ccompare :: ExponentialHistogramDataPoint'Buckets
-> ExponentialHistogramDataPoint'Buckets -> Ordering
compare :: ExponentialHistogramDataPoint'Buckets
-> ExponentialHistogramDataPoint'Buckets -> Ordering
$c< :: ExponentialHistogramDataPoint'Buckets
-> ExponentialHistogramDataPoint'Buckets -> Bool
< :: ExponentialHistogramDataPoint'Buckets
-> ExponentialHistogramDataPoint'Buckets -> Bool
$c<= :: ExponentialHistogramDataPoint'Buckets
-> ExponentialHistogramDataPoint'Buckets -> Bool
<= :: ExponentialHistogramDataPoint'Buckets
-> ExponentialHistogramDataPoint'Buckets -> Bool
$c> :: ExponentialHistogramDataPoint'Buckets
-> ExponentialHistogramDataPoint'Buckets -> Bool
> :: ExponentialHistogramDataPoint'Buckets
-> ExponentialHistogramDataPoint'Buckets -> Bool
$c>= :: ExponentialHistogramDataPoint'Buckets
-> ExponentialHistogramDataPoint'Buckets -> Bool
>= :: ExponentialHistogramDataPoint'Buckets
-> ExponentialHistogramDataPoint'Buckets -> Bool
$cmax :: ExponentialHistogramDataPoint'Buckets
-> ExponentialHistogramDataPoint'Buckets
-> ExponentialHistogramDataPoint'Buckets
max :: ExponentialHistogramDataPoint'Buckets
-> ExponentialHistogramDataPoint'Buckets
-> ExponentialHistogramDataPoint'Buckets
$cmin :: ExponentialHistogramDataPoint'Buckets
-> ExponentialHistogramDataPoint'Buckets
-> ExponentialHistogramDataPoint'Buckets
min :: ExponentialHistogramDataPoint'Buckets
-> ExponentialHistogramDataPoint'Buckets
-> ExponentialHistogramDataPoint'Buckets
Prelude.Ord)
instance Prelude.Show ExponentialHistogramDataPoint'Buckets where
  showsPrec :: Int -> ExponentialHistogramDataPoint'Buckets -> ShowS
showsPrec Int
_ ExponentialHistogramDataPoint'Buckets
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ExponentialHistogramDataPoint'Buckets -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ExponentialHistogramDataPoint'Buckets
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ExponentialHistogramDataPoint'Buckets "offset" Data.Int.Int32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "offset"
-> (Int32 -> f Int32)
-> ExponentialHistogramDataPoint'Buckets
-> f ExponentialHistogramDataPoint'Buckets
fieldOf Proxy# "offset"
_
    = ((Int32 -> f Int32)
 -> ExponentialHistogramDataPoint'Buckets
 -> f ExponentialHistogramDataPoint'Buckets)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> ExponentialHistogramDataPoint'Buckets
-> f ExponentialHistogramDataPoint'Buckets
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExponentialHistogramDataPoint'Buckets -> Int32)
-> (ExponentialHistogramDataPoint'Buckets
    -> Int32 -> ExponentialHistogramDataPoint'Buckets)
-> Lens
     ExponentialHistogramDataPoint'Buckets
     ExponentialHistogramDataPoint'Buckets
     Int32
     Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExponentialHistogramDataPoint'Buckets -> Int32
_ExponentialHistogramDataPoint'Buckets'offset
           (\ ExponentialHistogramDataPoint'Buckets
x__ Int32
y__
              -> ExponentialHistogramDataPoint'Buckets
x__ {_ExponentialHistogramDataPoint'Buckets'offset = y__}))
        (Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ExponentialHistogramDataPoint'Buckets "bucketCounts" [Data.Word.Word64] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "bucketCounts"
-> ([Word64] -> f [Word64])
-> ExponentialHistogramDataPoint'Buckets
-> f ExponentialHistogramDataPoint'Buckets
fieldOf Proxy# "bucketCounts"
_
    = ((Vector Word64 -> f (Vector Word64))
 -> ExponentialHistogramDataPoint'Buckets
 -> f ExponentialHistogramDataPoint'Buckets)
-> (([Word64] -> f [Word64]) -> Vector Word64 -> f (Vector Word64))
-> ([Word64] -> f [Word64])
-> ExponentialHistogramDataPoint'Buckets
-> f ExponentialHistogramDataPoint'Buckets
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExponentialHistogramDataPoint'Buckets -> Vector Word64)
-> (ExponentialHistogramDataPoint'Buckets
    -> Vector Word64 -> ExponentialHistogramDataPoint'Buckets)
-> Lens
     ExponentialHistogramDataPoint'Buckets
     ExponentialHistogramDataPoint'Buckets
     (Vector Word64)
     (Vector Word64)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExponentialHistogramDataPoint'Buckets -> Vector Word64
_ExponentialHistogramDataPoint'Buckets'bucketCounts
           (\ ExponentialHistogramDataPoint'Buckets
x__ Vector Word64
y__
              -> ExponentialHistogramDataPoint'Buckets
x__
                   {_ExponentialHistogramDataPoint'Buckets'bucketCounts = y__}))
        ((Vector Word64 -> [Word64])
-> (Vector Word64 -> [Word64] -> Vector Word64)
-> Lens (Vector Word64) (Vector Word64) [Word64] [Word64]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Word64 -> [Word64]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector Word64
_ [Word64]
y__ -> [Word64] -> Vector Word64
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Word64]
y__))
instance Data.ProtoLens.Field.HasField ExponentialHistogramDataPoint'Buckets "vec'bucketCounts" (Data.Vector.Unboxed.Vector Data.Word.Word64) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'bucketCounts"
-> (Vector Word64 -> f (Vector Word64))
-> ExponentialHistogramDataPoint'Buckets
-> f ExponentialHistogramDataPoint'Buckets
fieldOf Proxy# "vec'bucketCounts"
_
    = ((Vector Word64 -> f (Vector Word64))
 -> ExponentialHistogramDataPoint'Buckets
 -> f ExponentialHistogramDataPoint'Buckets)
-> ((Vector Word64 -> f (Vector Word64))
    -> Vector Word64 -> f (Vector Word64))
-> (Vector Word64 -> f (Vector Word64))
-> ExponentialHistogramDataPoint'Buckets
-> f ExponentialHistogramDataPoint'Buckets
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExponentialHistogramDataPoint'Buckets -> Vector Word64)
-> (ExponentialHistogramDataPoint'Buckets
    -> Vector Word64 -> ExponentialHistogramDataPoint'Buckets)
-> Lens
     ExponentialHistogramDataPoint'Buckets
     ExponentialHistogramDataPoint'Buckets
     (Vector Word64)
     (Vector Word64)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExponentialHistogramDataPoint'Buckets -> Vector Word64
_ExponentialHistogramDataPoint'Buckets'bucketCounts
           (\ ExponentialHistogramDataPoint'Buckets
x__ Vector Word64
y__
              -> ExponentialHistogramDataPoint'Buckets
x__
                   {_ExponentialHistogramDataPoint'Buckets'bucketCounts = y__}))
        (Vector Word64 -> f (Vector Word64))
-> Vector Word64 -> f (Vector Word64)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ExponentialHistogramDataPoint'Buckets where
  messageName :: Proxy ExponentialHistogramDataPoint'Buckets -> Text
messageName Proxy ExponentialHistogramDataPoint'Buckets
_
    = String -> Text
Data.Text.pack
        String
"opentelemetry.proto.metrics.v1.ExponentialHistogramDataPoint.Buckets"
  packedMessageDescriptor :: Proxy ExponentialHistogramDataPoint'Buckets -> ByteString
packedMessageDescriptor Proxy ExponentialHistogramDataPoint'Buckets
_
    = ByteString
"\n\
      \\aBuckets\DC2\SYN\n\
      \\ACKoffset\CAN\SOH \SOH(\DC1R\ACKoffset\DC2#\n\
      \\rbucket_counts\CAN\STX \ETX(\EOTR\fbucketCounts"
  packedFileDescriptor :: Proxy ExponentialHistogramDataPoint'Buckets -> ByteString
packedFileDescriptor Proxy ExponentialHistogramDataPoint'Buckets
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ExponentialHistogramDataPoint'Buckets)
fieldsByTag
    = let
        offset__field_descriptor :: FieldDescriptor ExponentialHistogramDataPoint'Buckets
offset__field_descriptor
          = String
-> FieldTypeDescriptor Int32
-> FieldAccessor ExponentialHistogramDataPoint'Buckets Int32
-> FieldDescriptor ExponentialHistogramDataPoint'Buckets
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"offset"
              (ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.SInt32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
              (WireDefault Int32
-> Lens
     ExponentialHistogramDataPoint'Buckets
     ExponentialHistogramDataPoint'Buckets
     Int32
     Int32
-> FieldAccessor ExponentialHistogramDataPoint'Buckets 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 (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"offset")) ::
              Data.ProtoLens.FieldDescriptor ExponentialHistogramDataPoint'Buckets
        bucketCounts__field_descriptor :: FieldDescriptor ExponentialHistogramDataPoint'Buckets
bucketCounts__field_descriptor
          = String
-> FieldTypeDescriptor Word64
-> FieldAccessor ExponentialHistogramDataPoint'Buckets Word64
-> FieldDescriptor ExponentialHistogramDataPoint'Buckets
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"bucket_counts"
              (ScalarField Word64 -> FieldTypeDescriptor Word64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Word64
Data.ProtoLens.UInt64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64)
              (Packing
-> Lens' ExponentialHistogramDataPoint'Buckets [Word64]
-> FieldAccessor ExponentialHistogramDataPoint'Buckets Word64
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Packed
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"bucketCounts")) ::
              Data.ProtoLens.FieldDescriptor ExponentialHistogramDataPoint'Buckets
      in
        [(Tag, FieldDescriptor ExponentialHistogramDataPoint'Buckets)]
-> Map Tag (FieldDescriptor ExponentialHistogramDataPoint'Buckets)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ExponentialHistogramDataPoint'Buckets
offset__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ExponentialHistogramDataPoint'Buckets
bucketCounts__field_descriptor)]
  unknownFields :: Lens' ExponentialHistogramDataPoint'Buckets FieldSet
unknownFields
    = (ExponentialHistogramDataPoint'Buckets -> FieldSet)
-> (ExponentialHistogramDataPoint'Buckets
    -> FieldSet -> ExponentialHistogramDataPoint'Buckets)
-> Lens' ExponentialHistogramDataPoint'Buckets FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ExponentialHistogramDataPoint'Buckets -> FieldSet
_ExponentialHistogramDataPoint'Buckets'_unknownFields
        (\ ExponentialHistogramDataPoint'Buckets
x__ FieldSet
y__
           -> ExponentialHistogramDataPoint'Buckets
x__
                {_ExponentialHistogramDataPoint'Buckets'_unknownFields = y__})
  defMessage :: ExponentialHistogramDataPoint'Buckets
defMessage
    = ExponentialHistogramDataPoint'Buckets'_constructor
        {_ExponentialHistogramDataPoint'Buckets'offset :: Int32
_ExponentialHistogramDataPoint'Buckets'offset = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ExponentialHistogramDataPoint'Buckets'bucketCounts :: Vector Word64
_ExponentialHistogramDataPoint'Buckets'bucketCounts = Vector Word64
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _ExponentialHistogramDataPoint'Buckets'_unknownFields :: FieldSet
_ExponentialHistogramDataPoint'Buckets'_unknownFields = []}
  parseMessage :: Parser ExponentialHistogramDataPoint'Buckets
parseMessage
    = let
        loop ::
          ExponentialHistogramDataPoint'Buckets
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Word.Word64
             -> Data.ProtoLens.Encoding.Bytes.Parser ExponentialHistogramDataPoint'Buckets
        loop :: ExponentialHistogramDataPoint'Buckets
-> Growing Vector RealWorld Word64
-> Parser ExponentialHistogramDataPoint'Buckets
loop ExponentialHistogramDataPoint'Buckets
x Growing Vector RealWorld Word64
mutable'bucketCounts
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do Vector Word64
frozen'bucketCounts <- IO (Vector Word64) -> Parser (Vector Word64)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                               (Growing Vector (PrimState IO) Word64 -> IO (Vector Word64)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> m (v a)
Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                                  Growing Vector RealWorld Word64
Growing Vector (PrimState IO) Word64
mutable'bucketCounts)
                      (let missing :: [a]
missing = []
                       in
                         if [Any] -> Bool
forall a. [a] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
                             () -> Parser ()
forall a. a -> Parser a
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
                         else
                             String -> Parser ()
forall a. String -> Parser a
forall (m :: * -> *) a. MonadFail m => String -> m a
Prelude.fail
                               (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
                                  String
"Missing required fields: "
                                  ([String] -> String
forall a. Show a => a -> String
Prelude.show ([String]
forall a. [a]
missing :: [Prelude.String]))))
                      ExponentialHistogramDataPoint'Buckets
-> Parser ExponentialHistogramDataPoint'Buckets
forall a. a -> Parser a
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter
  ExponentialHistogramDataPoint'Buckets
  ExponentialHistogramDataPoint'Buckets
  FieldSet
  FieldSet
-> (FieldSet -> FieldSet)
-> ExponentialHistogramDataPoint'Buckets
-> ExponentialHistogramDataPoint'Buckets
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                           LensLike' f ExponentialHistogramDataPoint'Buckets FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ExponentialHistogramDataPoint'Buckets FieldSet
Setter
  ExponentialHistogramDataPoint'Buckets
  ExponentialHistogramDataPoint'Buckets
  FieldSet
  FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t)
                           (Setter
  ExponentialHistogramDataPoint'Buckets
  ExponentialHistogramDataPoint'Buckets
  (Vector Word64)
  (Vector Word64)
-> Vector Word64
-> ExponentialHistogramDataPoint'Buckets
-> ExponentialHistogramDataPoint'Buckets
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                              (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'bucketCounts")
                              Vector Word64
frozen'bucketCounts ExponentialHistogramDataPoint'Buckets
x))
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        Word64
8 -> do Int32
y <- Parser Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word32 -> Int32) -> Parser Word32 -> Parser Int32
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word32 -> Int32
Data.ProtoLens.Encoding.Bytes.wordToSignedInt32
                                          ((Word64 -> Word32) -> Parser Word64 -> Parser Word32
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                             Word64 -> Word32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                             Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt))
                                       String
"offset"
                                ExponentialHistogramDataPoint'Buckets
-> Growing Vector RealWorld Word64
-> Parser ExponentialHistogramDataPoint'Buckets
loop
                                  (Setter
  ExponentialHistogramDataPoint'Buckets
  ExponentialHistogramDataPoint'Buckets
  Int32
  Int32
-> Int32
-> ExponentialHistogramDataPoint'Buckets
-> ExponentialHistogramDataPoint'Buckets
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"offset") Int32
y ExponentialHistogramDataPoint'Buckets
x)
                                  Growing Vector RealWorld Word64
mutable'bucketCounts
                        Word64
16
                          -> do !Word64
y <- Parser Word64 -> String -> Parser Word64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt String
"bucket_counts"
                                Growing Vector RealWorld Word64
v <- IO (Growing Vector RealWorld Word64)
-> Parser (Growing Vector RealWorld Word64)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) Word64
-> Word64 -> IO (Growing Vector (PrimState IO) Word64)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> a -> m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.append
                                          Growing Vector RealWorld Word64
Growing Vector (PrimState IO) Word64
mutable'bucketCounts Word64
y)
                                ExponentialHistogramDataPoint'Buckets
-> Growing Vector RealWorld Word64
-> Parser ExponentialHistogramDataPoint'Buckets
loop ExponentialHistogramDataPoint'Buckets
x Growing Vector RealWorld Word64
v
                        Word64
18
                          -> do Growing Vector RealWorld Word64
y <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                        Int
-> Parser (Growing Vector RealWorld Word64)
-> Parser (Growing Vector RealWorld Word64)
forall a. Int -> Parser a -> Parser a
Data.ProtoLens.Encoding.Bytes.isolate
                                          (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
                                          ((let
                                              ploop :: Growing v RealWorld Word64 -> Parser (Growing v RealWorld Word64)
ploop Growing v RealWorld Word64
qs
                                                = do Bool
packedEnd <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
                                                     if Bool
packedEnd then
                                                         Growing v RealWorld Word64 -> Parser (Growing v RealWorld Word64)
forall a. a -> Parser a
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return Growing v RealWorld Word64
qs
                                                     else
                                                         do !Word64
q <- Parser Word64 -> String -> Parser Word64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                                                    Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                                    String
"bucket_counts"
                                                            Growing v RealWorld Word64
qs' <- IO (Growing v RealWorld Word64)
-> Parser (Growing v RealWorld Word64)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                                     (Growing v (PrimState IO) Word64
-> Word64 -> IO (Growing v (PrimState IO) Word64)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> a -> m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.append
                                                                        Growing v RealWorld Word64
Growing v (PrimState IO) Word64
qs Word64
q)
                                                            Growing v RealWorld Word64 -> Parser (Growing v RealWorld Word64)
ploop Growing v RealWorld Word64
qs'
                                            in Growing Vector RealWorld Word64
-> Parser (Growing Vector RealWorld Word64)
forall {v :: * -> *}.
Vector v Word64 =>
Growing v RealWorld Word64 -> Parser (Growing v RealWorld Word64)
ploop)
                                             Growing Vector RealWorld Word64
mutable'bucketCounts)
                                ExponentialHistogramDataPoint'Buckets
-> Growing Vector RealWorld Word64
-> Parser ExponentialHistogramDataPoint'Buckets
loop ExponentialHistogramDataPoint'Buckets
x Growing Vector RealWorld Word64
y
                        Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                ExponentialHistogramDataPoint'Buckets
-> Growing Vector RealWorld Word64
-> Parser ExponentialHistogramDataPoint'Buckets
loop
                                  (Setter
  ExponentialHistogramDataPoint'Buckets
  ExponentialHistogramDataPoint'Buckets
  FieldSet
  FieldSet
-> (FieldSet -> FieldSet)
-> ExponentialHistogramDataPoint'Buckets
-> ExponentialHistogramDataPoint'Buckets
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                     LensLike' f ExponentialHistogramDataPoint'Buckets FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ExponentialHistogramDataPoint'Buckets FieldSet
Setter
  ExponentialHistogramDataPoint'Buckets
  ExponentialHistogramDataPoint'Buckets
  FieldSet
  FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) ExponentialHistogramDataPoint'Buckets
x)
                                  Growing Vector RealWorld Word64
mutable'bucketCounts
      in
        Parser ExponentialHistogramDataPoint'Buckets
-> String -> Parser ExponentialHistogramDataPoint'Buckets
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do Growing Vector RealWorld Word64
mutable'bucketCounts <- IO (Growing Vector RealWorld Word64)
-> Parser (Growing Vector RealWorld Word64)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                        IO (Growing Vector RealWorld Word64)
IO (Growing Vector (PrimState IO) Word64)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              ExponentialHistogramDataPoint'Buckets
-> Growing Vector RealWorld Word64
-> Parser ExponentialHistogramDataPoint'Buckets
loop ExponentialHistogramDataPoint'Buckets
forall msg. Message msg => msg
Data.ProtoLens.defMessage Growing Vector RealWorld Word64
mutable'bucketCounts)
          String
"Buckets"
  buildMessage :: ExponentialHistogramDataPoint'Buckets -> Builder
buildMessage
    = \ ExponentialHistogramDataPoint'Buckets
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Int32
_v = FoldLike
  Int32
  ExponentialHistogramDataPoint'Buckets
  ExponentialHistogramDataPoint'Buckets
  Int32
  Int32
-> ExponentialHistogramDataPoint'Buckets -> Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"offset") ExponentialHistogramDataPoint'Buckets
_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 Word64
8)
                      ((Word32 -> Builder) -> (Int32 -> Word32) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                         ((Word64 -> Builder) -> (Word32 -> Word64) -> Word32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral)
                         Int32 -> Word32
Data.ProtoLens.Encoding.Bytes.signedInt32ToWord Int32
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   p :: Vector Word64
p = FoldLike
  (Vector Word64)
  ExponentialHistogramDataPoint'Buckets
  ExponentialHistogramDataPoint'Buckets
  (Vector Word64)
  (Vector Word64)
-> ExponentialHistogramDataPoint'Buckets -> Vector Word64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                         (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'bucketCounts") ExponentialHistogramDataPoint'Buckets
_x
                 in
                   if Vector Word64 -> Bool
forall (v :: * -> *) a. Vector v a => v a -> Bool
Data.Vector.Generic.null Vector Word64
p then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                         ((\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                            (Builder -> ByteString
Data.ProtoLens.Encoding.Bytes.runBuilder
                               ((Word64 -> Builder) -> Vector Word64 -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                                  Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Vector Word64
p))))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  ExponentialHistogramDataPoint'Buckets
  ExponentialHistogramDataPoint'Buckets
  FieldSet
  FieldSet
-> ExponentialHistogramDataPoint'Buckets -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ExponentialHistogramDataPoint'Buckets
  ExponentialHistogramDataPoint'Buckets
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ExponentialHistogramDataPoint'Buckets FieldSet
Data.ProtoLens.unknownFields ExponentialHistogramDataPoint'Buckets
_x)))
instance Control.DeepSeq.NFData ExponentialHistogramDataPoint'Buckets where
  rnf :: ExponentialHistogramDataPoint'Buckets -> ()
rnf
    = \ ExponentialHistogramDataPoint'Buckets
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ExponentialHistogramDataPoint'Buckets -> FieldSet
_ExponentialHistogramDataPoint'Buckets'_unknownFields ExponentialHistogramDataPoint'Buckets
x__)
             (Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ExponentialHistogramDataPoint'Buckets -> Int32
_ExponentialHistogramDataPoint'Buckets'offset ExponentialHistogramDataPoint'Buckets
x__)
                (Vector Word64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ExponentialHistogramDataPoint'Buckets -> Vector Word64
_ExponentialHistogramDataPoint'Buckets'bucketCounts ExponentialHistogramDataPoint'Buckets
x__) ()))
{- | Fields :
     
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.dataPoints' @:: Lens' Gauge [NumberDataPoint]@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.vec'dataPoints' @:: Lens' Gauge (Data.Vector.Vector NumberDataPoint)@ -}
data Gauge
  = Gauge'_constructor {Gauge -> Vector NumberDataPoint
_Gauge'dataPoints :: !(Data.Vector.Vector NumberDataPoint),
                        Gauge -> FieldSet
_Gauge'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (Gauge -> Gauge -> Bool
(Gauge -> Gauge -> Bool) -> (Gauge -> Gauge -> Bool) -> Eq Gauge
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: Gauge -> Gauge -> Bool
== :: Gauge -> Gauge -> Bool
$c/= :: Gauge -> Gauge -> Bool
/= :: Gauge -> Gauge -> Bool
Prelude.Eq, Eq Gauge
Eq Gauge =>
(Gauge -> Gauge -> Ordering)
-> (Gauge -> Gauge -> Bool)
-> (Gauge -> Gauge -> Bool)
-> (Gauge -> Gauge -> Bool)
-> (Gauge -> Gauge -> Bool)
-> (Gauge -> Gauge -> Gauge)
-> (Gauge -> Gauge -> Gauge)
-> Ord Gauge
Gauge -> Gauge -> Bool
Gauge -> Gauge -> Ordering
Gauge -> Gauge -> Gauge
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
$ccompare :: Gauge -> Gauge -> Ordering
compare :: Gauge -> Gauge -> Ordering
$c< :: Gauge -> Gauge -> Bool
< :: Gauge -> Gauge -> Bool
$c<= :: Gauge -> Gauge -> Bool
<= :: Gauge -> Gauge -> Bool
$c> :: Gauge -> Gauge -> Bool
> :: Gauge -> Gauge -> Bool
$c>= :: Gauge -> Gauge -> Bool
>= :: Gauge -> Gauge -> Bool
$cmax :: Gauge -> Gauge -> Gauge
max :: Gauge -> Gauge -> Gauge
$cmin :: Gauge -> Gauge -> Gauge
min :: Gauge -> Gauge -> Gauge
Prelude.Ord)
instance Prelude.Show Gauge where
  showsPrec :: Int -> Gauge -> ShowS
showsPrec Int
_ Gauge
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (Gauge -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort Gauge
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField Gauge "dataPoints" [NumberDataPoint] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "dataPoints"
-> ([NumberDataPoint] -> f [NumberDataPoint]) -> Gauge -> f Gauge
fieldOf Proxy# "dataPoints"
_
    = ((Vector NumberDataPoint -> f (Vector NumberDataPoint))
 -> Gauge -> f Gauge)
-> (([NumberDataPoint] -> f [NumberDataPoint])
    -> Vector NumberDataPoint -> f (Vector NumberDataPoint))
-> ([NumberDataPoint] -> f [NumberDataPoint])
-> Gauge
-> f Gauge
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((Gauge -> Vector NumberDataPoint)
-> (Gauge -> Vector NumberDataPoint -> Gauge)
-> Lens
     Gauge Gauge (Vector NumberDataPoint) (Vector NumberDataPoint)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Gauge -> Vector NumberDataPoint
_Gauge'dataPoints (\ Gauge
x__ Vector NumberDataPoint
y__ -> Gauge
x__ {_Gauge'dataPoints = y__}))
        ((Vector NumberDataPoint -> [NumberDataPoint])
-> (Vector NumberDataPoint
    -> [NumberDataPoint] -> Vector NumberDataPoint)
-> Lens
     (Vector NumberDataPoint)
     (Vector NumberDataPoint)
     [NumberDataPoint]
     [NumberDataPoint]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector NumberDataPoint -> [NumberDataPoint]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector NumberDataPoint
_ [NumberDataPoint]
y__ -> [NumberDataPoint] -> Vector NumberDataPoint
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [NumberDataPoint]
y__))
instance Data.ProtoLens.Field.HasField Gauge "vec'dataPoints" (Data.Vector.Vector NumberDataPoint) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'dataPoints"
-> (Vector NumberDataPoint -> f (Vector NumberDataPoint))
-> Gauge
-> f Gauge
fieldOf Proxy# "vec'dataPoints"
_
    = ((Vector NumberDataPoint -> f (Vector NumberDataPoint))
 -> Gauge -> f Gauge)
-> ((Vector NumberDataPoint -> f (Vector NumberDataPoint))
    -> Vector NumberDataPoint -> f (Vector NumberDataPoint))
-> (Vector NumberDataPoint -> f (Vector NumberDataPoint))
-> Gauge
-> f Gauge
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((Gauge -> Vector NumberDataPoint)
-> (Gauge -> Vector NumberDataPoint -> Gauge)
-> Lens
     Gauge Gauge (Vector NumberDataPoint) (Vector NumberDataPoint)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Gauge -> Vector NumberDataPoint
_Gauge'dataPoints (\ Gauge
x__ Vector NumberDataPoint
y__ -> Gauge
x__ {_Gauge'dataPoints = y__}))
        (Vector NumberDataPoint -> f (Vector NumberDataPoint))
-> Vector NumberDataPoint -> f (Vector NumberDataPoint)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message Gauge where
  messageName :: Proxy Gauge -> Text
messageName Proxy Gauge
_
    = String -> Text
Data.Text.pack String
"opentelemetry.proto.metrics.v1.Gauge"
  packedMessageDescriptor :: Proxy Gauge -> ByteString
packedMessageDescriptor Proxy Gauge
_
    = ByteString
"\n\
      \\ENQGauge\DC2P\n\
      \\vdata_points\CAN\SOH \ETX(\v2/.opentelemetry.proto.metrics.v1.NumberDataPointR\n\
      \dataPoints"
  packedFileDescriptor :: Proxy Gauge -> ByteString
packedFileDescriptor Proxy Gauge
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor Gauge)
fieldsByTag
    = let
        dataPoints__field_descriptor :: FieldDescriptor Gauge
dataPoints__field_descriptor
          = String
-> FieldTypeDescriptor NumberDataPoint
-> FieldAccessor Gauge NumberDataPoint
-> FieldDescriptor Gauge
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"data_points"
              (MessageOrGroup -> FieldTypeDescriptor NumberDataPoint
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor NumberDataPoint)
              (Packing
-> Lens' Gauge [NumberDataPoint]
-> FieldAccessor Gauge NumberDataPoint
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Unpacked
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"dataPoints")) ::
              Data.ProtoLens.FieldDescriptor Gauge
      in
        [(Tag, FieldDescriptor Gauge)] -> Map Tag (FieldDescriptor Gauge)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor Gauge
dataPoints__field_descriptor)]
  unknownFields :: Lens' Gauge FieldSet
unknownFields
    = (Gauge -> FieldSet)
-> (Gauge -> FieldSet -> Gauge) -> Lens' Gauge FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        Gauge -> FieldSet
_Gauge'_unknownFields
        (\ Gauge
x__ FieldSet
y__ -> Gauge
x__ {_Gauge'_unknownFields = y__})
  defMessage :: Gauge
defMessage
    = Gauge'_constructor
        {_Gauge'dataPoints :: Vector NumberDataPoint
_Gauge'dataPoints = Vector NumberDataPoint
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _Gauge'_unknownFields :: FieldSet
_Gauge'_unknownFields = []}
  parseMessage :: Parser Gauge
parseMessage
    = let
        loop ::
          Gauge
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld NumberDataPoint
             -> Data.ProtoLens.Encoding.Bytes.Parser Gauge
        loop :: Gauge -> Growing Vector RealWorld NumberDataPoint -> Parser Gauge
loop Gauge
x Growing Vector RealWorld NumberDataPoint
mutable'dataPoints
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do Vector NumberDataPoint
frozen'dataPoints <- IO (Vector NumberDataPoint) -> Parser (Vector NumberDataPoint)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                             (Growing Vector (PrimState IO) NumberDataPoint
-> IO (Vector NumberDataPoint)
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 NumberDataPoint
Growing Vector (PrimState IO) NumberDataPoint
mutable'dataPoints)
                      (let missing :: [a]
missing = []
                       in
                         if [Any] -> Bool
forall a. [a] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
                             () -> Parser ()
forall a. a -> Parser a
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
                         else
                             String -> Parser ()
forall a. String -> Parser a
forall (m :: * -> *) a. MonadFail m => String -> m a
Prelude.fail
                               (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
                                  String
"Missing required fields: "
                                  ([String] -> String
forall a. Show a => a -> String
Prelude.show ([String]
forall a. [a]
missing :: [Prelude.String]))))
                      Gauge -> Parser Gauge
forall a. a -> Parser a
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter Gauge Gauge FieldSet FieldSet
-> (FieldSet -> FieldSet) -> Gauge -> Gauge
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                           LensLike' f Gauge FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' Gauge FieldSet
Setter Gauge Gauge FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t)
                           (Setter
  Gauge Gauge (Vector NumberDataPoint) (Vector NumberDataPoint)
-> Vector NumberDataPoint -> Gauge -> Gauge
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                              (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'dataPoints") Vector NumberDataPoint
frozen'dataPoints
                              Gauge
x))
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        Word64
10
                          -> do !NumberDataPoint
y <- Parser NumberDataPoint -> String -> Parser NumberDataPoint
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Int -> Parser NumberDataPoint -> Parser NumberDataPoint
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 NumberDataPoint
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                        String
"data_points"
                                Growing Vector RealWorld NumberDataPoint
v <- IO (Growing Vector RealWorld NumberDataPoint)
-> Parser (Growing Vector RealWorld NumberDataPoint)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) NumberDataPoint
-> NumberDataPoint
-> IO (Growing Vector (PrimState IO) NumberDataPoint)
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 NumberDataPoint
Growing Vector (PrimState IO) NumberDataPoint
mutable'dataPoints NumberDataPoint
y)
                                Gauge -> Growing Vector RealWorld NumberDataPoint -> Parser Gauge
loop Gauge
x Growing Vector RealWorld NumberDataPoint
v
                        Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                Gauge -> Growing Vector RealWorld NumberDataPoint -> Parser Gauge
loop
                                  (Setter Gauge Gauge FieldSet FieldSet
-> (FieldSet -> FieldSet) -> Gauge -> Gauge
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                     LensLike' f Gauge FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' Gauge FieldSet
Setter Gauge Gauge FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) Gauge
x)
                                  Growing Vector RealWorld NumberDataPoint
mutable'dataPoints
      in
        Parser Gauge -> String -> Parser Gauge
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do Growing Vector RealWorld NumberDataPoint
mutable'dataPoints <- IO (Growing Vector RealWorld NumberDataPoint)
-> Parser (Growing Vector RealWorld NumberDataPoint)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                      IO (Growing Vector RealWorld NumberDataPoint)
IO (Growing Vector (PrimState IO) NumberDataPoint)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              Gauge -> Growing Vector RealWorld NumberDataPoint -> Parser Gauge
loop Gauge
forall msg. Message msg => msg
Data.ProtoLens.defMessage Growing Vector RealWorld NumberDataPoint
mutable'dataPoints)
          String
"Gauge"
  buildMessage :: Gauge -> Builder
buildMessage
    = \ Gauge
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             ((NumberDataPoint -> Builder) -> Vector NumberDataPoint -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                (\ NumberDataPoint
_v
                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                        ((ByteString -> Builder)
-> (NumberDataPoint -> ByteString) -> NumberDataPoint -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                           (\ 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))
                           NumberDataPoint -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage NumberDataPoint
_v))
                (FoldLike
  (Vector NumberDataPoint)
  Gauge
  Gauge
  (Vector NumberDataPoint)
  (Vector NumberDataPoint)
-> Gauge -> Vector NumberDataPoint
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                   (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'dataPoints") Gauge
_x))
             (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                (FoldLike FieldSet Gauge Gauge FieldSet FieldSet
-> Gauge -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet Gauge Gauge FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' Gauge FieldSet
Data.ProtoLens.unknownFields Gauge
_x))
instance Control.DeepSeq.NFData Gauge where
  rnf :: Gauge -> ()
rnf
    = \ Gauge
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (Gauge -> FieldSet
_Gauge'_unknownFields Gauge
x__)
             (Vector NumberDataPoint -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (Gauge -> Vector NumberDataPoint
_Gauge'dataPoints Gauge
x__) ())
{- | Fields :
     
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.dataPoints' @:: Lens' Histogram [HistogramDataPoint]@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.vec'dataPoints' @:: Lens' Histogram (Data.Vector.Vector HistogramDataPoint)@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.aggregationTemporality' @:: Lens' Histogram AggregationTemporality@ -}
data Histogram
  = Histogram'_constructor {Histogram -> Vector HistogramDataPoint
_Histogram'dataPoints :: !(Data.Vector.Vector HistogramDataPoint),
                            Histogram -> AggregationTemporality
_Histogram'aggregationTemporality :: !AggregationTemporality,
                            Histogram -> FieldSet
_Histogram'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (Histogram -> Histogram -> Bool
(Histogram -> Histogram -> Bool)
-> (Histogram -> Histogram -> Bool) -> Eq Histogram
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: Histogram -> Histogram -> Bool
== :: Histogram -> Histogram -> Bool
$c/= :: Histogram -> Histogram -> Bool
/= :: Histogram -> Histogram -> Bool
Prelude.Eq, Eq Histogram
Eq Histogram =>
(Histogram -> Histogram -> Ordering)
-> (Histogram -> Histogram -> Bool)
-> (Histogram -> Histogram -> Bool)
-> (Histogram -> Histogram -> Bool)
-> (Histogram -> Histogram -> Bool)
-> (Histogram -> Histogram -> Histogram)
-> (Histogram -> Histogram -> Histogram)
-> Ord Histogram
Histogram -> Histogram -> Bool
Histogram -> Histogram -> Ordering
Histogram -> Histogram -> Histogram
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
$ccompare :: Histogram -> Histogram -> Ordering
compare :: Histogram -> Histogram -> Ordering
$c< :: Histogram -> Histogram -> Bool
< :: Histogram -> Histogram -> Bool
$c<= :: Histogram -> Histogram -> Bool
<= :: Histogram -> Histogram -> Bool
$c> :: Histogram -> Histogram -> Bool
> :: Histogram -> Histogram -> Bool
$c>= :: Histogram -> Histogram -> Bool
>= :: Histogram -> Histogram -> Bool
$cmax :: Histogram -> Histogram -> Histogram
max :: Histogram -> Histogram -> Histogram
$cmin :: Histogram -> Histogram -> Histogram
min :: Histogram -> Histogram -> Histogram
Prelude.Ord)
instance Prelude.Show Histogram where
  showsPrec :: Int -> Histogram -> ShowS
showsPrec Int
_ Histogram
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (Histogram -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort Histogram
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField Histogram "dataPoints" [HistogramDataPoint] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "dataPoints"
-> ([HistogramDataPoint] -> f [HistogramDataPoint])
-> Histogram
-> f Histogram
fieldOf Proxy# "dataPoints"
_
    = ((Vector HistogramDataPoint -> f (Vector HistogramDataPoint))
 -> Histogram -> f Histogram)
-> (([HistogramDataPoint] -> f [HistogramDataPoint])
    -> Vector HistogramDataPoint -> f (Vector HistogramDataPoint))
-> ([HistogramDataPoint] -> f [HistogramDataPoint])
-> Histogram
-> f Histogram
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((Histogram -> Vector HistogramDataPoint)
-> (Histogram -> Vector HistogramDataPoint -> Histogram)
-> Lens
     Histogram
     Histogram
     (Vector HistogramDataPoint)
     (Vector HistogramDataPoint)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Histogram -> Vector HistogramDataPoint
_Histogram'dataPoints
           (\ Histogram
x__ Vector HistogramDataPoint
y__ -> Histogram
x__ {_Histogram'dataPoints = y__}))
        ((Vector HistogramDataPoint -> [HistogramDataPoint])
-> (Vector HistogramDataPoint
    -> [HistogramDataPoint] -> Vector HistogramDataPoint)
-> Lens
     (Vector HistogramDataPoint)
     (Vector HistogramDataPoint)
     [HistogramDataPoint]
     [HistogramDataPoint]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector HistogramDataPoint -> [HistogramDataPoint]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector HistogramDataPoint
_ [HistogramDataPoint]
y__ -> [HistogramDataPoint] -> Vector HistogramDataPoint
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [HistogramDataPoint]
y__))
instance Data.ProtoLens.Field.HasField Histogram "vec'dataPoints" (Data.Vector.Vector HistogramDataPoint) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'dataPoints"
-> (Vector HistogramDataPoint -> f (Vector HistogramDataPoint))
-> Histogram
-> f Histogram
fieldOf Proxy# "vec'dataPoints"
_
    = ((Vector HistogramDataPoint -> f (Vector HistogramDataPoint))
 -> Histogram -> f Histogram)
-> ((Vector HistogramDataPoint -> f (Vector HistogramDataPoint))
    -> Vector HistogramDataPoint -> f (Vector HistogramDataPoint))
-> (Vector HistogramDataPoint -> f (Vector HistogramDataPoint))
-> Histogram
-> f Histogram
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((Histogram -> Vector HistogramDataPoint)
-> (Histogram -> Vector HistogramDataPoint -> Histogram)
-> Lens
     Histogram
     Histogram
     (Vector HistogramDataPoint)
     (Vector HistogramDataPoint)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Histogram -> Vector HistogramDataPoint
_Histogram'dataPoints
           (\ Histogram
x__ Vector HistogramDataPoint
y__ -> Histogram
x__ {_Histogram'dataPoints = y__}))
        (Vector HistogramDataPoint -> f (Vector HistogramDataPoint))
-> Vector HistogramDataPoint -> f (Vector HistogramDataPoint)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField Histogram "aggregationTemporality" AggregationTemporality where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "aggregationTemporality"
-> (AggregationTemporality -> f AggregationTemporality)
-> Histogram
-> f Histogram
fieldOf Proxy# "aggregationTemporality"
_
    = ((AggregationTemporality -> f AggregationTemporality)
 -> Histogram -> f Histogram)
-> ((AggregationTemporality -> f AggregationTemporality)
    -> AggregationTemporality -> f AggregationTemporality)
-> (AggregationTemporality -> f AggregationTemporality)
-> Histogram
-> f Histogram
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((Histogram -> AggregationTemporality)
-> (Histogram -> AggregationTemporality -> Histogram)
-> Lens
     Histogram Histogram AggregationTemporality AggregationTemporality
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Histogram -> AggregationTemporality
_Histogram'aggregationTemporality
           (\ Histogram
x__ AggregationTemporality
y__ -> Histogram
x__ {_Histogram'aggregationTemporality = y__}))
        (AggregationTemporality -> f AggregationTemporality)
-> AggregationTemporality -> f AggregationTemporality
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message Histogram where
  messageName :: Proxy Histogram -> Text
messageName Proxy Histogram
_
    = String -> Text
Data.Text.pack String
"opentelemetry.proto.metrics.v1.Histogram"
  packedMessageDescriptor :: Proxy Histogram -> ByteString
packedMessageDescriptor Proxy Histogram
_
    = ByteString
"\n\
      \\tHistogram\DC2S\n\
      \\vdata_points\CAN\SOH \ETX(\v22.opentelemetry.proto.metrics.v1.HistogramDataPointR\n\
      \dataPoints\DC2o\n\
      \\ETBaggregation_temporality\CAN\STX \SOH(\SO26.opentelemetry.proto.metrics.v1.AggregationTemporalityR\SYNaggregationTemporality"
  packedFileDescriptor :: Proxy Histogram -> ByteString
packedFileDescriptor Proxy Histogram
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor Histogram)
fieldsByTag
    = let
        dataPoints__field_descriptor :: FieldDescriptor Histogram
dataPoints__field_descriptor
          = String
-> FieldTypeDescriptor HistogramDataPoint
-> FieldAccessor Histogram HistogramDataPoint
-> FieldDescriptor Histogram
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"data_points"
              (MessageOrGroup -> FieldTypeDescriptor HistogramDataPoint
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor HistogramDataPoint)
              (Packing
-> Lens' Histogram [HistogramDataPoint]
-> FieldAccessor Histogram HistogramDataPoint
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Unpacked
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"dataPoints")) ::
              Data.ProtoLens.FieldDescriptor Histogram
        aggregationTemporality__field_descriptor :: FieldDescriptor Histogram
aggregationTemporality__field_descriptor
          = String
-> FieldTypeDescriptor AggregationTemporality
-> FieldAccessor Histogram AggregationTemporality
-> FieldDescriptor Histogram
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"aggregation_temporality"
              (ScalarField AggregationTemporality
-> FieldTypeDescriptor AggregationTemporality
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField AggregationTemporality
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor AggregationTemporality)
              (WireDefault AggregationTemporality
-> Lens
     Histogram Histogram AggregationTemporality AggregationTemporality
-> FieldAccessor Histogram AggregationTemporality
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault AggregationTemporality
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"aggregationTemporality")) ::
              Data.ProtoLens.FieldDescriptor Histogram
      in
        [(Tag, FieldDescriptor Histogram)]
-> Map Tag (FieldDescriptor Histogram)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor Histogram
dataPoints__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor Histogram
aggregationTemporality__field_descriptor)]
  unknownFields :: Lens' Histogram FieldSet
unknownFields
    = (Histogram -> FieldSet)
-> (Histogram -> FieldSet -> Histogram) -> Lens' Histogram FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        Histogram -> FieldSet
_Histogram'_unknownFields
        (\ Histogram
x__ FieldSet
y__ -> Histogram
x__ {_Histogram'_unknownFields = y__})
  defMessage :: Histogram
defMessage
    = Histogram'_constructor
        {_Histogram'dataPoints :: Vector HistogramDataPoint
_Histogram'dataPoints = Vector HistogramDataPoint
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _Histogram'aggregationTemporality :: AggregationTemporality
_Histogram'aggregationTemporality = AggregationTemporality
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _Histogram'_unknownFields :: FieldSet
_Histogram'_unknownFields = []}
  parseMessage :: Parser Histogram
parseMessage
    = let
        loop ::
          Histogram
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld HistogramDataPoint
             -> Data.ProtoLens.Encoding.Bytes.Parser Histogram
        loop :: Histogram
-> Growing Vector RealWorld HistogramDataPoint -> Parser Histogram
loop Histogram
x Growing Vector RealWorld HistogramDataPoint
mutable'dataPoints
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do Vector HistogramDataPoint
frozen'dataPoints <- IO (Vector HistogramDataPoint)
-> Parser (Vector HistogramDataPoint)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                             (Growing Vector (PrimState IO) HistogramDataPoint
-> IO (Vector HistogramDataPoint)
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 HistogramDataPoint
Growing Vector (PrimState IO) HistogramDataPoint
mutable'dataPoints)
                      (let missing :: [a]
missing = []
                       in
                         if [Any] -> Bool
forall a. [a] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
                             () -> Parser ()
forall a. a -> Parser a
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
                         else
                             String -> Parser ()
forall a. String -> Parser a
forall (m :: * -> *) a. MonadFail m => String -> m a
Prelude.fail
                               (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
                                  String
"Missing required fields: "
                                  ([String] -> String
forall a. Show a => a -> String
Prelude.show ([String]
forall a. [a]
missing :: [Prelude.String]))))
                      Histogram -> Parser Histogram
forall a. a -> Parser a
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter Histogram Histogram FieldSet FieldSet
-> (FieldSet -> FieldSet) -> Histogram -> Histogram
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                           LensLike' f Histogram FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' Histogram FieldSet
Setter Histogram Histogram FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t)
                           (Setter
  Histogram
  Histogram
  (Vector HistogramDataPoint)
  (Vector HistogramDataPoint)
-> Vector HistogramDataPoint -> Histogram -> Histogram
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                              (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'dataPoints") Vector HistogramDataPoint
frozen'dataPoints
                              Histogram
x))
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        Word64
10
                          -> do !HistogramDataPoint
y <- Parser HistogramDataPoint -> String -> Parser HistogramDataPoint
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Int -> Parser HistogramDataPoint -> Parser HistogramDataPoint
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 HistogramDataPoint
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                        String
"data_points"
                                Growing Vector RealWorld HistogramDataPoint
v <- IO (Growing Vector RealWorld HistogramDataPoint)
-> Parser (Growing Vector RealWorld HistogramDataPoint)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) HistogramDataPoint
-> HistogramDataPoint
-> IO (Growing Vector (PrimState IO) HistogramDataPoint)
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 HistogramDataPoint
Growing Vector (PrimState IO) HistogramDataPoint
mutable'dataPoints HistogramDataPoint
y)
                                Histogram
-> Growing Vector RealWorld HistogramDataPoint -> Parser Histogram
loop Histogram
x Growing Vector RealWorld HistogramDataPoint
v
                        Word64
16
                          -> do AggregationTemporality
y <- Parser AggregationTemporality
-> String -> Parser AggregationTemporality
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> AggregationTemporality)
-> Parser Int -> Parser AggregationTemporality
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> AggregationTemporality
forall a. Enum a => Int -> a
Prelude.toEnum
                                          ((Word64 -> Int) -> Parser Word64 -> Parser Int
forall a b. (a -> b) -> Parser a -> Parser b
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))
                                       String
"aggregation_temporality"
                                Histogram
-> Growing Vector RealWorld HistogramDataPoint -> Parser Histogram
loop
                                  (Setter
  Histogram Histogram AggregationTemporality AggregationTemporality
-> AggregationTemporality -> Histogram -> Histogram
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"aggregationTemporality") AggregationTemporality
y Histogram
x)
                                  Growing Vector RealWorld HistogramDataPoint
mutable'dataPoints
                        Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                Histogram
-> Growing Vector RealWorld HistogramDataPoint -> Parser Histogram
loop
                                  (Setter Histogram Histogram FieldSet FieldSet
-> (FieldSet -> FieldSet) -> Histogram -> Histogram
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                     LensLike' f Histogram FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' Histogram FieldSet
Setter Histogram Histogram FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) Histogram
x)
                                  Growing Vector RealWorld HistogramDataPoint
mutable'dataPoints
      in
        Parser Histogram -> String -> Parser Histogram
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do Growing Vector RealWorld HistogramDataPoint
mutable'dataPoints <- IO (Growing Vector RealWorld HistogramDataPoint)
-> Parser (Growing Vector RealWorld HistogramDataPoint)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                      IO (Growing Vector RealWorld HistogramDataPoint)
IO (Growing Vector (PrimState IO) HistogramDataPoint)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              Histogram
-> Growing Vector RealWorld HistogramDataPoint -> Parser Histogram
loop Histogram
forall msg. Message msg => msg
Data.ProtoLens.defMessage Growing Vector RealWorld HistogramDataPoint
mutable'dataPoints)
          String
"Histogram"
  buildMessage :: Histogram -> Builder
buildMessage
    = \ Histogram
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             ((HistogramDataPoint -> Builder)
-> Vector HistogramDataPoint -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                (\ HistogramDataPoint
_v
                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                        ((ByteString -> Builder)
-> (HistogramDataPoint -> ByteString)
-> HistogramDataPoint
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                           (\ 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))
                           HistogramDataPoint -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage HistogramDataPoint
_v))
                (FoldLike
  (Vector HistogramDataPoint)
  Histogram
  Histogram
  (Vector HistogramDataPoint)
  (Vector HistogramDataPoint)
-> Histogram -> Vector HistogramDataPoint
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                   (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'dataPoints") Histogram
_x))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   _v :: AggregationTemporality
_v
                     = FoldLike
  AggregationTemporality
  Histogram
  Histogram
  AggregationTemporality
  AggregationTemporality
-> Histogram -> AggregationTemporality
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                         (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"aggregationTemporality") Histogram
_x
                 in
                   if AggregationTemporality -> AggregationTemporality -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) AggregationTemporality
_v AggregationTemporality
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 Word64
16)
                         ((Int -> Builder)
-> (AggregationTemporality -> Int)
-> AggregationTemporality
-> 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)
                            AggregationTemporality -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum AggregationTemporality
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike FieldSet Histogram Histogram FieldSet FieldSet
-> Histogram -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet Histogram Histogram FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' Histogram FieldSet
Data.ProtoLens.unknownFields Histogram
_x)))
instance Control.DeepSeq.NFData Histogram where
  rnf :: Histogram -> ()
rnf
    = \ Histogram
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (Histogram -> FieldSet
_Histogram'_unknownFields Histogram
x__)
             (Vector HistogramDataPoint -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (Histogram -> Vector HistogramDataPoint
_Histogram'dataPoints Histogram
x__)
                (AggregationTemporality -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (Histogram -> AggregationTemporality
_Histogram'aggregationTemporality Histogram
x__) ()))
{- | Fields :
     
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.attributes' @:: Lens' HistogramDataPoint [Proto.Opentelemetry.Proto.Common.V1.Common.KeyValue]@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.vec'attributes' @:: Lens' HistogramDataPoint (Data.Vector.Vector Proto.Opentelemetry.Proto.Common.V1.Common.KeyValue)@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.startTimeUnixNano' @:: Lens' HistogramDataPoint Data.Word.Word64@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.timeUnixNano' @:: Lens' HistogramDataPoint Data.Word.Word64@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.count' @:: Lens' HistogramDataPoint Data.Word.Word64@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.sum' @:: Lens' HistogramDataPoint Prelude.Double@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.maybe'sum' @:: Lens' HistogramDataPoint (Prelude.Maybe Prelude.Double)@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.bucketCounts' @:: Lens' HistogramDataPoint [Data.Word.Word64]@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.vec'bucketCounts' @:: Lens' HistogramDataPoint (Data.Vector.Unboxed.Vector Data.Word.Word64)@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.explicitBounds' @:: Lens' HistogramDataPoint [Prelude.Double]@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.vec'explicitBounds' @:: Lens' HistogramDataPoint (Data.Vector.Unboxed.Vector Prelude.Double)@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.exemplars' @:: Lens' HistogramDataPoint [Exemplar]@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.vec'exemplars' @:: Lens' HistogramDataPoint (Data.Vector.Vector Exemplar)@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.flags' @:: Lens' HistogramDataPoint Data.Word.Word32@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.min' @:: Lens' HistogramDataPoint Prelude.Double@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.maybe'min' @:: Lens' HistogramDataPoint (Prelude.Maybe Prelude.Double)@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.max' @:: Lens' HistogramDataPoint Prelude.Double@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.maybe'max' @:: Lens' HistogramDataPoint (Prelude.Maybe Prelude.Double)@ -}
data HistogramDataPoint
  = HistogramDataPoint'_constructor {HistogramDataPoint -> Vector KeyValue
_HistogramDataPoint'attributes :: !(Data.Vector.Vector Proto.Opentelemetry.Proto.Common.V1.Common.KeyValue),
                                     HistogramDataPoint -> Word64
_HistogramDataPoint'startTimeUnixNano :: !Data.Word.Word64,
                                     HistogramDataPoint -> Word64
_HistogramDataPoint'timeUnixNano :: !Data.Word.Word64,
                                     HistogramDataPoint -> Word64
_HistogramDataPoint'count :: !Data.Word.Word64,
                                     HistogramDataPoint -> Maybe Double
_HistogramDataPoint'sum :: !(Prelude.Maybe Prelude.Double),
                                     HistogramDataPoint -> Vector Word64
_HistogramDataPoint'bucketCounts :: !(Data.Vector.Unboxed.Vector Data.Word.Word64),
                                     HistogramDataPoint -> Vector Double
_HistogramDataPoint'explicitBounds :: !(Data.Vector.Unboxed.Vector Prelude.Double),
                                     HistogramDataPoint -> Vector Exemplar
_HistogramDataPoint'exemplars :: !(Data.Vector.Vector Exemplar),
                                     HistogramDataPoint -> Word32
_HistogramDataPoint'flags :: !Data.Word.Word32,
                                     HistogramDataPoint -> Maybe Double
_HistogramDataPoint'min :: !(Prelude.Maybe Prelude.Double),
                                     HistogramDataPoint -> Maybe Double
_HistogramDataPoint'max :: !(Prelude.Maybe Prelude.Double),
                                     HistogramDataPoint -> FieldSet
_HistogramDataPoint'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (HistogramDataPoint -> HistogramDataPoint -> Bool
(HistogramDataPoint -> HistogramDataPoint -> Bool)
-> (HistogramDataPoint -> HistogramDataPoint -> Bool)
-> Eq HistogramDataPoint
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: HistogramDataPoint -> HistogramDataPoint -> Bool
== :: HistogramDataPoint -> HistogramDataPoint -> Bool
$c/= :: HistogramDataPoint -> HistogramDataPoint -> Bool
/= :: HistogramDataPoint -> HistogramDataPoint -> Bool
Prelude.Eq, Eq HistogramDataPoint
Eq HistogramDataPoint =>
(HistogramDataPoint -> HistogramDataPoint -> Ordering)
-> (HistogramDataPoint -> HistogramDataPoint -> Bool)
-> (HistogramDataPoint -> HistogramDataPoint -> Bool)
-> (HistogramDataPoint -> HistogramDataPoint -> Bool)
-> (HistogramDataPoint -> HistogramDataPoint -> Bool)
-> (HistogramDataPoint -> HistogramDataPoint -> HistogramDataPoint)
-> (HistogramDataPoint -> HistogramDataPoint -> HistogramDataPoint)
-> Ord HistogramDataPoint
HistogramDataPoint -> HistogramDataPoint -> Bool
HistogramDataPoint -> HistogramDataPoint -> Ordering
HistogramDataPoint -> HistogramDataPoint -> HistogramDataPoint
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
$ccompare :: HistogramDataPoint -> HistogramDataPoint -> Ordering
compare :: HistogramDataPoint -> HistogramDataPoint -> Ordering
$c< :: HistogramDataPoint -> HistogramDataPoint -> Bool
< :: HistogramDataPoint -> HistogramDataPoint -> Bool
$c<= :: HistogramDataPoint -> HistogramDataPoint -> Bool
<= :: HistogramDataPoint -> HistogramDataPoint -> Bool
$c> :: HistogramDataPoint -> HistogramDataPoint -> Bool
> :: HistogramDataPoint -> HistogramDataPoint -> Bool
$c>= :: HistogramDataPoint -> HistogramDataPoint -> Bool
>= :: HistogramDataPoint -> HistogramDataPoint -> Bool
$cmax :: HistogramDataPoint -> HistogramDataPoint -> HistogramDataPoint
max :: HistogramDataPoint -> HistogramDataPoint -> HistogramDataPoint
$cmin :: HistogramDataPoint -> HistogramDataPoint -> HistogramDataPoint
min :: HistogramDataPoint -> HistogramDataPoint -> HistogramDataPoint
Prelude.Ord)
instance Prelude.Show HistogramDataPoint where
  showsPrec :: Int -> HistogramDataPoint -> ShowS
showsPrec Int
_ HistogramDataPoint
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (HistogramDataPoint -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort HistogramDataPoint
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField HistogramDataPoint "attributes" [Proto.Opentelemetry.Proto.Common.V1.Common.KeyValue] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "attributes"
-> ([KeyValue] -> f [KeyValue])
-> HistogramDataPoint
-> f HistogramDataPoint
fieldOf Proxy# "attributes"
_
    = ((Vector KeyValue -> f (Vector KeyValue))
 -> HistogramDataPoint -> f HistogramDataPoint)
-> (([KeyValue] -> f [KeyValue])
    -> Vector KeyValue -> f (Vector KeyValue))
-> ([KeyValue] -> f [KeyValue])
-> HistogramDataPoint
-> f HistogramDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistogramDataPoint -> Vector KeyValue)
-> (HistogramDataPoint -> Vector KeyValue -> HistogramDataPoint)
-> Lens
     HistogramDataPoint
     HistogramDataPoint
     (Vector KeyValue)
     (Vector KeyValue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistogramDataPoint -> Vector KeyValue
_HistogramDataPoint'attributes
           (\ HistogramDataPoint
x__ Vector KeyValue
y__ -> HistogramDataPoint
x__ {_HistogramDataPoint'attributes = y__}))
        ((Vector KeyValue -> [KeyValue])
-> (Vector KeyValue -> [KeyValue] -> Vector KeyValue)
-> Lens (Vector KeyValue) (Vector KeyValue) [KeyValue] [KeyValue]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector KeyValue -> [KeyValue]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector KeyValue
_ [KeyValue]
y__ -> [KeyValue] -> Vector KeyValue
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [KeyValue]
y__))
instance Data.ProtoLens.Field.HasField HistogramDataPoint "vec'attributes" (Data.Vector.Vector Proto.Opentelemetry.Proto.Common.V1.Common.KeyValue) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'attributes"
-> (Vector KeyValue -> f (Vector KeyValue))
-> HistogramDataPoint
-> f HistogramDataPoint
fieldOf Proxy# "vec'attributes"
_
    = ((Vector KeyValue -> f (Vector KeyValue))
 -> HistogramDataPoint -> f HistogramDataPoint)
-> ((Vector KeyValue -> f (Vector KeyValue))
    -> Vector KeyValue -> f (Vector KeyValue))
-> (Vector KeyValue -> f (Vector KeyValue))
-> HistogramDataPoint
-> f HistogramDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistogramDataPoint -> Vector KeyValue)
-> (HistogramDataPoint -> Vector KeyValue -> HistogramDataPoint)
-> Lens
     HistogramDataPoint
     HistogramDataPoint
     (Vector KeyValue)
     (Vector KeyValue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistogramDataPoint -> Vector KeyValue
_HistogramDataPoint'attributes
           (\ HistogramDataPoint
x__ Vector KeyValue
y__ -> HistogramDataPoint
x__ {_HistogramDataPoint'attributes = y__}))
        (Vector KeyValue -> f (Vector KeyValue))
-> Vector KeyValue -> f (Vector KeyValue)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField HistogramDataPoint "startTimeUnixNano" Data.Word.Word64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "startTimeUnixNano"
-> (Word64 -> f Word64)
-> HistogramDataPoint
-> f HistogramDataPoint
fieldOf Proxy# "startTimeUnixNano"
_
    = ((Word64 -> f Word64)
 -> HistogramDataPoint -> f HistogramDataPoint)
-> ((Word64 -> f Word64) -> Word64 -> f Word64)
-> (Word64 -> f Word64)
-> HistogramDataPoint
-> f HistogramDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistogramDataPoint -> Word64)
-> (HistogramDataPoint -> Word64 -> HistogramDataPoint)
-> Lens HistogramDataPoint HistogramDataPoint Word64 Word64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistogramDataPoint -> Word64
_HistogramDataPoint'startTimeUnixNano
           (\ HistogramDataPoint
x__ Word64
y__ -> HistogramDataPoint
x__ {_HistogramDataPoint'startTimeUnixNano = y__}))
        (Word64 -> f Word64) -> Word64 -> f Word64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField HistogramDataPoint "timeUnixNano" Data.Word.Word64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "timeUnixNano"
-> (Word64 -> f Word64)
-> HistogramDataPoint
-> f HistogramDataPoint
fieldOf Proxy# "timeUnixNano"
_
    = ((Word64 -> f Word64)
 -> HistogramDataPoint -> f HistogramDataPoint)
-> ((Word64 -> f Word64) -> Word64 -> f Word64)
-> (Word64 -> f Word64)
-> HistogramDataPoint
-> f HistogramDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistogramDataPoint -> Word64)
-> (HistogramDataPoint -> Word64 -> HistogramDataPoint)
-> Lens HistogramDataPoint HistogramDataPoint Word64 Word64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistogramDataPoint -> Word64
_HistogramDataPoint'timeUnixNano
           (\ HistogramDataPoint
x__ Word64
y__ -> HistogramDataPoint
x__ {_HistogramDataPoint'timeUnixNano = y__}))
        (Word64 -> f Word64) -> Word64 -> f Word64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField HistogramDataPoint "count" Data.Word.Word64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "count"
-> (Word64 -> f Word64)
-> HistogramDataPoint
-> f HistogramDataPoint
fieldOf Proxy# "count"
_
    = ((Word64 -> f Word64)
 -> HistogramDataPoint -> f HistogramDataPoint)
-> ((Word64 -> f Word64) -> Word64 -> f Word64)
-> (Word64 -> f Word64)
-> HistogramDataPoint
-> f HistogramDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistogramDataPoint -> Word64)
-> (HistogramDataPoint -> Word64 -> HistogramDataPoint)
-> Lens HistogramDataPoint HistogramDataPoint Word64 Word64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistogramDataPoint -> Word64
_HistogramDataPoint'count
           (\ HistogramDataPoint
x__ Word64
y__ -> HistogramDataPoint
x__ {_HistogramDataPoint'count = y__}))
        (Word64 -> f Word64) -> Word64 -> f Word64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField HistogramDataPoint "sum" Prelude.Double where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "sum"
-> (Double -> f Double)
-> HistogramDataPoint
-> f HistogramDataPoint
fieldOf Proxy# "sum"
_
    = ((Maybe Double -> f (Maybe Double))
 -> HistogramDataPoint -> f HistogramDataPoint)
-> ((Double -> f Double) -> Maybe Double -> f (Maybe Double))
-> (Double -> f Double)
-> HistogramDataPoint
-> f HistogramDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistogramDataPoint -> Maybe Double)
-> (HistogramDataPoint -> Maybe Double -> HistogramDataPoint)
-> Lens
     HistogramDataPoint HistogramDataPoint (Maybe Double) (Maybe Double)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistogramDataPoint -> Maybe Double
_HistogramDataPoint'sum
           (\ HistogramDataPoint
x__ Maybe Double
y__ -> HistogramDataPoint
x__ {_HistogramDataPoint'sum = y__}))
        (Double -> Lens' (Maybe Double) Double
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Double
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault)
instance Data.ProtoLens.Field.HasField HistogramDataPoint "maybe'sum" (Prelude.Maybe Prelude.Double) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'sum"
-> (Maybe Double -> f (Maybe Double))
-> HistogramDataPoint
-> f HistogramDataPoint
fieldOf Proxy# "maybe'sum"
_
    = ((Maybe Double -> f (Maybe Double))
 -> HistogramDataPoint -> f HistogramDataPoint)
-> ((Maybe Double -> f (Maybe Double))
    -> Maybe Double -> f (Maybe Double))
-> (Maybe Double -> f (Maybe Double))
-> HistogramDataPoint
-> f HistogramDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistogramDataPoint -> Maybe Double)
-> (HistogramDataPoint -> Maybe Double -> HistogramDataPoint)
-> Lens
     HistogramDataPoint HistogramDataPoint (Maybe Double) (Maybe Double)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistogramDataPoint -> Maybe Double
_HistogramDataPoint'sum
           (\ HistogramDataPoint
x__ Maybe Double
y__ -> HistogramDataPoint
x__ {_HistogramDataPoint'sum = y__}))
        (Maybe Double -> f (Maybe Double))
-> Maybe Double -> f (Maybe Double)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField HistogramDataPoint "bucketCounts" [Data.Word.Word64] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "bucketCounts"
-> ([Word64] -> f [Word64])
-> HistogramDataPoint
-> f HistogramDataPoint
fieldOf Proxy# "bucketCounts"
_
    = ((Vector Word64 -> f (Vector Word64))
 -> HistogramDataPoint -> f HistogramDataPoint)
-> (([Word64] -> f [Word64]) -> Vector Word64 -> f (Vector Word64))
-> ([Word64] -> f [Word64])
-> HistogramDataPoint
-> f HistogramDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistogramDataPoint -> Vector Word64)
-> (HistogramDataPoint -> Vector Word64 -> HistogramDataPoint)
-> Lens
     HistogramDataPoint
     HistogramDataPoint
     (Vector Word64)
     (Vector Word64)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistogramDataPoint -> Vector Word64
_HistogramDataPoint'bucketCounts
           (\ HistogramDataPoint
x__ Vector Word64
y__ -> HistogramDataPoint
x__ {_HistogramDataPoint'bucketCounts = y__}))
        ((Vector Word64 -> [Word64])
-> (Vector Word64 -> [Word64] -> Vector Word64)
-> Lens (Vector Word64) (Vector Word64) [Word64] [Word64]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Word64 -> [Word64]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector Word64
_ [Word64]
y__ -> [Word64] -> Vector Word64
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Word64]
y__))
instance Data.ProtoLens.Field.HasField HistogramDataPoint "vec'bucketCounts" (Data.Vector.Unboxed.Vector Data.Word.Word64) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'bucketCounts"
-> (Vector Word64 -> f (Vector Word64))
-> HistogramDataPoint
-> f HistogramDataPoint
fieldOf Proxy# "vec'bucketCounts"
_
    = ((Vector Word64 -> f (Vector Word64))
 -> HistogramDataPoint -> f HistogramDataPoint)
-> ((Vector Word64 -> f (Vector Word64))
    -> Vector Word64 -> f (Vector Word64))
-> (Vector Word64 -> f (Vector Word64))
-> HistogramDataPoint
-> f HistogramDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistogramDataPoint -> Vector Word64)
-> (HistogramDataPoint -> Vector Word64 -> HistogramDataPoint)
-> Lens
     HistogramDataPoint
     HistogramDataPoint
     (Vector Word64)
     (Vector Word64)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistogramDataPoint -> Vector Word64
_HistogramDataPoint'bucketCounts
           (\ HistogramDataPoint
x__ Vector Word64
y__ -> HistogramDataPoint
x__ {_HistogramDataPoint'bucketCounts = y__}))
        (Vector Word64 -> f (Vector Word64))
-> Vector Word64 -> f (Vector Word64)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField HistogramDataPoint "explicitBounds" [Prelude.Double] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "explicitBounds"
-> ([Double] -> f [Double])
-> HistogramDataPoint
-> f HistogramDataPoint
fieldOf Proxy# "explicitBounds"
_
    = ((Vector Double -> f (Vector Double))
 -> HistogramDataPoint -> f HistogramDataPoint)
-> (([Double] -> f [Double]) -> Vector Double -> f (Vector Double))
-> ([Double] -> f [Double])
-> HistogramDataPoint
-> f HistogramDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistogramDataPoint -> Vector Double)
-> (HistogramDataPoint -> Vector Double -> HistogramDataPoint)
-> Lens
     HistogramDataPoint
     HistogramDataPoint
     (Vector Double)
     (Vector Double)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistogramDataPoint -> Vector Double
_HistogramDataPoint'explicitBounds
           (\ HistogramDataPoint
x__ Vector Double
y__ -> HistogramDataPoint
x__ {_HistogramDataPoint'explicitBounds = y__}))
        ((Vector Double -> [Double])
-> (Vector Double -> [Double] -> Vector Double)
-> Lens (Vector Double) (Vector Double) [Double] [Double]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Double -> [Double]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector Double
_ [Double]
y__ -> [Double] -> Vector Double
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Double]
y__))
instance Data.ProtoLens.Field.HasField HistogramDataPoint "vec'explicitBounds" (Data.Vector.Unboxed.Vector Prelude.Double) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'explicitBounds"
-> (Vector Double -> f (Vector Double))
-> HistogramDataPoint
-> f HistogramDataPoint
fieldOf Proxy# "vec'explicitBounds"
_
    = ((Vector Double -> f (Vector Double))
 -> HistogramDataPoint -> f HistogramDataPoint)
-> ((Vector Double -> f (Vector Double))
    -> Vector Double -> f (Vector Double))
-> (Vector Double -> f (Vector Double))
-> HistogramDataPoint
-> f HistogramDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistogramDataPoint -> Vector Double)
-> (HistogramDataPoint -> Vector Double -> HistogramDataPoint)
-> Lens
     HistogramDataPoint
     HistogramDataPoint
     (Vector Double)
     (Vector Double)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistogramDataPoint -> Vector Double
_HistogramDataPoint'explicitBounds
           (\ HistogramDataPoint
x__ Vector Double
y__ -> HistogramDataPoint
x__ {_HistogramDataPoint'explicitBounds = y__}))
        (Vector Double -> f (Vector Double))
-> Vector Double -> f (Vector Double)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField HistogramDataPoint "exemplars" [Exemplar] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "exemplars"
-> ([Exemplar] -> f [Exemplar])
-> HistogramDataPoint
-> f HistogramDataPoint
fieldOf Proxy# "exemplars"
_
    = ((Vector Exemplar -> f (Vector Exemplar))
 -> HistogramDataPoint -> f HistogramDataPoint)
-> (([Exemplar] -> f [Exemplar])
    -> Vector Exemplar -> f (Vector Exemplar))
-> ([Exemplar] -> f [Exemplar])
-> HistogramDataPoint
-> f HistogramDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistogramDataPoint -> Vector Exemplar)
-> (HistogramDataPoint -> Vector Exemplar -> HistogramDataPoint)
-> Lens
     HistogramDataPoint
     HistogramDataPoint
     (Vector Exemplar)
     (Vector Exemplar)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistogramDataPoint -> Vector Exemplar
_HistogramDataPoint'exemplars
           (\ HistogramDataPoint
x__ Vector Exemplar
y__ -> HistogramDataPoint
x__ {_HistogramDataPoint'exemplars = y__}))
        ((Vector Exemplar -> [Exemplar])
-> (Vector Exemplar -> [Exemplar] -> Vector Exemplar)
-> Lens (Vector Exemplar) (Vector Exemplar) [Exemplar] [Exemplar]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Exemplar -> [Exemplar]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector Exemplar
_ [Exemplar]
y__ -> [Exemplar] -> Vector Exemplar
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Exemplar]
y__))
instance Data.ProtoLens.Field.HasField HistogramDataPoint "vec'exemplars" (Data.Vector.Vector Exemplar) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'exemplars"
-> (Vector Exemplar -> f (Vector Exemplar))
-> HistogramDataPoint
-> f HistogramDataPoint
fieldOf Proxy# "vec'exemplars"
_
    = ((Vector Exemplar -> f (Vector Exemplar))
 -> HistogramDataPoint -> f HistogramDataPoint)
-> ((Vector Exemplar -> f (Vector Exemplar))
    -> Vector Exemplar -> f (Vector Exemplar))
-> (Vector Exemplar -> f (Vector Exemplar))
-> HistogramDataPoint
-> f HistogramDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistogramDataPoint -> Vector Exemplar)
-> (HistogramDataPoint -> Vector Exemplar -> HistogramDataPoint)
-> Lens
     HistogramDataPoint
     HistogramDataPoint
     (Vector Exemplar)
     (Vector Exemplar)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistogramDataPoint -> Vector Exemplar
_HistogramDataPoint'exemplars
           (\ HistogramDataPoint
x__ Vector Exemplar
y__ -> HistogramDataPoint
x__ {_HistogramDataPoint'exemplars = y__}))
        (Vector Exemplar -> f (Vector Exemplar))
-> Vector Exemplar -> f (Vector Exemplar)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField HistogramDataPoint "flags" Data.Word.Word32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "flags"
-> (Word32 -> f Word32)
-> HistogramDataPoint
-> f HistogramDataPoint
fieldOf Proxy# "flags"
_
    = ((Word32 -> f Word32)
 -> HistogramDataPoint -> f HistogramDataPoint)
-> ((Word32 -> f Word32) -> Word32 -> f Word32)
-> (Word32 -> f Word32)
-> HistogramDataPoint
-> f HistogramDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistogramDataPoint -> Word32)
-> (HistogramDataPoint -> Word32 -> HistogramDataPoint)
-> Lens HistogramDataPoint HistogramDataPoint Word32 Word32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistogramDataPoint -> Word32
_HistogramDataPoint'flags
           (\ HistogramDataPoint
x__ Word32
y__ -> HistogramDataPoint
x__ {_HistogramDataPoint'flags = y__}))
        (Word32 -> f Word32) -> Word32 -> f Word32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField HistogramDataPoint "min" Prelude.Double where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "min"
-> (Double -> f Double)
-> HistogramDataPoint
-> f HistogramDataPoint
fieldOf Proxy# "min"
_
    = ((Maybe Double -> f (Maybe Double))
 -> HistogramDataPoint -> f HistogramDataPoint)
-> ((Double -> f Double) -> Maybe Double -> f (Maybe Double))
-> (Double -> f Double)
-> HistogramDataPoint
-> f HistogramDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistogramDataPoint -> Maybe Double)
-> (HistogramDataPoint -> Maybe Double -> HistogramDataPoint)
-> Lens
     HistogramDataPoint HistogramDataPoint (Maybe Double) (Maybe Double)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistogramDataPoint -> Maybe Double
_HistogramDataPoint'min
           (\ HistogramDataPoint
x__ Maybe Double
y__ -> HistogramDataPoint
x__ {_HistogramDataPoint'min = y__}))
        (Double -> Lens' (Maybe Double) Double
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Double
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault)
instance Data.ProtoLens.Field.HasField HistogramDataPoint "maybe'min" (Prelude.Maybe Prelude.Double) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'min"
-> (Maybe Double -> f (Maybe Double))
-> HistogramDataPoint
-> f HistogramDataPoint
fieldOf Proxy# "maybe'min"
_
    = ((Maybe Double -> f (Maybe Double))
 -> HistogramDataPoint -> f HistogramDataPoint)
-> ((Maybe Double -> f (Maybe Double))
    -> Maybe Double -> f (Maybe Double))
-> (Maybe Double -> f (Maybe Double))
-> HistogramDataPoint
-> f HistogramDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistogramDataPoint -> Maybe Double)
-> (HistogramDataPoint -> Maybe Double -> HistogramDataPoint)
-> Lens
     HistogramDataPoint HistogramDataPoint (Maybe Double) (Maybe Double)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistogramDataPoint -> Maybe Double
_HistogramDataPoint'min
           (\ HistogramDataPoint
x__ Maybe Double
y__ -> HistogramDataPoint
x__ {_HistogramDataPoint'min = y__}))
        (Maybe Double -> f (Maybe Double))
-> Maybe Double -> f (Maybe Double)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField HistogramDataPoint "max" Prelude.Double where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "max"
-> (Double -> f Double)
-> HistogramDataPoint
-> f HistogramDataPoint
fieldOf Proxy# "max"
_
    = ((Maybe Double -> f (Maybe Double))
 -> HistogramDataPoint -> f HistogramDataPoint)
-> ((Double -> f Double) -> Maybe Double -> f (Maybe Double))
-> (Double -> f Double)
-> HistogramDataPoint
-> f HistogramDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistogramDataPoint -> Maybe Double)
-> (HistogramDataPoint -> Maybe Double -> HistogramDataPoint)
-> Lens
     HistogramDataPoint HistogramDataPoint (Maybe Double) (Maybe Double)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistogramDataPoint -> Maybe Double
_HistogramDataPoint'max
           (\ HistogramDataPoint
x__ Maybe Double
y__ -> HistogramDataPoint
x__ {_HistogramDataPoint'max = y__}))
        (Double -> Lens' (Maybe Double) Double
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Double
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault)
instance Data.ProtoLens.Field.HasField HistogramDataPoint "maybe'max" (Prelude.Maybe Prelude.Double) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'max"
-> (Maybe Double -> f (Maybe Double))
-> HistogramDataPoint
-> f HistogramDataPoint
fieldOf Proxy# "maybe'max"
_
    = ((Maybe Double -> f (Maybe Double))
 -> HistogramDataPoint -> f HistogramDataPoint)
-> ((Maybe Double -> f (Maybe Double))
    -> Maybe Double -> f (Maybe Double))
-> (Maybe Double -> f (Maybe Double))
-> HistogramDataPoint
-> f HistogramDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistogramDataPoint -> Maybe Double)
-> (HistogramDataPoint -> Maybe Double -> HistogramDataPoint)
-> Lens
     HistogramDataPoint HistogramDataPoint (Maybe Double) (Maybe Double)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistogramDataPoint -> Maybe Double
_HistogramDataPoint'max
           (\ HistogramDataPoint
x__ Maybe Double
y__ -> HistogramDataPoint
x__ {_HistogramDataPoint'max = y__}))
        (Maybe Double -> f (Maybe Double))
-> Maybe Double -> f (Maybe Double)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message HistogramDataPoint where
  messageName :: Proxy HistogramDataPoint -> Text
messageName Proxy HistogramDataPoint
_
    = String -> Text
Data.Text.pack
        String
"opentelemetry.proto.metrics.v1.HistogramDataPoint"
  packedMessageDescriptor :: Proxy HistogramDataPoint -> ByteString
packedMessageDescriptor Proxy HistogramDataPoint
_
    = ByteString
"\n\
      \\DC2HistogramDataPoint\DC2G\n\
      \\n\
      \attributes\CAN\t \ETX(\v2'.opentelemetry.proto.common.v1.KeyValueR\n\
      \attributes\DC2/\n\
      \\DC4start_time_unix_nano\CAN\STX \SOH(\ACKR\DC1startTimeUnixNano\DC2$\n\
      \\SOtime_unix_nano\CAN\ETX \SOH(\ACKR\ftimeUnixNano\DC2\DC4\n\
      \\ENQcount\CAN\EOT \SOH(\ACKR\ENQcount\DC2\NAK\n\
      \\ETXsum\CAN\ENQ \SOH(\SOHH\NULR\ETXsum\136\SOH\SOH\DC2#\n\
      \\rbucket_counts\CAN\ACK \ETX(\ACKR\fbucketCounts\DC2'\n\
      \\SIexplicit_bounds\CAN\a \ETX(\SOHR\SOexplicitBounds\DC2F\n\
      \\texemplars\CAN\b \ETX(\v2(.opentelemetry.proto.metrics.v1.ExemplarR\texemplars\DC2\DC4\n\
      \\ENQflags\CAN\n\
      \ \SOH(\rR\ENQflags\DC2\NAK\n\
      \\ETXmin\CAN\v \SOH(\SOHH\SOHR\ETXmin\136\SOH\SOH\DC2\NAK\n\
      \\ETXmax\CAN\f \SOH(\SOHH\STXR\ETXmax\136\SOH\SOHB\ACK\n\
      \\EOT_sumB\ACK\n\
      \\EOT_minB\ACK\n\
      \\EOT_maxJ\EOT\b\SOH\DLE\STX"
  packedFileDescriptor :: Proxy HistogramDataPoint -> ByteString
packedFileDescriptor Proxy HistogramDataPoint
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor HistogramDataPoint)
fieldsByTag
    = let
        attributes__field_descriptor :: FieldDescriptor HistogramDataPoint
attributes__field_descriptor
          = String
-> FieldTypeDescriptor KeyValue
-> FieldAccessor HistogramDataPoint KeyValue
-> FieldDescriptor HistogramDataPoint
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"attributes"
              (MessageOrGroup -> FieldTypeDescriptor KeyValue
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Opentelemetry.Proto.Common.V1.Common.KeyValue)
              (Packing
-> Lens' HistogramDataPoint [KeyValue]
-> FieldAccessor HistogramDataPoint KeyValue
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Unpacked
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"attributes")) ::
              Data.ProtoLens.FieldDescriptor HistogramDataPoint
        startTimeUnixNano__field_descriptor :: FieldDescriptor HistogramDataPoint
startTimeUnixNano__field_descriptor
          = String
-> FieldTypeDescriptor Word64
-> FieldAccessor HistogramDataPoint Word64
-> FieldDescriptor HistogramDataPoint
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"start_time_unix_nano"
              (ScalarField Word64 -> FieldTypeDescriptor Word64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Word64
Data.ProtoLens.Fixed64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64)
              (WireDefault Word64
-> Lens HistogramDataPoint HistogramDataPoint Word64 Word64
-> FieldAccessor HistogramDataPoint Word64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Word64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"startTimeUnixNano")) ::
              Data.ProtoLens.FieldDescriptor HistogramDataPoint
        timeUnixNano__field_descriptor :: FieldDescriptor HistogramDataPoint
timeUnixNano__field_descriptor
          = String
-> FieldTypeDescriptor Word64
-> FieldAccessor HistogramDataPoint Word64
-> FieldDescriptor HistogramDataPoint
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"time_unix_nano"
              (ScalarField Word64 -> FieldTypeDescriptor Word64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Word64
Data.ProtoLens.Fixed64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64)
              (WireDefault Word64
-> Lens HistogramDataPoint HistogramDataPoint Word64 Word64
-> FieldAccessor HistogramDataPoint Word64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Word64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"timeUnixNano")) ::
              Data.ProtoLens.FieldDescriptor HistogramDataPoint
        count__field_descriptor :: FieldDescriptor HistogramDataPoint
count__field_descriptor
          = String
-> FieldTypeDescriptor Word64
-> FieldAccessor HistogramDataPoint Word64
-> FieldDescriptor HistogramDataPoint
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"count"
              (ScalarField Word64 -> FieldTypeDescriptor Word64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Word64
Data.ProtoLens.Fixed64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64)
              (WireDefault Word64
-> Lens HistogramDataPoint HistogramDataPoint Word64 Word64
-> FieldAccessor HistogramDataPoint Word64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Word64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"count")) ::
              Data.ProtoLens.FieldDescriptor HistogramDataPoint
        sum__field_descriptor :: FieldDescriptor HistogramDataPoint
sum__field_descriptor
          = String
-> FieldTypeDescriptor Double
-> FieldAccessor HistogramDataPoint Double
-> FieldDescriptor HistogramDataPoint
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"sum"
              (ScalarField Double -> FieldTypeDescriptor Double
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Double
Data.ProtoLens.DoubleField ::
                 Data.ProtoLens.FieldTypeDescriptor Prelude.Double)
              (Lens
  HistogramDataPoint HistogramDataPoint (Maybe Double) (Maybe Double)
-> FieldAccessor HistogramDataPoint Double
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'sum")) ::
              Data.ProtoLens.FieldDescriptor HistogramDataPoint
        bucketCounts__field_descriptor :: FieldDescriptor HistogramDataPoint
bucketCounts__field_descriptor
          = String
-> FieldTypeDescriptor Word64
-> FieldAccessor HistogramDataPoint Word64
-> FieldDescriptor HistogramDataPoint
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"bucket_counts"
              (ScalarField Word64 -> FieldTypeDescriptor Word64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Word64
Data.ProtoLens.Fixed64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64)
              (Packing
-> Lens' HistogramDataPoint [Word64]
-> FieldAccessor HistogramDataPoint Word64
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Packed
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"bucketCounts")) ::
              Data.ProtoLens.FieldDescriptor HistogramDataPoint
        explicitBounds__field_descriptor :: FieldDescriptor HistogramDataPoint
explicitBounds__field_descriptor
          = String
-> FieldTypeDescriptor Double
-> FieldAccessor HistogramDataPoint Double
-> FieldDescriptor HistogramDataPoint
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"explicit_bounds"
              (ScalarField Double -> FieldTypeDescriptor Double
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Double
Data.ProtoLens.DoubleField ::
                 Data.ProtoLens.FieldTypeDescriptor Prelude.Double)
              (Packing
-> Lens' HistogramDataPoint [Double]
-> FieldAccessor HistogramDataPoint Double
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Packed
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"explicitBounds")) ::
              Data.ProtoLens.FieldDescriptor HistogramDataPoint
        exemplars__field_descriptor :: FieldDescriptor HistogramDataPoint
exemplars__field_descriptor
          = String
-> FieldTypeDescriptor Exemplar
-> FieldAccessor HistogramDataPoint Exemplar
-> FieldDescriptor HistogramDataPoint
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"exemplars"
              (MessageOrGroup -> FieldTypeDescriptor Exemplar
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Exemplar)
              (Packing
-> Lens' HistogramDataPoint [Exemplar]
-> FieldAccessor HistogramDataPoint Exemplar
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Unpacked
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"exemplars")) ::
              Data.ProtoLens.FieldDescriptor HistogramDataPoint
        flags__field_descriptor :: FieldDescriptor HistogramDataPoint
flags__field_descriptor
          = String
-> FieldTypeDescriptor Word32
-> FieldAccessor HistogramDataPoint Word32
-> FieldDescriptor HistogramDataPoint
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"flags"
              (ScalarField Word32 -> FieldTypeDescriptor Word32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Word32
Data.ProtoLens.UInt32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32)
              (WireDefault Word32
-> Lens HistogramDataPoint HistogramDataPoint Word32 Word32
-> FieldAccessor HistogramDataPoint Word32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Word32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"flags")) ::
              Data.ProtoLens.FieldDescriptor HistogramDataPoint
        min__field_descriptor :: FieldDescriptor HistogramDataPoint
min__field_descriptor
          = String
-> FieldTypeDescriptor Double
-> FieldAccessor HistogramDataPoint Double
-> FieldDescriptor HistogramDataPoint
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"min"
              (ScalarField Double -> FieldTypeDescriptor Double
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Double
Data.ProtoLens.DoubleField ::
                 Data.ProtoLens.FieldTypeDescriptor Prelude.Double)
              (Lens
  HistogramDataPoint HistogramDataPoint (Maybe Double) (Maybe Double)
-> FieldAccessor HistogramDataPoint Double
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'min")) ::
              Data.ProtoLens.FieldDescriptor HistogramDataPoint
        max__field_descriptor :: FieldDescriptor HistogramDataPoint
max__field_descriptor
          = String
-> FieldTypeDescriptor Double
-> FieldAccessor HistogramDataPoint Double
-> FieldDescriptor HistogramDataPoint
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"max"
              (ScalarField Double -> FieldTypeDescriptor Double
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Double
Data.ProtoLens.DoubleField ::
                 Data.ProtoLens.FieldTypeDescriptor Prelude.Double)
              (Lens
  HistogramDataPoint HistogramDataPoint (Maybe Double) (Maybe Double)
-> FieldAccessor HistogramDataPoint Double
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'max")) ::
              Data.ProtoLens.FieldDescriptor HistogramDataPoint
      in
        [(Tag, FieldDescriptor HistogramDataPoint)]
-> Map Tag (FieldDescriptor HistogramDataPoint)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
9, FieldDescriptor HistogramDataPoint
attributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor HistogramDataPoint
startTimeUnixNano__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor HistogramDataPoint
timeUnixNano__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor HistogramDataPoint
count__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor HistogramDataPoint
sum__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor HistogramDataPoint
bucketCounts__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor HistogramDataPoint
explicitBounds__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
8, FieldDescriptor HistogramDataPoint
exemplars__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
10, FieldDescriptor HistogramDataPoint
flags__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
11, FieldDescriptor HistogramDataPoint
min__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
12, FieldDescriptor HistogramDataPoint
max__field_descriptor)]
  unknownFields :: Lens' HistogramDataPoint FieldSet
unknownFields
    = (HistogramDataPoint -> FieldSet)
-> (HistogramDataPoint -> FieldSet -> HistogramDataPoint)
-> Lens' HistogramDataPoint FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        HistogramDataPoint -> FieldSet
_HistogramDataPoint'_unknownFields
        (\ HistogramDataPoint
x__ FieldSet
y__ -> HistogramDataPoint
x__ {_HistogramDataPoint'_unknownFields = y__})
  defMessage :: HistogramDataPoint
defMessage
    = HistogramDataPoint'_constructor
        {_HistogramDataPoint'attributes :: Vector KeyValue
_HistogramDataPoint'attributes = Vector KeyValue
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _HistogramDataPoint'startTimeUnixNano :: Word64
_HistogramDataPoint'startTimeUnixNano = Word64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _HistogramDataPoint'timeUnixNano :: Word64
_HistogramDataPoint'timeUnixNano = Word64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _HistogramDataPoint'count :: Word64
_HistogramDataPoint'count = Word64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _HistogramDataPoint'sum :: Maybe Double
_HistogramDataPoint'sum = Maybe Double
forall a. Maybe a
Prelude.Nothing,
         _HistogramDataPoint'bucketCounts :: Vector Word64
_HistogramDataPoint'bucketCounts = Vector Word64
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _HistogramDataPoint'explicitBounds :: Vector Double
_HistogramDataPoint'explicitBounds = Vector Double
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _HistogramDataPoint'exemplars :: Vector Exemplar
_HistogramDataPoint'exemplars = Vector Exemplar
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _HistogramDataPoint'flags :: Word32
_HistogramDataPoint'flags = Word32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _HistogramDataPoint'min :: Maybe Double
_HistogramDataPoint'min = Maybe Double
forall a. Maybe a
Prelude.Nothing,
         _HistogramDataPoint'max :: Maybe Double
_HistogramDataPoint'max = Maybe Double
forall a. Maybe a
Prelude.Nothing,
         _HistogramDataPoint'_unknownFields :: FieldSet
_HistogramDataPoint'_unknownFields = []}
  parseMessage :: Parser HistogramDataPoint
parseMessage
    = let
        loop ::
          HistogramDataPoint
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Opentelemetry.Proto.Common.V1.Common.KeyValue
             -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Word.Word64
                -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Exemplar
                   -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Prelude.Double
                      -> Data.ProtoLens.Encoding.Bytes.Parser HistogramDataPoint
        loop :: HistogramDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld Exemplar
-> Growing Vector RealWorld Double
-> Parser HistogramDataPoint
loop
          HistogramDataPoint
x
          Growing Vector RealWorld KeyValue
mutable'attributes
          Growing Vector RealWorld Word64
mutable'bucketCounts
          Growing Vector RealWorld Exemplar
mutable'exemplars
          Growing Vector RealWorld Double
mutable'explicitBounds
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do Vector KeyValue
frozen'attributes <- IO (Vector KeyValue) -> Parser (Vector KeyValue)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                             (Growing Vector (PrimState IO) KeyValue -> IO (Vector KeyValue)
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 KeyValue
Growing Vector (PrimState IO) KeyValue
mutable'attributes)
                      Vector Word64
frozen'bucketCounts <- IO (Vector Word64) -> Parser (Vector Word64)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                               (Growing Vector (PrimState IO) Word64 -> IO (Vector Word64)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> m (v a)
Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                                  Growing Vector RealWorld Word64
Growing Vector (PrimState IO) Word64
mutable'bucketCounts)
                      Vector Exemplar
frozen'exemplars <- IO (Vector Exemplar) -> Parser (Vector Exemplar)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                            (Growing Vector (PrimState IO) Exemplar -> IO (Vector Exemplar)
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 Exemplar
Growing Vector (PrimState IO) Exemplar
mutable'exemplars)
                      Vector Double
frozen'explicitBounds <- IO (Vector Double) -> Parser (Vector Double)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                 (Growing Vector (PrimState IO) Double -> IO (Vector Double)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> m (v a)
Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                                    Growing Vector RealWorld Double
Growing Vector (PrimState IO) Double
mutable'explicitBounds)
                      (let missing :: [a]
missing = []
                       in
                         if [Any] -> Bool
forall a. [a] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
                             () -> Parser ()
forall a. a -> Parser a
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
                         else
                             String -> Parser ()
forall a. String -> Parser a
forall (m :: * -> *) a. MonadFail m => String -> m a
Prelude.fail
                               (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
                                  String
"Missing required fields: "
                                  ([String] -> String
forall a. Show a => a -> String
Prelude.show ([String]
forall a. [a]
missing :: [Prelude.String]))))
                      HistogramDataPoint -> Parser HistogramDataPoint
forall a. a -> Parser a
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter HistogramDataPoint HistogramDataPoint FieldSet FieldSet
-> (FieldSet -> FieldSet)
-> HistogramDataPoint
-> HistogramDataPoint
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                           LensLike' f HistogramDataPoint FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' HistogramDataPoint FieldSet
Setter HistogramDataPoint HistogramDataPoint FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t)
                           (Setter
  HistogramDataPoint
  HistogramDataPoint
  (Vector KeyValue)
  (Vector KeyValue)
-> Vector KeyValue -> HistogramDataPoint -> HistogramDataPoint
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                              (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'attributes") Vector KeyValue
frozen'attributes
                              (Setter
  HistogramDataPoint
  HistogramDataPoint
  (Vector Word64)
  (Vector Word64)
-> Vector Word64 -> HistogramDataPoint -> HistogramDataPoint
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'bucketCounts")
                                 Vector Word64
frozen'bucketCounts
                                 (Setter
  HistogramDataPoint
  HistogramDataPoint
  (Vector Exemplar)
  (Vector Exemplar)
-> Vector Exemplar -> HistogramDataPoint -> HistogramDataPoint
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                    (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'exemplars") Vector Exemplar
frozen'exemplars
                                    (Setter
  HistogramDataPoint
  HistogramDataPoint
  (Vector Double)
  (Vector Double)
-> Vector Double -> HistogramDataPoint -> HistogramDataPoint
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                       (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'explicitBounds")
                                       Vector Double
frozen'explicitBounds HistogramDataPoint
x)))))
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        Word64
74
                          -> do !KeyValue
y <- Parser KeyValue -> String -> Parser KeyValue
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Int -> Parser KeyValue -> Parser KeyValue
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 KeyValue
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                        String
"attributes"
                                Growing Vector RealWorld KeyValue
v <- IO (Growing Vector RealWorld KeyValue)
-> Parser (Growing Vector RealWorld KeyValue)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) KeyValue
-> KeyValue -> IO (Growing Vector (PrimState IO) KeyValue)
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 KeyValue
Growing Vector (PrimState IO) KeyValue
mutable'attributes KeyValue
y)
                                HistogramDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld Exemplar
-> Growing Vector RealWorld Double
-> Parser HistogramDataPoint
loop
                                  HistogramDataPoint
x Growing Vector RealWorld KeyValue
v Growing Vector RealWorld Word64
mutable'bucketCounts Growing Vector RealWorld Exemplar
mutable'exemplars Growing Vector RealWorld Double
mutable'explicitBounds
                        Word64
17
                          -> do Word64
y <- Parser Word64 -> String -> Parser Word64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       Parser Word64
Data.ProtoLens.Encoding.Bytes.getFixed64
                                       String
"start_time_unix_nano"
                                HistogramDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld Exemplar
-> Growing Vector RealWorld Double
-> Parser HistogramDataPoint
loop
                                  (Setter HistogramDataPoint HistogramDataPoint Word64 Word64
-> Word64 -> HistogramDataPoint -> HistogramDataPoint
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"startTimeUnixNano") Word64
y HistogramDataPoint
x)
                                  Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld Word64
mutable'bucketCounts Growing Vector RealWorld Exemplar
mutable'exemplars
                                  Growing Vector RealWorld Double
mutable'explicitBounds
                        Word64
25
                          -> do Word64
y <- Parser Word64 -> String -> Parser Word64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       Parser Word64
Data.ProtoLens.Encoding.Bytes.getFixed64 String
"time_unix_nano"
                                HistogramDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld Exemplar
-> Growing Vector RealWorld Double
-> Parser HistogramDataPoint
loop
                                  (Setter HistogramDataPoint HistogramDataPoint Word64 Word64
-> Word64 -> HistogramDataPoint -> HistogramDataPoint
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"timeUnixNano") Word64
y HistogramDataPoint
x)
                                  Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld Word64
mutable'bucketCounts Growing Vector RealWorld Exemplar
mutable'exemplars
                                  Growing Vector RealWorld Double
mutable'explicitBounds
                        Word64
33
                          -> do Word64
y <- Parser Word64 -> String -> Parser Word64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       Parser Word64
Data.ProtoLens.Encoding.Bytes.getFixed64 String
"count"
                                HistogramDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld Exemplar
-> Growing Vector RealWorld Double
-> Parser HistogramDataPoint
loop
                                  (Setter HistogramDataPoint HistogramDataPoint Word64 Word64
-> Word64 -> HistogramDataPoint -> HistogramDataPoint
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"count") Word64
y HistogramDataPoint
x)
                                  Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld Word64
mutable'bucketCounts Growing Vector RealWorld Exemplar
mutable'exemplars
                                  Growing Vector RealWorld Double
mutable'explicitBounds
                        Word64
41
                          -> 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 a b. (a -> b) -> Parser a -> Parser b
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)
                                       String
"sum"
                                HistogramDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld Exemplar
-> Growing Vector RealWorld Double
-> Parser HistogramDataPoint
loop
                                  (Setter HistogramDataPoint HistogramDataPoint Double Double
-> Double -> HistogramDataPoint -> HistogramDataPoint
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"sum") Double
y HistogramDataPoint
x)
                                  Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld Word64
mutable'bucketCounts Growing Vector RealWorld Exemplar
mutable'exemplars
                                  Growing Vector RealWorld Double
mutable'explicitBounds
                        Word64
49
                          -> do !Word64
y <- Parser Word64 -> String -> Parser Word64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        Parser Word64
Data.ProtoLens.Encoding.Bytes.getFixed64 String
"bucket_counts"
                                Growing Vector RealWorld Word64
v <- IO (Growing Vector RealWorld Word64)
-> Parser (Growing Vector RealWorld Word64)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) Word64
-> Word64 -> IO (Growing Vector (PrimState IO) Word64)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> a -> m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.append
                                          Growing Vector RealWorld Word64
Growing Vector (PrimState IO) Word64
mutable'bucketCounts Word64
y)
                                HistogramDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld Exemplar
-> Growing Vector RealWorld Double
-> Parser HistogramDataPoint
loop
                                  HistogramDataPoint
x Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld Word64
v Growing Vector RealWorld Exemplar
mutable'exemplars Growing Vector RealWorld Double
mutable'explicitBounds
                        Word64
50
                          -> do Growing Vector RealWorld Word64
y <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                        Int
-> Parser (Growing Vector RealWorld Word64)
-> Parser (Growing Vector RealWorld Word64)
forall a. Int -> Parser a -> Parser a
Data.ProtoLens.Encoding.Bytes.isolate
                                          (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
                                          ((let
                                              ploop :: Growing v RealWorld Word64 -> Parser (Growing v RealWorld Word64)
ploop Growing v RealWorld Word64
qs
                                                = do Bool
packedEnd <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
                                                     if Bool
packedEnd then
                                                         Growing v RealWorld Word64 -> Parser (Growing v RealWorld Word64)
forall a. a -> Parser a
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return Growing v RealWorld Word64
qs
                                                     else
                                                         do !Word64
q <- Parser Word64 -> String -> Parser Word64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                                                    Parser Word64
Data.ProtoLens.Encoding.Bytes.getFixed64
                                                                    String
"bucket_counts"
                                                            Growing v RealWorld Word64
qs' <- IO (Growing v RealWorld Word64)
-> Parser (Growing v RealWorld Word64)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                                     (Growing v (PrimState IO) Word64
-> Word64 -> IO (Growing v (PrimState IO) Word64)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> a -> m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.append
                                                                        Growing v RealWorld Word64
Growing v (PrimState IO) Word64
qs Word64
q)
                                                            Growing v RealWorld Word64 -> Parser (Growing v RealWorld Word64)
ploop Growing v RealWorld Word64
qs'
                                            in Growing Vector RealWorld Word64
-> Parser (Growing Vector RealWorld Word64)
forall {v :: * -> *}.
Vector v Word64 =>
Growing v RealWorld Word64 -> Parser (Growing v RealWorld Word64)
ploop)
                                             Growing Vector RealWorld Word64
mutable'bucketCounts)
                                HistogramDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld Exemplar
-> Growing Vector RealWorld Double
-> Parser HistogramDataPoint
loop
                                  HistogramDataPoint
x Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld Word64
y Growing Vector RealWorld Exemplar
mutable'exemplars Growing Vector RealWorld Double
mutable'explicitBounds
                        Word64
57
                          -> 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 a b. (a -> b) -> Parser a -> Parser b
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)
                                        String
"explicit_bounds"
                                Growing Vector RealWorld Double
v <- IO (Growing Vector RealWorld Double)
-> Parser (Growing Vector RealWorld Double)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) Double
-> Double -> IO (Growing Vector (PrimState IO) Double)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> a -> m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.append
                                          Growing Vector RealWorld Double
Growing Vector (PrimState IO) Double
mutable'explicitBounds Double
y)
                                HistogramDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld Exemplar
-> Growing Vector RealWorld Double
-> Parser HistogramDataPoint
loop HistogramDataPoint
x Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld Word64
mutable'bucketCounts Growing Vector RealWorld Exemplar
mutable'exemplars Growing Vector RealWorld Double
v
                        Word64
58
                          -> do Growing Vector RealWorld Double
y <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                        Int
-> Parser (Growing Vector RealWorld Double)
-> Parser (Growing Vector RealWorld Double)
forall a. Int -> Parser a -> Parser a
Data.ProtoLens.Encoding.Bytes.isolate
                                          (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
                                          ((let
                                              ploop :: Growing v RealWorld Double -> Parser (Growing v RealWorld Double)
ploop Growing v RealWorld Double
qs
                                                = do Bool
packedEnd <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
                                                     if Bool
packedEnd then
                                                         Growing v RealWorld Double -> Parser (Growing v RealWorld Double)
forall a. a -> Parser a
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return Growing v RealWorld Double
qs
                                                     else
                                                         do !Double
q <- Parser Double -> String -> Parser Double
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                                                    ((Word64 -> Double) -> Parser Word64 -> Parser Double
forall a b. (a -> b) -> Parser a -> Parser b
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)
                                                                    String
"explicit_bounds"
                                                            Growing v RealWorld Double
qs' <- IO (Growing v RealWorld Double)
-> Parser (Growing v RealWorld Double)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                                     (Growing v (PrimState IO) Double
-> Double -> IO (Growing v (PrimState IO) Double)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> a -> m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.append
                                                                        Growing v RealWorld Double
Growing v (PrimState IO) Double
qs Double
q)
                                                            Growing v RealWorld Double -> Parser (Growing v RealWorld Double)
ploop Growing v RealWorld Double
qs'
                                            in Growing Vector RealWorld Double
-> Parser (Growing Vector RealWorld Double)
forall {v :: * -> *}.
Vector v Double =>
Growing v RealWorld Double -> Parser (Growing v RealWorld Double)
ploop)
                                             Growing Vector RealWorld Double
mutable'explicitBounds)
                                HistogramDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld Exemplar
-> Growing Vector RealWorld Double
-> Parser HistogramDataPoint
loop HistogramDataPoint
x Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld Word64
mutable'bucketCounts Growing Vector RealWorld Exemplar
mutable'exemplars Growing Vector RealWorld Double
y
                        Word64
66
                          -> do !Exemplar
y <- Parser Exemplar -> String -> Parser Exemplar
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Int -> Parser Exemplar -> Parser Exemplar
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 Exemplar
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                        String
"exemplars"
                                Growing Vector RealWorld Exemplar
v <- IO (Growing Vector RealWorld Exemplar)
-> Parser (Growing Vector RealWorld Exemplar)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) Exemplar
-> Exemplar -> IO (Growing Vector (PrimState IO) Exemplar)
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 Exemplar
Growing Vector (PrimState IO) Exemplar
mutable'exemplars Exemplar
y)
                                HistogramDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld Exemplar
-> Growing Vector RealWorld Double
-> Parser HistogramDataPoint
loop
                                  HistogramDataPoint
x Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld Word64
mutable'bucketCounts Growing Vector RealWorld Exemplar
v Growing Vector RealWorld Double
mutable'explicitBounds
                        Word64
80
                          -> do Word32
y <- Parser Word32 -> String -> Parser Word32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Word32) -> Parser Word64 -> Parser Word32
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Word32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"flags"
                                HistogramDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld Exemplar
-> Growing Vector RealWorld Double
-> Parser HistogramDataPoint
loop
                                  (Setter HistogramDataPoint HistogramDataPoint Word32 Word32
-> Word32 -> HistogramDataPoint -> HistogramDataPoint
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"flags") Word32
y HistogramDataPoint
x)
                                  Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld Word64
mutable'bucketCounts Growing Vector RealWorld Exemplar
mutable'exemplars
                                  Growing Vector RealWorld Double
mutable'explicitBounds
                        Word64
89
                          -> 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 a b. (a -> b) -> Parser a -> Parser b
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)
                                       String
"min"
                                HistogramDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld Exemplar
-> Growing Vector RealWorld Double
-> Parser HistogramDataPoint
loop
                                  (Setter HistogramDataPoint HistogramDataPoint Double Double
-> Double -> HistogramDataPoint -> HistogramDataPoint
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"min") Double
y HistogramDataPoint
x)
                                  Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld Word64
mutable'bucketCounts Growing Vector RealWorld Exemplar
mutable'exemplars
                                  Growing Vector RealWorld Double
mutable'explicitBounds
                        Word64
97
                          -> do Double
y <- Parser Double -> String -> Parser Double
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Double) -> Parser Word64 -> Parser Double
forall a b. (a -> b) -> Parser a -> Parser b
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)
                                       String
"max"
                                HistogramDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld Exemplar
-> Growing Vector RealWorld Double
-> Parser HistogramDataPoint
loop
                                  (Setter HistogramDataPoint HistogramDataPoint Double Double
-> Double -> HistogramDataPoint -> HistogramDataPoint
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"max") Double
y HistogramDataPoint
x)
                                  Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld Word64
mutable'bucketCounts Growing Vector RealWorld Exemplar
mutable'exemplars
                                  Growing Vector RealWorld Double
mutable'explicitBounds
                        Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                HistogramDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld Exemplar
-> Growing Vector RealWorld Double
-> Parser HistogramDataPoint
loop
                                  (Setter HistogramDataPoint HistogramDataPoint FieldSet FieldSet
-> (FieldSet -> FieldSet)
-> HistogramDataPoint
-> HistogramDataPoint
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                     LensLike' f HistogramDataPoint FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' HistogramDataPoint FieldSet
Setter HistogramDataPoint HistogramDataPoint FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) HistogramDataPoint
x)
                                  Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld Word64
mutable'bucketCounts Growing Vector RealWorld Exemplar
mutable'exemplars
                                  Growing Vector RealWorld Double
mutable'explicitBounds
      in
        Parser HistogramDataPoint -> String -> Parser HistogramDataPoint
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do Growing Vector RealWorld KeyValue
mutable'attributes <- IO (Growing Vector RealWorld KeyValue)
-> Parser (Growing Vector RealWorld KeyValue)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                      IO (Growing Vector RealWorld KeyValue)
IO (Growing Vector (PrimState IO) KeyValue)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              Growing Vector RealWorld Word64
mutable'bucketCounts <- IO (Growing Vector RealWorld Word64)
-> Parser (Growing Vector RealWorld Word64)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                        IO (Growing Vector RealWorld Word64)
IO (Growing Vector (PrimState IO) Word64)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              Growing Vector RealWorld Exemplar
mutable'exemplars <- IO (Growing Vector RealWorld Exemplar)
-> Parser (Growing Vector RealWorld Exemplar)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                     IO (Growing Vector RealWorld Exemplar)
IO (Growing Vector (PrimState IO) Exemplar)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              Growing Vector RealWorld Double
mutable'explicitBounds <- IO (Growing Vector RealWorld Double)
-> Parser (Growing Vector RealWorld Double)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                          IO (Growing Vector RealWorld Double)
IO (Growing Vector (PrimState IO) Double)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              HistogramDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld Word64
-> Growing Vector RealWorld Exemplar
-> Growing Vector RealWorld Double
-> Parser HistogramDataPoint
loop
                HistogramDataPoint
forall msg. Message msg => msg
Data.ProtoLens.defMessage Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld Word64
mutable'bucketCounts
                Growing Vector RealWorld Exemplar
mutable'exemplars Growing Vector RealWorld Double
mutable'explicitBounds)
          String
"HistogramDataPoint"
  buildMessage :: HistogramDataPoint -> Builder
buildMessage
    = \ HistogramDataPoint
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             ((KeyValue -> Builder) -> Vector KeyValue -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                (\ KeyValue
_v
                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
74)
                        ((ByteString -> Builder)
-> (KeyValue -> ByteString) -> KeyValue -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                           (\ 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))
                           KeyValue -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage KeyValue
_v))
                (FoldLike
  (Vector KeyValue)
  HistogramDataPoint
  HistogramDataPoint
  (Vector KeyValue)
  (Vector KeyValue)
-> HistogramDataPoint -> Vector KeyValue
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                   (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'attributes") HistogramDataPoint
_x))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   _v :: Word64
_v
                     = FoldLike Word64 HistogramDataPoint HistogramDataPoint Word64 Word64
-> HistogramDataPoint -> Word64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                         (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"startTimeUnixNano") HistogramDataPoint
_x
                 in
                   if Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Word64
_v Word64
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 Word64
17)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putFixed64 Word64
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: Word64
_v
                        = FoldLike Word64 HistogramDataPoint HistogramDataPoint Word64 Word64
-> HistogramDataPoint -> Word64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"timeUnixNano") HistogramDataPoint
_x
                    in
                      if Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Word64
_v Word64
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 Word64
25)
                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putFixed64 Word64
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (let
                         _v :: Word64
_v = FoldLike Word64 HistogramDataPoint HistogramDataPoint Word64 Word64
-> HistogramDataPoint -> Word64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"count") HistogramDataPoint
_x
                       in
                         if Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Word64
_v Word64
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 Word64
33)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putFixed64 Word64
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (case
                              FoldLike
  (Maybe Double)
  HistogramDataPoint
  HistogramDataPoint
  (Maybe Double)
  (Maybe Double)
-> HistogramDataPoint -> Maybe Double
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'sum") HistogramDataPoint
_x
                          of
                            Maybe Double
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            (Prelude.Just Double
_v)
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
41)
                                   ((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
                               p :: Vector Word64
p = FoldLike
  (Vector Word64)
  HistogramDataPoint
  HistogramDataPoint
  (Vector Word64)
  (Vector Word64)
-> HistogramDataPoint -> Vector Word64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                     (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'bucketCounts") HistogramDataPoint
_x
                             in
                               if Vector Word64 -> Bool
forall (v :: * -> *) a. Vector v a => v a -> Bool
Data.Vector.Generic.null Vector Word64
p then
                                   Builder
forall a. Monoid a => a
Data.Monoid.mempty
                               else
                                   Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
50)
                                     ((\ ByteString
bs
                                         -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                              (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                 (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                              (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                        (Builder -> ByteString
Data.ProtoLens.Encoding.Bytes.runBuilder
                                           ((Word64 -> Builder) -> Vector Word64 -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                                              Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putFixed64 Vector Word64
p))))
                            (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (let
                                  p :: Vector Double
p = FoldLike
  (Vector Double)
  HistogramDataPoint
  HistogramDataPoint
  (Vector Double)
  (Vector Double)
-> HistogramDataPoint -> Vector Double
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                        (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'explicitBounds") HistogramDataPoint
_x
                                in
                                  if Vector Double -> Bool
forall (v :: * -> *) a. Vector v a => v a -> Bool
Data.Vector.Generic.null Vector Double
p then
                                      Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                  else
                                      Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
58)
                                        ((\ ByteString
bs
                                            -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                 (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                    (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                       (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                 (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                           (Builder -> ByteString
Data.ProtoLens.Encoding.Bytes.runBuilder
                                              ((Double -> Builder) -> Vector Double -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                                                 ((Word64 -> Builder) -> (Double -> Word64) -> Double -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                    Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putFixed64
                                                    Double -> Word64
Data.ProtoLens.Encoding.Bytes.doubleToWord)
                                                 Vector Double
p))))
                               (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  ((Exemplar -> Builder) -> Vector Exemplar -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                                     (\ Exemplar
_v
                                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
66)
                                             ((ByteString -> Builder)
-> (Exemplar -> ByteString) -> Exemplar -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                (\ 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))
                                                Exemplar -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Exemplar
_v))
                                     (FoldLike
  (Vector Exemplar)
  HistogramDataPoint
  HistogramDataPoint
  (Vector Exemplar)
  (Vector Exemplar)
-> HistogramDataPoint -> Vector Exemplar
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                        (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'exemplars") HistogramDataPoint
_x))
                                  (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (let
                                        _v :: Word32
_v
                                          = FoldLike Word32 HistogramDataPoint HistogramDataPoint Word32 Word32
-> HistogramDataPoint -> Word32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                              (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"flags") HistogramDataPoint
_x
                                      in
                                        if Word32 -> Word32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Word32
_v Word32
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 Word64
80)
                                              ((Word64 -> Builder) -> (Word32 -> Word64) -> Word32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                 Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                 Word32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word32
_v))
                                     (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (case
                                             FoldLike
  (Maybe Double)
  HistogramDataPoint
  HistogramDataPoint
  (Maybe Double)
  (Maybe Double)
-> HistogramDataPoint -> Maybe Double
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                               (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'min") HistogramDataPoint
_x
                                         of
                                           Maybe Double
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                           (Prelude.Just Double
_v)
                                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
89)
                                                  ((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.<>)
                                           (case
                                                FoldLike
  (Maybe Double)
  HistogramDataPoint
  HistogramDataPoint
  (Maybe Double)
  (Maybe Double)
-> HistogramDataPoint -> Maybe Double
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                  (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'max") HistogramDataPoint
_x
                                            of
                                              Maybe Double
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                              (Prelude.Just Double
_v)
                                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
97)
                                                     ((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))
                                           (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                              (FoldLike
  FieldSet HistogramDataPoint HistogramDataPoint FieldSet FieldSet
-> HistogramDataPoint -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                 FoldLike
  FieldSet HistogramDataPoint HistogramDataPoint FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' HistogramDataPoint FieldSet
Data.ProtoLens.unknownFields HistogramDataPoint
_x))))))))))))
instance Control.DeepSeq.NFData HistogramDataPoint where
  rnf :: HistogramDataPoint -> ()
rnf
    = \ HistogramDataPoint
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (HistogramDataPoint -> FieldSet
_HistogramDataPoint'_unknownFields HistogramDataPoint
x__)
             (Vector KeyValue -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (HistogramDataPoint -> Vector KeyValue
_HistogramDataPoint'attributes HistogramDataPoint
x__)
                (Word64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (HistogramDataPoint -> Word64
_HistogramDataPoint'startTimeUnixNano HistogramDataPoint
x__)
                   (Word64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (HistogramDataPoint -> Word64
_HistogramDataPoint'timeUnixNano HistogramDataPoint
x__)
                      (Word64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (HistogramDataPoint -> Word64
_HistogramDataPoint'count HistogramDataPoint
x__)
                         (Maybe Double -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (HistogramDataPoint -> Maybe Double
_HistogramDataPoint'sum HistogramDataPoint
x__)
                            (Vector Word64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (HistogramDataPoint -> Vector Word64
_HistogramDataPoint'bucketCounts HistogramDataPoint
x__)
                               (Vector Double -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (HistogramDataPoint -> Vector Double
_HistogramDataPoint'explicitBounds HistogramDataPoint
x__)
                                  (Vector Exemplar -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                     (HistogramDataPoint -> Vector Exemplar
_HistogramDataPoint'exemplars HistogramDataPoint
x__)
                                     (Word32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                        (HistogramDataPoint -> Word32
_HistogramDataPoint'flags HistogramDataPoint
x__)
                                        (Maybe Double -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                           (HistogramDataPoint -> Maybe Double
_HistogramDataPoint'min HistogramDataPoint
x__)
                                           (Maybe Double -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                              (HistogramDataPoint -> Maybe Double
_HistogramDataPoint'max HistogramDataPoint
x__) ())))))))))))
{- | Fields :
     
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.name' @:: Lens' Metric Data.Text.Text@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.description' @:: Lens' Metric Data.Text.Text@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.unit' @:: Lens' Metric Data.Text.Text@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.maybe'data'' @:: Lens' Metric (Prelude.Maybe Metric'Data)@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.maybe'gauge' @:: Lens' Metric (Prelude.Maybe Gauge)@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.gauge' @:: Lens' Metric Gauge@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.maybe'sum' @:: Lens' Metric (Prelude.Maybe Sum)@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.sum' @:: Lens' Metric Sum@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.maybe'histogram' @:: Lens' Metric (Prelude.Maybe Histogram)@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.histogram' @:: Lens' Metric Histogram@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.maybe'exponentialHistogram' @:: Lens' Metric (Prelude.Maybe ExponentialHistogram)@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.exponentialHistogram' @:: Lens' Metric ExponentialHistogram@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.maybe'summary' @:: Lens' Metric (Prelude.Maybe Summary)@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.summary' @:: Lens' Metric Summary@ -}
data Metric
  = Metric'_constructor {Metric -> Text
_Metric'name :: !Data.Text.Text,
                         Metric -> Text
_Metric'description :: !Data.Text.Text,
                         Metric -> Text
_Metric'unit :: !Data.Text.Text,
                         Metric -> Maybe Metric'Data
_Metric'data' :: !(Prelude.Maybe Metric'Data),
                         Metric -> FieldSet
_Metric'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (Metric -> Metric -> Bool
(Metric -> Metric -> Bool)
-> (Metric -> Metric -> Bool) -> Eq Metric
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: Metric -> Metric -> Bool
== :: Metric -> Metric -> Bool
$c/= :: Metric -> Metric -> Bool
/= :: Metric -> Metric -> Bool
Prelude.Eq, Eq Metric
Eq Metric =>
(Metric -> Metric -> Ordering)
-> (Metric -> Metric -> Bool)
-> (Metric -> Metric -> Bool)
-> (Metric -> Metric -> Bool)
-> (Metric -> Metric -> Bool)
-> (Metric -> Metric -> Metric)
-> (Metric -> Metric -> Metric)
-> Ord Metric
Metric -> Metric -> Bool
Metric -> Metric -> Ordering
Metric -> Metric -> Metric
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
$ccompare :: Metric -> Metric -> Ordering
compare :: Metric -> Metric -> Ordering
$c< :: Metric -> Metric -> Bool
< :: Metric -> Metric -> Bool
$c<= :: Metric -> Metric -> Bool
<= :: Metric -> Metric -> Bool
$c> :: Metric -> Metric -> Bool
> :: Metric -> Metric -> Bool
$c>= :: Metric -> Metric -> Bool
>= :: Metric -> Metric -> Bool
$cmax :: Metric -> Metric -> Metric
max :: Metric -> Metric -> Metric
$cmin :: Metric -> Metric -> Metric
min :: Metric -> Metric -> Metric
Prelude.Ord)
instance Prelude.Show Metric where
  showsPrec :: Int -> Metric -> ShowS
showsPrec Int
_ Metric
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (Metric -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort Metric
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
data Metric'Data
  = Metric'Gauge !Gauge |
    Metric'Sum !Sum |
    Metric'Histogram !Histogram |
    Metric'ExponentialHistogram !ExponentialHistogram |
    Metric'Summary !Summary
  deriving stock (Int -> Metric'Data -> ShowS
[Metric'Data] -> ShowS
Metric'Data -> String
(Int -> Metric'Data -> ShowS)
-> (Metric'Data -> String)
-> ([Metric'Data] -> ShowS)
-> Show Metric'Data
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> Metric'Data -> ShowS
showsPrec :: Int -> Metric'Data -> ShowS
$cshow :: Metric'Data -> String
show :: Metric'Data -> String
$cshowList :: [Metric'Data] -> ShowS
showList :: [Metric'Data] -> ShowS
Prelude.Show, Metric'Data -> Metric'Data -> Bool
(Metric'Data -> Metric'Data -> Bool)
-> (Metric'Data -> Metric'Data -> Bool) -> Eq Metric'Data
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: Metric'Data -> Metric'Data -> Bool
== :: Metric'Data -> Metric'Data -> Bool
$c/= :: Metric'Data -> Metric'Data -> Bool
/= :: Metric'Data -> Metric'Data -> Bool
Prelude.Eq, Eq Metric'Data
Eq Metric'Data =>
(Metric'Data -> Metric'Data -> Ordering)
-> (Metric'Data -> Metric'Data -> Bool)
-> (Metric'Data -> Metric'Data -> Bool)
-> (Metric'Data -> Metric'Data -> Bool)
-> (Metric'Data -> Metric'Data -> Bool)
-> (Metric'Data -> Metric'Data -> Metric'Data)
-> (Metric'Data -> Metric'Data -> Metric'Data)
-> Ord Metric'Data
Metric'Data -> Metric'Data -> Bool
Metric'Data -> Metric'Data -> Ordering
Metric'Data -> Metric'Data -> Metric'Data
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
$ccompare :: Metric'Data -> Metric'Data -> Ordering
compare :: Metric'Data -> Metric'Data -> Ordering
$c< :: Metric'Data -> Metric'Data -> Bool
< :: Metric'Data -> Metric'Data -> Bool
$c<= :: Metric'Data -> Metric'Data -> Bool
<= :: Metric'Data -> Metric'Data -> Bool
$c> :: Metric'Data -> Metric'Data -> Bool
> :: Metric'Data -> Metric'Data -> Bool
$c>= :: Metric'Data -> Metric'Data -> Bool
>= :: Metric'Data -> Metric'Data -> Bool
$cmax :: Metric'Data -> Metric'Data -> Metric'Data
max :: Metric'Data -> Metric'Data -> Metric'Data
$cmin :: Metric'Data -> Metric'Data -> Metric'Data
min :: Metric'Data -> Metric'Data -> Metric'Data
Prelude.Ord)
instance Data.ProtoLens.Field.HasField Metric "name" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "name" -> (Text -> f Text) -> Metric -> f Metric
fieldOf Proxy# "name"
_
    = ((Text -> f Text) -> Metric -> f Metric)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> Metric
-> f Metric
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((Metric -> Text)
-> (Metric -> Text -> Metric) -> Lens Metric Metric Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Metric -> Text
_Metric'name (\ Metric
x__ Text
y__ -> Metric
x__ {_Metric'name = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField Metric "description" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "description" -> (Text -> f Text) -> Metric -> f Metric
fieldOf Proxy# "description"
_
    = ((Text -> f Text) -> Metric -> f Metric)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> Metric
-> f Metric
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((Metric -> Text)
-> (Metric -> Text -> Metric) -> Lens Metric Metric Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Metric -> Text
_Metric'description (\ Metric
x__ Text
y__ -> Metric
x__ {_Metric'description = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField Metric "unit" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "unit" -> (Text -> f Text) -> Metric -> f Metric
fieldOf Proxy# "unit"
_
    = ((Text -> f Text) -> Metric -> f Metric)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> Metric
-> f Metric
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((Metric -> Text)
-> (Metric -> Text -> Metric) -> Lens Metric Metric Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Metric -> Text
_Metric'unit (\ Metric
x__ Text
y__ -> Metric
x__ {_Metric'unit = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField Metric "maybe'data'" (Prelude.Maybe Metric'Data) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'data'"
-> (Maybe Metric'Data -> f (Maybe Metric'Data))
-> Metric
-> f Metric
fieldOf Proxy# "maybe'data'"
_
    = ((Maybe Metric'Data -> f (Maybe Metric'Data))
 -> Metric -> f Metric)
-> ((Maybe Metric'Data -> f (Maybe Metric'Data))
    -> Maybe Metric'Data -> f (Maybe Metric'Data))
-> (Maybe Metric'Data -> f (Maybe Metric'Data))
-> Metric
-> f Metric
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((Metric -> Maybe Metric'Data)
-> (Metric -> Maybe Metric'Data -> Metric)
-> Lens Metric Metric (Maybe Metric'Data) (Maybe Metric'Data)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Metric -> Maybe Metric'Data
_Metric'data' (\ Metric
x__ Maybe Metric'Data
y__ -> Metric
x__ {_Metric'data' = y__}))
        (Maybe Metric'Data -> f (Maybe Metric'Data))
-> Maybe Metric'Data -> f (Maybe Metric'Data)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField Metric "maybe'gauge" (Prelude.Maybe Gauge) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'gauge"
-> (Maybe Gauge -> f (Maybe Gauge)) -> Metric -> f Metric
fieldOf Proxy# "maybe'gauge"
_
    = ((Maybe Metric'Data -> f (Maybe Metric'Data))
 -> Metric -> f Metric)
-> ((Maybe Gauge -> f (Maybe Gauge))
    -> Maybe Metric'Data -> f (Maybe Metric'Data))
-> (Maybe Gauge -> f (Maybe Gauge))
-> Metric
-> f Metric
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((Metric -> Maybe Metric'Data)
-> (Metric -> Maybe Metric'Data -> Metric)
-> Lens Metric Metric (Maybe Metric'Data) (Maybe Metric'Data)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Metric -> Maybe Metric'Data
_Metric'data' (\ Metric
x__ Maybe Metric'Data
y__ -> Metric
x__ {_Metric'data' = y__}))
        ((Maybe Metric'Data -> Maybe Gauge)
-> (Maybe Metric'Data -> Maybe Gauge -> Maybe Metric'Data)
-> Lens
     (Maybe Metric'Data) (Maybe Metric'Data) (Maybe Gauge) (Maybe Gauge)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe Metric'Data
x__
              -> case Maybe Metric'Data
x__ of
                   (Prelude.Just (Metric'Gauge Gauge
x__val)) -> Gauge -> Maybe Gauge
forall a. a -> Maybe a
Prelude.Just Gauge
x__val
                   Maybe Metric'Data
_otherwise -> Maybe Gauge
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe Metric'Data
_ Maybe Gauge
y__ -> (Gauge -> Metric'Data) -> Maybe Gauge -> Maybe Metric'Data
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap Gauge -> Metric'Data
Metric'Gauge Maybe Gauge
y__))
instance Data.ProtoLens.Field.HasField Metric "gauge" Gauge where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "gauge" -> (Gauge -> f Gauge) -> Metric -> f Metric
fieldOf Proxy# "gauge"
_
    = ((Maybe Metric'Data -> f (Maybe Metric'Data))
 -> Metric -> f Metric)
-> ((Gauge -> f Gauge)
    -> Maybe Metric'Data -> f (Maybe Metric'Data))
-> (Gauge -> f Gauge)
-> Metric
-> f Metric
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((Metric -> Maybe Metric'Data)
-> (Metric -> Maybe Metric'Data -> Metric)
-> Lens Metric Metric (Maybe Metric'Data) (Maybe Metric'Data)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Metric -> Maybe Metric'Data
_Metric'data' (\ Metric
x__ Maybe Metric'Data
y__ -> Metric
x__ {_Metric'data' = y__}))
        (((Maybe Gauge -> f (Maybe Gauge))
 -> Maybe Metric'Data -> f (Maybe Metric'Data))
-> ((Gauge -> f Gauge) -> Maybe Gauge -> f (Maybe Gauge))
-> (Gauge -> f Gauge)
-> Maybe Metric'Data
-> f (Maybe Metric'Data)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe Metric'Data -> Maybe Gauge)
-> (Maybe Metric'Data -> Maybe Gauge -> Maybe Metric'Data)
-> Lens
     (Maybe Metric'Data) (Maybe Metric'Data) (Maybe Gauge) (Maybe Gauge)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe Metric'Data
x__
                 -> case Maybe Metric'Data
x__ of
                      (Prelude.Just (Metric'Gauge Gauge
x__val)) -> Gauge -> Maybe Gauge
forall a. a -> Maybe a
Prelude.Just Gauge
x__val
                      Maybe Metric'Data
_otherwise -> Maybe Gauge
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe Metric'Data
_ Maybe Gauge
y__ -> (Gauge -> Metric'Data) -> Maybe Gauge -> Maybe Metric'Data
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap Gauge -> Metric'Data
Metric'Gauge Maybe Gauge
y__))
           (Gauge -> Lens' (Maybe Gauge) Gauge
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Gauge
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField Metric "maybe'sum" (Prelude.Maybe Sum) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'sum"
-> (Maybe Sum -> f (Maybe Sum)) -> Metric -> f Metric
fieldOf Proxy# "maybe'sum"
_
    = ((Maybe Metric'Data -> f (Maybe Metric'Data))
 -> Metric -> f Metric)
-> ((Maybe Sum -> f (Maybe Sum))
    -> Maybe Metric'Data -> f (Maybe Metric'Data))
-> (Maybe Sum -> f (Maybe Sum))
-> Metric
-> f Metric
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((Metric -> Maybe Metric'Data)
-> (Metric -> Maybe Metric'Data -> Metric)
-> Lens Metric Metric (Maybe Metric'Data) (Maybe Metric'Data)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Metric -> Maybe Metric'Data
_Metric'data' (\ Metric
x__ Maybe Metric'Data
y__ -> Metric
x__ {_Metric'data' = y__}))
        ((Maybe Metric'Data -> Maybe Sum)
-> (Maybe Metric'Data -> Maybe Sum -> Maybe Metric'Data)
-> Lens
     (Maybe Metric'Data) (Maybe Metric'Data) (Maybe Sum) (Maybe Sum)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe Metric'Data
x__
              -> case Maybe Metric'Data
x__ of
                   (Prelude.Just (Metric'Sum Sum
x__val)) -> Sum -> Maybe Sum
forall a. a -> Maybe a
Prelude.Just Sum
x__val
                   Maybe Metric'Data
_otherwise -> Maybe Sum
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe Metric'Data
_ Maybe Sum
y__ -> (Sum -> Metric'Data) -> Maybe Sum -> Maybe Metric'Data
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap Sum -> Metric'Data
Metric'Sum Maybe Sum
y__))
instance Data.ProtoLens.Field.HasField Metric "sum" Sum where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "sum" -> (Sum -> f Sum) -> Metric -> f Metric
fieldOf Proxy# "sum"
_
    = ((Maybe Metric'Data -> f (Maybe Metric'Data))
 -> Metric -> f Metric)
-> ((Sum -> f Sum) -> Maybe Metric'Data -> f (Maybe Metric'Data))
-> (Sum -> f Sum)
-> Metric
-> f Metric
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((Metric -> Maybe Metric'Data)
-> (Metric -> Maybe Metric'Data -> Metric)
-> Lens Metric Metric (Maybe Metric'Data) (Maybe Metric'Data)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Metric -> Maybe Metric'Data
_Metric'data' (\ Metric
x__ Maybe Metric'Data
y__ -> Metric
x__ {_Metric'data' = y__}))
        (((Maybe Sum -> f (Maybe Sum))
 -> Maybe Metric'Data -> f (Maybe Metric'Data))
-> ((Sum -> f Sum) -> Maybe Sum -> f (Maybe Sum))
-> (Sum -> f Sum)
-> Maybe Metric'Data
-> f (Maybe Metric'Data)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe Metric'Data -> Maybe Sum)
-> (Maybe Metric'Data -> Maybe Sum -> Maybe Metric'Data)
-> Lens
     (Maybe Metric'Data) (Maybe Metric'Data) (Maybe Sum) (Maybe Sum)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe Metric'Data
x__
                 -> case Maybe Metric'Data
x__ of
                      (Prelude.Just (Metric'Sum Sum
x__val)) -> Sum -> Maybe Sum
forall a. a -> Maybe a
Prelude.Just Sum
x__val
                      Maybe Metric'Data
_otherwise -> Maybe Sum
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe Metric'Data
_ Maybe Sum
y__ -> (Sum -> Metric'Data) -> Maybe Sum -> Maybe Metric'Data
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap Sum -> Metric'Data
Metric'Sum Maybe Sum
y__))
           (Sum -> Lens' (Maybe Sum) Sum
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Sum
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField Metric "maybe'histogram" (Prelude.Maybe Histogram) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'histogram"
-> (Maybe Histogram -> f (Maybe Histogram)) -> Metric -> f Metric
fieldOf Proxy# "maybe'histogram"
_
    = ((Maybe Metric'Data -> f (Maybe Metric'Data))
 -> Metric -> f Metric)
-> ((Maybe Histogram -> f (Maybe Histogram))
    -> Maybe Metric'Data -> f (Maybe Metric'Data))
-> (Maybe Histogram -> f (Maybe Histogram))
-> Metric
-> f Metric
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((Metric -> Maybe Metric'Data)
-> (Metric -> Maybe Metric'Data -> Metric)
-> Lens Metric Metric (Maybe Metric'Data) (Maybe Metric'Data)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Metric -> Maybe Metric'Data
_Metric'data' (\ Metric
x__ Maybe Metric'Data
y__ -> Metric
x__ {_Metric'data' = y__}))
        ((Maybe Metric'Data -> Maybe Histogram)
-> (Maybe Metric'Data -> Maybe Histogram -> Maybe Metric'Data)
-> Lens
     (Maybe Metric'Data)
     (Maybe Metric'Data)
     (Maybe Histogram)
     (Maybe Histogram)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe Metric'Data
x__
              -> case Maybe Metric'Data
x__ of
                   (Prelude.Just (Metric'Histogram Histogram
x__val)) -> Histogram -> Maybe Histogram
forall a. a -> Maybe a
Prelude.Just Histogram
x__val
                   Maybe Metric'Data
_otherwise -> Maybe Histogram
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe Metric'Data
_ Maybe Histogram
y__ -> (Histogram -> Metric'Data) -> Maybe Histogram -> Maybe Metric'Data
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap Histogram -> Metric'Data
Metric'Histogram Maybe Histogram
y__))
instance Data.ProtoLens.Field.HasField Metric "histogram" Histogram where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "histogram"
-> (Histogram -> f Histogram) -> Metric -> f Metric
fieldOf Proxy# "histogram"
_
    = ((Maybe Metric'Data -> f (Maybe Metric'Data))
 -> Metric -> f Metric)
-> ((Histogram -> f Histogram)
    -> Maybe Metric'Data -> f (Maybe Metric'Data))
-> (Histogram -> f Histogram)
-> Metric
-> f Metric
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((Metric -> Maybe Metric'Data)
-> (Metric -> Maybe Metric'Data -> Metric)
-> Lens Metric Metric (Maybe Metric'Data) (Maybe Metric'Data)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Metric -> Maybe Metric'Data
_Metric'data' (\ Metric
x__ Maybe Metric'Data
y__ -> Metric
x__ {_Metric'data' = y__}))
        (((Maybe Histogram -> f (Maybe Histogram))
 -> Maybe Metric'Data -> f (Maybe Metric'Data))
-> ((Histogram -> f Histogram)
    -> Maybe Histogram -> f (Maybe Histogram))
-> (Histogram -> f Histogram)
-> Maybe Metric'Data
-> f (Maybe Metric'Data)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe Metric'Data -> Maybe Histogram)
-> (Maybe Metric'Data -> Maybe Histogram -> Maybe Metric'Data)
-> Lens
     (Maybe Metric'Data)
     (Maybe Metric'Data)
     (Maybe Histogram)
     (Maybe Histogram)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe Metric'Data
x__
                 -> case Maybe Metric'Data
x__ of
                      (Prelude.Just (Metric'Histogram Histogram
x__val)) -> Histogram -> Maybe Histogram
forall a. a -> Maybe a
Prelude.Just Histogram
x__val
                      Maybe Metric'Data
_otherwise -> Maybe Histogram
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe Metric'Data
_ Maybe Histogram
y__ -> (Histogram -> Metric'Data) -> Maybe Histogram -> Maybe Metric'Data
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap Histogram -> Metric'Data
Metric'Histogram Maybe Histogram
y__))
           (Histogram -> Lens' (Maybe Histogram) Histogram
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Histogram
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField Metric "maybe'exponentialHistogram" (Prelude.Maybe ExponentialHistogram) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'exponentialHistogram"
-> (Maybe ExponentialHistogram -> f (Maybe ExponentialHistogram))
-> Metric
-> f Metric
fieldOf Proxy# "maybe'exponentialHistogram"
_
    = ((Maybe Metric'Data -> f (Maybe Metric'Data))
 -> Metric -> f Metric)
-> ((Maybe ExponentialHistogram -> f (Maybe ExponentialHistogram))
    -> Maybe Metric'Data -> f (Maybe Metric'Data))
-> (Maybe ExponentialHistogram -> f (Maybe ExponentialHistogram))
-> Metric
-> f Metric
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((Metric -> Maybe Metric'Data)
-> (Metric -> Maybe Metric'Data -> Metric)
-> Lens Metric Metric (Maybe Metric'Data) (Maybe Metric'Data)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Metric -> Maybe Metric'Data
_Metric'data' (\ Metric
x__ Maybe Metric'Data
y__ -> Metric
x__ {_Metric'data' = y__}))
        ((Maybe Metric'Data -> Maybe ExponentialHistogram)
-> (Maybe Metric'Data
    -> Maybe ExponentialHistogram -> Maybe Metric'Data)
-> Lens
     (Maybe Metric'Data)
     (Maybe Metric'Data)
     (Maybe ExponentialHistogram)
     (Maybe ExponentialHistogram)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe Metric'Data
x__
              -> case Maybe Metric'Data
x__ of
                   (Prelude.Just (Metric'ExponentialHistogram ExponentialHistogram
x__val))
                     -> ExponentialHistogram -> Maybe ExponentialHistogram
forall a. a -> Maybe a
Prelude.Just ExponentialHistogram
x__val
                   Maybe Metric'Data
_otherwise -> Maybe ExponentialHistogram
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe Metric'Data
_ Maybe ExponentialHistogram
y__ -> (ExponentialHistogram -> Metric'Data)
-> Maybe ExponentialHistogram -> Maybe Metric'Data
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap ExponentialHistogram -> Metric'Data
Metric'ExponentialHistogram Maybe ExponentialHistogram
y__))
instance Data.ProtoLens.Field.HasField Metric "exponentialHistogram" ExponentialHistogram where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "exponentialHistogram"
-> (ExponentialHistogram -> f ExponentialHistogram)
-> Metric
-> f Metric
fieldOf Proxy# "exponentialHistogram"
_
    = ((Maybe Metric'Data -> f (Maybe Metric'Data))
 -> Metric -> f Metric)
-> ((ExponentialHistogram -> f ExponentialHistogram)
    -> Maybe Metric'Data -> f (Maybe Metric'Data))
-> (ExponentialHistogram -> f ExponentialHistogram)
-> Metric
-> f Metric
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((Metric -> Maybe Metric'Data)
-> (Metric -> Maybe Metric'Data -> Metric)
-> Lens Metric Metric (Maybe Metric'Data) (Maybe Metric'Data)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Metric -> Maybe Metric'Data
_Metric'data' (\ Metric
x__ Maybe Metric'Data
y__ -> Metric
x__ {_Metric'data' = y__}))
        (((Maybe ExponentialHistogram -> f (Maybe ExponentialHistogram))
 -> Maybe Metric'Data -> f (Maybe Metric'Data))
-> ((ExponentialHistogram -> f ExponentialHistogram)
    -> Maybe ExponentialHistogram -> f (Maybe ExponentialHistogram))
-> (ExponentialHistogram -> f ExponentialHistogram)
-> Maybe Metric'Data
-> f (Maybe Metric'Data)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe Metric'Data -> Maybe ExponentialHistogram)
-> (Maybe Metric'Data
    -> Maybe ExponentialHistogram -> Maybe Metric'Data)
-> Lens
     (Maybe Metric'Data)
     (Maybe Metric'Data)
     (Maybe ExponentialHistogram)
     (Maybe ExponentialHistogram)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe Metric'Data
x__
                 -> case Maybe Metric'Data
x__ of
                      (Prelude.Just (Metric'ExponentialHistogram ExponentialHistogram
x__val))
                        -> ExponentialHistogram -> Maybe ExponentialHistogram
forall a. a -> Maybe a
Prelude.Just ExponentialHistogram
x__val
                      Maybe Metric'Data
_otherwise -> Maybe ExponentialHistogram
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe Metric'Data
_ Maybe ExponentialHistogram
y__ -> (ExponentialHistogram -> Metric'Data)
-> Maybe ExponentialHistogram -> Maybe Metric'Data
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap ExponentialHistogram -> Metric'Data
Metric'ExponentialHistogram Maybe ExponentialHistogram
y__))
           (ExponentialHistogram
-> Lens' (Maybe ExponentialHistogram) ExponentialHistogram
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens ExponentialHistogram
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField Metric "maybe'summary" (Prelude.Maybe Summary) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'summary"
-> (Maybe Summary -> f (Maybe Summary)) -> Metric -> f Metric
fieldOf Proxy# "maybe'summary"
_
    = ((Maybe Metric'Data -> f (Maybe Metric'Data))
 -> Metric -> f Metric)
-> ((Maybe Summary -> f (Maybe Summary))
    -> Maybe Metric'Data -> f (Maybe Metric'Data))
-> (Maybe Summary -> f (Maybe Summary))
-> Metric
-> f Metric
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((Metric -> Maybe Metric'Data)
-> (Metric -> Maybe Metric'Data -> Metric)
-> Lens Metric Metric (Maybe Metric'Data) (Maybe Metric'Data)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Metric -> Maybe Metric'Data
_Metric'data' (\ Metric
x__ Maybe Metric'Data
y__ -> Metric
x__ {_Metric'data' = y__}))
        ((Maybe Metric'Data -> Maybe Summary)
-> (Maybe Metric'Data -> Maybe Summary -> Maybe Metric'Data)
-> Lens
     (Maybe Metric'Data)
     (Maybe Metric'Data)
     (Maybe Summary)
     (Maybe Summary)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe Metric'Data
x__
              -> case Maybe Metric'Data
x__ of
                   (Prelude.Just (Metric'Summary Summary
x__val)) -> Summary -> Maybe Summary
forall a. a -> Maybe a
Prelude.Just Summary
x__val
                   Maybe Metric'Data
_otherwise -> Maybe Summary
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe Metric'Data
_ Maybe Summary
y__ -> (Summary -> Metric'Data) -> Maybe Summary -> Maybe Metric'Data
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap Summary -> Metric'Data
Metric'Summary Maybe Summary
y__))
instance Data.ProtoLens.Field.HasField Metric "summary" Summary where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "summary" -> (Summary -> f Summary) -> Metric -> f Metric
fieldOf Proxy# "summary"
_
    = ((Maybe Metric'Data -> f (Maybe Metric'Data))
 -> Metric -> f Metric)
-> ((Summary -> f Summary)
    -> Maybe Metric'Data -> f (Maybe Metric'Data))
-> (Summary -> f Summary)
-> Metric
-> f Metric
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((Metric -> Maybe Metric'Data)
-> (Metric -> Maybe Metric'Data -> Metric)
-> Lens Metric Metric (Maybe Metric'Data) (Maybe Metric'Data)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Metric -> Maybe Metric'Data
_Metric'data' (\ Metric
x__ Maybe Metric'Data
y__ -> Metric
x__ {_Metric'data' = y__}))
        (((Maybe Summary -> f (Maybe Summary))
 -> Maybe Metric'Data -> f (Maybe Metric'Data))
-> ((Summary -> f Summary) -> Maybe Summary -> f (Maybe Summary))
-> (Summary -> f Summary)
-> Maybe Metric'Data
-> f (Maybe Metric'Data)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe Metric'Data -> Maybe Summary)
-> (Maybe Metric'Data -> Maybe Summary -> Maybe Metric'Data)
-> Lens
     (Maybe Metric'Data)
     (Maybe Metric'Data)
     (Maybe Summary)
     (Maybe Summary)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe Metric'Data
x__
                 -> case Maybe Metric'Data
x__ of
                      (Prelude.Just (Metric'Summary Summary
x__val)) -> Summary -> Maybe Summary
forall a. a -> Maybe a
Prelude.Just Summary
x__val
                      Maybe Metric'Data
_otherwise -> Maybe Summary
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe Metric'Data
_ Maybe Summary
y__ -> (Summary -> Metric'Data) -> Maybe Summary -> Maybe Metric'Data
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap Summary -> Metric'Data
Metric'Summary Maybe Summary
y__))
           (Summary -> Lens' (Maybe Summary) Summary
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Summary
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Message Metric where
  messageName :: Proxy Metric -> Text
messageName Proxy Metric
_
    = String -> Text
Data.Text.pack String
"opentelemetry.proto.metrics.v1.Metric"
  packedMessageDescriptor :: Proxy Metric -> ByteString
packedMessageDescriptor Proxy Metric
_
    = ByteString
"\n\
      \\ACKMetric\DC2\DC2\n\
      \\EOTname\CAN\SOH \SOH(\tR\EOTname\DC2 \n\
      \\vdescription\CAN\STX \SOH(\tR\vdescription\DC2\DC2\n\
      \\EOTunit\CAN\ETX \SOH(\tR\EOTunit\DC2=\n\
      \\ENQgauge\CAN\ENQ \SOH(\v2%.opentelemetry.proto.metrics.v1.GaugeH\NULR\ENQgauge\DC27\n\
      \\ETXsum\CAN\a \SOH(\v2#.opentelemetry.proto.metrics.v1.SumH\NULR\ETXsum\DC2I\n\
      \\thistogram\CAN\t \SOH(\v2).opentelemetry.proto.metrics.v1.HistogramH\NULR\thistogram\DC2k\n\
      \\NAKexponential_histogram\CAN\n\
      \ \SOH(\v24.opentelemetry.proto.metrics.v1.ExponentialHistogramH\NULR\DC4exponentialHistogram\DC2C\n\
      \\asummary\CAN\v \SOH(\v2'.opentelemetry.proto.metrics.v1.SummaryH\NULR\asummaryB\ACK\n\
      \\EOTdataJ\EOT\b\EOT\DLE\ENQJ\EOT\b\ACK\DLE\aJ\EOT\b\b\DLE\t"
  packedFileDescriptor :: Proxy Metric -> ByteString
packedFileDescriptor Proxy Metric
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor Metric)
fieldsByTag
    = let
        name__field_descriptor :: FieldDescriptor Metric
name__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor Metric Text
-> FieldDescriptor Metric
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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 Metric Metric Text Text -> FieldAccessor Metric 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 (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 Metric
        description__field_descriptor :: FieldDescriptor Metric
description__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor Metric Text
-> FieldDescriptor Metric
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"description"
              (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 Metric Metric Text Text -> FieldAccessor Metric 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 (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"description")) ::
              Data.ProtoLens.FieldDescriptor Metric
        unit__field_descriptor :: FieldDescriptor Metric
unit__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor Metric Text
-> FieldDescriptor Metric
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"unit"
              (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 Metric Metric Text Text -> FieldAccessor Metric 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 (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"unit")) ::
              Data.ProtoLens.FieldDescriptor Metric
        gauge__field_descriptor :: FieldDescriptor Metric
gauge__field_descriptor
          = String
-> FieldTypeDescriptor Gauge
-> FieldAccessor Metric Gauge
-> FieldDescriptor Metric
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"gauge"
              (MessageOrGroup -> FieldTypeDescriptor Gauge
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Gauge)
              (Lens' Metric (Maybe Gauge) -> FieldAccessor Metric Gauge
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'gauge")) ::
              Data.ProtoLens.FieldDescriptor Metric
        sum__field_descriptor :: FieldDescriptor Metric
sum__field_descriptor
          = String
-> FieldTypeDescriptor Sum
-> FieldAccessor Metric Sum
-> FieldDescriptor Metric
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"sum"
              (MessageOrGroup -> FieldTypeDescriptor Sum
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Sum)
              (Lens' Metric (Maybe Sum) -> FieldAccessor Metric Sum
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'sum")) ::
              Data.ProtoLens.FieldDescriptor Metric
        histogram__field_descriptor :: FieldDescriptor Metric
histogram__field_descriptor
          = String
-> FieldTypeDescriptor Histogram
-> FieldAccessor Metric Histogram
-> FieldDescriptor Metric
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"histogram"
              (MessageOrGroup -> FieldTypeDescriptor Histogram
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Histogram)
              (Lens' Metric (Maybe Histogram) -> FieldAccessor Metric Histogram
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'histogram")) ::
              Data.ProtoLens.FieldDescriptor Metric
        exponentialHistogram__field_descriptor :: FieldDescriptor Metric
exponentialHistogram__field_descriptor
          = String
-> FieldTypeDescriptor ExponentialHistogram
-> FieldAccessor Metric ExponentialHistogram
-> FieldDescriptor Metric
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"exponential_histogram"
              (MessageOrGroup -> FieldTypeDescriptor ExponentialHistogram
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ExponentialHistogram)
              (Lens' Metric (Maybe ExponentialHistogram)
-> FieldAccessor Metric ExponentialHistogram
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'exponentialHistogram")) ::
              Data.ProtoLens.FieldDescriptor Metric
        summary__field_descriptor :: FieldDescriptor Metric
summary__field_descriptor
          = String
-> FieldTypeDescriptor Summary
-> FieldAccessor Metric Summary
-> FieldDescriptor Metric
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"summary"
              (MessageOrGroup -> FieldTypeDescriptor Summary
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Summary)
              (Lens' Metric (Maybe Summary) -> FieldAccessor Metric Summary
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'summary")) ::
              Data.ProtoLens.FieldDescriptor Metric
      in
        [(Tag, FieldDescriptor Metric)] -> Map Tag (FieldDescriptor Metric)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor Metric
name__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor Metric
description__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor Metric
unit__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor Metric
gauge__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor Metric
sum__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
9, FieldDescriptor Metric
histogram__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
10, FieldDescriptor Metric
exponentialHistogram__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
11, FieldDescriptor Metric
summary__field_descriptor)]
  unknownFields :: Lens' Metric FieldSet
unknownFields
    = (Metric -> FieldSet)
-> (Metric -> FieldSet -> Metric) -> Lens' Metric FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        Metric -> FieldSet
_Metric'_unknownFields
        (\ Metric
x__ FieldSet
y__ -> Metric
x__ {_Metric'_unknownFields = y__})
  defMessage :: Metric
defMessage
    = Metric'_constructor
        {_Metric'name :: Text
_Metric'name = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _Metric'description :: Text
_Metric'description = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _Metric'unit :: Text
_Metric'unit = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _Metric'data' :: Maybe Metric'Data
_Metric'data' = Maybe Metric'Data
forall a. Maybe a
Prelude.Nothing, _Metric'_unknownFields :: FieldSet
_Metric'_unknownFields = []}
  parseMessage :: Parser Metric
parseMessage
    = let
        loop :: Metric -> Data.ProtoLens.Encoding.Bytes.Parser Metric
        loop :: Metric -> Parser Metric
loop Metric
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 a. [a] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
                             () -> Parser ()
forall a. a -> Parser a
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
                         else
                             String -> Parser ()
forall a. String -> Parser a
forall (m :: * -> *) a. MonadFail m => String -> m a
Prelude.fail
                               (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
                                  String
"Missing required fields: "
                                  ([String] -> String
forall a. Show a => a -> String
Prelude.show ([String]
forall a. [a]
missing :: [Prelude.String]))))
                      Metric -> Parser Metric
forall a. a -> Parser a
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter Metric Metric FieldSet FieldSet
-> (FieldSet -> FieldSet) -> Metric -> Metric
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                           LensLike' f Metric FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' Metric FieldSet
Setter Metric Metric FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) Metric
x)
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        Word64
10
                          -> do Text
y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser Text
Data.ProtoLens.Encoding.Bytes.getText
                                             (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len))
                                       String
"name"
                                Metric -> Parser Metric
loop (Setter Metric Metric Text Text -> Text -> Metric -> Metric
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (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 Metric
x)
                        Word64
18
                          -> do Text
y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser Text
Data.ProtoLens.Encoding.Bytes.getText
                                             (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len))
                                       String
"description"
                                Metric -> Parser Metric
loop
                                  (Setter Metric Metric Text Text -> Text -> Metric -> Metric
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"description") Text
y Metric
x)
                        Word64
26
                          -> do Text
y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser Text
Data.ProtoLens.Encoding.Bytes.getText
                                             (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len))
                                       String
"unit"
                                Metric -> Parser Metric
loop (Setter Metric Metric Text Text -> Text -> Metric -> Metric
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"unit") Text
y Metric
x)
                        Word64
42
                          -> do Gauge
y <- Parser Gauge -> String -> Parser Gauge
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser Gauge -> Parser Gauge
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 Gauge
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       String
"gauge"
                                Metric -> Parser Metric
loop (Setter Metric Metric Gauge Gauge -> Gauge -> Metric -> Metric
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"gauge") Gauge
y Metric
x)
                        Word64
58
                          -> do Sum
y <- Parser Sum -> String -> Parser Sum
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser Sum -> Parser Sum
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 Sum
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       String
"sum"
                                Metric -> Parser Metric
loop (Setter Metric Metric Sum Sum -> Sum -> Metric -> Metric
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"sum") Sum
y Metric
x)
                        Word64
74
                          -> do Histogram
y <- Parser Histogram -> String -> Parser Histogram
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser Histogram -> Parser Histogram
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 Histogram
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       String
"histogram"
                                Metric -> Parser Metric
loop
                                  (Setter Metric Metric Histogram Histogram
-> Histogram -> Metric -> Metric
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"histogram") Histogram
y Metric
x)
                        Word64
82
                          -> do ExponentialHistogram
y <- Parser ExponentialHistogram
-> String -> Parser ExponentialHistogram
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser ExponentialHistogram -> Parser ExponentialHistogram
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 ExponentialHistogram
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       String
"exponential_histogram"
                                Metric -> Parser Metric
loop
                                  (Setter Metric Metric ExponentialHistogram ExponentialHistogram
-> ExponentialHistogram -> Metric -> Metric
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"exponentialHistogram") ExponentialHistogram
y Metric
x)
                        Word64
90
                          -> do Summary
y <- Parser Summary -> String -> Parser Summary
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser Summary -> Parser Summary
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 Summary
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       String
"summary"
                                Metric -> Parser Metric
loop (Setter Metric Metric Summary Summary -> Summary -> Metric -> Metric
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"summary") Summary
y Metric
x)
                        Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                Metric -> Parser Metric
loop
                                  (Setter Metric Metric FieldSet FieldSet
-> (FieldSet -> FieldSet) -> Metric -> Metric
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                     LensLike' f Metric FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' Metric FieldSet
Setter Metric Metric FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) Metric
x)
      in
        Parser Metric -> String -> Parser Metric
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do Metric -> Parser Metric
loop Metric
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"Metric"
  buildMessage :: Metric -> Builder
buildMessage
    = \ Metric
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Text
_v = FoldLike Text Metric Metric Text Text -> Metric -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"name") Metric
_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 Word64
10)
                      ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                         (\ 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 Metric Metric Text Text -> Metric -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"description") Metric
_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 Word64
18)
                         ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            (\ 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 Metric Metric Text Text -> Metric -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"unit") Metric
_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 Word64
26)
                            ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                               (\ ByteString
bs
                                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                          (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                       (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                               Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (case
                           FoldLike
  (Maybe Metric'Data)
  Metric
  Metric
  (Maybe Metric'Data)
  (Maybe Metric'Data)
-> Metric -> Maybe Metric'Data
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'data'") Metric
_x
                       of
                         Maybe Metric'Data
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         (Prelude.Just (Metric'Gauge Gauge
v))
                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                                ((ByteString -> Builder)
-> (Gauge -> ByteString) -> Gauge -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                   (\ 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))
                                   Gauge -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Gauge
v)
                         (Prelude.Just (Metric'Sum Sum
v))
                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
58)
                                ((ByteString -> Builder) -> (Sum -> ByteString) -> Sum -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                   (\ 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))
                                   Sum -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Sum
v)
                         (Prelude.Just (Metric'Histogram Histogram
v))
                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
74)
                                ((ByteString -> Builder)
-> (Histogram -> ByteString) -> Histogram -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                   (\ 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))
                                   Histogram -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Histogram
v)
                         (Prelude.Just (Metric'ExponentialHistogram ExponentialHistogram
v))
                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
82)
                                ((ByteString -> Builder)
-> (ExponentialHistogram -> ByteString)
-> ExponentialHistogram
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                   (\ 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))
                                   ExponentialHistogram -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ExponentialHistogram
v)
                         (Prelude.Just (Metric'Summary Summary
v))
                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
90)
                                ((ByteString -> Builder)
-> (Summary -> ByteString) -> Summary -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                   (\ 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))
                                   Summary -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Summary
v))
                      (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                         (FoldLike FieldSet Metric Metric FieldSet FieldSet
-> Metric -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet Metric Metric FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' Metric FieldSet
Data.ProtoLens.unknownFields Metric
_x)))))
instance Control.DeepSeq.NFData Metric where
  rnf :: Metric -> ()
rnf
    = \ Metric
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (Metric -> FieldSet
_Metric'_unknownFields Metric
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (Metric -> Text
_Metric'name Metric
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (Metric -> Text
_Metric'description Metric
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (Metric -> Text
_Metric'unit Metric
x__)
                      (Maybe Metric'Data -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (Metric -> Maybe Metric'Data
_Metric'data' Metric
x__) ()))))
instance Control.DeepSeq.NFData Metric'Data where
  rnf :: Metric'Data -> ()
rnf (Metric'Gauge Gauge
x__) = Gauge -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf Gauge
x__
  rnf (Metric'Sum Sum
x__) = Sum -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf Sum
x__
  rnf (Metric'Histogram Histogram
x__) = Histogram -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf Histogram
x__
  rnf (Metric'ExponentialHistogram ExponentialHistogram
x__) = ExponentialHistogram -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf ExponentialHistogram
x__
  rnf (Metric'Summary Summary
x__) = Summary -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf Summary
x__
_Metric'Gauge :: Data.ProtoLens.Prism.Prism' Metric'Data Gauge
_Metric'Gauge :: Prism' Metric'Data Gauge
_Metric'Gauge
  = (Gauge -> Metric'Data)
-> (Metric'Data -> Maybe Gauge) -> Prism' Metric'Data Gauge
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      Gauge -> Metric'Data
Metric'Gauge
      (\ Metric'Data
p__
         -> case Metric'Data
p__ of
              (Metric'Gauge Gauge
p__val) -> Gauge -> Maybe Gauge
forall a. a -> Maybe a
Prelude.Just Gauge
p__val
              Metric'Data
_otherwise -> Maybe Gauge
forall a. Maybe a
Prelude.Nothing)
_Metric'Sum :: Data.ProtoLens.Prism.Prism' Metric'Data Sum
_Metric'Sum :: Prism' Metric'Data Sum
_Metric'Sum
  = (Sum -> Metric'Data)
-> (Metric'Data -> Maybe Sum) -> Prism' Metric'Data Sum
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      Sum -> Metric'Data
Metric'Sum
      (\ Metric'Data
p__
         -> case Metric'Data
p__ of
              (Metric'Sum Sum
p__val) -> Sum -> Maybe Sum
forall a. a -> Maybe a
Prelude.Just Sum
p__val
              Metric'Data
_otherwise -> Maybe Sum
forall a. Maybe a
Prelude.Nothing)
_Metric'Histogram ::
  Data.ProtoLens.Prism.Prism' Metric'Data Histogram
_Metric'Histogram :: Prism' Metric'Data Histogram
_Metric'Histogram
  = (Histogram -> Metric'Data)
-> (Metric'Data -> Maybe Histogram) -> Prism' Metric'Data Histogram
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      Histogram -> Metric'Data
Metric'Histogram
      (\ Metric'Data
p__
         -> case Metric'Data
p__ of
              (Metric'Histogram Histogram
p__val) -> Histogram -> Maybe Histogram
forall a. a -> Maybe a
Prelude.Just Histogram
p__val
              Metric'Data
_otherwise -> Maybe Histogram
forall a. Maybe a
Prelude.Nothing)
_Metric'ExponentialHistogram ::
  Data.ProtoLens.Prism.Prism' Metric'Data ExponentialHistogram
_Metric'ExponentialHistogram :: Prism' Metric'Data ExponentialHistogram
_Metric'ExponentialHistogram
  = (ExponentialHistogram -> Metric'Data)
-> (Metric'Data -> Maybe ExponentialHistogram)
-> Prism' Metric'Data ExponentialHistogram
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      ExponentialHistogram -> Metric'Data
Metric'ExponentialHistogram
      (\ Metric'Data
p__
         -> case Metric'Data
p__ of
              (Metric'ExponentialHistogram ExponentialHistogram
p__val) -> ExponentialHistogram -> Maybe ExponentialHistogram
forall a. a -> Maybe a
Prelude.Just ExponentialHistogram
p__val
              Metric'Data
_otherwise -> Maybe ExponentialHistogram
forall a. Maybe a
Prelude.Nothing)
_Metric'Summary :: Data.ProtoLens.Prism.Prism' Metric'Data Summary
_Metric'Summary :: Prism' Metric'Data Summary
_Metric'Summary
  = (Summary -> Metric'Data)
-> (Metric'Data -> Maybe Summary) -> Prism' Metric'Data Summary
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      Summary -> Metric'Data
Metric'Summary
      (\ Metric'Data
p__
         -> case Metric'Data
p__ of
              (Metric'Summary Summary
p__val) -> Summary -> Maybe Summary
forall a. a -> Maybe a
Prelude.Just Summary
p__val
              Metric'Data
_otherwise -> Maybe Summary
forall a. Maybe a
Prelude.Nothing)
{- | Fields :
     
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.resourceMetrics' @:: Lens' MetricsData [ResourceMetrics]@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.vec'resourceMetrics' @:: Lens' MetricsData (Data.Vector.Vector ResourceMetrics)@ -}
data MetricsData
  = MetricsData'_constructor {MetricsData -> Vector ResourceMetrics
_MetricsData'resourceMetrics :: !(Data.Vector.Vector ResourceMetrics),
                              MetricsData -> FieldSet
_MetricsData'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (MetricsData -> MetricsData -> Bool
(MetricsData -> MetricsData -> Bool)
-> (MetricsData -> MetricsData -> Bool) -> Eq MetricsData
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: MetricsData -> MetricsData -> Bool
== :: MetricsData -> MetricsData -> Bool
$c/= :: MetricsData -> MetricsData -> Bool
/= :: MetricsData -> MetricsData -> Bool
Prelude.Eq, Eq MetricsData
Eq MetricsData =>
(MetricsData -> MetricsData -> Ordering)
-> (MetricsData -> MetricsData -> Bool)
-> (MetricsData -> MetricsData -> Bool)
-> (MetricsData -> MetricsData -> Bool)
-> (MetricsData -> MetricsData -> Bool)
-> (MetricsData -> MetricsData -> MetricsData)
-> (MetricsData -> MetricsData -> MetricsData)
-> Ord MetricsData
MetricsData -> MetricsData -> Bool
MetricsData -> MetricsData -> Ordering
MetricsData -> MetricsData -> MetricsData
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
$ccompare :: MetricsData -> MetricsData -> Ordering
compare :: MetricsData -> MetricsData -> Ordering
$c< :: MetricsData -> MetricsData -> Bool
< :: MetricsData -> MetricsData -> Bool
$c<= :: MetricsData -> MetricsData -> Bool
<= :: MetricsData -> MetricsData -> Bool
$c> :: MetricsData -> MetricsData -> Bool
> :: MetricsData -> MetricsData -> Bool
$c>= :: MetricsData -> MetricsData -> Bool
>= :: MetricsData -> MetricsData -> Bool
$cmax :: MetricsData -> MetricsData -> MetricsData
max :: MetricsData -> MetricsData -> MetricsData
$cmin :: MetricsData -> MetricsData -> MetricsData
min :: MetricsData -> MetricsData -> MetricsData
Prelude.Ord)
instance Prelude.Show MetricsData where
  showsPrec :: Int -> MetricsData -> ShowS
showsPrec Int
_ MetricsData
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (MetricsData -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort MetricsData
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField MetricsData "resourceMetrics" [ResourceMetrics] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "resourceMetrics"
-> ([ResourceMetrics] -> f [ResourceMetrics])
-> MetricsData
-> f MetricsData
fieldOf Proxy# "resourceMetrics"
_
    = ((Vector ResourceMetrics -> f (Vector ResourceMetrics))
 -> MetricsData -> f MetricsData)
-> (([ResourceMetrics] -> f [ResourceMetrics])
    -> Vector ResourceMetrics -> f (Vector ResourceMetrics))
-> ([ResourceMetrics] -> f [ResourceMetrics])
-> MetricsData
-> f MetricsData
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((MetricsData -> Vector ResourceMetrics)
-> (MetricsData -> Vector ResourceMetrics -> MetricsData)
-> Lens
     MetricsData
     MetricsData
     (Vector ResourceMetrics)
     (Vector ResourceMetrics)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           MetricsData -> Vector ResourceMetrics
_MetricsData'resourceMetrics
           (\ MetricsData
x__ Vector ResourceMetrics
y__ -> MetricsData
x__ {_MetricsData'resourceMetrics = y__}))
        ((Vector ResourceMetrics -> [ResourceMetrics])
-> (Vector ResourceMetrics
    -> [ResourceMetrics] -> Vector ResourceMetrics)
-> Lens
     (Vector ResourceMetrics)
     (Vector ResourceMetrics)
     [ResourceMetrics]
     [ResourceMetrics]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector ResourceMetrics -> [ResourceMetrics]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector ResourceMetrics
_ [ResourceMetrics]
y__ -> [ResourceMetrics] -> Vector ResourceMetrics
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [ResourceMetrics]
y__))
instance Data.ProtoLens.Field.HasField MetricsData "vec'resourceMetrics" (Data.Vector.Vector ResourceMetrics) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'resourceMetrics"
-> (Vector ResourceMetrics -> f (Vector ResourceMetrics))
-> MetricsData
-> f MetricsData
fieldOf Proxy# "vec'resourceMetrics"
_
    = ((Vector ResourceMetrics -> f (Vector ResourceMetrics))
 -> MetricsData -> f MetricsData)
-> ((Vector ResourceMetrics -> f (Vector ResourceMetrics))
    -> Vector ResourceMetrics -> f (Vector ResourceMetrics))
-> (Vector ResourceMetrics -> f (Vector ResourceMetrics))
-> MetricsData
-> f MetricsData
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((MetricsData -> Vector ResourceMetrics)
-> (MetricsData -> Vector ResourceMetrics -> MetricsData)
-> Lens
     MetricsData
     MetricsData
     (Vector ResourceMetrics)
     (Vector ResourceMetrics)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           MetricsData -> Vector ResourceMetrics
_MetricsData'resourceMetrics
           (\ MetricsData
x__ Vector ResourceMetrics
y__ -> MetricsData
x__ {_MetricsData'resourceMetrics = y__}))
        (Vector ResourceMetrics -> f (Vector ResourceMetrics))
-> Vector ResourceMetrics -> f (Vector ResourceMetrics)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message MetricsData where
  messageName :: Proxy MetricsData -> Text
messageName Proxy MetricsData
_
    = String -> Text
Data.Text.pack String
"opentelemetry.proto.metrics.v1.MetricsData"
  packedMessageDescriptor :: Proxy MetricsData -> ByteString
packedMessageDescriptor Proxy MetricsData
_
    = ByteString
"\n\
      \\vMetricsData\DC2Z\n\
      \\DLEresource_metrics\CAN\SOH \ETX(\v2/.opentelemetry.proto.metrics.v1.ResourceMetricsR\SIresourceMetrics"
  packedFileDescriptor :: Proxy MetricsData -> ByteString
packedFileDescriptor Proxy MetricsData
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor MetricsData)
fieldsByTag
    = let
        resourceMetrics__field_descriptor :: FieldDescriptor MetricsData
resourceMetrics__field_descriptor
          = String
-> FieldTypeDescriptor ResourceMetrics
-> FieldAccessor MetricsData ResourceMetrics
-> FieldDescriptor MetricsData
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"resource_metrics"
              (MessageOrGroup -> FieldTypeDescriptor ResourceMetrics
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ResourceMetrics)
              (Packing
-> Lens' MetricsData [ResourceMetrics]
-> FieldAccessor MetricsData ResourceMetrics
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Unpacked
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"resourceMetrics")) ::
              Data.ProtoLens.FieldDescriptor MetricsData
      in
        [(Tag, FieldDescriptor MetricsData)]
-> Map Tag (FieldDescriptor MetricsData)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor MetricsData
resourceMetrics__field_descriptor)]
  unknownFields :: Lens' MetricsData FieldSet
unknownFields
    = (MetricsData -> FieldSet)
-> (MetricsData -> FieldSet -> MetricsData)
-> Lens' MetricsData FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        MetricsData -> FieldSet
_MetricsData'_unknownFields
        (\ MetricsData
x__ FieldSet
y__ -> MetricsData
x__ {_MetricsData'_unknownFields = y__})
  defMessage :: MetricsData
defMessage
    = MetricsData'_constructor
        {_MetricsData'resourceMetrics :: Vector ResourceMetrics
_MetricsData'resourceMetrics = Vector ResourceMetrics
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _MetricsData'_unknownFields :: FieldSet
_MetricsData'_unknownFields = []}
  parseMessage :: Parser MetricsData
parseMessage
    = let
        loop ::
          MetricsData
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld ResourceMetrics
             -> Data.ProtoLens.Encoding.Bytes.Parser MetricsData
        loop :: MetricsData
-> Growing Vector RealWorld ResourceMetrics -> Parser MetricsData
loop MetricsData
x Growing Vector RealWorld ResourceMetrics
mutable'resourceMetrics
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do Vector ResourceMetrics
frozen'resourceMetrics <- IO (Vector ResourceMetrics) -> Parser (Vector ResourceMetrics)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                  (Growing Vector (PrimState IO) ResourceMetrics
-> IO (Vector ResourceMetrics)
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 ResourceMetrics
Growing Vector (PrimState IO) ResourceMetrics
mutable'resourceMetrics)
                      (let missing :: [a]
missing = []
                       in
                         if [Any] -> Bool
forall a. [a] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
                             () -> Parser ()
forall a. a -> Parser a
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
                         else
                             String -> Parser ()
forall a. String -> Parser a
forall (m :: * -> *) a. MonadFail m => String -> m a
Prelude.fail
                               (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
                                  String
"Missing required fields: "
                                  ([String] -> String
forall a. Show a => a -> String
Prelude.show ([String]
forall a. [a]
missing :: [Prelude.String]))))
                      MetricsData -> Parser MetricsData
forall a. a -> Parser a
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter MetricsData MetricsData FieldSet FieldSet
-> (FieldSet -> FieldSet) -> MetricsData -> MetricsData
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                           LensLike' f MetricsData FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' MetricsData FieldSet
Setter MetricsData MetricsData FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t)
                           (Setter
  MetricsData
  MetricsData
  (Vector ResourceMetrics)
  (Vector ResourceMetrics)
-> Vector ResourceMetrics -> MetricsData -> MetricsData
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                              (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'resourceMetrics")
                              Vector ResourceMetrics
frozen'resourceMetrics MetricsData
x))
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        Word64
10
                          -> do !ResourceMetrics
y <- Parser ResourceMetrics -> String -> Parser ResourceMetrics
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Int -> Parser ResourceMetrics -> Parser ResourceMetrics
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 ResourceMetrics
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                        String
"resource_metrics"
                                Growing Vector RealWorld ResourceMetrics
v <- IO (Growing Vector RealWorld ResourceMetrics)
-> Parser (Growing Vector RealWorld ResourceMetrics)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) ResourceMetrics
-> ResourceMetrics
-> IO (Growing Vector (PrimState IO) ResourceMetrics)
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 ResourceMetrics
Growing Vector (PrimState IO) ResourceMetrics
mutable'resourceMetrics ResourceMetrics
y)
                                MetricsData
-> Growing Vector RealWorld ResourceMetrics -> Parser MetricsData
loop MetricsData
x Growing Vector RealWorld ResourceMetrics
v
                        Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                MetricsData
-> Growing Vector RealWorld ResourceMetrics -> Parser MetricsData
loop
                                  (Setter MetricsData MetricsData FieldSet FieldSet
-> (FieldSet -> FieldSet) -> MetricsData -> MetricsData
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                     LensLike' f MetricsData FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' MetricsData FieldSet
Setter MetricsData MetricsData FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) MetricsData
x)
                                  Growing Vector RealWorld ResourceMetrics
mutable'resourceMetrics
      in
        Parser MetricsData -> String -> Parser MetricsData
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do Growing Vector RealWorld ResourceMetrics
mutable'resourceMetrics <- IO (Growing Vector RealWorld ResourceMetrics)
-> Parser (Growing Vector RealWorld ResourceMetrics)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                           IO (Growing Vector RealWorld ResourceMetrics)
IO (Growing Vector (PrimState IO) ResourceMetrics)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              MetricsData
-> Growing Vector RealWorld ResourceMetrics -> Parser MetricsData
loop MetricsData
forall msg. Message msg => msg
Data.ProtoLens.defMessage Growing Vector RealWorld ResourceMetrics
mutable'resourceMetrics)
          String
"MetricsData"
  buildMessage :: MetricsData -> Builder
buildMessage
    = \ MetricsData
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             ((ResourceMetrics -> Builder) -> Vector ResourceMetrics -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                (\ ResourceMetrics
_v
                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                        ((ByteString -> Builder)
-> (ResourceMetrics -> ByteString) -> ResourceMetrics -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                           (\ 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))
                           ResourceMetrics -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ResourceMetrics
_v))
                (FoldLike
  (Vector ResourceMetrics)
  MetricsData
  MetricsData
  (Vector ResourceMetrics)
  (Vector ResourceMetrics)
-> MetricsData -> Vector ResourceMetrics
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                   (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'resourceMetrics") MetricsData
_x))
             (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                (FoldLike FieldSet MetricsData MetricsData FieldSet FieldSet
-> MetricsData -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet MetricsData MetricsData FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' MetricsData FieldSet
Data.ProtoLens.unknownFields MetricsData
_x))
instance Control.DeepSeq.NFData MetricsData where
  rnf :: MetricsData -> ()
rnf
    = \ MetricsData
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (MetricsData -> FieldSet
_MetricsData'_unknownFields MetricsData
x__)
             (Vector ResourceMetrics -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (MetricsData -> Vector ResourceMetrics
_MetricsData'resourceMetrics MetricsData
x__) ())
{- | Fields :
     
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.attributes' @:: Lens' NumberDataPoint [Proto.Opentelemetry.Proto.Common.V1.Common.KeyValue]@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.vec'attributes' @:: Lens' NumberDataPoint (Data.Vector.Vector Proto.Opentelemetry.Proto.Common.V1.Common.KeyValue)@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.startTimeUnixNano' @:: Lens' NumberDataPoint Data.Word.Word64@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.timeUnixNano' @:: Lens' NumberDataPoint Data.Word.Word64@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.exemplars' @:: Lens' NumberDataPoint [Exemplar]@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.vec'exemplars' @:: Lens' NumberDataPoint (Data.Vector.Vector Exemplar)@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.flags' @:: Lens' NumberDataPoint Data.Word.Word32@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.maybe'value' @:: Lens' NumberDataPoint (Prelude.Maybe NumberDataPoint'Value)@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.maybe'asDouble' @:: Lens' NumberDataPoint (Prelude.Maybe Prelude.Double)@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.asDouble' @:: Lens' NumberDataPoint Prelude.Double@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.maybe'asInt' @:: Lens' NumberDataPoint (Prelude.Maybe Data.Int.Int64)@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.asInt' @:: Lens' NumberDataPoint Data.Int.Int64@ -}
data NumberDataPoint
  = NumberDataPoint'_constructor {NumberDataPoint -> Vector KeyValue
_NumberDataPoint'attributes :: !(Data.Vector.Vector Proto.Opentelemetry.Proto.Common.V1.Common.KeyValue),
                                  NumberDataPoint -> Word64
_NumberDataPoint'startTimeUnixNano :: !Data.Word.Word64,
                                  NumberDataPoint -> Word64
_NumberDataPoint'timeUnixNano :: !Data.Word.Word64,
                                  NumberDataPoint -> Vector Exemplar
_NumberDataPoint'exemplars :: !(Data.Vector.Vector Exemplar),
                                  NumberDataPoint -> Word32
_NumberDataPoint'flags :: !Data.Word.Word32,
                                  NumberDataPoint -> Maybe NumberDataPoint'Value
_NumberDataPoint'value :: !(Prelude.Maybe NumberDataPoint'Value),
                                  NumberDataPoint -> FieldSet
_NumberDataPoint'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (NumberDataPoint -> NumberDataPoint -> Bool
(NumberDataPoint -> NumberDataPoint -> Bool)
-> (NumberDataPoint -> NumberDataPoint -> Bool)
-> Eq NumberDataPoint
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: NumberDataPoint -> NumberDataPoint -> Bool
== :: NumberDataPoint -> NumberDataPoint -> Bool
$c/= :: NumberDataPoint -> NumberDataPoint -> Bool
/= :: NumberDataPoint -> NumberDataPoint -> Bool
Prelude.Eq, Eq NumberDataPoint
Eq NumberDataPoint =>
(NumberDataPoint -> NumberDataPoint -> Ordering)
-> (NumberDataPoint -> NumberDataPoint -> Bool)
-> (NumberDataPoint -> NumberDataPoint -> Bool)
-> (NumberDataPoint -> NumberDataPoint -> Bool)
-> (NumberDataPoint -> NumberDataPoint -> Bool)
-> (NumberDataPoint -> NumberDataPoint -> NumberDataPoint)
-> (NumberDataPoint -> NumberDataPoint -> NumberDataPoint)
-> Ord NumberDataPoint
NumberDataPoint -> NumberDataPoint -> Bool
NumberDataPoint -> NumberDataPoint -> Ordering
NumberDataPoint -> NumberDataPoint -> NumberDataPoint
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
$ccompare :: NumberDataPoint -> NumberDataPoint -> Ordering
compare :: NumberDataPoint -> NumberDataPoint -> Ordering
$c< :: NumberDataPoint -> NumberDataPoint -> Bool
< :: NumberDataPoint -> NumberDataPoint -> Bool
$c<= :: NumberDataPoint -> NumberDataPoint -> Bool
<= :: NumberDataPoint -> NumberDataPoint -> Bool
$c> :: NumberDataPoint -> NumberDataPoint -> Bool
> :: NumberDataPoint -> NumberDataPoint -> Bool
$c>= :: NumberDataPoint -> NumberDataPoint -> Bool
>= :: NumberDataPoint -> NumberDataPoint -> Bool
$cmax :: NumberDataPoint -> NumberDataPoint -> NumberDataPoint
max :: NumberDataPoint -> NumberDataPoint -> NumberDataPoint
$cmin :: NumberDataPoint -> NumberDataPoint -> NumberDataPoint
min :: NumberDataPoint -> NumberDataPoint -> NumberDataPoint
Prelude.Ord)
instance Prelude.Show NumberDataPoint where
  showsPrec :: Int -> NumberDataPoint -> ShowS
showsPrec Int
_ NumberDataPoint
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (NumberDataPoint -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort NumberDataPoint
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
data NumberDataPoint'Value
  = NumberDataPoint'AsDouble !Prelude.Double |
    NumberDataPoint'AsInt !Data.Int.Int64
  deriving stock (Int -> NumberDataPoint'Value -> ShowS
[NumberDataPoint'Value] -> ShowS
NumberDataPoint'Value -> String
(Int -> NumberDataPoint'Value -> ShowS)
-> (NumberDataPoint'Value -> String)
-> ([NumberDataPoint'Value] -> ShowS)
-> Show NumberDataPoint'Value
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> NumberDataPoint'Value -> ShowS
showsPrec :: Int -> NumberDataPoint'Value -> ShowS
$cshow :: NumberDataPoint'Value -> String
show :: NumberDataPoint'Value -> String
$cshowList :: [NumberDataPoint'Value] -> ShowS
showList :: [NumberDataPoint'Value] -> ShowS
Prelude.Show, NumberDataPoint'Value -> NumberDataPoint'Value -> Bool
(NumberDataPoint'Value -> NumberDataPoint'Value -> Bool)
-> (NumberDataPoint'Value -> NumberDataPoint'Value -> Bool)
-> Eq NumberDataPoint'Value
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: NumberDataPoint'Value -> NumberDataPoint'Value -> Bool
== :: NumberDataPoint'Value -> NumberDataPoint'Value -> Bool
$c/= :: NumberDataPoint'Value -> NumberDataPoint'Value -> Bool
/= :: NumberDataPoint'Value -> NumberDataPoint'Value -> Bool
Prelude.Eq, Eq NumberDataPoint'Value
Eq NumberDataPoint'Value =>
(NumberDataPoint'Value -> NumberDataPoint'Value -> Ordering)
-> (NumberDataPoint'Value -> NumberDataPoint'Value -> Bool)
-> (NumberDataPoint'Value -> NumberDataPoint'Value -> Bool)
-> (NumberDataPoint'Value -> NumberDataPoint'Value -> Bool)
-> (NumberDataPoint'Value -> NumberDataPoint'Value -> Bool)
-> (NumberDataPoint'Value
    -> NumberDataPoint'Value -> NumberDataPoint'Value)
-> (NumberDataPoint'Value
    -> NumberDataPoint'Value -> NumberDataPoint'Value)
-> Ord NumberDataPoint'Value
NumberDataPoint'Value -> NumberDataPoint'Value -> Bool
NumberDataPoint'Value -> NumberDataPoint'Value -> Ordering
NumberDataPoint'Value
-> NumberDataPoint'Value -> NumberDataPoint'Value
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
$ccompare :: NumberDataPoint'Value -> NumberDataPoint'Value -> Ordering
compare :: NumberDataPoint'Value -> NumberDataPoint'Value -> Ordering
$c< :: NumberDataPoint'Value -> NumberDataPoint'Value -> Bool
< :: NumberDataPoint'Value -> NumberDataPoint'Value -> Bool
$c<= :: NumberDataPoint'Value -> NumberDataPoint'Value -> Bool
<= :: NumberDataPoint'Value -> NumberDataPoint'Value -> Bool
$c> :: NumberDataPoint'Value -> NumberDataPoint'Value -> Bool
> :: NumberDataPoint'Value -> NumberDataPoint'Value -> Bool
$c>= :: NumberDataPoint'Value -> NumberDataPoint'Value -> Bool
>= :: NumberDataPoint'Value -> NumberDataPoint'Value -> Bool
$cmax :: NumberDataPoint'Value
-> NumberDataPoint'Value -> NumberDataPoint'Value
max :: NumberDataPoint'Value
-> NumberDataPoint'Value -> NumberDataPoint'Value
$cmin :: NumberDataPoint'Value
-> NumberDataPoint'Value -> NumberDataPoint'Value
min :: NumberDataPoint'Value
-> NumberDataPoint'Value -> NumberDataPoint'Value
Prelude.Ord)
instance Data.ProtoLens.Field.HasField NumberDataPoint "attributes" [Proto.Opentelemetry.Proto.Common.V1.Common.KeyValue] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "attributes"
-> ([KeyValue] -> f [KeyValue])
-> NumberDataPoint
-> f NumberDataPoint
fieldOf Proxy# "attributes"
_
    = ((Vector KeyValue -> f (Vector KeyValue))
 -> NumberDataPoint -> f NumberDataPoint)
-> (([KeyValue] -> f [KeyValue])
    -> Vector KeyValue -> f (Vector KeyValue))
-> ([KeyValue] -> f [KeyValue])
-> NumberDataPoint
-> f NumberDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((NumberDataPoint -> Vector KeyValue)
-> (NumberDataPoint -> Vector KeyValue -> NumberDataPoint)
-> Lens
     NumberDataPoint NumberDataPoint (Vector KeyValue) (Vector KeyValue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           NumberDataPoint -> Vector KeyValue
_NumberDataPoint'attributes
           (\ NumberDataPoint
x__ Vector KeyValue
y__ -> NumberDataPoint
x__ {_NumberDataPoint'attributes = y__}))
        ((Vector KeyValue -> [KeyValue])
-> (Vector KeyValue -> [KeyValue] -> Vector KeyValue)
-> Lens (Vector KeyValue) (Vector KeyValue) [KeyValue] [KeyValue]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector KeyValue -> [KeyValue]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector KeyValue
_ [KeyValue]
y__ -> [KeyValue] -> Vector KeyValue
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [KeyValue]
y__))
instance Data.ProtoLens.Field.HasField NumberDataPoint "vec'attributes" (Data.Vector.Vector Proto.Opentelemetry.Proto.Common.V1.Common.KeyValue) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'attributes"
-> (Vector KeyValue -> f (Vector KeyValue))
-> NumberDataPoint
-> f NumberDataPoint
fieldOf Proxy# "vec'attributes"
_
    = ((Vector KeyValue -> f (Vector KeyValue))
 -> NumberDataPoint -> f NumberDataPoint)
-> ((Vector KeyValue -> f (Vector KeyValue))
    -> Vector KeyValue -> f (Vector KeyValue))
-> (Vector KeyValue -> f (Vector KeyValue))
-> NumberDataPoint
-> f NumberDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((NumberDataPoint -> Vector KeyValue)
-> (NumberDataPoint -> Vector KeyValue -> NumberDataPoint)
-> Lens
     NumberDataPoint NumberDataPoint (Vector KeyValue) (Vector KeyValue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           NumberDataPoint -> Vector KeyValue
_NumberDataPoint'attributes
           (\ NumberDataPoint
x__ Vector KeyValue
y__ -> NumberDataPoint
x__ {_NumberDataPoint'attributes = y__}))
        (Vector KeyValue -> f (Vector KeyValue))
-> Vector KeyValue -> f (Vector KeyValue)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField NumberDataPoint "startTimeUnixNano" Data.Word.Word64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "startTimeUnixNano"
-> (Word64 -> f Word64) -> NumberDataPoint -> f NumberDataPoint
fieldOf Proxy# "startTimeUnixNano"
_
    = ((Word64 -> f Word64) -> NumberDataPoint -> f NumberDataPoint)
-> ((Word64 -> f Word64) -> Word64 -> f Word64)
-> (Word64 -> f Word64)
-> NumberDataPoint
-> f NumberDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((NumberDataPoint -> Word64)
-> (NumberDataPoint -> Word64 -> NumberDataPoint)
-> Lens NumberDataPoint NumberDataPoint Word64 Word64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           NumberDataPoint -> Word64
_NumberDataPoint'startTimeUnixNano
           (\ NumberDataPoint
x__ Word64
y__ -> NumberDataPoint
x__ {_NumberDataPoint'startTimeUnixNano = y__}))
        (Word64 -> f Word64) -> Word64 -> f Word64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField NumberDataPoint "timeUnixNano" Data.Word.Word64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "timeUnixNano"
-> (Word64 -> f Word64) -> NumberDataPoint -> f NumberDataPoint
fieldOf Proxy# "timeUnixNano"
_
    = ((Word64 -> f Word64) -> NumberDataPoint -> f NumberDataPoint)
-> ((Word64 -> f Word64) -> Word64 -> f Word64)
-> (Word64 -> f Word64)
-> NumberDataPoint
-> f NumberDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((NumberDataPoint -> Word64)
-> (NumberDataPoint -> Word64 -> NumberDataPoint)
-> Lens NumberDataPoint NumberDataPoint Word64 Word64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           NumberDataPoint -> Word64
_NumberDataPoint'timeUnixNano
           (\ NumberDataPoint
x__ Word64
y__ -> NumberDataPoint
x__ {_NumberDataPoint'timeUnixNano = y__}))
        (Word64 -> f Word64) -> Word64 -> f Word64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField NumberDataPoint "exemplars" [Exemplar] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "exemplars"
-> ([Exemplar] -> f [Exemplar])
-> NumberDataPoint
-> f NumberDataPoint
fieldOf Proxy# "exemplars"
_
    = ((Vector Exemplar -> f (Vector Exemplar))
 -> NumberDataPoint -> f NumberDataPoint)
-> (([Exemplar] -> f [Exemplar])
    -> Vector Exemplar -> f (Vector Exemplar))
-> ([Exemplar] -> f [Exemplar])
-> NumberDataPoint
-> f NumberDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((NumberDataPoint -> Vector Exemplar)
-> (NumberDataPoint -> Vector Exemplar -> NumberDataPoint)
-> Lens
     NumberDataPoint NumberDataPoint (Vector Exemplar) (Vector Exemplar)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           NumberDataPoint -> Vector Exemplar
_NumberDataPoint'exemplars
           (\ NumberDataPoint
x__ Vector Exemplar
y__ -> NumberDataPoint
x__ {_NumberDataPoint'exemplars = y__}))
        ((Vector Exemplar -> [Exemplar])
-> (Vector Exemplar -> [Exemplar] -> Vector Exemplar)
-> Lens (Vector Exemplar) (Vector Exemplar) [Exemplar] [Exemplar]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Exemplar -> [Exemplar]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector Exemplar
_ [Exemplar]
y__ -> [Exemplar] -> Vector Exemplar
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Exemplar]
y__))
instance Data.ProtoLens.Field.HasField NumberDataPoint "vec'exemplars" (Data.Vector.Vector Exemplar) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'exemplars"
-> (Vector Exemplar -> f (Vector Exemplar))
-> NumberDataPoint
-> f NumberDataPoint
fieldOf Proxy# "vec'exemplars"
_
    = ((Vector Exemplar -> f (Vector Exemplar))
 -> NumberDataPoint -> f NumberDataPoint)
-> ((Vector Exemplar -> f (Vector Exemplar))
    -> Vector Exemplar -> f (Vector Exemplar))
-> (Vector Exemplar -> f (Vector Exemplar))
-> NumberDataPoint
-> f NumberDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((NumberDataPoint -> Vector Exemplar)
-> (NumberDataPoint -> Vector Exemplar -> NumberDataPoint)
-> Lens
     NumberDataPoint NumberDataPoint (Vector Exemplar) (Vector Exemplar)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           NumberDataPoint -> Vector Exemplar
_NumberDataPoint'exemplars
           (\ NumberDataPoint
x__ Vector Exemplar
y__ -> NumberDataPoint
x__ {_NumberDataPoint'exemplars = y__}))
        (Vector Exemplar -> f (Vector Exemplar))
-> Vector Exemplar -> f (Vector Exemplar)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField NumberDataPoint "flags" Data.Word.Word32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "flags"
-> (Word32 -> f Word32) -> NumberDataPoint -> f NumberDataPoint
fieldOf Proxy# "flags"
_
    = ((Word32 -> f Word32) -> NumberDataPoint -> f NumberDataPoint)
-> ((Word32 -> f Word32) -> Word32 -> f Word32)
-> (Word32 -> f Word32)
-> NumberDataPoint
-> f NumberDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((NumberDataPoint -> Word32)
-> (NumberDataPoint -> Word32 -> NumberDataPoint)
-> Lens NumberDataPoint NumberDataPoint Word32 Word32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           NumberDataPoint -> Word32
_NumberDataPoint'flags
           (\ NumberDataPoint
x__ Word32
y__ -> NumberDataPoint
x__ {_NumberDataPoint'flags = y__}))
        (Word32 -> f Word32) -> Word32 -> f Word32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField NumberDataPoint "maybe'value" (Prelude.Maybe NumberDataPoint'Value) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'value"
-> (Maybe NumberDataPoint'Value -> f (Maybe NumberDataPoint'Value))
-> NumberDataPoint
-> f NumberDataPoint
fieldOf Proxy# "maybe'value"
_
    = ((Maybe NumberDataPoint'Value -> f (Maybe NumberDataPoint'Value))
 -> NumberDataPoint -> f NumberDataPoint)
-> ((Maybe NumberDataPoint'Value
     -> f (Maybe NumberDataPoint'Value))
    -> Maybe NumberDataPoint'Value -> f (Maybe NumberDataPoint'Value))
-> (Maybe NumberDataPoint'Value -> f (Maybe NumberDataPoint'Value))
-> NumberDataPoint
-> f NumberDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((NumberDataPoint -> Maybe NumberDataPoint'Value)
-> (NumberDataPoint
    -> Maybe NumberDataPoint'Value -> NumberDataPoint)
-> Lens
     NumberDataPoint
     NumberDataPoint
     (Maybe NumberDataPoint'Value)
     (Maybe NumberDataPoint'Value)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           NumberDataPoint -> Maybe NumberDataPoint'Value
_NumberDataPoint'value
           (\ NumberDataPoint
x__ Maybe NumberDataPoint'Value
y__ -> NumberDataPoint
x__ {_NumberDataPoint'value = y__}))
        (Maybe NumberDataPoint'Value -> f (Maybe NumberDataPoint'Value))
-> Maybe NumberDataPoint'Value -> f (Maybe NumberDataPoint'Value)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField NumberDataPoint "maybe'asDouble" (Prelude.Maybe Prelude.Double) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'asDouble"
-> (Maybe Double -> f (Maybe Double))
-> NumberDataPoint
-> f NumberDataPoint
fieldOf Proxy# "maybe'asDouble"
_
    = ((Maybe NumberDataPoint'Value -> f (Maybe NumberDataPoint'Value))
 -> NumberDataPoint -> f NumberDataPoint)
-> ((Maybe Double -> f (Maybe Double))
    -> Maybe NumberDataPoint'Value -> f (Maybe NumberDataPoint'Value))
-> (Maybe Double -> f (Maybe Double))
-> NumberDataPoint
-> f NumberDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((NumberDataPoint -> Maybe NumberDataPoint'Value)
-> (NumberDataPoint
    -> Maybe NumberDataPoint'Value -> NumberDataPoint)
-> Lens
     NumberDataPoint
     NumberDataPoint
     (Maybe NumberDataPoint'Value)
     (Maybe NumberDataPoint'Value)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           NumberDataPoint -> Maybe NumberDataPoint'Value
_NumberDataPoint'value
           (\ NumberDataPoint
x__ Maybe NumberDataPoint'Value
y__ -> NumberDataPoint
x__ {_NumberDataPoint'value = y__}))
        ((Maybe NumberDataPoint'Value -> Maybe Double)
-> (Maybe NumberDataPoint'Value
    -> Maybe Double -> Maybe NumberDataPoint'Value)
-> Lens
     (Maybe NumberDataPoint'Value)
     (Maybe NumberDataPoint'Value)
     (Maybe Double)
     (Maybe Double)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe NumberDataPoint'Value
x__
              -> case Maybe NumberDataPoint'Value
x__ of
                   (Prelude.Just (NumberDataPoint'AsDouble Double
x__val))
                     -> Double -> Maybe Double
forall a. a -> Maybe a
Prelude.Just Double
x__val
                   Maybe NumberDataPoint'Value
_otherwise -> Maybe Double
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe NumberDataPoint'Value
_ Maybe Double
y__ -> (Double -> NumberDataPoint'Value)
-> Maybe Double -> Maybe NumberDataPoint'Value
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap Double -> NumberDataPoint'Value
NumberDataPoint'AsDouble Maybe Double
y__))
instance Data.ProtoLens.Field.HasField NumberDataPoint "asDouble" Prelude.Double where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "asDouble"
-> (Double -> f Double) -> NumberDataPoint -> f NumberDataPoint
fieldOf Proxy# "asDouble"
_
    = ((Maybe NumberDataPoint'Value -> f (Maybe NumberDataPoint'Value))
 -> NumberDataPoint -> f NumberDataPoint)
-> ((Double -> f Double)
    -> Maybe NumberDataPoint'Value -> f (Maybe NumberDataPoint'Value))
-> (Double -> f Double)
-> NumberDataPoint
-> f NumberDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((NumberDataPoint -> Maybe NumberDataPoint'Value)
-> (NumberDataPoint
    -> Maybe NumberDataPoint'Value -> NumberDataPoint)
-> Lens
     NumberDataPoint
     NumberDataPoint
     (Maybe NumberDataPoint'Value)
     (Maybe NumberDataPoint'Value)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           NumberDataPoint -> Maybe NumberDataPoint'Value
_NumberDataPoint'value
           (\ NumberDataPoint
x__ Maybe NumberDataPoint'Value
y__ -> NumberDataPoint
x__ {_NumberDataPoint'value = y__}))
        (((Maybe Double -> f (Maybe Double))
 -> Maybe NumberDataPoint'Value -> f (Maybe NumberDataPoint'Value))
-> ((Double -> f Double) -> Maybe Double -> f (Maybe Double))
-> (Double -> f Double)
-> Maybe NumberDataPoint'Value
-> f (Maybe NumberDataPoint'Value)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe NumberDataPoint'Value -> Maybe Double)
-> (Maybe NumberDataPoint'Value
    -> Maybe Double -> Maybe NumberDataPoint'Value)
-> Lens
     (Maybe NumberDataPoint'Value)
     (Maybe NumberDataPoint'Value)
     (Maybe Double)
     (Maybe Double)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe NumberDataPoint'Value
x__
                 -> case Maybe NumberDataPoint'Value
x__ of
                      (Prelude.Just (NumberDataPoint'AsDouble Double
x__val))
                        -> Double -> Maybe Double
forall a. a -> Maybe a
Prelude.Just Double
x__val
                      Maybe NumberDataPoint'Value
_otherwise -> Maybe Double
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe NumberDataPoint'Value
_ Maybe Double
y__ -> (Double -> NumberDataPoint'Value)
-> Maybe Double -> Maybe NumberDataPoint'Value
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap Double -> NumberDataPoint'Value
NumberDataPoint'AsDouble Maybe Double
y__))
           (Double -> Lens' (Maybe Double) Double
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Double
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault))
instance Data.ProtoLens.Field.HasField NumberDataPoint "maybe'asInt" (Prelude.Maybe Data.Int.Int64) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'asInt"
-> (Maybe Int64 -> f (Maybe Int64))
-> NumberDataPoint
-> f NumberDataPoint
fieldOf Proxy# "maybe'asInt"
_
    = ((Maybe NumberDataPoint'Value -> f (Maybe NumberDataPoint'Value))
 -> NumberDataPoint -> f NumberDataPoint)
-> ((Maybe Int64 -> f (Maybe Int64))
    -> Maybe NumberDataPoint'Value -> f (Maybe NumberDataPoint'Value))
-> (Maybe Int64 -> f (Maybe Int64))
-> NumberDataPoint
-> f NumberDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((NumberDataPoint -> Maybe NumberDataPoint'Value)
-> (NumberDataPoint
    -> Maybe NumberDataPoint'Value -> NumberDataPoint)
-> Lens
     NumberDataPoint
     NumberDataPoint
     (Maybe NumberDataPoint'Value)
     (Maybe NumberDataPoint'Value)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           NumberDataPoint -> Maybe NumberDataPoint'Value
_NumberDataPoint'value
           (\ NumberDataPoint
x__ Maybe NumberDataPoint'Value
y__ -> NumberDataPoint
x__ {_NumberDataPoint'value = y__}))
        ((Maybe NumberDataPoint'Value -> Maybe Int64)
-> (Maybe NumberDataPoint'Value
    -> Maybe Int64 -> Maybe NumberDataPoint'Value)
-> Lens
     (Maybe NumberDataPoint'Value)
     (Maybe NumberDataPoint'Value)
     (Maybe Int64)
     (Maybe Int64)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe NumberDataPoint'Value
x__
              -> case Maybe NumberDataPoint'Value
x__ of
                   (Prelude.Just (NumberDataPoint'AsInt Int64
x__val))
                     -> Int64 -> Maybe Int64
forall a. a -> Maybe a
Prelude.Just Int64
x__val
                   Maybe NumberDataPoint'Value
_otherwise -> Maybe Int64
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe NumberDataPoint'Value
_ Maybe Int64
y__ -> (Int64 -> NumberDataPoint'Value)
-> Maybe Int64 -> Maybe NumberDataPoint'Value
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap Int64 -> NumberDataPoint'Value
NumberDataPoint'AsInt Maybe Int64
y__))
instance Data.ProtoLens.Field.HasField NumberDataPoint "asInt" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "asInt"
-> (Int64 -> f Int64) -> NumberDataPoint -> f NumberDataPoint
fieldOf Proxy# "asInt"
_
    = ((Maybe NumberDataPoint'Value -> f (Maybe NumberDataPoint'Value))
 -> NumberDataPoint -> f NumberDataPoint)
-> ((Int64 -> f Int64)
    -> Maybe NumberDataPoint'Value -> f (Maybe NumberDataPoint'Value))
-> (Int64 -> f Int64)
-> NumberDataPoint
-> f NumberDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((NumberDataPoint -> Maybe NumberDataPoint'Value)
-> (NumberDataPoint
    -> Maybe NumberDataPoint'Value -> NumberDataPoint)
-> Lens
     NumberDataPoint
     NumberDataPoint
     (Maybe NumberDataPoint'Value)
     (Maybe NumberDataPoint'Value)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           NumberDataPoint -> Maybe NumberDataPoint'Value
_NumberDataPoint'value
           (\ NumberDataPoint
x__ Maybe NumberDataPoint'Value
y__ -> NumberDataPoint
x__ {_NumberDataPoint'value = y__}))
        (((Maybe Int64 -> f (Maybe Int64))
 -> Maybe NumberDataPoint'Value -> f (Maybe NumberDataPoint'Value))
-> ((Int64 -> f Int64) -> Maybe Int64 -> f (Maybe Int64))
-> (Int64 -> f Int64)
-> Maybe NumberDataPoint'Value
-> f (Maybe NumberDataPoint'Value)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe NumberDataPoint'Value -> Maybe Int64)
-> (Maybe NumberDataPoint'Value
    -> Maybe Int64 -> Maybe NumberDataPoint'Value)
-> Lens
     (Maybe NumberDataPoint'Value)
     (Maybe NumberDataPoint'Value)
     (Maybe Int64)
     (Maybe Int64)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe NumberDataPoint'Value
x__
                 -> case Maybe NumberDataPoint'Value
x__ of
                      (Prelude.Just (NumberDataPoint'AsInt Int64
x__val))
                        -> Int64 -> Maybe Int64
forall a. a -> Maybe a
Prelude.Just Int64
x__val
                      Maybe NumberDataPoint'Value
_otherwise -> Maybe Int64
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe NumberDataPoint'Value
_ Maybe Int64
y__ -> (Int64 -> NumberDataPoint'Value)
-> Maybe Int64 -> Maybe NumberDataPoint'Value
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap Int64 -> NumberDataPoint'Value
NumberDataPoint'AsInt Maybe Int64
y__))
           (Int64 -> Lens' (Maybe Int64) Int64
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault))
instance Data.ProtoLens.Message NumberDataPoint where
  messageName :: Proxy NumberDataPoint -> Text
messageName Proxy NumberDataPoint
_
    = String -> Text
Data.Text.pack String
"opentelemetry.proto.metrics.v1.NumberDataPoint"
  packedMessageDescriptor :: Proxy NumberDataPoint -> ByteString
packedMessageDescriptor Proxy NumberDataPoint
_
    = ByteString
"\n\
      \\SINumberDataPoint\DC2G\n\
      \\n\
      \attributes\CAN\a \ETX(\v2'.opentelemetry.proto.common.v1.KeyValueR\n\
      \attributes\DC2/\n\
      \\DC4start_time_unix_nano\CAN\STX \SOH(\ACKR\DC1startTimeUnixNano\DC2$\n\
      \\SOtime_unix_nano\CAN\ETX \SOH(\ACKR\ftimeUnixNano\DC2\GS\n\
      \\tas_double\CAN\EOT \SOH(\SOHH\NULR\basDouble\DC2\ETB\n\
      \\ACKas_int\CAN\ACK \SOH(\DLEH\NULR\ENQasInt\DC2F\n\
      \\texemplars\CAN\ENQ \ETX(\v2(.opentelemetry.proto.metrics.v1.ExemplarR\texemplars\DC2\DC4\n\
      \\ENQflags\CAN\b \SOH(\rR\ENQflagsB\a\n\
      \\ENQvalueJ\EOT\b\SOH\DLE\STX"
  packedFileDescriptor :: Proxy NumberDataPoint -> ByteString
packedFileDescriptor Proxy NumberDataPoint
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor NumberDataPoint)
fieldsByTag
    = let
        attributes__field_descriptor :: FieldDescriptor NumberDataPoint
attributes__field_descriptor
          = String
-> FieldTypeDescriptor KeyValue
-> FieldAccessor NumberDataPoint KeyValue
-> FieldDescriptor NumberDataPoint
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"attributes"
              (MessageOrGroup -> FieldTypeDescriptor KeyValue
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Opentelemetry.Proto.Common.V1.Common.KeyValue)
              (Packing
-> Lens' NumberDataPoint [KeyValue]
-> FieldAccessor NumberDataPoint KeyValue
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Unpacked
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"attributes")) ::
              Data.ProtoLens.FieldDescriptor NumberDataPoint
        startTimeUnixNano__field_descriptor :: FieldDescriptor NumberDataPoint
startTimeUnixNano__field_descriptor
          = String
-> FieldTypeDescriptor Word64
-> FieldAccessor NumberDataPoint Word64
-> FieldDescriptor NumberDataPoint
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"start_time_unix_nano"
              (ScalarField Word64 -> FieldTypeDescriptor Word64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Word64
Data.ProtoLens.Fixed64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64)
              (WireDefault Word64
-> Lens NumberDataPoint NumberDataPoint Word64 Word64
-> FieldAccessor NumberDataPoint Word64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Word64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"startTimeUnixNano")) ::
              Data.ProtoLens.FieldDescriptor NumberDataPoint
        timeUnixNano__field_descriptor :: FieldDescriptor NumberDataPoint
timeUnixNano__field_descriptor
          = String
-> FieldTypeDescriptor Word64
-> FieldAccessor NumberDataPoint Word64
-> FieldDescriptor NumberDataPoint
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"time_unix_nano"
              (ScalarField Word64 -> FieldTypeDescriptor Word64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Word64
Data.ProtoLens.Fixed64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64)
              (WireDefault Word64
-> Lens NumberDataPoint NumberDataPoint Word64 Word64
-> FieldAccessor NumberDataPoint Word64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Word64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"timeUnixNano")) ::
              Data.ProtoLens.FieldDescriptor NumberDataPoint
        exemplars__field_descriptor :: FieldDescriptor NumberDataPoint
exemplars__field_descriptor
          = String
-> FieldTypeDescriptor Exemplar
-> FieldAccessor NumberDataPoint Exemplar
-> FieldDescriptor NumberDataPoint
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"exemplars"
              (MessageOrGroup -> FieldTypeDescriptor Exemplar
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Exemplar)
              (Packing
-> Lens' NumberDataPoint [Exemplar]
-> FieldAccessor NumberDataPoint Exemplar
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Unpacked
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"exemplars")) ::
              Data.ProtoLens.FieldDescriptor NumberDataPoint
        flags__field_descriptor :: FieldDescriptor NumberDataPoint
flags__field_descriptor
          = String
-> FieldTypeDescriptor Word32
-> FieldAccessor NumberDataPoint Word32
-> FieldDescriptor NumberDataPoint
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"flags"
              (ScalarField Word32 -> FieldTypeDescriptor Word32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Word32
Data.ProtoLens.UInt32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32)
              (WireDefault Word32
-> Lens NumberDataPoint NumberDataPoint Word32 Word32
-> FieldAccessor NumberDataPoint Word32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Word32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"flags")) ::
              Data.ProtoLens.FieldDescriptor NumberDataPoint
        asDouble__field_descriptor :: FieldDescriptor NumberDataPoint
asDouble__field_descriptor
          = String
-> FieldTypeDescriptor Double
-> FieldAccessor NumberDataPoint Double
-> FieldDescriptor NumberDataPoint
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"as_double"
              (ScalarField Double -> FieldTypeDescriptor Double
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Double
Data.ProtoLens.DoubleField ::
                 Data.ProtoLens.FieldTypeDescriptor Prelude.Double)
              (Lens' NumberDataPoint (Maybe Double)
-> FieldAccessor NumberDataPoint Double
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'asDouble")) ::
              Data.ProtoLens.FieldDescriptor NumberDataPoint
        asInt__field_descriptor :: FieldDescriptor NumberDataPoint
asInt__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor NumberDataPoint Int64
-> FieldDescriptor NumberDataPoint
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"as_int"
              (ScalarField Int64 -> FieldTypeDescriptor Int64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int64
Data.ProtoLens.SFixed64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64)
              (Lens' NumberDataPoint (Maybe Int64)
-> FieldAccessor NumberDataPoint Int64
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'asInt")) ::
              Data.ProtoLens.FieldDescriptor NumberDataPoint
      in
        [(Tag, FieldDescriptor NumberDataPoint)]
-> Map Tag (FieldDescriptor NumberDataPoint)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor NumberDataPoint
attributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor NumberDataPoint
startTimeUnixNano__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor NumberDataPoint
timeUnixNano__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor NumberDataPoint
exemplars__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
8, FieldDescriptor NumberDataPoint
flags__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor NumberDataPoint
asDouble__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor NumberDataPoint
asInt__field_descriptor)]
  unknownFields :: Lens' NumberDataPoint FieldSet
unknownFields
    = (NumberDataPoint -> FieldSet)
-> (NumberDataPoint -> FieldSet -> NumberDataPoint)
-> Lens' NumberDataPoint FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        NumberDataPoint -> FieldSet
_NumberDataPoint'_unknownFields
        (\ NumberDataPoint
x__ FieldSet
y__ -> NumberDataPoint
x__ {_NumberDataPoint'_unknownFields = y__})
  defMessage :: NumberDataPoint
defMessage
    = NumberDataPoint'_constructor
        {_NumberDataPoint'attributes :: Vector KeyValue
_NumberDataPoint'attributes = Vector KeyValue
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _NumberDataPoint'startTimeUnixNano :: Word64
_NumberDataPoint'startTimeUnixNano = Word64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _NumberDataPoint'timeUnixNano :: Word64
_NumberDataPoint'timeUnixNano = Word64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _NumberDataPoint'exemplars :: Vector Exemplar
_NumberDataPoint'exemplars = Vector Exemplar
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _NumberDataPoint'flags :: Word32
_NumberDataPoint'flags = Word32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _NumberDataPoint'value :: Maybe NumberDataPoint'Value
_NumberDataPoint'value = Maybe NumberDataPoint'Value
forall a. Maybe a
Prelude.Nothing,
         _NumberDataPoint'_unknownFields :: FieldSet
_NumberDataPoint'_unknownFields = []}
  parseMessage :: Parser NumberDataPoint
parseMessage
    = let
        loop ::
          NumberDataPoint
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Opentelemetry.Proto.Common.V1.Common.KeyValue
             -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Exemplar
                -> Data.ProtoLens.Encoding.Bytes.Parser NumberDataPoint
        loop :: NumberDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld Exemplar
-> Parser NumberDataPoint
loop NumberDataPoint
x Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld Exemplar
mutable'exemplars
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do Vector KeyValue
frozen'attributes <- IO (Vector KeyValue) -> Parser (Vector KeyValue)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                             (Growing Vector (PrimState IO) KeyValue -> IO (Vector KeyValue)
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 KeyValue
Growing Vector (PrimState IO) KeyValue
mutable'attributes)
                      Vector Exemplar
frozen'exemplars <- IO (Vector Exemplar) -> Parser (Vector Exemplar)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                            (Growing Vector (PrimState IO) Exemplar -> IO (Vector Exemplar)
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 Exemplar
Growing Vector (PrimState IO) Exemplar
mutable'exemplars)
                      (let missing :: [a]
missing = []
                       in
                         if [Any] -> Bool
forall a. [a] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
                             () -> Parser ()
forall a. a -> Parser a
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
                         else
                             String -> Parser ()
forall a. String -> Parser a
forall (m :: * -> *) a. MonadFail m => String -> m a
Prelude.fail
                               (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
                                  String
"Missing required fields: "
                                  ([String] -> String
forall a. Show a => a -> String
Prelude.show ([String]
forall a. [a]
missing :: [Prelude.String]))))
                      NumberDataPoint -> Parser NumberDataPoint
forall a. a -> Parser a
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter NumberDataPoint NumberDataPoint FieldSet FieldSet
-> (FieldSet -> FieldSet) -> NumberDataPoint -> NumberDataPoint
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                           LensLike' f NumberDataPoint FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' NumberDataPoint FieldSet
Setter NumberDataPoint NumberDataPoint FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t)
                           (Setter
  NumberDataPoint NumberDataPoint (Vector KeyValue) (Vector KeyValue)
-> Vector KeyValue -> NumberDataPoint -> NumberDataPoint
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                              (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'attributes") Vector KeyValue
frozen'attributes
                              (Setter
  NumberDataPoint NumberDataPoint (Vector Exemplar) (Vector Exemplar)
-> Vector Exemplar -> NumberDataPoint -> NumberDataPoint
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'exemplars") Vector Exemplar
frozen'exemplars NumberDataPoint
x)))
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        Word64
58
                          -> do !KeyValue
y <- Parser KeyValue -> String -> Parser KeyValue
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Int -> Parser KeyValue -> Parser KeyValue
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 KeyValue
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                        String
"attributes"
                                Growing Vector RealWorld KeyValue
v <- IO (Growing Vector RealWorld KeyValue)
-> Parser (Growing Vector RealWorld KeyValue)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) KeyValue
-> KeyValue -> IO (Growing Vector (PrimState IO) KeyValue)
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 KeyValue
Growing Vector (PrimState IO) KeyValue
mutable'attributes KeyValue
y)
                                NumberDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld Exemplar
-> Parser NumberDataPoint
loop NumberDataPoint
x Growing Vector RealWorld KeyValue
v Growing Vector RealWorld Exemplar
mutable'exemplars
                        Word64
17
                          -> do Word64
y <- Parser Word64 -> String -> Parser Word64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       Parser Word64
Data.ProtoLens.Encoding.Bytes.getFixed64
                                       String
"start_time_unix_nano"
                                NumberDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld Exemplar
-> Parser NumberDataPoint
loop
                                  (Setter NumberDataPoint NumberDataPoint Word64 Word64
-> Word64 -> NumberDataPoint -> NumberDataPoint
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"startTimeUnixNano") Word64
y NumberDataPoint
x)
                                  Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld Exemplar
mutable'exemplars
                        Word64
25
                          -> do Word64
y <- Parser Word64 -> String -> Parser Word64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       Parser Word64
Data.ProtoLens.Encoding.Bytes.getFixed64 String
"time_unix_nano"
                                NumberDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld Exemplar
-> Parser NumberDataPoint
loop
                                  (Setter NumberDataPoint NumberDataPoint Word64 Word64
-> Word64 -> NumberDataPoint -> NumberDataPoint
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"timeUnixNano") Word64
y NumberDataPoint
x)
                                  Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld Exemplar
mutable'exemplars
                        Word64
42
                          -> do !Exemplar
y <- Parser Exemplar -> String -> Parser Exemplar
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Int -> Parser Exemplar -> Parser Exemplar
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 Exemplar
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                        String
"exemplars"
                                Growing Vector RealWorld Exemplar
v <- IO (Growing Vector RealWorld Exemplar)
-> Parser (Growing Vector RealWorld Exemplar)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) Exemplar
-> Exemplar -> IO (Growing Vector (PrimState IO) Exemplar)
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 Exemplar
Growing Vector (PrimState IO) Exemplar
mutable'exemplars Exemplar
y)
                                NumberDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld Exemplar
-> Parser NumberDataPoint
loop NumberDataPoint
x Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld Exemplar
v
                        Word64
64
                          -> do Word32
y <- Parser Word32 -> String -> Parser Word32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Word32) -> Parser Word64 -> Parser Word32
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Word32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"flags"
                                NumberDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld Exemplar
-> Parser NumberDataPoint
loop
                                  (Setter NumberDataPoint NumberDataPoint Word32 Word32
-> Word32 -> NumberDataPoint -> NumberDataPoint
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"flags") Word32
y NumberDataPoint
x)
                                  Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld Exemplar
mutable'exemplars
                        Word64
33
                          -> 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 a b. (a -> b) -> Parser a -> Parser b
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)
                                       String
"as_double"
                                NumberDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld Exemplar
-> Parser NumberDataPoint
loop
                                  (Setter NumberDataPoint NumberDataPoint Double Double
-> Double -> NumberDataPoint -> NumberDataPoint
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"asDouble") Double
y NumberDataPoint
x)
                                  Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld Exemplar
mutable'exemplars
                        Word64
49
                          -> 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 a b. (a -> b) -> Parser a -> Parser b
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.getFixed64)
                                       String
"as_int"
                                NumberDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld Exemplar
-> Parser NumberDataPoint
loop
                                  (Setter NumberDataPoint NumberDataPoint Int64 Int64
-> Int64 -> NumberDataPoint -> NumberDataPoint
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"asInt") Int64
y NumberDataPoint
x)
                                  Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld Exemplar
mutable'exemplars
                        Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                NumberDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld Exemplar
-> Parser NumberDataPoint
loop
                                  (Setter NumberDataPoint NumberDataPoint FieldSet FieldSet
-> (FieldSet -> FieldSet) -> NumberDataPoint -> NumberDataPoint
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                     LensLike' f NumberDataPoint FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' NumberDataPoint FieldSet
Setter NumberDataPoint NumberDataPoint FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) NumberDataPoint
x)
                                  Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld Exemplar
mutable'exemplars
      in
        Parser NumberDataPoint -> String -> Parser NumberDataPoint
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do Growing Vector RealWorld KeyValue
mutable'attributes <- IO (Growing Vector RealWorld KeyValue)
-> Parser (Growing Vector RealWorld KeyValue)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                      IO (Growing Vector RealWorld KeyValue)
IO (Growing Vector (PrimState IO) KeyValue)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              Growing Vector RealWorld Exemplar
mutable'exemplars <- IO (Growing Vector RealWorld Exemplar)
-> Parser (Growing Vector RealWorld Exemplar)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                     IO (Growing Vector RealWorld Exemplar)
IO (Growing Vector (PrimState IO) Exemplar)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              NumberDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld Exemplar
-> Parser NumberDataPoint
loop
                NumberDataPoint
forall msg. Message msg => msg
Data.ProtoLens.defMessage Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld Exemplar
mutable'exemplars)
          String
"NumberDataPoint"
  buildMessage :: NumberDataPoint -> Builder
buildMessage
    = \ NumberDataPoint
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             ((KeyValue -> Builder) -> Vector KeyValue -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                (\ KeyValue
_v
                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
58)
                        ((ByteString -> Builder)
-> (KeyValue -> ByteString) -> KeyValue -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                           (\ 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))
                           KeyValue -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage KeyValue
_v))
                (FoldLike
  (Vector KeyValue)
  NumberDataPoint
  NumberDataPoint
  (Vector KeyValue)
  (Vector KeyValue)
-> NumberDataPoint -> Vector KeyValue
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                   (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'attributes") NumberDataPoint
_x))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   _v :: Word64
_v
                     = FoldLike Word64 NumberDataPoint NumberDataPoint Word64 Word64
-> NumberDataPoint -> Word64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                         (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"startTimeUnixNano") NumberDataPoint
_x
                 in
                   if Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Word64
_v Word64
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 Word64
17)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putFixed64 Word64
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: Word64
_v
                        = FoldLike Word64 NumberDataPoint NumberDataPoint Word64 Word64
-> NumberDataPoint -> Word64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"timeUnixNano") NumberDataPoint
_x
                    in
                      if Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Word64
_v Word64
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 Word64
25)
                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putFixed64 Word64
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      ((Exemplar -> Builder) -> Vector Exemplar -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                         (\ Exemplar
_v
                            -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                 (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                                 ((ByteString -> Builder)
-> (Exemplar -> ByteString) -> Exemplar -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                    (\ 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))
                                    Exemplar -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Exemplar
_v))
                         (FoldLike
  (Vector Exemplar)
  NumberDataPoint
  NumberDataPoint
  (Vector Exemplar)
  (Vector Exemplar)
-> NumberDataPoint -> Vector Exemplar
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                            (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'exemplars") NumberDataPoint
_x))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (let
                            _v :: Word32
_v = FoldLike Word32 NumberDataPoint NumberDataPoint Word32 Word32
-> NumberDataPoint -> Word32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"flags") NumberDataPoint
_x
                          in
                            if Word32 -> Word32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Word32
_v Word32
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 Word64
64)
                                  ((Word64 -> Builder) -> (Word32 -> Word64) -> Word32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                     Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                     Word32
_v))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (case
                                 FoldLike
  (Maybe NumberDataPoint'Value)
  NumberDataPoint
  NumberDataPoint
  (Maybe NumberDataPoint'Value)
  (Maybe NumberDataPoint'Value)
-> NumberDataPoint -> Maybe NumberDataPoint'Value
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'value") NumberDataPoint
_x
                             of
                               Maybe NumberDataPoint'Value
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                               (Prelude.Just (NumberDataPoint'AsDouble Double
v))
                                 -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
33)
                                      ((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)
                               (Prelude.Just (NumberDataPoint'AsInt Int64
v))
                                 -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
49)
                                      ((Word64 -> Builder) -> (Int64 -> Word64) -> Int64 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                         Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putFixed64
                                         Int64 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int64
v))
                            (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                               (FoldLike FieldSet NumberDataPoint NumberDataPoint FieldSet FieldSet
-> NumberDataPoint -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet NumberDataPoint NumberDataPoint FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' NumberDataPoint FieldSet
Data.ProtoLens.unknownFields NumberDataPoint
_x)))))))
instance Control.DeepSeq.NFData NumberDataPoint where
  rnf :: NumberDataPoint -> ()
rnf
    = \ NumberDataPoint
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (NumberDataPoint -> FieldSet
_NumberDataPoint'_unknownFields NumberDataPoint
x__)
             (Vector KeyValue -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (NumberDataPoint -> Vector KeyValue
_NumberDataPoint'attributes NumberDataPoint
x__)
                (Word64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (NumberDataPoint -> Word64
_NumberDataPoint'startTimeUnixNano NumberDataPoint
x__)
                   (Word64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (NumberDataPoint -> Word64
_NumberDataPoint'timeUnixNano NumberDataPoint
x__)
                      (Vector Exemplar -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (NumberDataPoint -> Vector Exemplar
_NumberDataPoint'exemplars NumberDataPoint
x__)
                         (Word32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (NumberDataPoint -> Word32
_NumberDataPoint'flags NumberDataPoint
x__)
                            (Maybe NumberDataPoint'Value -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (NumberDataPoint -> Maybe NumberDataPoint'Value
_NumberDataPoint'value NumberDataPoint
x__) ()))))))
instance Control.DeepSeq.NFData NumberDataPoint'Value where
  rnf :: NumberDataPoint'Value -> ()
rnf (NumberDataPoint'AsDouble Double
x__) = Double -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf Double
x__
  rnf (NumberDataPoint'AsInt Int64
x__) = Int64 -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf Int64
x__
_NumberDataPoint'AsDouble ::
  Data.ProtoLens.Prism.Prism' NumberDataPoint'Value Prelude.Double
_NumberDataPoint'AsDouble :: Prism' NumberDataPoint'Value Double
_NumberDataPoint'AsDouble
  = (Double -> NumberDataPoint'Value)
-> (NumberDataPoint'Value -> Maybe Double)
-> Prism' NumberDataPoint'Value Double
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      Double -> NumberDataPoint'Value
NumberDataPoint'AsDouble
      (\ NumberDataPoint'Value
p__
         -> case NumberDataPoint'Value
p__ of
              (NumberDataPoint'AsDouble Double
p__val) -> Double -> Maybe Double
forall a. a -> Maybe a
Prelude.Just Double
p__val
              NumberDataPoint'Value
_otherwise -> Maybe Double
forall a. Maybe a
Prelude.Nothing)
_NumberDataPoint'AsInt ::
  Data.ProtoLens.Prism.Prism' NumberDataPoint'Value Data.Int.Int64
_NumberDataPoint'AsInt :: Prism' NumberDataPoint'Value Int64
_NumberDataPoint'AsInt
  = (Int64 -> NumberDataPoint'Value)
-> (NumberDataPoint'Value -> Maybe Int64)
-> Prism' NumberDataPoint'Value Int64
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      Int64 -> NumberDataPoint'Value
NumberDataPoint'AsInt
      (\ NumberDataPoint'Value
p__
         -> case NumberDataPoint'Value
p__ of
              (NumberDataPoint'AsInt Int64
p__val) -> Int64 -> Maybe Int64
forall a. a -> Maybe a
Prelude.Just Int64
p__val
              NumberDataPoint'Value
_otherwise -> Maybe Int64
forall a. Maybe a
Prelude.Nothing)
{- | Fields :
     
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.resource' @:: Lens' ResourceMetrics Proto.Opentelemetry.Proto.Resource.V1.Resource.Resource@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.maybe'resource' @:: Lens' ResourceMetrics (Prelude.Maybe Proto.Opentelemetry.Proto.Resource.V1.Resource.Resource)@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.scopeMetrics' @:: Lens' ResourceMetrics [ScopeMetrics]@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.vec'scopeMetrics' @:: Lens' ResourceMetrics (Data.Vector.Vector ScopeMetrics)@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.schemaUrl' @:: Lens' ResourceMetrics Data.Text.Text@ -}
data ResourceMetrics
  = ResourceMetrics'_constructor {ResourceMetrics -> Maybe Resource
_ResourceMetrics'resource :: !(Prelude.Maybe Proto.Opentelemetry.Proto.Resource.V1.Resource.Resource),
                                  ResourceMetrics -> Vector ScopeMetrics
_ResourceMetrics'scopeMetrics :: !(Data.Vector.Vector ScopeMetrics),
                                  ResourceMetrics -> Text
_ResourceMetrics'schemaUrl :: !Data.Text.Text,
                                  ResourceMetrics -> FieldSet
_ResourceMetrics'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ResourceMetrics -> ResourceMetrics -> Bool
(ResourceMetrics -> ResourceMetrics -> Bool)
-> (ResourceMetrics -> ResourceMetrics -> Bool)
-> Eq ResourceMetrics
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ResourceMetrics -> ResourceMetrics -> Bool
== :: ResourceMetrics -> ResourceMetrics -> Bool
$c/= :: ResourceMetrics -> ResourceMetrics -> Bool
/= :: ResourceMetrics -> ResourceMetrics -> Bool
Prelude.Eq, Eq ResourceMetrics
Eq ResourceMetrics =>
(ResourceMetrics -> ResourceMetrics -> Ordering)
-> (ResourceMetrics -> ResourceMetrics -> Bool)
-> (ResourceMetrics -> ResourceMetrics -> Bool)
-> (ResourceMetrics -> ResourceMetrics -> Bool)
-> (ResourceMetrics -> ResourceMetrics -> Bool)
-> (ResourceMetrics -> ResourceMetrics -> ResourceMetrics)
-> (ResourceMetrics -> ResourceMetrics -> ResourceMetrics)
-> Ord ResourceMetrics
ResourceMetrics -> ResourceMetrics -> Bool
ResourceMetrics -> ResourceMetrics -> Ordering
ResourceMetrics -> ResourceMetrics -> ResourceMetrics
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
$ccompare :: ResourceMetrics -> ResourceMetrics -> Ordering
compare :: ResourceMetrics -> ResourceMetrics -> Ordering
$c< :: ResourceMetrics -> ResourceMetrics -> Bool
< :: ResourceMetrics -> ResourceMetrics -> Bool
$c<= :: ResourceMetrics -> ResourceMetrics -> Bool
<= :: ResourceMetrics -> ResourceMetrics -> Bool
$c> :: ResourceMetrics -> ResourceMetrics -> Bool
> :: ResourceMetrics -> ResourceMetrics -> Bool
$c>= :: ResourceMetrics -> ResourceMetrics -> Bool
>= :: ResourceMetrics -> ResourceMetrics -> Bool
$cmax :: ResourceMetrics -> ResourceMetrics -> ResourceMetrics
max :: ResourceMetrics -> ResourceMetrics -> ResourceMetrics
$cmin :: ResourceMetrics -> ResourceMetrics -> ResourceMetrics
min :: ResourceMetrics -> ResourceMetrics -> ResourceMetrics
Prelude.Ord)
instance Prelude.Show ResourceMetrics where
  showsPrec :: Int -> ResourceMetrics -> ShowS
showsPrec Int
_ ResourceMetrics
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ResourceMetrics -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ResourceMetrics
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ResourceMetrics "resource" Proto.Opentelemetry.Proto.Resource.V1.Resource.Resource where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "resource"
-> (Resource -> f Resource) -> ResourceMetrics -> f ResourceMetrics
fieldOf Proxy# "resource"
_
    = ((Maybe Resource -> f (Maybe Resource))
 -> ResourceMetrics -> f ResourceMetrics)
-> ((Resource -> f Resource)
    -> Maybe Resource -> f (Maybe Resource))
-> (Resource -> f Resource)
-> ResourceMetrics
-> f ResourceMetrics
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResourceMetrics -> Maybe Resource)
-> (ResourceMetrics -> Maybe Resource -> ResourceMetrics)
-> Lens
     ResourceMetrics ResourceMetrics (Maybe Resource) (Maybe Resource)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResourceMetrics -> Maybe Resource
_ResourceMetrics'resource
           (\ ResourceMetrics
x__ Maybe Resource
y__ -> ResourceMetrics
x__ {_ResourceMetrics'resource = y__}))
        (Resource -> Lens' (Maybe Resource) Resource
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Resource
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField ResourceMetrics "maybe'resource" (Prelude.Maybe Proto.Opentelemetry.Proto.Resource.V1.Resource.Resource) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'resource"
-> (Maybe Resource -> f (Maybe Resource))
-> ResourceMetrics
-> f ResourceMetrics
fieldOf Proxy# "maybe'resource"
_
    = ((Maybe Resource -> f (Maybe Resource))
 -> ResourceMetrics -> f ResourceMetrics)
-> ((Maybe Resource -> f (Maybe Resource))
    -> Maybe Resource -> f (Maybe Resource))
-> (Maybe Resource -> f (Maybe Resource))
-> ResourceMetrics
-> f ResourceMetrics
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResourceMetrics -> Maybe Resource)
-> (ResourceMetrics -> Maybe Resource -> ResourceMetrics)
-> Lens
     ResourceMetrics ResourceMetrics (Maybe Resource) (Maybe Resource)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResourceMetrics -> Maybe Resource
_ResourceMetrics'resource
           (\ ResourceMetrics
x__ Maybe Resource
y__ -> ResourceMetrics
x__ {_ResourceMetrics'resource = y__}))
        (Maybe Resource -> f (Maybe Resource))
-> Maybe Resource -> f (Maybe Resource)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ResourceMetrics "scopeMetrics" [ScopeMetrics] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scopeMetrics"
-> ([ScopeMetrics] -> f [ScopeMetrics])
-> ResourceMetrics
-> f ResourceMetrics
fieldOf Proxy# "scopeMetrics"
_
    = ((Vector ScopeMetrics -> f (Vector ScopeMetrics))
 -> ResourceMetrics -> f ResourceMetrics)
-> (([ScopeMetrics] -> f [ScopeMetrics])
    -> Vector ScopeMetrics -> f (Vector ScopeMetrics))
-> ([ScopeMetrics] -> f [ScopeMetrics])
-> ResourceMetrics
-> f ResourceMetrics
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResourceMetrics -> Vector ScopeMetrics)
-> (ResourceMetrics -> Vector ScopeMetrics -> ResourceMetrics)
-> Lens
     ResourceMetrics
     ResourceMetrics
     (Vector ScopeMetrics)
     (Vector ScopeMetrics)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResourceMetrics -> Vector ScopeMetrics
_ResourceMetrics'scopeMetrics
           (\ ResourceMetrics
x__ Vector ScopeMetrics
y__ -> ResourceMetrics
x__ {_ResourceMetrics'scopeMetrics = y__}))
        ((Vector ScopeMetrics -> [ScopeMetrics])
-> (Vector ScopeMetrics -> [ScopeMetrics] -> Vector ScopeMetrics)
-> Lens
     (Vector ScopeMetrics)
     (Vector ScopeMetrics)
     [ScopeMetrics]
     [ScopeMetrics]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector ScopeMetrics -> [ScopeMetrics]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector ScopeMetrics
_ [ScopeMetrics]
y__ -> [ScopeMetrics] -> Vector ScopeMetrics
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [ScopeMetrics]
y__))
instance Data.ProtoLens.Field.HasField ResourceMetrics "vec'scopeMetrics" (Data.Vector.Vector ScopeMetrics) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'scopeMetrics"
-> (Vector ScopeMetrics -> f (Vector ScopeMetrics))
-> ResourceMetrics
-> f ResourceMetrics
fieldOf Proxy# "vec'scopeMetrics"
_
    = ((Vector ScopeMetrics -> f (Vector ScopeMetrics))
 -> ResourceMetrics -> f ResourceMetrics)
-> ((Vector ScopeMetrics -> f (Vector ScopeMetrics))
    -> Vector ScopeMetrics -> f (Vector ScopeMetrics))
-> (Vector ScopeMetrics -> f (Vector ScopeMetrics))
-> ResourceMetrics
-> f ResourceMetrics
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResourceMetrics -> Vector ScopeMetrics)
-> (ResourceMetrics -> Vector ScopeMetrics -> ResourceMetrics)
-> Lens
     ResourceMetrics
     ResourceMetrics
     (Vector ScopeMetrics)
     (Vector ScopeMetrics)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResourceMetrics -> Vector ScopeMetrics
_ResourceMetrics'scopeMetrics
           (\ ResourceMetrics
x__ Vector ScopeMetrics
y__ -> ResourceMetrics
x__ {_ResourceMetrics'scopeMetrics = y__}))
        (Vector ScopeMetrics -> f (Vector ScopeMetrics))
-> Vector ScopeMetrics -> f (Vector ScopeMetrics)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ResourceMetrics "schemaUrl" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "schemaUrl"
-> (Text -> f Text) -> ResourceMetrics -> f ResourceMetrics
fieldOf Proxy# "schemaUrl"
_
    = ((Text -> f Text) -> ResourceMetrics -> f ResourceMetrics)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ResourceMetrics
-> f ResourceMetrics
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResourceMetrics -> Text)
-> (ResourceMetrics -> Text -> ResourceMetrics)
-> Lens ResourceMetrics ResourceMetrics Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResourceMetrics -> Text
_ResourceMetrics'schemaUrl
           (\ ResourceMetrics
x__ Text
y__ -> ResourceMetrics
x__ {_ResourceMetrics'schemaUrl = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ResourceMetrics where
  messageName :: Proxy ResourceMetrics -> Text
messageName Proxy ResourceMetrics
_
    = String -> Text
Data.Text.pack String
"opentelemetry.proto.metrics.v1.ResourceMetrics"
  packedMessageDescriptor :: Proxy ResourceMetrics -> ByteString
packedMessageDescriptor Proxy ResourceMetrics
_
    = ByteString
"\n\
      \\SIResourceMetrics\DC2E\n\
      \\bresource\CAN\SOH \SOH(\v2).opentelemetry.proto.resource.v1.ResourceR\bresource\DC2Q\n\
      \\rscope_metrics\CAN\STX \ETX(\v2,.opentelemetry.proto.metrics.v1.ScopeMetricsR\fscopeMetrics\DC2\GS\n\
      \\n\
      \schema_url\CAN\ETX \SOH(\tR\tschemaUrlJ\ACK\b\232\a\DLE\233\a"
  packedFileDescriptor :: Proxy ResourceMetrics -> ByteString
packedFileDescriptor Proxy ResourceMetrics
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ResourceMetrics)
fieldsByTag
    = let
        resource__field_descriptor :: FieldDescriptor ResourceMetrics
resource__field_descriptor
          = String
-> FieldTypeDescriptor Resource
-> FieldAccessor ResourceMetrics Resource
-> FieldDescriptor ResourceMetrics
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"resource"
              (MessageOrGroup -> FieldTypeDescriptor Resource
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Opentelemetry.Proto.Resource.V1.Resource.Resource)
              (Lens
  ResourceMetrics ResourceMetrics (Maybe Resource) (Maybe Resource)
-> FieldAccessor ResourceMetrics Resource
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'resource")) ::
              Data.ProtoLens.FieldDescriptor ResourceMetrics
        scopeMetrics__field_descriptor :: FieldDescriptor ResourceMetrics
scopeMetrics__field_descriptor
          = String
-> FieldTypeDescriptor ScopeMetrics
-> FieldAccessor ResourceMetrics ScopeMetrics
-> FieldDescriptor ResourceMetrics
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"scope_metrics"
              (MessageOrGroup -> FieldTypeDescriptor ScopeMetrics
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ScopeMetrics)
              (Packing
-> Lens' ResourceMetrics [ScopeMetrics]
-> FieldAccessor ResourceMetrics ScopeMetrics
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Unpacked
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"scopeMetrics")) ::
              Data.ProtoLens.FieldDescriptor ResourceMetrics
        schemaUrl__field_descriptor :: FieldDescriptor ResourceMetrics
schemaUrl__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ResourceMetrics Text
-> FieldDescriptor ResourceMetrics
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"schema_url"
              (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 ResourceMetrics ResourceMetrics Text Text
-> FieldAccessor ResourceMetrics 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 (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"schemaUrl")) ::
              Data.ProtoLens.FieldDescriptor ResourceMetrics
      in
        [(Tag, FieldDescriptor ResourceMetrics)]
-> Map Tag (FieldDescriptor ResourceMetrics)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ResourceMetrics
resource__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ResourceMetrics
scopeMetrics__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor ResourceMetrics
schemaUrl__field_descriptor)]
  unknownFields :: Lens' ResourceMetrics FieldSet
unknownFields
    = (ResourceMetrics -> FieldSet)
-> (ResourceMetrics -> FieldSet -> ResourceMetrics)
-> Lens' ResourceMetrics FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ResourceMetrics -> FieldSet
_ResourceMetrics'_unknownFields
        (\ ResourceMetrics
x__ FieldSet
y__ -> ResourceMetrics
x__ {_ResourceMetrics'_unknownFields = y__})
  defMessage :: ResourceMetrics
defMessage
    = ResourceMetrics'_constructor
        {_ResourceMetrics'resource :: Maybe Resource
_ResourceMetrics'resource = Maybe Resource
forall a. Maybe a
Prelude.Nothing,
         _ResourceMetrics'scopeMetrics :: Vector ScopeMetrics
_ResourceMetrics'scopeMetrics = Vector ScopeMetrics
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _ResourceMetrics'schemaUrl :: Text
_ResourceMetrics'schemaUrl = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ResourceMetrics'_unknownFields :: FieldSet
_ResourceMetrics'_unknownFields = []}
  parseMessage :: Parser ResourceMetrics
parseMessage
    = let
        loop ::
          ResourceMetrics
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld ScopeMetrics
             -> Data.ProtoLens.Encoding.Bytes.Parser ResourceMetrics
        loop :: ResourceMetrics
-> Growing Vector RealWorld ScopeMetrics -> Parser ResourceMetrics
loop ResourceMetrics
x Growing Vector RealWorld ScopeMetrics
mutable'scopeMetrics
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do Vector ScopeMetrics
frozen'scopeMetrics <- IO (Vector ScopeMetrics) -> Parser (Vector ScopeMetrics)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                               (Growing Vector (PrimState IO) ScopeMetrics
-> IO (Vector ScopeMetrics)
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 ScopeMetrics
Growing Vector (PrimState IO) ScopeMetrics
mutable'scopeMetrics)
                      (let missing :: [a]
missing = []
                       in
                         if [Any] -> Bool
forall a. [a] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
                             () -> Parser ()
forall a. a -> Parser a
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
                         else
                             String -> Parser ()
forall a. String -> Parser a
forall (m :: * -> *) a. MonadFail m => String -> m a
Prelude.fail
                               (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
                                  String
"Missing required fields: "
                                  ([String] -> String
forall a. Show a => a -> String
Prelude.show ([String]
forall a. [a]
missing :: [Prelude.String]))))
                      ResourceMetrics -> Parser ResourceMetrics
forall a. a -> Parser a
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter ResourceMetrics ResourceMetrics FieldSet FieldSet
-> (FieldSet -> FieldSet) -> ResourceMetrics -> ResourceMetrics
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                           LensLike' f ResourceMetrics FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ResourceMetrics FieldSet
Setter ResourceMetrics ResourceMetrics FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t)
                           (Setter
  ResourceMetrics
  ResourceMetrics
  (Vector ScopeMetrics)
  (Vector ScopeMetrics)
-> Vector ScopeMetrics -> ResourceMetrics -> ResourceMetrics
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                              (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'scopeMetrics")
                              Vector ScopeMetrics
frozen'scopeMetrics ResourceMetrics
x))
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        Word64
10
                          -> do Resource
y <- Parser Resource -> String -> Parser Resource
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser Resource -> Parser Resource
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 Resource
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       String
"resource"
                                ResourceMetrics
-> Growing Vector RealWorld ScopeMetrics -> Parser ResourceMetrics
loop
                                  (Setter ResourceMetrics ResourceMetrics Resource Resource
-> Resource -> ResourceMetrics -> ResourceMetrics
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"resource") Resource
y ResourceMetrics
x)
                                  Growing Vector RealWorld ScopeMetrics
mutable'scopeMetrics
                        Word64
18
                          -> do !ScopeMetrics
y <- Parser ScopeMetrics -> String -> Parser ScopeMetrics
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Int -> Parser ScopeMetrics -> Parser ScopeMetrics
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 ScopeMetrics
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                        String
"scope_metrics"
                                Growing Vector RealWorld ScopeMetrics
v <- IO (Growing Vector RealWorld ScopeMetrics)
-> Parser (Growing Vector RealWorld ScopeMetrics)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) ScopeMetrics
-> ScopeMetrics -> IO (Growing Vector (PrimState IO) ScopeMetrics)
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 ScopeMetrics
Growing Vector (PrimState IO) ScopeMetrics
mutable'scopeMetrics ScopeMetrics
y)
                                ResourceMetrics
-> Growing Vector RealWorld ScopeMetrics -> Parser ResourceMetrics
loop ResourceMetrics
x Growing Vector RealWorld ScopeMetrics
v
                        Word64
26
                          -> do Text
y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser Text
Data.ProtoLens.Encoding.Bytes.getText
                                             (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len))
                                       String
"schema_url"
                                ResourceMetrics
-> Growing Vector RealWorld ScopeMetrics -> Parser ResourceMetrics
loop
                                  (Setter ResourceMetrics ResourceMetrics Text Text
-> Text -> ResourceMetrics -> ResourceMetrics
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"schemaUrl") Text
y ResourceMetrics
x)
                                  Growing Vector RealWorld ScopeMetrics
mutable'scopeMetrics
                        Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                ResourceMetrics
-> Growing Vector RealWorld ScopeMetrics -> Parser ResourceMetrics
loop
                                  (Setter ResourceMetrics ResourceMetrics FieldSet FieldSet
-> (FieldSet -> FieldSet) -> ResourceMetrics -> ResourceMetrics
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                     LensLike' f ResourceMetrics FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ResourceMetrics FieldSet
Setter ResourceMetrics ResourceMetrics FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) ResourceMetrics
x)
                                  Growing Vector RealWorld ScopeMetrics
mutable'scopeMetrics
      in
        Parser ResourceMetrics -> String -> Parser ResourceMetrics
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do Growing Vector RealWorld ScopeMetrics
mutable'scopeMetrics <- IO (Growing Vector RealWorld ScopeMetrics)
-> Parser (Growing Vector RealWorld ScopeMetrics)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                        IO (Growing Vector RealWorld ScopeMetrics)
IO (Growing Vector (PrimState IO) ScopeMetrics)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              ResourceMetrics
-> Growing Vector RealWorld ScopeMetrics -> Parser ResourceMetrics
loop ResourceMetrics
forall msg. Message msg => msg
Data.ProtoLens.defMessage Growing Vector RealWorld ScopeMetrics
mutable'scopeMetrics)
          String
"ResourceMetrics"
  buildMessage :: ResourceMetrics -> Builder
buildMessage
    = \ ResourceMetrics
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (case
                  FoldLike
  (Maybe Resource)
  ResourceMetrics
  ResourceMetrics
  (Maybe Resource)
  (Maybe Resource)
-> ResourceMetrics -> Maybe Resource
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'resource") ResourceMetrics
_x
              of
                Maybe Resource
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                (Prelude.Just Resource
_v)
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                       ((ByteString -> Builder)
-> (Resource -> ByteString) -> Resource -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ 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))
                          Resource -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Resource
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                ((ScopeMetrics -> Builder) -> Vector ScopeMetrics -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                   (\ ScopeMetrics
_v
                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                           ((ByteString -> Builder)
-> (ScopeMetrics -> ByteString) -> ScopeMetrics -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                              (\ 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))
                              ScopeMetrics -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ScopeMetrics
_v))
                   (FoldLike
  (Vector ScopeMetrics)
  ResourceMetrics
  ResourceMetrics
  (Vector ScopeMetrics)
  (Vector ScopeMetrics)
-> ResourceMetrics -> Vector ScopeMetrics
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                      (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'scopeMetrics") ResourceMetrics
_x))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: Text
_v = FoldLike Text ResourceMetrics ResourceMetrics Text Text
-> ResourceMetrics -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"schemaUrl") ResourceMetrics
_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 Word64
26)
                            ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                               (\ 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 ResourceMetrics ResourceMetrics FieldSet FieldSet
-> ResourceMetrics -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet ResourceMetrics ResourceMetrics FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ResourceMetrics FieldSet
Data.ProtoLens.unknownFields ResourceMetrics
_x))))
instance Control.DeepSeq.NFData ResourceMetrics where
  rnf :: ResourceMetrics -> ()
rnf
    = \ ResourceMetrics
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ResourceMetrics -> FieldSet
_ResourceMetrics'_unknownFields ResourceMetrics
x__)
             (Maybe Resource -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ResourceMetrics -> Maybe Resource
_ResourceMetrics'resource ResourceMetrics
x__)
                (Vector ScopeMetrics -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ResourceMetrics -> Vector ScopeMetrics
_ResourceMetrics'scopeMetrics ResourceMetrics
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (ResourceMetrics -> Text
_ResourceMetrics'schemaUrl ResourceMetrics
x__) ())))
{- | Fields :
     
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.scope' @:: Lens' ScopeMetrics Proto.Opentelemetry.Proto.Common.V1.Common.InstrumentationScope@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.maybe'scope' @:: Lens' ScopeMetrics (Prelude.Maybe Proto.Opentelemetry.Proto.Common.V1.Common.InstrumentationScope)@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.metrics' @:: Lens' ScopeMetrics [Metric]@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.vec'metrics' @:: Lens' ScopeMetrics (Data.Vector.Vector Metric)@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.schemaUrl' @:: Lens' ScopeMetrics Data.Text.Text@ -}
data ScopeMetrics
  = ScopeMetrics'_constructor {ScopeMetrics -> Maybe InstrumentationScope
_ScopeMetrics'scope :: !(Prelude.Maybe Proto.Opentelemetry.Proto.Common.V1.Common.InstrumentationScope),
                               ScopeMetrics -> Vector Metric
_ScopeMetrics'metrics :: !(Data.Vector.Vector Metric),
                               ScopeMetrics -> Text
_ScopeMetrics'schemaUrl :: !Data.Text.Text,
                               ScopeMetrics -> FieldSet
_ScopeMetrics'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ScopeMetrics -> ScopeMetrics -> Bool
(ScopeMetrics -> ScopeMetrics -> Bool)
-> (ScopeMetrics -> ScopeMetrics -> Bool) -> Eq ScopeMetrics
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ScopeMetrics -> ScopeMetrics -> Bool
== :: ScopeMetrics -> ScopeMetrics -> Bool
$c/= :: ScopeMetrics -> ScopeMetrics -> Bool
/= :: ScopeMetrics -> ScopeMetrics -> Bool
Prelude.Eq, Eq ScopeMetrics
Eq ScopeMetrics =>
(ScopeMetrics -> ScopeMetrics -> Ordering)
-> (ScopeMetrics -> ScopeMetrics -> Bool)
-> (ScopeMetrics -> ScopeMetrics -> Bool)
-> (ScopeMetrics -> ScopeMetrics -> Bool)
-> (ScopeMetrics -> ScopeMetrics -> Bool)
-> (ScopeMetrics -> ScopeMetrics -> ScopeMetrics)
-> (ScopeMetrics -> ScopeMetrics -> ScopeMetrics)
-> Ord ScopeMetrics
ScopeMetrics -> ScopeMetrics -> Bool
ScopeMetrics -> ScopeMetrics -> Ordering
ScopeMetrics -> ScopeMetrics -> ScopeMetrics
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
$ccompare :: ScopeMetrics -> ScopeMetrics -> Ordering
compare :: ScopeMetrics -> ScopeMetrics -> Ordering
$c< :: ScopeMetrics -> ScopeMetrics -> Bool
< :: ScopeMetrics -> ScopeMetrics -> Bool
$c<= :: ScopeMetrics -> ScopeMetrics -> Bool
<= :: ScopeMetrics -> ScopeMetrics -> Bool
$c> :: ScopeMetrics -> ScopeMetrics -> Bool
> :: ScopeMetrics -> ScopeMetrics -> Bool
$c>= :: ScopeMetrics -> ScopeMetrics -> Bool
>= :: ScopeMetrics -> ScopeMetrics -> Bool
$cmax :: ScopeMetrics -> ScopeMetrics -> ScopeMetrics
max :: ScopeMetrics -> ScopeMetrics -> ScopeMetrics
$cmin :: ScopeMetrics -> ScopeMetrics -> ScopeMetrics
min :: ScopeMetrics -> ScopeMetrics -> ScopeMetrics
Prelude.Ord)
instance Prelude.Show ScopeMetrics where
  showsPrec :: Int -> ScopeMetrics -> ShowS
showsPrec Int
_ ScopeMetrics
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ScopeMetrics -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ScopeMetrics
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ScopeMetrics "scope" Proto.Opentelemetry.Proto.Common.V1.Common.InstrumentationScope where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scope"
-> (InstrumentationScope -> f InstrumentationScope)
-> ScopeMetrics
-> f ScopeMetrics
fieldOf Proxy# "scope"
_
    = ((Maybe InstrumentationScope -> f (Maybe InstrumentationScope))
 -> ScopeMetrics -> f ScopeMetrics)
-> ((InstrumentationScope -> f InstrumentationScope)
    -> Maybe InstrumentationScope -> f (Maybe InstrumentationScope))
-> (InstrumentationScope -> f InstrumentationScope)
-> ScopeMetrics
-> f ScopeMetrics
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScopeMetrics -> Maybe InstrumentationScope)
-> (ScopeMetrics -> Maybe InstrumentationScope -> ScopeMetrics)
-> Lens
     ScopeMetrics
     ScopeMetrics
     (Maybe InstrumentationScope)
     (Maybe InstrumentationScope)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScopeMetrics -> Maybe InstrumentationScope
_ScopeMetrics'scope (\ ScopeMetrics
x__ Maybe InstrumentationScope
y__ -> ScopeMetrics
x__ {_ScopeMetrics'scope = y__}))
        (InstrumentationScope
-> Lens' (Maybe InstrumentationScope) InstrumentationScope
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens InstrumentationScope
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField ScopeMetrics "maybe'scope" (Prelude.Maybe Proto.Opentelemetry.Proto.Common.V1.Common.InstrumentationScope) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'scope"
-> (Maybe InstrumentationScope -> f (Maybe InstrumentationScope))
-> ScopeMetrics
-> f ScopeMetrics
fieldOf Proxy# "maybe'scope"
_
    = ((Maybe InstrumentationScope -> f (Maybe InstrumentationScope))
 -> ScopeMetrics -> f ScopeMetrics)
-> ((Maybe InstrumentationScope -> f (Maybe InstrumentationScope))
    -> Maybe InstrumentationScope -> f (Maybe InstrumentationScope))
-> (Maybe InstrumentationScope -> f (Maybe InstrumentationScope))
-> ScopeMetrics
-> f ScopeMetrics
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScopeMetrics -> Maybe InstrumentationScope)
-> (ScopeMetrics -> Maybe InstrumentationScope -> ScopeMetrics)
-> Lens
     ScopeMetrics
     ScopeMetrics
     (Maybe InstrumentationScope)
     (Maybe InstrumentationScope)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScopeMetrics -> Maybe InstrumentationScope
_ScopeMetrics'scope (\ ScopeMetrics
x__ Maybe InstrumentationScope
y__ -> ScopeMetrics
x__ {_ScopeMetrics'scope = y__}))
        (Maybe InstrumentationScope -> f (Maybe InstrumentationScope))
-> Maybe InstrumentationScope -> f (Maybe InstrumentationScope)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ScopeMetrics "metrics" [Metric] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "metrics"
-> ([Metric] -> f [Metric]) -> ScopeMetrics -> f ScopeMetrics
fieldOf Proxy# "metrics"
_
    = ((Vector Metric -> f (Vector Metric))
 -> ScopeMetrics -> f ScopeMetrics)
-> (([Metric] -> f [Metric]) -> Vector Metric -> f (Vector Metric))
-> ([Metric] -> f [Metric])
-> ScopeMetrics
-> f ScopeMetrics
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScopeMetrics -> Vector Metric)
-> (ScopeMetrics -> Vector Metric -> ScopeMetrics)
-> Lens ScopeMetrics ScopeMetrics (Vector Metric) (Vector Metric)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScopeMetrics -> Vector Metric
_ScopeMetrics'metrics
           (\ ScopeMetrics
x__ Vector Metric
y__ -> ScopeMetrics
x__ {_ScopeMetrics'metrics = y__}))
        ((Vector Metric -> [Metric])
-> (Vector Metric -> [Metric] -> Vector Metric)
-> Lens (Vector Metric) (Vector Metric) [Metric] [Metric]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Metric -> [Metric]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector Metric
_ [Metric]
y__ -> [Metric] -> Vector Metric
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Metric]
y__))
instance Data.ProtoLens.Field.HasField ScopeMetrics "vec'metrics" (Data.Vector.Vector Metric) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'metrics"
-> (Vector Metric -> f (Vector Metric))
-> ScopeMetrics
-> f ScopeMetrics
fieldOf Proxy# "vec'metrics"
_
    = ((Vector Metric -> f (Vector Metric))
 -> ScopeMetrics -> f ScopeMetrics)
-> ((Vector Metric -> f (Vector Metric))
    -> Vector Metric -> f (Vector Metric))
-> (Vector Metric -> f (Vector Metric))
-> ScopeMetrics
-> f ScopeMetrics
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScopeMetrics -> Vector Metric)
-> (ScopeMetrics -> Vector Metric -> ScopeMetrics)
-> Lens ScopeMetrics ScopeMetrics (Vector Metric) (Vector Metric)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScopeMetrics -> Vector Metric
_ScopeMetrics'metrics
           (\ ScopeMetrics
x__ Vector Metric
y__ -> ScopeMetrics
x__ {_ScopeMetrics'metrics = y__}))
        (Vector Metric -> f (Vector Metric))
-> Vector Metric -> f (Vector Metric)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ScopeMetrics "schemaUrl" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "schemaUrl"
-> (Text -> f Text) -> ScopeMetrics -> f ScopeMetrics
fieldOf Proxy# "schemaUrl"
_
    = ((Text -> f Text) -> ScopeMetrics -> f ScopeMetrics)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ScopeMetrics
-> f ScopeMetrics
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScopeMetrics -> Text)
-> (ScopeMetrics -> Text -> ScopeMetrics)
-> Lens ScopeMetrics ScopeMetrics Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScopeMetrics -> Text
_ScopeMetrics'schemaUrl
           (\ ScopeMetrics
x__ Text
y__ -> ScopeMetrics
x__ {_ScopeMetrics'schemaUrl = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ScopeMetrics where
  messageName :: Proxy ScopeMetrics -> Text
messageName Proxy ScopeMetrics
_
    = String -> Text
Data.Text.pack String
"opentelemetry.proto.metrics.v1.ScopeMetrics"
  packedMessageDescriptor :: Proxy ScopeMetrics -> ByteString
packedMessageDescriptor Proxy ScopeMetrics
_
    = ByteString
"\n\
      \\fScopeMetrics\DC2I\n\
      \\ENQscope\CAN\SOH \SOH(\v23.opentelemetry.proto.common.v1.InstrumentationScopeR\ENQscope\DC2@\n\
      \\ametrics\CAN\STX \ETX(\v2&.opentelemetry.proto.metrics.v1.MetricR\ametrics\DC2\GS\n\
      \\n\
      \schema_url\CAN\ETX \SOH(\tR\tschemaUrl"
  packedFileDescriptor :: Proxy ScopeMetrics -> ByteString
packedFileDescriptor Proxy ScopeMetrics
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ScopeMetrics)
fieldsByTag
    = let
        scope__field_descriptor :: FieldDescriptor ScopeMetrics
scope__field_descriptor
          = String
-> FieldTypeDescriptor InstrumentationScope
-> FieldAccessor ScopeMetrics InstrumentationScope
-> FieldDescriptor ScopeMetrics
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"scope"
              (MessageOrGroup -> FieldTypeDescriptor InstrumentationScope
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Opentelemetry.Proto.Common.V1.Common.InstrumentationScope)
              (Lens
  ScopeMetrics
  ScopeMetrics
  (Maybe InstrumentationScope)
  (Maybe InstrumentationScope)
-> FieldAccessor ScopeMetrics InstrumentationScope
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'scope")) ::
              Data.ProtoLens.FieldDescriptor ScopeMetrics
        metrics__field_descriptor :: FieldDescriptor ScopeMetrics
metrics__field_descriptor
          = String
-> FieldTypeDescriptor Metric
-> FieldAccessor ScopeMetrics Metric
-> FieldDescriptor ScopeMetrics
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"metrics"
              (MessageOrGroup -> FieldTypeDescriptor Metric
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Metric)
              (Packing
-> Lens' ScopeMetrics [Metric] -> FieldAccessor ScopeMetrics Metric
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Unpacked (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"metrics")) ::
              Data.ProtoLens.FieldDescriptor ScopeMetrics
        schemaUrl__field_descriptor :: FieldDescriptor ScopeMetrics
schemaUrl__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ScopeMetrics Text
-> FieldDescriptor ScopeMetrics
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"schema_url"
              (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 ScopeMetrics ScopeMetrics Text Text
-> FieldAccessor ScopeMetrics 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 (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"schemaUrl")) ::
              Data.ProtoLens.FieldDescriptor ScopeMetrics
      in
        [(Tag, FieldDescriptor ScopeMetrics)]
-> Map Tag (FieldDescriptor ScopeMetrics)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ScopeMetrics
scope__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ScopeMetrics
metrics__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor ScopeMetrics
schemaUrl__field_descriptor)]
  unknownFields :: Lens' ScopeMetrics FieldSet
unknownFields
    = (ScopeMetrics -> FieldSet)
-> (ScopeMetrics -> FieldSet -> ScopeMetrics)
-> Lens' ScopeMetrics FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ScopeMetrics -> FieldSet
_ScopeMetrics'_unknownFields
        (\ ScopeMetrics
x__ FieldSet
y__ -> ScopeMetrics
x__ {_ScopeMetrics'_unknownFields = y__})
  defMessage :: ScopeMetrics
defMessage
    = ScopeMetrics'_constructor
        {_ScopeMetrics'scope :: Maybe InstrumentationScope
_ScopeMetrics'scope = Maybe InstrumentationScope
forall a. Maybe a
Prelude.Nothing,
         _ScopeMetrics'metrics :: Vector Metric
_ScopeMetrics'metrics = Vector Metric
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _ScopeMetrics'schemaUrl :: Text
_ScopeMetrics'schemaUrl = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ScopeMetrics'_unknownFields :: FieldSet
_ScopeMetrics'_unknownFields = []}
  parseMessage :: Parser ScopeMetrics
parseMessage
    = let
        loop ::
          ScopeMetrics
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Metric
             -> Data.ProtoLens.Encoding.Bytes.Parser ScopeMetrics
        loop :: ScopeMetrics
-> Growing Vector RealWorld Metric -> Parser ScopeMetrics
loop ScopeMetrics
x Growing Vector RealWorld Metric
mutable'metrics
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do Vector Metric
frozen'metrics <- IO (Vector Metric) -> Parser (Vector Metric)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                          (Growing Vector (PrimState IO) Metric -> IO (Vector Metric)
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 Metric
Growing Vector (PrimState IO) Metric
mutable'metrics)
                      (let missing :: [a]
missing = []
                       in
                         if [Any] -> Bool
forall a. [a] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
                             () -> Parser ()
forall a. a -> Parser a
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
                         else
                             String -> Parser ()
forall a. String -> Parser a
forall (m :: * -> *) a. MonadFail m => String -> m a
Prelude.fail
                               (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
                                  String
"Missing required fields: "
                                  ([String] -> String
forall a. Show a => a -> String
Prelude.show ([String]
forall a. [a]
missing :: [Prelude.String]))))
                      ScopeMetrics -> Parser ScopeMetrics
forall a. a -> Parser a
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter ScopeMetrics ScopeMetrics FieldSet FieldSet
-> (FieldSet -> FieldSet) -> ScopeMetrics -> ScopeMetrics
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                           LensLike' f ScopeMetrics FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ScopeMetrics FieldSet
Setter ScopeMetrics ScopeMetrics FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t)
                           (Setter ScopeMetrics ScopeMetrics (Vector Metric) (Vector Metric)
-> Vector Metric -> ScopeMetrics -> ScopeMetrics
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                              (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'metrics") Vector Metric
frozen'metrics ScopeMetrics
x))
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        Word64
10
                          -> do InstrumentationScope
y <- Parser InstrumentationScope
-> String -> Parser InstrumentationScope
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser InstrumentationScope -> Parser InstrumentationScope
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 InstrumentationScope
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                       String
"scope"
                                ScopeMetrics
-> Growing Vector RealWorld Metric -> Parser ScopeMetrics
loop
                                  (Setter
  ScopeMetrics ScopeMetrics InstrumentationScope InstrumentationScope
-> InstrumentationScope -> ScopeMetrics -> ScopeMetrics
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"scope") InstrumentationScope
y ScopeMetrics
x)
                                  Growing Vector RealWorld Metric
mutable'metrics
                        Word64
18
                          -> do !Metric
y <- Parser Metric -> String -> Parser Metric
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Int -> Parser Metric -> Parser Metric
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 Metric
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                        String
"metrics"
                                Growing Vector RealWorld Metric
v <- IO (Growing Vector RealWorld Metric)
-> Parser (Growing Vector RealWorld Metric)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) Metric
-> Metric -> IO (Growing Vector (PrimState IO) Metric)
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 Metric
Growing Vector (PrimState IO) Metric
mutable'metrics Metric
y)
                                ScopeMetrics
-> Growing Vector RealWorld Metric -> Parser ScopeMetrics
loop ScopeMetrics
x Growing Vector RealWorld Metric
v
                        Word64
26
                          -> do Text
y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Int -> Parser Text
Data.ProtoLens.Encoding.Bytes.getText
                                             (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len))
                                       String
"schema_url"
                                ScopeMetrics
-> Growing Vector RealWorld Metric -> Parser ScopeMetrics
loop
                                  (Setter ScopeMetrics ScopeMetrics Text Text
-> Text -> ScopeMetrics -> ScopeMetrics
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"schemaUrl") Text
y ScopeMetrics
x)
                                  Growing Vector RealWorld Metric
mutable'metrics
                        Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                ScopeMetrics
-> Growing Vector RealWorld Metric -> Parser ScopeMetrics
loop
                                  (Setter ScopeMetrics ScopeMetrics FieldSet FieldSet
-> (FieldSet -> FieldSet) -> ScopeMetrics -> ScopeMetrics
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                     LensLike' f ScopeMetrics FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ScopeMetrics FieldSet
Setter ScopeMetrics ScopeMetrics FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) ScopeMetrics
x)
                                  Growing Vector RealWorld Metric
mutable'metrics
      in
        Parser ScopeMetrics -> String -> Parser ScopeMetrics
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do Growing Vector RealWorld Metric
mutable'metrics <- IO (Growing Vector RealWorld Metric)
-> Parser (Growing Vector RealWorld Metric)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                   IO (Growing Vector RealWorld Metric)
IO (Growing Vector (PrimState IO) Metric)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              ScopeMetrics
-> Growing Vector RealWorld Metric -> Parser ScopeMetrics
loop ScopeMetrics
forall msg. Message msg => msg
Data.ProtoLens.defMessage Growing Vector RealWorld Metric
mutable'metrics)
          String
"ScopeMetrics"
  buildMessage :: ScopeMetrics -> Builder
buildMessage
    = \ ScopeMetrics
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (case
                  FoldLike
  (Maybe InstrumentationScope)
  ScopeMetrics
  ScopeMetrics
  (Maybe InstrumentationScope)
  (Maybe InstrumentationScope)
-> ScopeMetrics -> Maybe InstrumentationScope
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'scope") ScopeMetrics
_x
              of
                Maybe InstrumentationScope
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                (Prelude.Just InstrumentationScope
_v)
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                       ((ByteString -> Builder)
-> (InstrumentationScope -> ByteString)
-> InstrumentationScope
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ 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))
                          InstrumentationScope -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage InstrumentationScope
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                ((Metric -> Builder) -> Vector Metric -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                   (\ Metric
_v
                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                           ((ByteString -> Builder)
-> (Metric -> ByteString) -> Metric -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                              (\ 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))
                              Metric -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Metric
_v))
                   (FoldLike
  (Vector Metric)
  ScopeMetrics
  ScopeMetrics
  (Vector Metric)
  (Vector Metric)
-> ScopeMetrics -> Vector Metric
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'metrics") ScopeMetrics
_x))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: Text
_v = FoldLike Text ScopeMetrics ScopeMetrics Text Text
-> ScopeMetrics -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"schemaUrl") ScopeMetrics
_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 Word64
26)
                            ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                               (\ 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 ScopeMetrics ScopeMetrics FieldSet FieldSet
-> ScopeMetrics -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet ScopeMetrics ScopeMetrics FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ScopeMetrics FieldSet
Data.ProtoLens.unknownFields ScopeMetrics
_x))))
instance Control.DeepSeq.NFData ScopeMetrics where
  rnf :: ScopeMetrics -> ()
rnf
    = \ ScopeMetrics
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ScopeMetrics -> FieldSet
_ScopeMetrics'_unknownFields ScopeMetrics
x__)
             (Maybe InstrumentationScope -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ScopeMetrics -> Maybe InstrumentationScope
_ScopeMetrics'scope ScopeMetrics
x__)
                (Vector Metric -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ScopeMetrics -> Vector Metric
_ScopeMetrics'metrics ScopeMetrics
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (ScopeMetrics -> Text
_ScopeMetrics'schemaUrl ScopeMetrics
x__) ())))
{- | Fields :
     
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.dataPoints' @:: Lens' Sum [NumberDataPoint]@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.vec'dataPoints' @:: Lens' Sum (Data.Vector.Vector NumberDataPoint)@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.aggregationTemporality' @:: Lens' Sum AggregationTemporality@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.isMonotonic' @:: Lens' Sum Prelude.Bool@ -}
data Sum
  = Sum'_constructor {Sum -> Vector NumberDataPoint
_Sum'dataPoints :: !(Data.Vector.Vector NumberDataPoint),
                      Sum -> AggregationTemporality
_Sum'aggregationTemporality :: !AggregationTemporality,
                      Sum -> Bool
_Sum'isMonotonic :: !Prelude.Bool,
                      Sum -> FieldSet
_Sum'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (Sum -> Sum -> Bool
(Sum -> Sum -> Bool) -> (Sum -> Sum -> Bool) -> Eq Sum
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: Sum -> Sum -> Bool
== :: Sum -> Sum -> Bool
$c/= :: Sum -> Sum -> Bool
/= :: Sum -> Sum -> Bool
Prelude.Eq, Eq Sum
Eq Sum =>
(Sum -> Sum -> Ordering)
-> (Sum -> Sum -> Bool)
-> (Sum -> Sum -> Bool)
-> (Sum -> Sum -> Bool)
-> (Sum -> Sum -> Bool)
-> (Sum -> Sum -> Sum)
-> (Sum -> Sum -> Sum)
-> Ord Sum
Sum -> Sum -> Bool
Sum -> Sum -> Ordering
Sum -> Sum -> Sum
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
$ccompare :: Sum -> Sum -> Ordering
compare :: Sum -> Sum -> Ordering
$c< :: Sum -> Sum -> Bool
< :: Sum -> Sum -> Bool
$c<= :: Sum -> Sum -> Bool
<= :: Sum -> Sum -> Bool
$c> :: Sum -> Sum -> Bool
> :: Sum -> Sum -> Bool
$c>= :: Sum -> Sum -> Bool
>= :: Sum -> Sum -> Bool
$cmax :: Sum -> Sum -> Sum
max :: Sum -> Sum -> Sum
$cmin :: Sum -> Sum -> Sum
min :: Sum -> Sum -> Sum
Prelude.Ord)
instance Prelude.Show Sum where
  showsPrec :: Int -> Sum -> ShowS
showsPrec Int
_ Sum
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (Sum -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort Sum
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField Sum "dataPoints" [NumberDataPoint] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "dataPoints"
-> ([NumberDataPoint] -> f [NumberDataPoint]) -> Sum -> f Sum
fieldOf Proxy# "dataPoints"
_
    = ((Vector NumberDataPoint -> f (Vector NumberDataPoint))
 -> Sum -> f Sum)
-> (([NumberDataPoint] -> f [NumberDataPoint])
    -> Vector NumberDataPoint -> f (Vector NumberDataPoint))
-> ([NumberDataPoint] -> f [NumberDataPoint])
-> Sum
-> f Sum
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((Sum -> Vector NumberDataPoint)
-> (Sum -> Vector NumberDataPoint -> Sum)
-> Lens Sum Sum (Vector NumberDataPoint) (Vector NumberDataPoint)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Sum -> Vector NumberDataPoint
_Sum'dataPoints (\ Sum
x__ Vector NumberDataPoint
y__ -> Sum
x__ {_Sum'dataPoints = y__}))
        ((Vector NumberDataPoint -> [NumberDataPoint])
-> (Vector NumberDataPoint
    -> [NumberDataPoint] -> Vector NumberDataPoint)
-> Lens
     (Vector NumberDataPoint)
     (Vector NumberDataPoint)
     [NumberDataPoint]
     [NumberDataPoint]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector NumberDataPoint -> [NumberDataPoint]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector NumberDataPoint
_ [NumberDataPoint]
y__ -> [NumberDataPoint] -> Vector NumberDataPoint
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [NumberDataPoint]
y__))
instance Data.ProtoLens.Field.HasField Sum "vec'dataPoints" (Data.Vector.Vector NumberDataPoint) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'dataPoints"
-> (Vector NumberDataPoint -> f (Vector NumberDataPoint))
-> Sum
-> f Sum
fieldOf Proxy# "vec'dataPoints"
_
    = ((Vector NumberDataPoint -> f (Vector NumberDataPoint))
 -> Sum -> f Sum)
-> ((Vector NumberDataPoint -> f (Vector NumberDataPoint))
    -> Vector NumberDataPoint -> f (Vector NumberDataPoint))
-> (Vector NumberDataPoint -> f (Vector NumberDataPoint))
-> Sum
-> f Sum
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((Sum -> Vector NumberDataPoint)
-> (Sum -> Vector NumberDataPoint -> Sum)
-> Lens Sum Sum (Vector NumberDataPoint) (Vector NumberDataPoint)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Sum -> Vector NumberDataPoint
_Sum'dataPoints (\ Sum
x__ Vector NumberDataPoint
y__ -> Sum
x__ {_Sum'dataPoints = y__}))
        (Vector NumberDataPoint -> f (Vector NumberDataPoint))
-> Vector NumberDataPoint -> f (Vector NumberDataPoint)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField Sum "aggregationTemporality" AggregationTemporality where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "aggregationTemporality"
-> (AggregationTemporality -> f AggregationTemporality)
-> Sum
-> f Sum
fieldOf Proxy# "aggregationTemporality"
_
    = ((AggregationTemporality -> f AggregationTemporality)
 -> Sum -> f Sum)
-> ((AggregationTemporality -> f AggregationTemporality)
    -> AggregationTemporality -> f AggregationTemporality)
-> (AggregationTemporality -> f AggregationTemporality)
-> Sum
-> f Sum
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((Sum -> AggregationTemporality)
-> (Sum -> AggregationTemporality -> Sum)
-> Lens Sum Sum AggregationTemporality AggregationTemporality
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Sum -> AggregationTemporality
_Sum'aggregationTemporality
           (\ Sum
x__ AggregationTemporality
y__ -> Sum
x__ {_Sum'aggregationTemporality = y__}))
        (AggregationTemporality -> f AggregationTemporality)
-> AggregationTemporality -> f AggregationTemporality
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField Sum "isMonotonic" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "isMonotonic" -> (Bool -> f Bool) -> Sum -> f Sum
fieldOf Proxy# "isMonotonic"
_
    = ((Bool -> f Bool) -> Sum -> f Sum)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> Sum
-> f Sum
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((Sum -> Bool) -> (Sum -> Bool -> Sum) -> Lens Sum Sum Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Sum -> Bool
_Sum'isMonotonic (\ Sum
x__ Bool
y__ -> Sum
x__ {_Sum'isMonotonic = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message Sum where
  messageName :: Proxy Sum -> Text
messageName Proxy Sum
_ = String -> Text
Data.Text.pack String
"opentelemetry.proto.metrics.v1.Sum"
  packedMessageDescriptor :: Proxy Sum -> ByteString
packedMessageDescriptor Proxy Sum
_
    = ByteString
"\n\
      \\ETXSum\DC2P\n\
      \\vdata_points\CAN\SOH \ETX(\v2/.opentelemetry.proto.metrics.v1.NumberDataPointR\n\
      \dataPoints\DC2o\n\
      \\ETBaggregation_temporality\CAN\STX \SOH(\SO26.opentelemetry.proto.metrics.v1.AggregationTemporalityR\SYNaggregationTemporality\DC2!\n\
      \\fis_monotonic\CAN\ETX \SOH(\bR\visMonotonic"
  packedFileDescriptor :: Proxy Sum -> ByteString
packedFileDescriptor Proxy Sum
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor Sum)
fieldsByTag
    = let
        dataPoints__field_descriptor :: FieldDescriptor Sum
dataPoints__field_descriptor
          = String
-> FieldTypeDescriptor NumberDataPoint
-> FieldAccessor Sum NumberDataPoint
-> FieldDescriptor Sum
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"data_points"
              (MessageOrGroup -> FieldTypeDescriptor NumberDataPoint
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor NumberDataPoint)
              (Packing
-> Lens' Sum [NumberDataPoint] -> FieldAccessor Sum NumberDataPoint
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Unpacked
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"dataPoints")) ::
              Data.ProtoLens.FieldDescriptor Sum
        aggregationTemporality__field_descriptor :: FieldDescriptor Sum
aggregationTemporality__field_descriptor
          = String
-> FieldTypeDescriptor AggregationTemporality
-> FieldAccessor Sum AggregationTemporality
-> FieldDescriptor Sum
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"aggregation_temporality"
              (ScalarField AggregationTemporality
-> FieldTypeDescriptor AggregationTemporality
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField AggregationTemporality
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor AggregationTemporality)
              (WireDefault AggregationTemporality
-> Lens Sum Sum AggregationTemporality AggregationTemporality
-> FieldAccessor Sum AggregationTemporality
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault AggregationTemporality
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"aggregationTemporality")) ::
              Data.ProtoLens.FieldDescriptor Sum
        isMonotonic__field_descriptor :: FieldDescriptor Sum
isMonotonic__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor Sum Bool
-> FieldDescriptor Sum
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"is_monotonic"
              (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 Sum Sum Bool Bool -> FieldAccessor Sum 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 (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"isMonotonic")) ::
              Data.ProtoLens.FieldDescriptor Sum
      in
        [(Tag, FieldDescriptor Sum)] -> Map Tag (FieldDescriptor Sum)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor Sum
dataPoints__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor Sum
aggregationTemporality__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor Sum
isMonotonic__field_descriptor)]
  unknownFields :: Lens' Sum FieldSet
unknownFields
    = (Sum -> FieldSet) -> (Sum -> FieldSet -> Sum) -> Lens' Sum FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        Sum -> FieldSet
_Sum'_unknownFields (\ Sum
x__ FieldSet
y__ -> Sum
x__ {_Sum'_unknownFields = y__})
  defMessage :: Sum
defMessage
    = Sum'_constructor
        {_Sum'dataPoints :: Vector NumberDataPoint
_Sum'dataPoints = Vector NumberDataPoint
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _Sum'aggregationTemporality :: AggregationTemporality
_Sum'aggregationTemporality = AggregationTemporality
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _Sum'isMonotonic :: Bool
_Sum'isMonotonic = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _Sum'_unknownFields :: FieldSet
_Sum'_unknownFields = []}
  parseMessage :: Parser Sum
parseMessage
    = let
        loop ::
          Sum
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld NumberDataPoint
             -> Data.ProtoLens.Encoding.Bytes.Parser Sum
        loop :: Sum -> Growing Vector RealWorld NumberDataPoint -> Parser Sum
loop Sum
x Growing Vector RealWorld NumberDataPoint
mutable'dataPoints
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do Vector NumberDataPoint
frozen'dataPoints <- IO (Vector NumberDataPoint) -> Parser (Vector NumberDataPoint)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                             (Growing Vector (PrimState IO) NumberDataPoint
-> IO (Vector NumberDataPoint)
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 NumberDataPoint
Growing Vector (PrimState IO) NumberDataPoint
mutable'dataPoints)
                      (let missing :: [a]
missing = []
                       in
                         if [Any] -> Bool
forall a. [a] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
                             () -> Parser ()
forall a. a -> Parser a
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
                         else
                             String -> Parser ()
forall a. String -> Parser a
forall (m :: * -> *) a. MonadFail m => String -> m a
Prelude.fail
                               (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
                                  String
"Missing required fields: "
                                  ([String] -> String
forall a. Show a => a -> String
Prelude.show ([String]
forall a. [a]
missing :: [Prelude.String]))))
                      Sum -> Parser Sum
forall a. a -> Parser a
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter Sum Sum FieldSet FieldSet
-> (FieldSet -> FieldSet) -> Sum -> Sum
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                           LensLike' f Sum FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' Sum FieldSet
Setter Sum Sum FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t)
                           (Setter Sum Sum (Vector NumberDataPoint) (Vector NumberDataPoint)
-> Vector NumberDataPoint -> Sum -> Sum
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                              (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'dataPoints") Vector NumberDataPoint
frozen'dataPoints
                              Sum
x))
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        Word64
10
                          -> do !NumberDataPoint
y <- Parser NumberDataPoint -> String -> Parser NumberDataPoint
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Int -> Parser NumberDataPoint -> Parser NumberDataPoint
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 NumberDataPoint
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                        String
"data_points"
                                Growing Vector RealWorld NumberDataPoint
v <- IO (Growing Vector RealWorld NumberDataPoint)
-> Parser (Growing Vector RealWorld NumberDataPoint)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) NumberDataPoint
-> NumberDataPoint
-> IO (Growing Vector (PrimState IO) NumberDataPoint)
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 NumberDataPoint
Growing Vector (PrimState IO) NumberDataPoint
mutable'dataPoints NumberDataPoint
y)
                                Sum -> Growing Vector RealWorld NumberDataPoint -> Parser Sum
loop Sum
x Growing Vector RealWorld NumberDataPoint
v
                        Word64
16
                          -> do AggregationTemporality
y <- Parser AggregationTemporality
-> String -> Parser AggregationTemporality
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> AggregationTemporality)
-> Parser Int -> Parser AggregationTemporality
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> AggregationTemporality
forall a. Enum a => Int -> a
Prelude.toEnum
                                          ((Word64 -> Int) -> Parser Word64 -> Parser Int
forall a b. (a -> b) -> Parser a -> Parser b
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))
                                       String
"aggregation_temporality"
                                Sum -> Growing Vector RealWorld NumberDataPoint -> Parser Sum
loop
                                  (Setter Sum Sum AggregationTemporality AggregationTemporality
-> AggregationTemporality -> Sum -> Sum
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"aggregationTemporality") AggregationTemporality
y Sum
x)
                                  Growing Vector RealWorld NumberDataPoint
mutable'dataPoints
                        Word64
24
                          -> 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 a b. (a -> b) -> Parser a -> Parser b
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./=) Word64
0) Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"is_monotonic"
                                Sum -> Growing Vector RealWorld NumberDataPoint -> Parser Sum
loop
                                  (Setter Sum Sum Bool Bool -> Bool -> Sum -> Sum
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"isMonotonic") Bool
y Sum
x)
                                  Growing Vector RealWorld NumberDataPoint
mutable'dataPoints
                        Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                Sum -> Growing Vector RealWorld NumberDataPoint -> Parser Sum
loop
                                  (Setter Sum Sum FieldSet FieldSet
-> (FieldSet -> FieldSet) -> Sum -> Sum
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                     LensLike' f Sum FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' Sum FieldSet
Setter Sum Sum FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) Sum
x)
                                  Growing Vector RealWorld NumberDataPoint
mutable'dataPoints
      in
        Parser Sum -> String -> Parser Sum
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do Growing Vector RealWorld NumberDataPoint
mutable'dataPoints <- IO (Growing Vector RealWorld NumberDataPoint)
-> Parser (Growing Vector RealWorld NumberDataPoint)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                      IO (Growing Vector RealWorld NumberDataPoint)
IO (Growing Vector (PrimState IO) NumberDataPoint)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              Sum -> Growing Vector RealWorld NumberDataPoint -> Parser Sum
loop Sum
forall msg. Message msg => msg
Data.ProtoLens.defMessage Growing Vector RealWorld NumberDataPoint
mutable'dataPoints)
          String
"Sum"
  buildMessage :: Sum -> Builder
buildMessage
    = \ Sum
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             ((NumberDataPoint -> Builder) -> Vector NumberDataPoint -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                (\ NumberDataPoint
_v
                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                        ((ByteString -> Builder)
-> (NumberDataPoint -> ByteString) -> NumberDataPoint -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                           (\ 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))
                           NumberDataPoint -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage NumberDataPoint
_v))
                (FoldLike
  (Vector NumberDataPoint)
  Sum
  Sum
  (Vector NumberDataPoint)
  (Vector NumberDataPoint)
-> Sum -> Vector NumberDataPoint
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                   (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'dataPoints") Sum
_x))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   _v :: AggregationTemporality
_v
                     = FoldLike
  AggregationTemporality
  Sum
  Sum
  AggregationTemporality
  AggregationTemporality
-> Sum -> AggregationTemporality
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                         (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"aggregationTemporality") Sum
_x
                 in
                   if AggregationTemporality -> AggregationTemporality -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) AggregationTemporality
_v AggregationTemporality
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 Word64
16)
                         ((Int -> Builder)
-> (AggregationTemporality -> Int)
-> AggregationTemporality
-> 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)
                            AggregationTemporality -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum AggregationTemporality
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: Bool
_v
                        = FoldLike Bool Sum Sum Bool Bool -> Sum -> Bool
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"isMonotonic") Sum
_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 Word64
24)
                            ((Word64 -> Builder) -> (Bool -> Word64) -> Bool -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                               Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt (\ Bool
b -> if Bool
b then Word64
1 else Word64
0)
                               Bool
_v))
                   (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                      (FoldLike FieldSet Sum Sum FieldSet FieldSet -> Sum -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet Sum Sum FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' Sum FieldSet
Data.ProtoLens.unknownFields Sum
_x))))
instance Control.DeepSeq.NFData Sum where
  rnf :: Sum -> ()
rnf
    = \ Sum
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (Sum -> FieldSet
_Sum'_unknownFields Sum
x__)
             (Vector NumberDataPoint -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (Sum -> Vector NumberDataPoint
_Sum'dataPoints Sum
x__)
                (AggregationTemporality -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (Sum -> AggregationTemporality
_Sum'aggregationTemporality Sum
x__)
                   (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (Sum -> Bool
_Sum'isMonotonic Sum
x__) ())))
{- | Fields :
     
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.dataPoints' @:: Lens' Summary [SummaryDataPoint]@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.vec'dataPoints' @:: Lens' Summary (Data.Vector.Vector SummaryDataPoint)@ -}
data Summary
  = Summary'_constructor {Summary -> Vector SummaryDataPoint
_Summary'dataPoints :: !(Data.Vector.Vector SummaryDataPoint),
                          Summary -> FieldSet
_Summary'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (Summary -> Summary -> Bool
(Summary -> Summary -> Bool)
-> (Summary -> Summary -> Bool) -> Eq Summary
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: Summary -> Summary -> Bool
== :: Summary -> Summary -> Bool
$c/= :: Summary -> Summary -> Bool
/= :: Summary -> Summary -> Bool
Prelude.Eq, Eq Summary
Eq Summary =>
(Summary -> Summary -> Ordering)
-> (Summary -> Summary -> Bool)
-> (Summary -> Summary -> Bool)
-> (Summary -> Summary -> Bool)
-> (Summary -> Summary -> Bool)
-> (Summary -> Summary -> Summary)
-> (Summary -> Summary -> Summary)
-> Ord Summary
Summary -> Summary -> Bool
Summary -> Summary -> Ordering
Summary -> Summary -> Summary
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
$ccompare :: Summary -> Summary -> Ordering
compare :: Summary -> Summary -> Ordering
$c< :: Summary -> Summary -> Bool
< :: Summary -> Summary -> Bool
$c<= :: Summary -> Summary -> Bool
<= :: Summary -> Summary -> Bool
$c> :: Summary -> Summary -> Bool
> :: Summary -> Summary -> Bool
$c>= :: Summary -> Summary -> Bool
>= :: Summary -> Summary -> Bool
$cmax :: Summary -> Summary -> Summary
max :: Summary -> Summary -> Summary
$cmin :: Summary -> Summary -> Summary
min :: Summary -> Summary -> Summary
Prelude.Ord)
instance Prelude.Show Summary where
  showsPrec :: Int -> Summary -> ShowS
showsPrec Int
_ Summary
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (Summary -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort Summary
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField Summary "dataPoints" [SummaryDataPoint] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "dataPoints"
-> ([SummaryDataPoint] -> f [SummaryDataPoint])
-> Summary
-> f Summary
fieldOf Proxy# "dataPoints"
_
    = ((Vector SummaryDataPoint -> f (Vector SummaryDataPoint))
 -> Summary -> f Summary)
-> (([SummaryDataPoint] -> f [SummaryDataPoint])
    -> Vector SummaryDataPoint -> f (Vector SummaryDataPoint))
-> ([SummaryDataPoint] -> f [SummaryDataPoint])
-> Summary
-> f Summary
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((Summary -> Vector SummaryDataPoint)
-> (Summary -> Vector SummaryDataPoint -> Summary)
-> Lens
     Summary Summary (Vector SummaryDataPoint) (Vector SummaryDataPoint)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Summary -> Vector SummaryDataPoint
_Summary'dataPoints (\ Summary
x__ Vector SummaryDataPoint
y__ -> Summary
x__ {_Summary'dataPoints = y__}))
        ((Vector SummaryDataPoint -> [SummaryDataPoint])
-> (Vector SummaryDataPoint
    -> [SummaryDataPoint] -> Vector SummaryDataPoint)
-> Lens
     (Vector SummaryDataPoint)
     (Vector SummaryDataPoint)
     [SummaryDataPoint]
     [SummaryDataPoint]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector SummaryDataPoint -> [SummaryDataPoint]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector SummaryDataPoint
_ [SummaryDataPoint]
y__ -> [SummaryDataPoint] -> Vector SummaryDataPoint
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [SummaryDataPoint]
y__))
instance Data.ProtoLens.Field.HasField Summary "vec'dataPoints" (Data.Vector.Vector SummaryDataPoint) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'dataPoints"
-> (Vector SummaryDataPoint -> f (Vector SummaryDataPoint))
-> Summary
-> f Summary
fieldOf Proxy# "vec'dataPoints"
_
    = ((Vector SummaryDataPoint -> f (Vector SummaryDataPoint))
 -> Summary -> f Summary)
-> ((Vector SummaryDataPoint -> f (Vector SummaryDataPoint))
    -> Vector SummaryDataPoint -> f (Vector SummaryDataPoint))
-> (Vector SummaryDataPoint -> f (Vector SummaryDataPoint))
-> Summary
-> f Summary
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((Summary -> Vector SummaryDataPoint)
-> (Summary -> Vector SummaryDataPoint -> Summary)
-> Lens
     Summary Summary (Vector SummaryDataPoint) (Vector SummaryDataPoint)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Summary -> Vector SummaryDataPoint
_Summary'dataPoints (\ Summary
x__ Vector SummaryDataPoint
y__ -> Summary
x__ {_Summary'dataPoints = y__}))
        (Vector SummaryDataPoint -> f (Vector SummaryDataPoint))
-> Vector SummaryDataPoint -> f (Vector SummaryDataPoint)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message Summary where
  messageName :: Proxy Summary -> Text
messageName Proxy Summary
_
    = String -> Text
Data.Text.pack String
"opentelemetry.proto.metrics.v1.Summary"
  packedMessageDescriptor :: Proxy Summary -> ByteString
packedMessageDescriptor Proxy Summary
_
    = ByteString
"\n\
      \\aSummary\DC2Q\n\
      \\vdata_points\CAN\SOH \ETX(\v20.opentelemetry.proto.metrics.v1.SummaryDataPointR\n\
      \dataPoints"
  packedFileDescriptor :: Proxy Summary -> ByteString
packedFileDescriptor Proxy Summary
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor Summary)
fieldsByTag
    = let
        dataPoints__field_descriptor :: FieldDescriptor Summary
dataPoints__field_descriptor
          = String
-> FieldTypeDescriptor SummaryDataPoint
-> FieldAccessor Summary SummaryDataPoint
-> FieldDescriptor Summary
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"data_points"
              (MessageOrGroup -> FieldTypeDescriptor SummaryDataPoint
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor SummaryDataPoint)
              (Packing
-> Lens' Summary [SummaryDataPoint]
-> FieldAccessor Summary SummaryDataPoint
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Unpacked
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"dataPoints")) ::
              Data.ProtoLens.FieldDescriptor Summary
      in
        [(Tag, FieldDescriptor Summary)]
-> Map Tag (FieldDescriptor Summary)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor Summary
dataPoints__field_descriptor)]
  unknownFields :: Lens' Summary FieldSet
unknownFields
    = (Summary -> FieldSet)
-> (Summary -> FieldSet -> Summary) -> Lens' Summary FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        Summary -> FieldSet
_Summary'_unknownFields
        (\ Summary
x__ FieldSet
y__ -> Summary
x__ {_Summary'_unknownFields = y__})
  defMessage :: Summary
defMessage
    = Summary'_constructor
        {_Summary'dataPoints :: Vector SummaryDataPoint
_Summary'dataPoints = Vector SummaryDataPoint
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _Summary'_unknownFields :: FieldSet
_Summary'_unknownFields = []}
  parseMessage :: Parser Summary
parseMessage
    = let
        loop ::
          Summary
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld SummaryDataPoint
             -> Data.ProtoLens.Encoding.Bytes.Parser Summary
        loop :: Summary
-> Growing Vector RealWorld SummaryDataPoint -> Parser Summary
loop Summary
x Growing Vector RealWorld SummaryDataPoint
mutable'dataPoints
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do Vector SummaryDataPoint
frozen'dataPoints <- IO (Vector SummaryDataPoint) -> Parser (Vector SummaryDataPoint)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                             (Growing Vector (PrimState IO) SummaryDataPoint
-> IO (Vector SummaryDataPoint)
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 SummaryDataPoint
Growing Vector (PrimState IO) SummaryDataPoint
mutable'dataPoints)
                      (let missing :: [a]
missing = []
                       in
                         if [Any] -> Bool
forall a. [a] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
                             () -> Parser ()
forall a. a -> Parser a
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
                         else
                             String -> Parser ()
forall a. String -> Parser a
forall (m :: * -> *) a. MonadFail m => String -> m a
Prelude.fail
                               (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
                                  String
"Missing required fields: "
                                  ([String] -> String
forall a. Show a => a -> String
Prelude.show ([String]
forall a. [a]
missing :: [Prelude.String]))))
                      Summary -> Parser Summary
forall a. a -> Parser a
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter Summary Summary FieldSet FieldSet
-> (FieldSet -> FieldSet) -> Summary -> Summary
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                           LensLike' f Summary FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' Summary FieldSet
Setter Summary Summary FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t)
                           (Setter
  Summary Summary (Vector SummaryDataPoint) (Vector SummaryDataPoint)
-> Vector SummaryDataPoint -> Summary -> Summary
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                              (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'dataPoints") Vector SummaryDataPoint
frozen'dataPoints
                              Summary
x))
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        Word64
10
                          -> do !SummaryDataPoint
y <- Parser SummaryDataPoint -> String -> Parser SummaryDataPoint
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Int -> Parser SummaryDataPoint -> Parser SummaryDataPoint
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 SummaryDataPoint
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                        String
"data_points"
                                Growing Vector RealWorld SummaryDataPoint
v <- IO (Growing Vector RealWorld SummaryDataPoint)
-> Parser (Growing Vector RealWorld SummaryDataPoint)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) SummaryDataPoint
-> SummaryDataPoint
-> IO (Growing Vector (PrimState IO) SummaryDataPoint)
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 SummaryDataPoint
Growing Vector (PrimState IO) SummaryDataPoint
mutable'dataPoints SummaryDataPoint
y)
                                Summary
-> Growing Vector RealWorld SummaryDataPoint -> Parser Summary
loop Summary
x Growing Vector RealWorld SummaryDataPoint
v
                        Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                Summary
-> Growing Vector RealWorld SummaryDataPoint -> Parser Summary
loop
                                  (Setter Summary Summary FieldSet FieldSet
-> (FieldSet -> FieldSet) -> Summary -> Summary
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                     LensLike' f Summary FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' Summary FieldSet
Setter Summary Summary FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) Summary
x)
                                  Growing Vector RealWorld SummaryDataPoint
mutable'dataPoints
      in
        Parser Summary -> String -> Parser Summary
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do Growing Vector RealWorld SummaryDataPoint
mutable'dataPoints <- IO (Growing Vector RealWorld SummaryDataPoint)
-> Parser (Growing Vector RealWorld SummaryDataPoint)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                      IO (Growing Vector RealWorld SummaryDataPoint)
IO (Growing Vector (PrimState IO) SummaryDataPoint)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              Summary
-> Growing Vector RealWorld SummaryDataPoint -> Parser Summary
loop Summary
forall msg. Message msg => msg
Data.ProtoLens.defMessage Growing Vector RealWorld SummaryDataPoint
mutable'dataPoints)
          String
"Summary"
  buildMessage :: Summary -> Builder
buildMessage
    = \ Summary
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             ((SummaryDataPoint -> Builder) -> Vector SummaryDataPoint -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                (\ SummaryDataPoint
_v
                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                        ((ByteString -> Builder)
-> (SummaryDataPoint -> ByteString) -> SummaryDataPoint -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                           (\ 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))
                           SummaryDataPoint -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage SummaryDataPoint
_v))
                (FoldLike
  (Vector SummaryDataPoint)
  Summary
  Summary
  (Vector SummaryDataPoint)
  (Vector SummaryDataPoint)
-> Summary -> Vector SummaryDataPoint
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                   (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'dataPoints") Summary
_x))
             (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                (FoldLike FieldSet Summary Summary FieldSet FieldSet
-> Summary -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet Summary Summary FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' Summary FieldSet
Data.ProtoLens.unknownFields Summary
_x))
instance Control.DeepSeq.NFData Summary where
  rnf :: Summary -> ()
rnf
    = \ Summary
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (Summary -> FieldSet
_Summary'_unknownFields Summary
x__)
             (Vector SummaryDataPoint -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (Summary -> Vector SummaryDataPoint
_Summary'dataPoints Summary
x__) ())
{- | Fields :
     
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.attributes' @:: Lens' SummaryDataPoint [Proto.Opentelemetry.Proto.Common.V1.Common.KeyValue]@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.vec'attributes' @:: Lens' SummaryDataPoint (Data.Vector.Vector Proto.Opentelemetry.Proto.Common.V1.Common.KeyValue)@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.startTimeUnixNano' @:: Lens' SummaryDataPoint Data.Word.Word64@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.timeUnixNano' @:: Lens' SummaryDataPoint Data.Word.Word64@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.count' @:: Lens' SummaryDataPoint Data.Word.Word64@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.sum' @:: Lens' SummaryDataPoint Prelude.Double@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.quantileValues' @:: Lens' SummaryDataPoint [SummaryDataPoint'ValueAtQuantile]@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.vec'quantileValues' @:: Lens' SummaryDataPoint (Data.Vector.Vector SummaryDataPoint'ValueAtQuantile)@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.flags' @:: Lens' SummaryDataPoint Data.Word.Word32@ -}
data SummaryDataPoint
  = SummaryDataPoint'_constructor {SummaryDataPoint -> Vector KeyValue
_SummaryDataPoint'attributes :: !(Data.Vector.Vector Proto.Opentelemetry.Proto.Common.V1.Common.KeyValue),
                                   SummaryDataPoint -> Word64
_SummaryDataPoint'startTimeUnixNano :: !Data.Word.Word64,
                                   SummaryDataPoint -> Word64
_SummaryDataPoint'timeUnixNano :: !Data.Word.Word64,
                                   SummaryDataPoint -> Word64
_SummaryDataPoint'count :: !Data.Word.Word64,
                                   SummaryDataPoint -> Double
_SummaryDataPoint'sum :: !Prelude.Double,
                                   SummaryDataPoint -> Vector SummaryDataPoint'ValueAtQuantile
_SummaryDataPoint'quantileValues :: !(Data.Vector.Vector SummaryDataPoint'ValueAtQuantile),
                                   SummaryDataPoint -> Word32
_SummaryDataPoint'flags :: !Data.Word.Word32,
                                   SummaryDataPoint -> FieldSet
_SummaryDataPoint'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (SummaryDataPoint -> SummaryDataPoint -> Bool
(SummaryDataPoint -> SummaryDataPoint -> Bool)
-> (SummaryDataPoint -> SummaryDataPoint -> Bool)
-> Eq SummaryDataPoint
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: SummaryDataPoint -> SummaryDataPoint -> Bool
== :: SummaryDataPoint -> SummaryDataPoint -> Bool
$c/= :: SummaryDataPoint -> SummaryDataPoint -> Bool
/= :: SummaryDataPoint -> SummaryDataPoint -> Bool
Prelude.Eq, Eq SummaryDataPoint
Eq SummaryDataPoint =>
(SummaryDataPoint -> SummaryDataPoint -> Ordering)
-> (SummaryDataPoint -> SummaryDataPoint -> Bool)
-> (SummaryDataPoint -> SummaryDataPoint -> Bool)
-> (SummaryDataPoint -> SummaryDataPoint -> Bool)
-> (SummaryDataPoint -> SummaryDataPoint -> Bool)
-> (SummaryDataPoint -> SummaryDataPoint -> SummaryDataPoint)
-> (SummaryDataPoint -> SummaryDataPoint -> SummaryDataPoint)
-> Ord SummaryDataPoint
SummaryDataPoint -> SummaryDataPoint -> Bool
SummaryDataPoint -> SummaryDataPoint -> Ordering
SummaryDataPoint -> SummaryDataPoint -> SummaryDataPoint
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
$ccompare :: SummaryDataPoint -> SummaryDataPoint -> Ordering
compare :: SummaryDataPoint -> SummaryDataPoint -> Ordering
$c< :: SummaryDataPoint -> SummaryDataPoint -> Bool
< :: SummaryDataPoint -> SummaryDataPoint -> Bool
$c<= :: SummaryDataPoint -> SummaryDataPoint -> Bool
<= :: SummaryDataPoint -> SummaryDataPoint -> Bool
$c> :: SummaryDataPoint -> SummaryDataPoint -> Bool
> :: SummaryDataPoint -> SummaryDataPoint -> Bool
$c>= :: SummaryDataPoint -> SummaryDataPoint -> Bool
>= :: SummaryDataPoint -> SummaryDataPoint -> Bool
$cmax :: SummaryDataPoint -> SummaryDataPoint -> SummaryDataPoint
max :: SummaryDataPoint -> SummaryDataPoint -> SummaryDataPoint
$cmin :: SummaryDataPoint -> SummaryDataPoint -> SummaryDataPoint
min :: SummaryDataPoint -> SummaryDataPoint -> SummaryDataPoint
Prelude.Ord)
instance Prelude.Show SummaryDataPoint where
  showsPrec :: Int -> SummaryDataPoint -> ShowS
showsPrec Int
_ SummaryDataPoint
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (SummaryDataPoint -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort SummaryDataPoint
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField SummaryDataPoint "attributes" [Proto.Opentelemetry.Proto.Common.V1.Common.KeyValue] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "attributes"
-> ([KeyValue] -> f [KeyValue])
-> SummaryDataPoint
-> f SummaryDataPoint
fieldOf Proxy# "attributes"
_
    = ((Vector KeyValue -> f (Vector KeyValue))
 -> SummaryDataPoint -> f SummaryDataPoint)
-> (([KeyValue] -> f [KeyValue])
    -> Vector KeyValue -> f (Vector KeyValue))
-> ([KeyValue] -> f [KeyValue])
-> SummaryDataPoint
-> f SummaryDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SummaryDataPoint -> Vector KeyValue)
-> (SummaryDataPoint -> Vector KeyValue -> SummaryDataPoint)
-> Lens
     SummaryDataPoint
     SummaryDataPoint
     (Vector KeyValue)
     (Vector KeyValue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SummaryDataPoint -> Vector KeyValue
_SummaryDataPoint'attributes
           (\ SummaryDataPoint
x__ Vector KeyValue
y__ -> SummaryDataPoint
x__ {_SummaryDataPoint'attributes = y__}))
        ((Vector KeyValue -> [KeyValue])
-> (Vector KeyValue -> [KeyValue] -> Vector KeyValue)
-> Lens (Vector KeyValue) (Vector KeyValue) [KeyValue] [KeyValue]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector KeyValue -> [KeyValue]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector KeyValue
_ [KeyValue]
y__ -> [KeyValue] -> Vector KeyValue
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [KeyValue]
y__))
instance Data.ProtoLens.Field.HasField SummaryDataPoint "vec'attributes" (Data.Vector.Vector Proto.Opentelemetry.Proto.Common.V1.Common.KeyValue) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'attributes"
-> (Vector KeyValue -> f (Vector KeyValue))
-> SummaryDataPoint
-> f SummaryDataPoint
fieldOf Proxy# "vec'attributes"
_
    = ((Vector KeyValue -> f (Vector KeyValue))
 -> SummaryDataPoint -> f SummaryDataPoint)
-> ((Vector KeyValue -> f (Vector KeyValue))
    -> Vector KeyValue -> f (Vector KeyValue))
-> (Vector KeyValue -> f (Vector KeyValue))
-> SummaryDataPoint
-> f SummaryDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SummaryDataPoint -> Vector KeyValue)
-> (SummaryDataPoint -> Vector KeyValue -> SummaryDataPoint)
-> Lens
     SummaryDataPoint
     SummaryDataPoint
     (Vector KeyValue)
     (Vector KeyValue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SummaryDataPoint -> Vector KeyValue
_SummaryDataPoint'attributes
           (\ SummaryDataPoint
x__ Vector KeyValue
y__ -> SummaryDataPoint
x__ {_SummaryDataPoint'attributes = y__}))
        (Vector KeyValue -> f (Vector KeyValue))
-> Vector KeyValue -> f (Vector KeyValue)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SummaryDataPoint "startTimeUnixNano" Data.Word.Word64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "startTimeUnixNano"
-> (Word64 -> f Word64) -> SummaryDataPoint -> f SummaryDataPoint
fieldOf Proxy# "startTimeUnixNano"
_
    = ((Word64 -> f Word64) -> SummaryDataPoint -> f SummaryDataPoint)
-> ((Word64 -> f Word64) -> Word64 -> f Word64)
-> (Word64 -> f Word64)
-> SummaryDataPoint
-> f SummaryDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SummaryDataPoint -> Word64)
-> (SummaryDataPoint -> Word64 -> SummaryDataPoint)
-> Lens SummaryDataPoint SummaryDataPoint Word64 Word64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SummaryDataPoint -> Word64
_SummaryDataPoint'startTimeUnixNano
           (\ SummaryDataPoint
x__ Word64
y__ -> SummaryDataPoint
x__ {_SummaryDataPoint'startTimeUnixNano = y__}))
        (Word64 -> f Word64) -> Word64 -> f Word64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SummaryDataPoint "timeUnixNano" Data.Word.Word64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "timeUnixNano"
-> (Word64 -> f Word64) -> SummaryDataPoint -> f SummaryDataPoint
fieldOf Proxy# "timeUnixNano"
_
    = ((Word64 -> f Word64) -> SummaryDataPoint -> f SummaryDataPoint)
-> ((Word64 -> f Word64) -> Word64 -> f Word64)
-> (Word64 -> f Word64)
-> SummaryDataPoint
-> f SummaryDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SummaryDataPoint -> Word64)
-> (SummaryDataPoint -> Word64 -> SummaryDataPoint)
-> Lens SummaryDataPoint SummaryDataPoint Word64 Word64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SummaryDataPoint -> Word64
_SummaryDataPoint'timeUnixNano
           (\ SummaryDataPoint
x__ Word64
y__ -> SummaryDataPoint
x__ {_SummaryDataPoint'timeUnixNano = y__}))
        (Word64 -> f Word64) -> Word64 -> f Word64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SummaryDataPoint "count" Data.Word.Word64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "count"
-> (Word64 -> f Word64) -> SummaryDataPoint -> f SummaryDataPoint
fieldOf Proxy# "count"
_
    = ((Word64 -> f Word64) -> SummaryDataPoint -> f SummaryDataPoint)
-> ((Word64 -> f Word64) -> Word64 -> f Word64)
-> (Word64 -> f Word64)
-> SummaryDataPoint
-> f SummaryDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SummaryDataPoint -> Word64)
-> (SummaryDataPoint -> Word64 -> SummaryDataPoint)
-> Lens SummaryDataPoint SummaryDataPoint Word64 Word64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SummaryDataPoint -> Word64
_SummaryDataPoint'count
           (\ SummaryDataPoint
x__ Word64
y__ -> SummaryDataPoint
x__ {_SummaryDataPoint'count = y__}))
        (Word64 -> f Word64) -> Word64 -> f Word64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SummaryDataPoint "sum" Prelude.Double where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "sum"
-> (Double -> f Double) -> SummaryDataPoint -> f SummaryDataPoint
fieldOf Proxy# "sum"
_
    = ((Double -> f Double) -> SummaryDataPoint -> f SummaryDataPoint)
-> ((Double -> f Double) -> Double -> f Double)
-> (Double -> f Double)
-> SummaryDataPoint
-> f SummaryDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SummaryDataPoint -> Double)
-> (SummaryDataPoint -> Double -> SummaryDataPoint)
-> Lens SummaryDataPoint SummaryDataPoint Double Double
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SummaryDataPoint -> Double
_SummaryDataPoint'sum
           (\ SummaryDataPoint
x__ Double
y__ -> SummaryDataPoint
x__ {_SummaryDataPoint'sum = y__}))
        (Double -> f Double) -> Double -> f Double
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SummaryDataPoint "quantileValues" [SummaryDataPoint'ValueAtQuantile] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "quantileValues"
-> ([SummaryDataPoint'ValueAtQuantile]
    -> f [SummaryDataPoint'ValueAtQuantile])
-> SummaryDataPoint
-> f SummaryDataPoint
fieldOf Proxy# "quantileValues"
_
    = ((Vector SummaryDataPoint'ValueAtQuantile
  -> f (Vector SummaryDataPoint'ValueAtQuantile))
 -> SummaryDataPoint -> f SummaryDataPoint)
-> (([SummaryDataPoint'ValueAtQuantile]
     -> f [SummaryDataPoint'ValueAtQuantile])
    -> Vector SummaryDataPoint'ValueAtQuantile
    -> f (Vector SummaryDataPoint'ValueAtQuantile))
-> ([SummaryDataPoint'ValueAtQuantile]
    -> f [SummaryDataPoint'ValueAtQuantile])
-> SummaryDataPoint
-> f SummaryDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SummaryDataPoint -> Vector SummaryDataPoint'ValueAtQuantile)
-> (SummaryDataPoint
    -> Vector SummaryDataPoint'ValueAtQuantile -> SummaryDataPoint)
-> Lens
     SummaryDataPoint
     SummaryDataPoint
     (Vector SummaryDataPoint'ValueAtQuantile)
     (Vector SummaryDataPoint'ValueAtQuantile)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SummaryDataPoint -> Vector SummaryDataPoint'ValueAtQuantile
_SummaryDataPoint'quantileValues
           (\ SummaryDataPoint
x__ Vector SummaryDataPoint'ValueAtQuantile
y__ -> SummaryDataPoint
x__ {_SummaryDataPoint'quantileValues = y__}))
        ((Vector SummaryDataPoint'ValueAtQuantile
 -> [SummaryDataPoint'ValueAtQuantile])
-> (Vector SummaryDataPoint'ValueAtQuantile
    -> [SummaryDataPoint'ValueAtQuantile]
    -> Vector SummaryDataPoint'ValueAtQuantile)
-> Lens
     (Vector SummaryDataPoint'ValueAtQuantile)
     (Vector SummaryDataPoint'ValueAtQuantile)
     [SummaryDataPoint'ValueAtQuantile]
     [SummaryDataPoint'ValueAtQuantile]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector SummaryDataPoint'ValueAtQuantile
-> [SummaryDataPoint'ValueAtQuantile]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector SummaryDataPoint'ValueAtQuantile
_ [SummaryDataPoint'ValueAtQuantile]
y__ -> [SummaryDataPoint'ValueAtQuantile]
-> Vector SummaryDataPoint'ValueAtQuantile
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [SummaryDataPoint'ValueAtQuantile]
y__))
instance Data.ProtoLens.Field.HasField SummaryDataPoint "vec'quantileValues" (Data.Vector.Vector SummaryDataPoint'ValueAtQuantile) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'quantileValues"
-> (Vector SummaryDataPoint'ValueAtQuantile
    -> f (Vector SummaryDataPoint'ValueAtQuantile))
-> SummaryDataPoint
-> f SummaryDataPoint
fieldOf Proxy# "vec'quantileValues"
_
    = ((Vector SummaryDataPoint'ValueAtQuantile
  -> f (Vector SummaryDataPoint'ValueAtQuantile))
 -> SummaryDataPoint -> f SummaryDataPoint)
-> ((Vector SummaryDataPoint'ValueAtQuantile
     -> f (Vector SummaryDataPoint'ValueAtQuantile))
    -> Vector SummaryDataPoint'ValueAtQuantile
    -> f (Vector SummaryDataPoint'ValueAtQuantile))
-> (Vector SummaryDataPoint'ValueAtQuantile
    -> f (Vector SummaryDataPoint'ValueAtQuantile))
-> SummaryDataPoint
-> f SummaryDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SummaryDataPoint -> Vector SummaryDataPoint'ValueAtQuantile)
-> (SummaryDataPoint
    -> Vector SummaryDataPoint'ValueAtQuantile -> SummaryDataPoint)
-> Lens
     SummaryDataPoint
     SummaryDataPoint
     (Vector SummaryDataPoint'ValueAtQuantile)
     (Vector SummaryDataPoint'ValueAtQuantile)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SummaryDataPoint -> Vector SummaryDataPoint'ValueAtQuantile
_SummaryDataPoint'quantileValues
           (\ SummaryDataPoint
x__ Vector SummaryDataPoint'ValueAtQuantile
y__ -> SummaryDataPoint
x__ {_SummaryDataPoint'quantileValues = y__}))
        (Vector SummaryDataPoint'ValueAtQuantile
 -> f (Vector SummaryDataPoint'ValueAtQuantile))
-> Vector SummaryDataPoint'ValueAtQuantile
-> f (Vector SummaryDataPoint'ValueAtQuantile)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SummaryDataPoint "flags" Data.Word.Word32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "flags"
-> (Word32 -> f Word32) -> SummaryDataPoint -> f SummaryDataPoint
fieldOf Proxy# "flags"
_
    = ((Word32 -> f Word32) -> SummaryDataPoint -> f SummaryDataPoint)
-> ((Word32 -> f Word32) -> Word32 -> f Word32)
-> (Word32 -> f Word32)
-> SummaryDataPoint
-> f SummaryDataPoint
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SummaryDataPoint -> Word32)
-> (SummaryDataPoint -> Word32 -> SummaryDataPoint)
-> Lens SummaryDataPoint SummaryDataPoint Word32 Word32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SummaryDataPoint -> Word32
_SummaryDataPoint'flags
           (\ SummaryDataPoint
x__ Word32
y__ -> SummaryDataPoint
x__ {_SummaryDataPoint'flags = y__}))
        (Word32 -> f Word32) -> Word32 -> f Word32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message SummaryDataPoint where
  messageName :: Proxy SummaryDataPoint -> Text
messageName Proxy SummaryDataPoint
_
    = String -> Text
Data.Text.pack String
"opentelemetry.proto.metrics.v1.SummaryDataPoint"
  packedMessageDescriptor :: Proxy SummaryDataPoint -> ByteString
packedMessageDescriptor Proxy SummaryDataPoint
_
    = ByteString
"\n\
      \\DLESummaryDataPoint\DC2G\n\
      \\n\
      \attributes\CAN\a \ETX(\v2'.opentelemetry.proto.common.v1.KeyValueR\n\
      \attributes\DC2/\n\
      \\DC4start_time_unix_nano\CAN\STX \SOH(\ACKR\DC1startTimeUnixNano\DC2$\n\
      \\SOtime_unix_nano\CAN\ETX \SOH(\ACKR\ftimeUnixNano\DC2\DC4\n\
      \\ENQcount\CAN\EOT \SOH(\ACKR\ENQcount\DC2\DLE\n\
      \\ETXsum\CAN\ENQ \SOH(\SOHR\ETXsum\DC2i\n\
      \\SIquantile_values\CAN\ACK \ETX(\v2@.opentelemetry.proto.metrics.v1.SummaryDataPoint.ValueAtQuantileR\SOquantileValues\DC2\DC4\n\
      \\ENQflags\CAN\b \SOH(\rR\ENQflags\SUBC\n\
      \\SIValueAtQuantile\DC2\SUB\n\
      \\bquantile\CAN\SOH \SOH(\SOHR\bquantile\DC2\DC4\n\
      \\ENQvalue\CAN\STX \SOH(\SOHR\ENQvalueJ\EOT\b\SOH\DLE\STX"
  packedFileDescriptor :: Proxy SummaryDataPoint -> ByteString
packedFileDescriptor Proxy SummaryDataPoint
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor SummaryDataPoint)
fieldsByTag
    = let
        attributes__field_descriptor :: FieldDescriptor SummaryDataPoint
attributes__field_descriptor
          = String
-> FieldTypeDescriptor KeyValue
-> FieldAccessor SummaryDataPoint KeyValue
-> FieldDescriptor SummaryDataPoint
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"attributes"
              (MessageOrGroup -> FieldTypeDescriptor KeyValue
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Opentelemetry.Proto.Common.V1.Common.KeyValue)
              (Packing
-> Lens' SummaryDataPoint [KeyValue]
-> FieldAccessor SummaryDataPoint KeyValue
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Unpacked
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"attributes")) ::
              Data.ProtoLens.FieldDescriptor SummaryDataPoint
        startTimeUnixNano__field_descriptor :: FieldDescriptor SummaryDataPoint
startTimeUnixNano__field_descriptor
          = String
-> FieldTypeDescriptor Word64
-> FieldAccessor SummaryDataPoint Word64
-> FieldDescriptor SummaryDataPoint
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"start_time_unix_nano"
              (ScalarField Word64 -> FieldTypeDescriptor Word64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Word64
Data.ProtoLens.Fixed64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64)
              (WireDefault Word64
-> Lens SummaryDataPoint SummaryDataPoint Word64 Word64
-> FieldAccessor SummaryDataPoint Word64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Word64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"startTimeUnixNano")) ::
              Data.ProtoLens.FieldDescriptor SummaryDataPoint
        timeUnixNano__field_descriptor :: FieldDescriptor SummaryDataPoint
timeUnixNano__field_descriptor
          = String
-> FieldTypeDescriptor Word64
-> FieldAccessor SummaryDataPoint Word64
-> FieldDescriptor SummaryDataPoint
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"time_unix_nano"
              (ScalarField Word64 -> FieldTypeDescriptor Word64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Word64
Data.ProtoLens.Fixed64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64)
              (WireDefault Word64
-> Lens SummaryDataPoint SummaryDataPoint Word64 Word64
-> FieldAccessor SummaryDataPoint Word64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Word64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"timeUnixNano")) ::
              Data.ProtoLens.FieldDescriptor SummaryDataPoint
        count__field_descriptor :: FieldDescriptor SummaryDataPoint
count__field_descriptor
          = String
-> FieldTypeDescriptor Word64
-> FieldAccessor SummaryDataPoint Word64
-> FieldDescriptor SummaryDataPoint
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"count"
              (ScalarField Word64 -> FieldTypeDescriptor Word64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Word64
Data.ProtoLens.Fixed64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64)
              (WireDefault Word64
-> Lens SummaryDataPoint SummaryDataPoint Word64 Word64
-> FieldAccessor SummaryDataPoint Word64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Word64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"count")) ::
              Data.ProtoLens.FieldDescriptor SummaryDataPoint
        sum__field_descriptor :: FieldDescriptor SummaryDataPoint
sum__field_descriptor
          = String
-> FieldTypeDescriptor Double
-> FieldAccessor SummaryDataPoint Double
-> FieldDescriptor SummaryDataPoint
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"sum"
              (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 SummaryDataPoint SummaryDataPoint Double Double
-> FieldAccessor SummaryDataPoint 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 (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"sum")) ::
              Data.ProtoLens.FieldDescriptor SummaryDataPoint
        quantileValues__field_descriptor :: FieldDescriptor SummaryDataPoint
quantileValues__field_descriptor
          = String
-> FieldTypeDescriptor SummaryDataPoint'ValueAtQuantile
-> FieldAccessor SummaryDataPoint SummaryDataPoint'ValueAtQuantile
-> FieldDescriptor SummaryDataPoint
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"quantile_values"
              (MessageOrGroup
-> FieldTypeDescriptor SummaryDataPoint'ValueAtQuantile
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor SummaryDataPoint'ValueAtQuantile)
              (Packing
-> Lens' SummaryDataPoint [SummaryDataPoint'ValueAtQuantile]
-> FieldAccessor SummaryDataPoint SummaryDataPoint'ValueAtQuantile
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Unpacked
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"quantileValues")) ::
              Data.ProtoLens.FieldDescriptor SummaryDataPoint
        flags__field_descriptor :: FieldDescriptor SummaryDataPoint
flags__field_descriptor
          = String
-> FieldTypeDescriptor Word32
-> FieldAccessor SummaryDataPoint Word32
-> FieldDescriptor SummaryDataPoint
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"flags"
              (ScalarField Word32 -> FieldTypeDescriptor Word32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Word32
Data.ProtoLens.UInt32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32)
              (WireDefault Word32
-> Lens SummaryDataPoint SummaryDataPoint Word32 Word32
-> FieldAccessor SummaryDataPoint Word32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Word32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"flags")) ::
              Data.ProtoLens.FieldDescriptor SummaryDataPoint
      in
        [(Tag, FieldDescriptor SummaryDataPoint)]
-> Map Tag (FieldDescriptor SummaryDataPoint)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor SummaryDataPoint
attributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor SummaryDataPoint
startTimeUnixNano__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor SummaryDataPoint
timeUnixNano__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor SummaryDataPoint
count__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor SummaryDataPoint
sum__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor SummaryDataPoint
quantileValues__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
8, FieldDescriptor SummaryDataPoint
flags__field_descriptor)]
  unknownFields :: Lens' SummaryDataPoint FieldSet
unknownFields
    = (SummaryDataPoint -> FieldSet)
-> (SummaryDataPoint -> FieldSet -> SummaryDataPoint)
-> Lens' SummaryDataPoint FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        SummaryDataPoint -> FieldSet
_SummaryDataPoint'_unknownFields
        (\ SummaryDataPoint
x__ FieldSet
y__ -> SummaryDataPoint
x__ {_SummaryDataPoint'_unknownFields = y__})
  defMessage :: SummaryDataPoint
defMessage
    = SummaryDataPoint'_constructor
        {_SummaryDataPoint'attributes :: Vector KeyValue
_SummaryDataPoint'attributes = Vector KeyValue
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _SummaryDataPoint'startTimeUnixNano :: Word64
_SummaryDataPoint'startTimeUnixNano = Word64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SummaryDataPoint'timeUnixNano :: Word64
_SummaryDataPoint'timeUnixNano = Word64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SummaryDataPoint'count :: Word64
_SummaryDataPoint'count = Word64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SummaryDataPoint'sum :: Double
_SummaryDataPoint'sum = Double
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SummaryDataPoint'quantileValues :: Vector SummaryDataPoint'ValueAtQuantile
_SummaryDataPoint'quantileValues = Vector SummaryDataPoint'ValueAtQuantile
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _SummaryDataPoint'flags :: Word32
_SummaryDataPoint'flags = Word32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SummaryDataPoint'_unknownFields :: FieldSet
_SummaryDataPoint'_unknownFields = []}
  parseMessage :: Parser SummaryDataPoint
parseMessage
    = let
        loop ::
          SummaryDataPoint
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Opentelemetry.Proto.Common.V1.Common.KeyValue
             -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld SummaryDataPoint'ValueAtQuantile
                -> Data.ProtoLens.Encoding.Bytes.Parser SummaryDataPoint
        loop :: SummaryDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld SummaryDataPoint'ValueAtQuantile
-> Parser SummaryDataPoint
loop SummaryDataPoint
x Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld SummaryDataPoint'ValueAtQuantile
mutable'quantileValues
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do Vector KeyValue
frozen'attributes <- IO (Vector KeyValue) -> Parser (Vector KeyValue)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                             (Growing Vector (PrimState IO) KeyValue -> IO (Vector KeyValue)
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 KeyValue
Growing Vector (PrimState IO) KeyValue
mutable'attributes)
                      Vector SummaryDataPoint'ValueAtQuantile
frozen'quantileValues <- IO (Vector SummaryDataPoint'ValueAtQuantile)
-> Parser (Vector SummaryDataPoint'ValueAtQuantile)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                 (Growing Vector (PrimState IO) SummaryDataPoint'ValueAtQuantile
-> IO (Vector SummaryDataPoint'ValueAtQuantile)
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 SummaryDataPoint'ValueAtQuantile
Growing Vector (PrimState IO) SummaryDataPoint'ValueAtQuantile
mutable'quantileValues)
                      (let missing :: [a]
missing = []
                       in
                         if [Any] -> Bool
forall a. [a] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
                             () -> Parser ()
forall a. a -> Parser a
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
                         else
                             String -> Parser ()
forall a. String -> Parser a
forall (m :: * -> *) a. MonadFail m => String -> m a
Prelude.fail
                               (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
                                  String
"Missing required fields: "
                                  ([String] -> String
forall a. Show a => a -> String
Prelude.show ([String]
forall a. [a]
missing :: [Prelude.String]))))
                      SummaryDataPoint -> Parser SummaryDataPoint
forall a. a -> Parser a
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter SummaryDataPoint SummaryDataPoint FieldSet FieldSet
-> (FieldSet -> FieldSet) -> SummaryDataPoint -> SummaryDataPoint
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                           LensLike' f SummaryDataPoint FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' SummaryDataPoint FieldSet
Setter SummaryDataPoint SummaryDataPoint FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t)
                           (Setter
  SummaryDataPoint
  SummaryDataPoint
  (Vector KeyValue)
  (Vector KeyValue)
-> Vector KeyValue -> SummaryDataPoint -> SummaryDataPoint
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                              (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'attributes") Vector KeyValue
frozen'attributes
                              (Setter
  SummaryDataPoint
  SummaryDataPoint
  (Vector SummaryDataPoint'ValueAtQuantile)
  (Vector SummaryDataPoint'ValueAtQuantile)
-> Vector SummaryDataPoint'ValueAtQuantile
-> SummaryDataPoint
-> SummaryDataPoint
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'quantileValues")
                                 Vector SummaryDataPoint'ValueAtQuantile
frozen'quantileValues SummaryDataPoint
x)))
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        Word64
58
                          -> do !KeyValue
y <- Parser KeyValue -> String -> Parser KeyValue
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Int -> Parser KeyValue -> Parser KeyValue
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 KeyValue
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                        String
"attributes"
                                Growing Vector RealWorld KeyValue
v <- IO (Growing Vector RealWorld KeyValue)
-> Parser (Growing Vector RealWorld KeyValue)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) KeyValue
-> KeyValue -> IO (Growing Vector (PrimState IO) KeyValue)
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 KeyValue
Growing Vector (PrimState IO) KeyValue
mutable'attributes KeyValue
y)
                                SummaryDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld SummaryDataPoint'ValueAtQuantile
-> Parser SummaryDataPoint
loop SummaryDataPoint
x Growing Vector RealWorld KeyValue
v Growing Vector RealWorld SummaryDataPoint'ValueAtQuantile
mutable'quantileValues
                        Word64
17
                          -> do Word64
y <- Parser Word64 -> String -> Parser Word64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       Parser Word64
Data.ProtoLens.Encoding.Bytes.getFixed64
                                       String
"start_time_unix_nano"
                                SummaryDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld SummaryDataPoint'ValueAtQuantile
-> Parser SummaryDataPoint
loop
                                  (Setter SummaryDataPoint SummaryDataPoint Word64 Word64
-> Word64 -> SummaryDataPoint -> SummaryDataPoint
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"startTimeUnixNano") Word64
y SummaryDataPoint
x)
                                  Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld SummaryDataPoint'ValueAtQuantile
mutable'quantileValues
                        Word64
25
                          -> do Word64
y <- Parser Word64 -> String -> Parser Word64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       Parser Word64
Data.ProtoLens.Encoding.Bytes.getFixed64 String
"time_unix_nano"
                                SummaryDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld SummaryDataPoint'ValueAtQuantile
-> Parser SummaryDataPoint
loop
                                  (Setter SummaryDataPoint SummaryDataPoint Word64 Word64
-> Word64 -> SummaryDataPoint -> SummaryDataPoint
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"timeUnixNano") Word64
y SummaryDataPoint
x)
                                  Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld SummaryDataPoint'ValueAtQuantile
mutable'quantileValues
                        Word64
33
                          -> do Word64
y <- Parser Word64 -> String -> Parser Word64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       Parser Word64
Data.ProtoLens.Encoding.Bytes.getFixed64 String
"count"
                                SummaryDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld SummaryDataPoint'ValueAtQuantile
-> Parser SummaryDataPoint
loop
                                  (Setter SummaryDataPoint SummaryDataPoint Word64 Word64
-> Word64 -> SummaryDataPoint -> SummaryDataPoint
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"count") Word64
y SummaryDataPoint
x)
                                  Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld SummaryDataPoint'ValueAtQuantile
mutable'quantileValues
                        Word64
41
                          -> 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 a b. (a -> b) -> Parser a -> Parser b
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)
                                       String
"sum"
                                SummaryDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld SummaryDataPoint'ValueAtQuantile
-> Parser SummaryDataPoint
loop
                                  (Setter SummaryDataPoint SummaryDataPoint Double Double
-> Double -> SummaryDataPoint -> SummaryDataPoint
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"sum") Double
y SummaryDataPoint
x)
                                  Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld SummaryDataPoint'ValueAtQuantile
mutable'quantileValues
                        Word64
50
                          -> do !SummaryDataPoint'ValueAtQuantile
y <- Parser SummaryDataPoint'ValueAtQuantile
-> String -> Parser SummaryDataPoint'ValueAtQuantile
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Int
-> Parser SummaryDataPoint'ValueAtQuantile
-> Parser SummaryDataPoint'ValueAtQuantile
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 SummaryDataPoint'ValueAtQuantile
forall msg. Message msg => Parser msg
Data.ProtoLens.parseMessage)
                                        String
"quantile_values"
                                Growing Vector RealWorld SummaryDataPoint'ValueAtQuantile
v <- IO (Growing Vector RealWorld SummaryDataPoint'ValueAtQuantile)
-> Parser
     (Growing Vector RealWorld SummaryDataPoint'ValueAtQuantile)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) SummaryDataPoint'ValueAtQuantile
-> SummaryDataPoint'ValueAtQuantile
-> IO
     (Growing Vector (PrimState IO) SummaryDataPoint'ValueAtQuantile)
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 SummaryDataPoint'ValueAtQuantile
Growing Vector (PrimState IO) SummaryDataPoint'ValueAtQuantile
mutable'quantileValues SummaryDataPoint'ValueAtQuantile
y)
                                SummaryDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld SummaryDataPoint'ValueAtQuantile
-> Parser SummaryDataPoint
loop SummaryDataPoint
x Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld SummaryDataPoint'ValueAtQuantile
v
                        Word64
64
                          -> do Word32
y <- Parser Word32 -> String -> Parser Word32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Word32) -> Parser Word64 -> Parser Word32
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Word32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"flags"
                                SummaryDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld SummaryDataPoint'ValueAtQuantile
-> Parser SummaryDataPoint
loop
                                  (Setter SummaryDataPoint SummaryDataPoint Word32 Word32
-> Word32 -> SummaryDataPoint -> SummaryDataPoint
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"flags") Word32
y SummaryDataPoint
x)
                                  Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld SummaryDataPoint'ValueAtQuantile
mutable'quantileValues
                        Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                SummaryDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld SummaryDataPoint'ValueAtQuantile
-> Parser SummaryDataPoint
loop
                                  (Setter SummaryDataPoint SummaryDataPoint FieldSet FieldSet
-> (FieldSet -> FieldSet) -> SummaryDataPoint -> SummaryDataPoint
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                     LensLike' f SummaryDataPoint FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' SummaryDataPoint FieldSet
Setter SummaryDataPoint SummaryDataPoint FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) SummaryDataPoint
x)
                                  Growing Vector RealWorld KeyValue
mutable'attributes Growing Vector RealWorld SummaryDataPoint'ValueAtQuantile
mutable'quantileValues
      in
        Parser SummaryDataPoint -> String -> Parser SummaryDataPoint
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do Growing Vector RealWorld KeyValue
mutable'attributes <- IO (Growing Vector RealWorld KeyValue)
-> Parser (Growing Vector RealWorld KeyValue)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                      IO (Growing Vector RealWorld KeyValue)
IO (Growing Vector (PrimState IO) KeyValue)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              Growing Vector RealWorld SummaryDataPoint'ValueAtQuantile
mutable'quantileValues <- IO (Growing Vector RealWorld SummaryDataPoint'ValueAtQuantile)
-> Parser
     (Growing Vector RealWorld SummaryDataPoint'ValueAtQuantile)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                          IO (Growing Vector RealWorld SummaryDataPoint'ValueAtQuantile)
IO (Growing Vector (PrimState IO) SummaryDataPoint'ValueAtQuantile)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              SummaryDataPoint
-> Growing Vector RealWorld KeyValue
-> Growing Vector RealWorld SummaryDataPoint'ValueAtQuantile
-> Parser SummaryDataPoint
loop
                SummaryDataPoint
forall msg. Message msg => msg
Data.ProtoLens.defMessage Growing Vector RealWorld KeyValue
mutable'attributes
                Growing Vector RealWorld SummaryDataPoint'ValueAtQuantile
mutable'quantileValues)
          String
"SummaryDataPoint"
  buildMessage :: SummaryDataPoint -> Builder
buildMessage
    = \ SummaryDataPoint
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             ((KeyValue -> Builder) -> Vector KeyValue -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                (\ KeyValue
_v
                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
58)
                        ((ByteString -> Builder)
-> (KeyValue -> ByteString) -> KeyValue -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                           (\ 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))
                           KeyValue -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage KeyValue
_v))
                (FoldLike
  (Vector KeyValue)
  SummaryDataPoint
  SummaryDataPoint
  (Vector KeyValue)
  (Vector KeyValue)
-> SummaryDataPoint -> Vector KeyValue
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                   (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'attributes") SummaryDataPoint
_x))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   _v :: Word64
_v
                     = FoldLike Word64 SummaryDataPoint SummaryDataPoint Word64 Word64
-> SummaryDataPoint -> Word64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                         (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"startTimeUnixNano") SummaryDataPoint
_x
                 in
                   if Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Word64
_v Word64
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 Word64
17)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putFixed64 Word64
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: Word64
_v
                        = FoldLike Word64 SummaryDataPoint SummaryDataPoint Word64 Word64
-> SummaryDataPoint -> Word64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"timeUnixNano") SummaryDataPoint
_x
                    in
                      if Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Word64
_v Word64
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 Word64
25)
                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putFixed64 Word64
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (let
                         _v :: Word64
_v = FoldLike Word64 SummaryDataPoint SummaryDataPoint Word64 Word64
-> SummaryDataPoint -> Word64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"count") SummaryDataPoint
_x
                       in
                         if Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Word64
_v Word64
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 Word64
33)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putFixed64 Word64
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (let _v :: Double
_v = FoldLike Double SummaryDataPoint SummaryDataPoint Double Double
-> SummaryDataPoint -> Double
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"sum") SummaryDataPoint
_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 Word64
41)
                                  ((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.<>)
                            ((SummaryDataPoint'ValueAtQuantile -> Builder)
-> Vector SummaryDataPoint'ValueAtQuantile -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                               (\ SummaryDataPoint'ValueAtQuantile
_v
                                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
50)
                                       ((ByteString -> Builder)
-> (SummaryDataPoint'ValueAtQuantile -> ByteString)
-> SummaryDataPoint'ValueAtQuantile
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                          (\ 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))
                                          SummaryDataPoint'ValueAtQuantile -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage SummaryDataPoint'ValueAtQuantile
_v))
                               (FoldLike
  (Vector SummaryDataPoint'ValueAtQuantile)
  SummaryDataPoint
  SummaryDataPoint
  (Vector SummaryDataPoint'ValueAtQuantile)
  (Vector SummaryDataPoint'ValueAtQuantile)
-> SummaryDataPoint -> Vector SummaryDataPoint'ValueAtQuantile
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                  (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'quantileValues") SummaryDataPoint
_x))
                            (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (let
                                  _v :: Word32
_v = FoldLike Word32 SummaryDataPoint SummaryDataPoint Word32 Word32
-> SummaryDataPoint -> Word32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"flags") SummaryDataPoint
_x
                                in
                                  if Word32 -> Word32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Word32
_v Word32
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 Word64
64)
                                        ((Word64 -> Builder) -> (Word32 -> Word64) -> Word32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                           Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                           Word32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word32
_v))
                               (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                  (FoldLike
  FieldSet SummaryDataPoint SummaryDataPoint FieldSet FieldSet
-> SummaryDataPoint -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet SummaryDataPoint SummaryDataPoint FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' SummaryDataPoint FieldSet
Data.ProtoLens.unknownFields SummaryDataPoint
_x))))))))
instance Control.DeepSeq.NFData SummaryDataPoint where
  rnf :: SummaryDataPoint -> ()
rnf
    = \ SummaryDataPoint
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (SummaryDataPoint -> FieldSet
_SummaryDataPoint'_unknownFields SummaryDataPoint
x__)
             (Vector KeyValue -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (SummaryDataPoint -> Vector KeyValue
_SummaryDataPoint'attributes SummaryDataPoint
x__)
                (Word64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (SummaryDataPoint -> Word64
_SummaryDataPoint'startTimeUnixNano SummaryDataPoint
x__)
                   (Word64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (SummaryDataPoint -> Word64
_SummaryDataPoint'timeUnixNano SummaryDataPoint
x__)
                      (Word64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (SummaryDataPoint -> Word64
_SummaryDataPoint'count SummaryDataPoint
x__)
                         (Double -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (SummaryDataPoint -> Double
_SummaryDataPoint'sum SummaryDataPoint
x__)
                            (Vector SummaryDataPoint'ValueAtQuantile -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (SummaryDataPoint -> Vector SummaryDataPoint'ValueAtQuantile
_SummaryDataPoint'quantileValues SummaryDataPoint
x__)
                               (Word32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (SummaryDataPoint -> Word32
_SummaryDataPoint'flags SummaryDataPoint
x__) ())))))))
{- | Fields :
     
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.quantile' @:: Lens' SummaryDataPoint'ValueAtQuantile Prelude.Double@
         * 'Proto.Opentelemetry.Proto.Metrics.V1.Metrics_Fields.value' @:: Lens' SummaryDataPoint'ValueAtQuantile Prelude.Double@ -}
data SummaryDataPoint'ValueAtQuantile
  = SummaryDataPoint'ValueAtQuantile'_constructor {SummaryDataPoint'ValueAtQuantile -> Double
_SummaryDataPoint'ValueAtQuantile'quantile :: !Prelude.Double,
                                                   SummaryDataPoint'ValueAtQuantile -> Double
_SummaryDataPoint'ValueAtQuantile'value :: !Prelude.Double,
                                                   SummaryDataPoint'ValueAtQuantile -> FieldSet
_SummaryDataPoint'ValueAtQuantile'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (SummaryDataPoint'ValueAtQuantile
-> SummaryDataPoint'ValueAtQuantile -> Bool
(SummaryDataPoint'ValueAtQuantile
 -> SummaryDataPoint'ValueAtQuantile -> Bool)
-> (SummaryDataPoint'ValueAtQuantile
    -> SummaryDataPoint'ValueAtQuantile -> Bool)
-> Eq SummaryDataPoint'ValueAtQuantile
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: SummaryDataPoint'ValueAtQuantile
-> SummaryDataPoint'ValueAtQuantile -> Bool
== :: SummaryDataPoint'ValueAtQuantile
-> SummaryDataPoint'ValueAtQuantile -> Bool
$c/= :: SummaryDataPoint'ValueAtQuantile
-> SummaryDataPoint'ValueAtQuantile -> Bool
/= :: SummaryDataPoint'ValueAtQuantile
-> SummaryDataPoint'ValueAtQuantile -> Bool
Prelude.Eq, Eq SummaryDataPoint'ValueAtQuantile
Eq SummaryDataPoint'ValueAtQuantile =>
(SummaryDataPoint'ValueAtQuantile
 -> SummaryDataPoint'ValueAtQuantile -> Ordering)
-> (SummaryDataPoint'ValueAtQuantile
    -> SummaryDataPoint'ValueAtQuantile -> Bool)
-> (SummaryDataPoint'ValueAtQuantile
    -> SummaryDataPoint'ValueAtQuantile -> Bool)
-> (SummaryDataPoint'ValueAtQuantile
    -> SummaryDataPoint'ValueAtQuantile -> Bool)
-> (SummaryDataPoint'ValueAtQuantile
    -> SummaryDataPoint'ValueAtQuantile -> Bool)
-> (SummaryDataPoint'ValueAtQuantile
    -> SummaryDataPoint'ValueAtQuantile
    -> SummaryDataPoint'ValueAtQuantile)
-> (SummaryDataPoint'ValueAtQuantile
    -> SummaryDataPoint'ValueAtQuantile
    -> SummaryDataPoint'ValueAtQuantile)
-> Ord SummaryDataPoint'ValueAtQuantile
SummaryDataPoint'ValueAtQuantile
-> SummaryDataPoint'ValueAtQuantile -> Bool
SummaryDataPoint'ValueAtQuantile
-> SummaryDataPoint'ValueAtQuantile -> Ordering
SummaryDataPoint'ValueAtQuantile
-> SummaryDataPoint'ValueAtQuantile
-> SummaryDataPoint'ValueAtQuantile
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
$ccompare :: SummaryDataPoint'ValueAtQuantile
-> SummaryDataPoint'ValueAtQuantile -> Ordering
compare :: SummaryDataPoint'ValueAtQuantile
-> SummaryDataPoint'ValueAtQuantile -> Ordering
$c< :: SummaryDataPoint'ValueAtQuantile
-> SummaryDataPoint'ValueAtQuantile -> Bool
< :: SummaryDataPoint'ValueAtQuantile
-> SummaryDataPoint'ValueAtQuantile -> Bool
$c<= :: SummaryDataPoint'ValueAtQuantile
-> SummaryDataPoint'ValueAtQuantile -> Bool
<= :: SummaryDataPoint'ValueAtQuantile
-> SummaryDataPoint'ValueAtQuantile -> Bool
$c> :: SummaryDataPoint'ValueAtQuantile
-> SummaryDataPoint'ValueAtQuantile -> Bool
> :: SummaryDataPoint'ValueAtQuantile
-> SummaryDataPoint'ValueAtQuantile -> Bool
$c>= :: SummaryDataPoint'ValueAtQuantile
-> SummaryDataPoint'ValueAtQuantile -> Bool
>= :: SummaryDataPoint'ValueAtQuantile
-> SummaryDataPoint'ValueAtQuantile -> Bool
$cmax :: SummaryDataPoint'ValueAtQuantile
-> SummaryDataPoint'ValueAtQuantile
-> SummaryDataPoint'ValueAtQuantile
max :: SummaryDataPoint'ValueAtQuantile
-> SummaryDataPoint'ValueAtQuantile
-> SummaryDataPoint'ValueAtQuantile
$cmin :: SummaryDataPoint'ValueAtQuantile
-> SummaryDataPoint'ValueAtQuantile
-> SummaryDataPoint'ValueAtQuantile
min :: SummaryDataPoint'ValueAtQuantile
-> SummaryDataPoint'ValueAtQuantile
-> SummaryDataPoint'ValueAtQuantile
Prelude.Ord)
instance Prelude.Show SummaryDataPoint'ValueAtQuantile where
  showsPrec :: Int -> SummaryDataPoint'ValueAtQuantile -> ShowS
showsPrec Int
_ SummaryDataPoint'ValueAtQuantile
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (SummaryDataPoint'ValueAtQuantile -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort SummaryDataPoint'ValueAtQuantile
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField SummaryDataPoint'ValueAtQuantile "quantile" Prelude.Double where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "quantile"
-> (Double -> f Double)
-> SummaryDataPoint'ValueAtQuantile
-> f SummaryDataPoint'ValueAtQuantile
fieldOf Proxy# "quantile"
_
    = ((Double -> f Double)
 -> SummaryDataPoint'ValueAtQuantile
 -> f SummaryDataPoint'ValueAtQuantile)
-> ((Double -> f Double) -> Double -> f Double)
-> (Double -> f Double)
-> SummaryDataPoint'ValueAtQuantile
-> f SummaryDataPoint'ValueAtQuantile
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SummaryDataPoint'ValueAtQuantile -> Double)
-> (SummaryDataPoint'ValueAtQuantile
    -> Double -> SummaryDataPoint'ValueAtQuantile)
-> Lens
     SummaryDataPoint'ValueAtQuantile
     SummaryDataPoint'ValueAtQuantile
     Double
     Double
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SummaryDataPoint'ValueAtQuantile -> Double
_SummaryDataPoint'ValueAtQuantile'quantile
           (\ SummaryDataPoint'ValueAtQuantile
x__ Double
y__
              -> SummaryDataPoint'ValueAtQuantile
x__ {_SummaryDataPoint'ValueAtQuantile'quantile = y__}))
        (Double -> f Double) -> Double -> f Double
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SummaryDataPoint'ValueAtQuantile "value" Prelude.Double where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "value"
-> (Double -> f Double)
-> SummaryDataPoint'ValueAtQuantile
-> f SummaryDataPoint'ValueAtQuantile
fieldOf Proxy# "value"
_
    = ((Double -> f Double)
 -> SummaryDataPoint'ValueAtQuantile
 -> f SummaryDataPoint'ValueAtQuantile)
-> ((Double -> f Double) -> Double -> f Double)
-> (Double -> f Double)
-> SummaryDataPoint'ValueAtQuantile
-> f SummaryDataPoint'ValueAtQuantile
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SummaryDataPoint'ValueAtQuantile -> Double)
-> (SummaryDataPoint'ValueAtQuantile
    -> Double -> SummaryDataPoint'ValueAtQuantile)
-> Lens
     SummaryDataPoint'ValueAtQuantile
     SummaryDataPoint'ValueAtQuantile
     Double
     Double
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SummaryDataPoint'ValueAtQuantile -> Double
_SummaryDataPoint'ValueAtQuantile'value
           (\ SummaryDataPoint'ValueAtQuantile
x__ Double
y__ -> SummaryDataPoint'ValueAtQuantile
x__ {_SummaryDataPoint'ValueAtQuantile'value = y__}))
        (Double -> f Double) -> Double -> f Double
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message SummaryDataPoint'ValueAtQuantile where
  messageName :: Proxy SummaryDataPoint'ValueAtQuantile -> Text
messageName Proxy SummaryDataPoint'ValueAtQuantile
_
    = String -> Text
Data.Text.pack
        String
"opentelemetry.proto.metrics.v1.SummaryDataPoint.ValueAtQuantile"
  packedMessageDescriptor :: Proxy SummaryDataPoint'ValueAtQuantile -> ByteString
packedMessageDescriptor Proxy SummaryDataPoint'ValueAtQuantile
_
    = ByteString
"\n\
      \\SIValueAtQuantile\DC2\SUB\n\
      \\bquantile\CAN\SOH \SOH(\SOHR\bquantile\DC2\DC4\n\
      \\ENQvalue\CAN\STX \SOH(\SOHR\ENQvalue"
  packedFileDescriptor :: Proxy SummaryDataPoint'ValueAtQuantile -> ByteString
packedFileDescriptor Proxy SummaryDataPoint'ValueAtQuantile
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor SummaryDataPoint'ValueAtQuantile)
fieldsByTag
    = let
        quantile__field_descriptor :: FieldDescriptor SummaryDataPoint'ValueAtQuantile
quantile__field_descriptor
          = String
-> FieldTypeDescriptor Double
-> FieldAccessor SummaryDataPoint'ValueAtQuantile Double
-> FieldDescriptor SummaryDataPoint'ValueAtQuantile
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"quantile"
              (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
     SummaryDataPoint'ValueAtQuantile
     SummaryDataPoint'ValueAtQuantile
     Double
     Double
-> FieldAccessor SummaryDataPoint'ValueAtQuantile 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 (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"quantile")) ::
              Data.ProtoLens.FieldDescriptor SummaryDataPoint'ValueAtQuantile
        value__field_descriptor :: FieldDescriptor SummaryDataPoint'ValueAtQuantile
value__field_descriptor
          = String
-> FieldTypeDescriptor Double
-> FieldAccessor SummaryDataPoint'ValueAtQuantile Double
-> FieldDescriptor SummaryDataPoint'ValueAtQuantile
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"value"
              (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
     SummaryDataPoint'ValueAtQuantile
     SummaryDataPoint'ValueAtQuantile
     Double
     Double
-> FieldAccessor SummaryDataPoint'ValueAtQuantile 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 (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 SummaryDataPoint'ValueAtQuantile
      in
        [(Tag, FieldDescriptor SummaryDataPoint'ValueAtQuantile)]
-> Map Tag (FieldDescriptor SummaryDataPoint'ValueAtQuantile)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor SummaryDataPoint'ValueAtQuantile
quantile__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor SummaryDataPoint'ValueAtQuantile
value__field_descriptor)]
  unknownFields :: Lens' SummaryDataPoint'ValueAtQuantile FieldSet
unknownFields
    = (SummaryDataPoint'ValueAtQuantile -> FieldSet)
-> (SummaryDataPoint'ValueAtQuantile
    -> FieldSet -> SummaryDataPoint'ValueAtQuantile)
-> Lens' SummaryDataPoint'ValueAtQuantile FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        SummaryDataPoint'ValueAtQuantile -> FieldSet
_SummaryDataPoint'ValueAtQuantile'_unknownFields
        (\ SummaryDataPoint'ValueAtQuantile
x__ FieldSet
y__
           -> SummaryDataPoint'ValueAtQuantile
x__ {_SummaryDataPoint'ValueAtQuantile'_unknownFields = y__})
  defMessage :: SummaryDataPoint'ValueAtQuantile
defMessage
    = SummaryDataPoint'ValueAtQuantile'_constructor
        {_SummaryDataPoint'ValueAtQuantile'quantile :: Double
_SummaryDataPoint'ValueAtQuantile'quantile = Double
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SummaryDataPoint'ValueAtQuantile'value :: Double
_SummaryDataPoint'ValueAtQuantile'value = Double
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SummaryDataPoint'ValueAtQuantile'_unknownFields :: FieldSet
_SummaryDataPoint'ValueAtQuantile'_unknownFields = []}
  parseMessage :: Parser SummaryDataPoint'ValueAtQuantile
parseMessage
    = let
        loop ::
          SummaryDataPoint'ValueAtQuantile
          -> Data.ProtoLens.Encoding.Bytes.Parser SummaryDataPoint'ValueAtQuantile
        loop :: SummaryDataPoint'ValueAtQuantile
-> Parser SummaryDataPoint'ValueAtQuantile
loop SummaryDataPoint'ValueAtQuantile
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 a. [a] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
                             () -> Parser ()
forall a. a -> Parser a
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
                         else
                             String -> Parser ()
forall a. String -> Parser a
forall (m :: * -> *) a. MonadFail m => String -> m a
Prelude.fail
                               (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
                                  String
"Missing required fields: "
                                  ([String] -> String
forall a. Show a => a -> String
Prelude.show ([String]
forall a. [a]
missing :: [Prelude.String]))))
                      SummaryDataPoint'ValueAtQuantile
-> Parser SummaryDataPoint'ValueAtQuantile
forall a. a -> Parser a
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter
  SummaryDataPoint'ValueAtQuantile
  SummaryDataPoint'ValueAtQuantile
  FieldSet
  FieldSet
-> (FieldSet -> FieldSet)
-> SummaryDataPoint'ValueAtQuantile
-> SummaryDataPoint'ValueAtQuantile
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                           LensLike' f SummaryDataPoint'ValueAtQuantile FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' SummaryDataPoint'ValueAtQuantile FieldSet
Setter
  SummaryDataPoint'ValueAtQuantile
  SummaryDataPoint'ValueAtQuantile
  FieldSet
  FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) SummaryDataPoint'ValueAtQuantile
x)
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        Word64
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 a b. (a -> b) -> Parser a -> Parser b
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)
                                       String
"quantile"
                                SummaryDataPoint'ValueAtQuantile
-> Parser SummaryDataPoint'ValueAtQuantile
loop
                                  (Setter
  SummaryDataPoint'ValueAtQuantile
  SummaryDataPoint'ValueAtQuantile
  Double
  Double
-> Double
-> SummaryDataPoint'ValueAtQuantile
-> SummaryDataPoint'ValueAtQuantile
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"quantile") Double
y SummaryDataPoint'ValueAtQuantile
x)
                        Word64
17
                          -> 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 a b. (a -> b) -> Parser a -> Parser b
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)
                                       String
"value"
                                SummaryDataPoint'ValueAtQuantile
-> Parser SummaryDataPoint'ValueAtQuantile
loop (Setter
  SummaryDataPoint'ValueAtQuantile
  SummaryDataPoint'ValueAtQuantile
  Double
  Double
-> Double
-> SummaryDataPoint'ValueAtQuantile
-> SummaryDataPoint'ValueAtQuantile
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value") Double
y SummaryDataPoint'ValueAtQuantile
x)
                        Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                SummaryDataPoint'ValueAtQuantile
-> Parser SummaryDataPoint'ValueAtQuantile
loop
                                  (Setter
  SummaryDataPoint'ValueAtQuantile
  SummaryDataPoint'ValueAtQuantile
  FieldSet
  FieldSet
-> (FieldSet -> FieldSet)
-> SummaryDataPoint'ValueAtQuantile
-> SummaryDataPoint'ValueAtQuantile
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                     LensLike' f SummaryDataPoint'ValueAtQuantile FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' SummaryDataPoint'ValueAtQuantile FieldSet
Setter
  SummaryDataPoint'ValueAtQuantile
  SummaryDataPoint'ValueAtQuantile
  FieldSet
  FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) SummaryDataPoint'ValueAtQuantile
x)
      in
        Parser SummaryDataPoint'ValueAtQuantile
-> String -> Parser SummaryDataPoint'ValueAtQuantile
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do SummaryDataPoint'ValueAtQuantile
-> Parser SummaryDataPoint'ValueAtQuantile
loop SummaryDataPoint'ValueAtQuantile
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"ValueAtQuantile"
  buildMessage :: SummaryDataPoint'ValueAtQuantile -> Builder
buildMessage
    = \ SummaryDataPoint'ValueAtQuantile
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Double
_v = FoldLike
  Double
  SummaryDataPoint'ValueAtQuantile
  SummaryDataPoint'ValueAtQuantile
  Double
  Double
-> SummaryDataPoint'ValueAtQuantile -> Double
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"quantile") SummaryDataPoint'ValueAtQuantile
_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 Word64
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 :: Double
_v = FoldLike
  Double
  SummaryDataPoint'ValueAtQuantile
  SummaryDataPoint'ValueAtQuantile
  Double
  Double
-> SummaryDataPoint'ValueAtQuantile -> Double
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value") SummaryDataPoint'ValueAtQuantile
_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 Word64
17)
                         ((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))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  SummaryDataPoint'ValueAtQuantile
  SummaryDataPoint'ValueAtQuantile
  FieldSet
  FieldSet
-> SummaryDataPoint'ValueAtQuantile -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  SummaryDataPoint'ValueAtQuantile
  SummaryDataPoint'ValueAtQuantile
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' SummaryDataPoint'ValueAtQuantile FieldSet
Data.ProtoLens.unknownFields SummaryDataPoint'ValueAtQuantile
_x)))
instance Control.DeepSeq.NFData SummaryDataPoint'ValueAtQuantile where
  rnf :: SummaryDataPoint'ValueAtQuantile -> ()
rnf
    = \ SummaryDataPoint'ValueAtQuantile
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (SummaryDataPoint'ValueAtQuantile -> FieldSet
_SummaryDataPoint'ValueAtQuantile'_unknownFields SummaryDataPoint'ValueAtQuantile
x__)
             (Double -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (SummaryDataPoint'ValueAtQuantile -> Double
_SummaryDataPoint'ValueAtQuantile'quantile SummaryDataPoint'ValueAtQuantile
x__)
                (Double -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (SummaryDataPoint'ValueAtQuantile -> Double
_SummaryDataPoint'ValueAtQuantile'value SummaryDataPoint'ValueAtQuantile
x__) ()))
packedFileDescriptor :: Data.ByteString.ByteString
packedFileDescriptor :: ByteString
packedFileDescriptor
  = ByteString
"\n\
    \,opentelemetry/proto/metrics/v1/metrics.proto\DC2\RSopentelemetry.proto.metrics.v1\SUB*opentelemetry/proto/common/v1/common.proto\SUB.opentelemetry/proto/resource/v1/resource.proto\"i\n\
    \\vMetricsData\DC2Z\n\
    \\DLEresource_metrics\CAN\SOH \ETX(\v2/.opentelemetry.proto.metrics.v1.ResourceMetricsR\SIresourceMetrics\"\210\SOH\n\
    \\SIResourceMetrics\DC2E\n\
    \\bresource\CAN\SOH \SOH(\v2).opentelemetry.proto.resource.v1.ResourceR\bresource\DC2Q\n\
    \\rscope_metrics\CAN\STX \ETX(\v2,.opentelemetry.proto.metrics.v1.ScopeMetricsR\fscopeMetrics\DC2\GS\n\
    \\n\
    \schema_url\CAN\ETX \SOH(\tR\tschemaUrlJ\ACK\b\232\a\DLE\233\a\"\186\SOH\n\
    \\fScopeMetrics\DC2I\n\
    \\ENQscope\CAN\SOH \SOH(\v23.opentelemetry.proto.common.v1.InstrumentationScopeR\ENQscope\DC2@\n\
    \\ametrics\CAN\STX \ETX(\v2&.opentelemetry.proto.metrics.v1.MetricR\ametrics\DC2\GS\n\
    \\n\
    \schema_url\CAN\ETX \SOH(\tR\tschemaUrl\"\225\ETX\n\
    \\ACKMetric\DC2\DC2\n\
    \\EOTname\CAN\SOH \SOH(\tR\EOTname\DC2 \n\
    \\vdescription\CAN\STX \SOH(\tR\vdescription\DC2\DC2\n\
    \\EOTunit\CAN\ETX \SOH(\tR\EOTunit\DC2=\n\
    \\ENQgauge\CAN\ENQ \SOH(\v2%.opentelemetry.proto.metrics.v1.GaugeH\NULR\ENQgauge\DC27\n\
    \\ETXsum\CAN\a \SOH(\v2#.opentelemetry.proto.metrics.v1.SumH\NULR\ETXsum\DC2I\n\
    \\thistogram\CAN\t \SOH(\v2).opentelemetry.proto.metrics.v1.HistogramH\NULR\thistogram\DC2k\n\
    \\NAKexponential_histogram\CAN\n\
    \ \SOH(\v24.opentelemetry.proto.metrics.v1.ExponentialHistogramH\NULR\DC4exponentialHistogram\DC2C\n\
    \\asummary\CAN\v \SOH(\v2'.opentelemetry.proto.metrics.v1.SummaryH\NULR\asummaryB\ACK\n\
    \\EOTdataJ\EOT\b\EOT\DLE\ENQJ\EOT\b\ACK\DLE\aJ\EOT\b\b\DLE\t\"Y\n\
    \\ENQGauge\DC2P\n\
    \\vdata_points\CAN\SOH \ETX(\v2/.opentelemetry.proto.metrics.v1.NumberDataPointR\n\
    \dataPoints\"\235\SOH\n\
    \\ETXSum\DC2P\n\
    \\vdata_points\CAN\SOH \ETX(\v2/.opentelemetry.proto.metrics.v1.NumberDataPointR\n\
    \dataPoints\DC2o\n\
    \\ETBaggregation_temporality\CAN\STX \SOH(\SO26.opentelemetry.proto.metrics.v1.AggregationTemporalityR\SYNaggregationTemporality\DC2!\n\
    \\fis_monotonic\CAN\ETX \SOH(\bR\visMonotonic\"\209\SOH\n\
    \\tHistogram\DC2S\n\
    \\vdata_points\CAN\SOH \ETX(\v22.opentelemetry.proto.metrics.v1.HistogramDataPointR\n\
    \dataPoints\DC2o\n\
    \\ETBaggregation_temporality\CAN\STX \SOH(\SO26.opentelemetry.proto.metrics.v1.AggregationTemporalityR\SYNaggregationTemporality\"\231\SOH\n\
    \\DC4ExponentialHistogram\DC2^\n\
    \\vdata_points\CAN\SOH \ETX(\v2=.opentelemetry.proto.metrics.v1.ExponentialHistogramDataPointR\n\
    \dataPoints\DC2o\n\
    \\ETBaggregation_temporality\CAN\STX \SOH(\SO26.opentelemetry.proto.metrics.v1.AggregationTemporalityR\SYNaggregationTemporality\"\\\n\
    \\aSummary\DC2Q\n\
    \\vdata_points\CAN\SOH \ETX(\v20.opentelemetry.proto.metrics.v1.SummaryDataPointR\n\
    \dataPoints\"\214\STX\n\
    \\SINumberDataPoint\DC2G\n\
    \\n\
    \attributes\CAN\a \ETX(\v2'.opentelemetry.proto.common.v1.KeyValueR\n\
    \attributes\DC2/\n\
    \\DC4start_time_unix_nano\CAN\STX \SOH(\ACKR\DC1startTimeUnixNano\DC2$\n\
    \\SOtime_unix_nano\CAN\ETX \SOH(\ACKR\ftimeUnixNano\DC2\GS\n\
    \\tas_double\CAN\EOT \SOH(\SOHH\NULR\basDouble\DC2\ETB\n\
    \\ACKas_int\CAN\ACK \SOH(\DLEH\NULR\ENQasInt\DC2F\n\
    \\texemplars\CAN\ENQ \ETX(\v2(.opentelemetry.proto.metrics.v1.ExemplarR\texemplars\DC2\DC4\n\
    \\ENQflags\CAN\b \SOH(\rR\ENQflagsB\a\n\
    \\ENQvalueJ\EOT\b\SOH\DLE\STX\"\217\ETX\n\
    \\DC2HistogramDataPoint\DC2G\n\
    \\n\
    \attributes\CAN\t \ETX(\v2'.opentelemetry.proto.common.v1.KeyValueR\n\
    \attributes\DC2/\n\
    \\DC4start_time_unix_nano\CAN\STX \SOH(\ACKR\DC1startTimeUnixNano\DC2$\n\
    \\SOtime_unix_nano\CAN\ETX \SOH(\ACKR\ftimeUnixNano\DC2\DC4\n\
    \\ENQcount\CAN\EOT \SOH(\ACKR\ENQcount\DC2\NAK\n\
    \\ETXsum\CAN\ENQ \SOH(\SOHH\NULR\ETXsum\136\SOH\SOH\DC2#\n\
    \\rbucket_counts\CAN\ACK \ETX(\ACKR\fbucketCounts\DC2'\n\
    \\SIexplicit_bounds\CAN\a \ETX(\SOHR\SOexplicitBounds\DC2F\n\
    \\texemplars\CAN\b \ETX(\v2(.opentelemetry.proto.metrics.v1.ExemplarR\texemplars\DC2\DC4\n\
    \\ENQflags\CAN\n\
    \ \SOH(\rR\ENQflags\DC2\NAK\n\
    \\ETXmin\CAN\v \SOH(\SOHH\SOHR\ETXmin\136\SOH\SOH\DC2\NAK\n\
    \\ETXmax\CAN\f \SOH(\SOHH\STXR\ETXmax\136\SOH\SOHB\ACK\n\
    \\EOT_sumB\ACK\n\
    \\EOT_minB\ACK\n\
    \\EOT_maxJ\EOT\b\SOH\DLE\STX\"\250\ENQ\n\
    \\GSExponentialHistogramDataPoint\DC2G\n\
    \\n\
    \attributes\CAN\SOH \ETX(\v2'.opentelemetry.proto.common.v1.KeyValueR\n\
    \attributes\DC2/\n\
    \\DC4start_time_unix_nano\CAN\STX \SOH(\ACKR\DC1startTimeUnixNano\DC2$\n\
    \\SOtime_unix_nano\CAN\ETX \SOH(\ACKR\ftimeUnixNano\DC2\DC4\n\
    \\ENQcount\CAN\EOT \SOH(\ACKR\ENQcount\DC2\NAK\n\
    \\ETXsum\CAN\ENQ \SOH(\SOHH\NULR\ETXsum\136\SOH\SOH\DC2\DC4\n\
    \\ENQscale\CAN\ACK \SOH(\DC1R\ENQscale\DC2\GS\n\
    \\n\
    \zero_count\CAN\a \SOH(\ACKR\tzeroCount\DC2a\n\
    \\bpositive\CAN\b \SOH(\v2E.opentelemetry.proto.metrics.v1.ExponentialHistogramDataPoint.BucketsR\bpositive\DC2a\n\
    \\bnegative\CAN\t \SOH(\v2E.opentelemetry.proto.metrics.v1.ExponentialHistogramDataPoint.BucketsR\bnegative\DC2\DC4\n\
    \\ENQflags\CAN\n\
    \ \SOH(\rR\ENQflags\DC2F\n\
    \\texemplars\CAN\v \ETX(\v2(.opentelemetry.proto.metrics.v1.ExemplarR\texemplars\DC2\NAK\n\
    \\ETXmin\CAN\f \SOH(\SOHH\SOHR\ETXmin\136\SOH\SOH\DC2\NAK\n\
    \\ETXmax\CAN\r \SOH(\SOHH\STXR\ETXmax\136\SOH\SOH\DC2%\n\
    \\SOzero_threshold\CAN\SO \SOH(\SOHR\rzeroThreshold\SUBF\n\
    \\aBuckets\DC2\SYN\n\
    \\ACKoffset\CAN\SOH \SOH(\DC1R\ACKoffset\DC2#\n\
    \\rbucket_counts\CAN\STX \ETX(\EOTR\fbucketCountsB\ACK\n\
    \\EOT_sumB\ACK\n\
    \\EOT_minB\ACK\n\
    \\EOT_max\"\166\ETX\n\
    \\DLESummaryDataPoint\DC2G\n\
    \\n\
    \attributes\CAN\a \ETX(\v2'.opentelemetry.proto.common.v1.KeyValueR\n\
    \attributes\DC2/\n\
    \\DC4start_time_unix_nano\CAN\STX \SOH(\ACKR\DC1startTimeUnixNano\DC2$\n\
    \\SOtime_unix_nano\CAN\ETX \SOH(\ACKR\ftimeUnixNano\DC2\DC4\n\
    \\ENQcount\CAN\EOT \SOH(\ACKR\ENQcount\DC2\DLE\n\
    \\ETXsum\CAN\ENQ \SOH(\SOHR\ETXsum\DC2i\n\
    \\SIquantile_values\CAN\ACK \ETX(\v2@.opentelemetry.proto.metrics.v1.SummaryDataPoint.ValueAtQuantileR\SOquantileValues\DC2\DC4\n\
    \\ENQflags\CAN\b \SOH(\rR\ENQflags\SUBC\n\
    \\SIValueAtQuantile\DC2\SUB\n\
    \\bquantile\CAN\SOH \SOH(\SOHR\bquantile\DC2\DC4\n\
    \\ENQvalue\CAN\STX \SOH(\SOHR\ENQvalueJ\EOT\b\SOH\DLE\STX\"\133\STX\n\
    \\bExemplar\DC2X\n\
    \\DC3filtered_attributes\CAN\a \ETX(\v2'.opentelemetry.proto.common.v1.KeyValueR\DC2filteredAttributes\DC2$\n\
    \\SOtime_unix_nano\CAN\STX \SOH(\ACKR\ftimeUnixNano\DC2\GS\n\
    \\tas_double\CAN\ETX \SOH(\SOHH\NULR\basDouble\DC2\ETB\n\
    \\ACKas_int\CAN\ACK \SOH(\DLEH\NULR\ENQasInt\DC2\ETB\n\
    \\aspan_id\CAN\EOT \SOH(\fR\ACKspanId\DC2\EM\n\
    \\btrace_id\CAN\ENQ \SOH(\fR\atraceIdB\a\n\
    \\ENQvalueJ\EOT\b\SOH\DLE\STX*\140\SOH\n\
    \\SYNAggregationTemporality\DC2'\n\
    \#AGGREGATION_TEMPORALITY_UNSPECIFIED\DLE\NUL\DC2!\n\
    \\GSAGGREGATION_TEMPORALITY_DELTA\DLE\SOH\DC2&\n\
    \\"AGGREGATION_TEMPORALITY_CUMULATIVE\DLE\STX*^\n\
    \\SODataPointFlags\DC2\US\n\
    \\ESCDATA_POINT_FLAGS_DO_NOT_USE\DLE\NUL\DC2+\n\
    \'DATA_POINT_FLAGS_NO_RECORDED_VALUE_MASK\DLE\SOHB\DEL\n\
    \!io.opentelemetry.proto.metrics.v1B\fMetricsProtoP\SOHZ)go.opentelemetry.io/proto/otlp/metrics/v1\170\STX\RSOpenTelemetry.Proto.Metrics.V1J\216\232\SOH\n\
    \\a\DC2\ENQ\SO\NUL\163\ENQ\SOH\n\
    \\200\EOT\n\
    \\SOH\f\DC2\ETX\SO\NUL\DC22\189\EOT Copyright 2019, OpenTelemetry Authors\n\
    \\n\
    \ Licensed under the Apache License, Version 2.0 (the \"License\");\n\
    \ you may not use this file except in compliance with the License.\n\
    \ You may obtain a copy of the License at\n\
    \\n\
    \     http://www.apache.org/licenses/LICENSE-2.0\n\
    \\n\
    \ Unless required by applicable law or agreed to in writing, software\n\
    \ distributed under the License is distributed on an \"AS IS\" BASIS,\n\
    \ WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.\n\
    \ See the License for the specific language governing permissions and\n\
    \ limitations under the License.\n\
    \\n\
    \\b\n\
    \\SOH\STX\DC2\ETX\DLE\NUL'\n\
    \\t\n\
    \\STX\ETX\NUL\DC2\ETX\DC2\NUL4\n\
    \\t\n\
    \\STX\ETX\SOH\DC2\ETX\DC3\NUL8\n\
    \\b\n\
    \\SOH\b\DC2\ETX\NAK\NUL;\n\
    \\t\n\
    \\STX\b%\DC2\ETX\NAK\NUL;\n\
    \\b\n\
    \\SOH\b\DC2\ETX\SYN\NUL\"\n\
    \\t\n\
    \\STX\b\n\
    \\DC2\ETX\SYN\NUL\"\n\
    \\b\n\
    \\SOH\b\DC2\ETX\ETB\NUL:\n\
    \\t\n\
    \\STX\b\SOH\DC2\ETX\ETB\NUL:\n\
    \\b\n\
    \\SOH\b\DC2\ETX\CAN\NUL-\n\
    \\t\n\
    \\STX\b\b\DC2\ETX\CAN\NUL-\n\
    \\b\n\
    \\SOH\b\DC2\ETX\EM\NUL@\n\
    \\t\n\
    \\STX\b\v\DC2\ETX\EM\NUL@\n\
    \\209\ETX\n\
    \\STX\EOT\NUL\DC2\EOT%\NUL,\SOH\SUB\196\ETX MetricsData represents the metrics data that can be stored in a persistent\n\
    \ storage, OR can be embedded by other protocols that transfer OTLP metrics\n\
    \ data but do not implement the OTLP protocol.\n\
    \\n\
    \ The main difference between this message and collector protocol is that\n\
    \ in this message there will not be any \"control\" or \"metadata\" specific to\n\
    \ OTLP protocol.\n\
    \\n\
    \ When new fields are added into this message, the OTLP request MUST be updated\n\
    \ as well.\n\
    \\n\
    \\n\
    \\n\
    \\ETX\EOT\NUL\SOH\DC2\ETX%\b\DC3\n\
    \\176\STX\n\
    \\EOT\EOT\NUL\STX\NUL\DC2\ETX+\STX0\SUB\162\STX An array of ResourceMetrics.\n\
    \ For data coming from a single resource this array will typically contain\n\
    \ one element. Intermediary nodes that receive data from multiple origins\n\
    \ typically batch the data before forwarding further and in that case this\n\
    \ array will contain multiple elements.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\NUL\EOT\DC2\ETX+\STX\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\NUL\ACK\DC2\ETX+\v\SUB\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\NUL\SOH\DC2\ETX+\ESC+\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\NUL\ETX\DC2\ETX+./\n\
    \;\n\
    \\STX\EOT\SOH\DC2\EOT/\NUL<\SOH\SUB/ A collection of ScopeMetrics from a Resource.\n\
    \\n\
    \\n\
    \\n\
    \\ETX\EOT\SOH\SOH\DC2\ETX/\b\ETB\n\
    \\n\
    \\n\
    \\ETX\EOT\SOH\t\DC2\ETX0\STX\DLE\n\
    \\v\n\
    \\EOT\EOT\SOH\t\NUL\DC2\ETX0\v\SI\n\
    \\f\n\
    \\ENQ\EOT\SOH\t\NUL\SOH\DC2\ETX0\v\SI\n\
    \\f\n\
    \\ENQ\EOT\SOH\t\NUL\STX\DC2\ETX0\v\SI\n\
    \v\n\
    \\EOT\EOT\SOH\STX\NUL\DC2\ETX4\STX8\SUBi The resource for the metrics in this message.\n\
    \ If this field is not set then no resource info is known.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\NUL\ACK\DC2\ETX4\STX*\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\NUL\SOH\DC2\ETX4+3\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\NUL\ETX\DC2\ETX467\n\
    \@\n\
    \\EOT\EOT\SOH\STX\SOH\DC2\ETX7\STX*\SUB3 A list of metrics that originate from a resource.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\SOH\EOT\DC2\ETX7\STX\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\SOH\ACK\DC2\ETX7\v\ETB\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\SOH\SOH\DC2\ETX7\CAN%\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\SOH\ETX\DC2\ETX7()\n\
    \\175\SOH\n\
    \\EOT\EOT\SOH\STX\STX\DC2\ETX;\STX\CAN\SUB\161\SOH This schema_url applies to the data in the \"resource\" field. It does not apply\n\
    \ to the data in the \"scope_metrics\" field which have their own schema_url field.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\STX\ENQ\DC2\ETX;\STX\b\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\STX\SOH\DC2\ETX;\t\DC3\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\STX\ETX\DC2\ETX;\SYN\ETB\n\
    \;\n\
    \\STX\EOT\STX\DC2\EOT?\NULJ\SOH\SUB/ A collection of Metrics produced by an Scope.\n\
    \\n\
    \\n\
    \\n\
    \\ETX\EOT\STX\SOH\DC2\ETX?\b\DC4\n\
    \\207\SOH\n\
    \\EOT\EOT\STX\STX\NUL\DC2\ETXC\STX?\SUB\193\SOH The instrumentation scope information for the metrics in this message.\n\
    \ Semantically when InstrumentationScope isn't set, it is equivalent with\n\
    \ an empty instrumentation scope name (unknown).\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\NUL\ACK\DC2\ETXC\STX4\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\NUL\SOH\DC2\ETXC5:\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\NUL\ETX\DC2\ETXC=>\n\
    \P\n\
    \\EOT\EOT\STX\STX\SOH\DC2\ETXF\STX\RS\SUBC A list of metrics that originate from an instrumentation library.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\SOH\EOT\DC2\ETXF\STX\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\SOH\ACK\DC2\ETXF\v\DC1\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\SOH\SOH\DC2\ETXF\DC2\EM\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\SOH\ETX\DC2\ETXF\FS\GS\n\
    \M\n\
    \\EOT\EOT\STX\STX\STX\DC2\ETXI\STX\CAN\SUB@ This schema_url applies to all metrics in the \"metrics\" field.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\STX\ENQ\DC2\ETXI\STX\b\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\STX\SOH\DC2\ETXI\t\DC3\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\STX\ETX\DC2\ETXI\SYN\ETB\n\
    \\175\GS\n\
    \\STX\EOT\ETX\DC2\ACK\161\SOH\NUL\184\SOH\SOH\SUB\160\GS Defines a Metric which has one or more timeseries.  The following is a\n\
    \ brief summary of the Metric data model.  For more details, see:\n\
    \\n\
    \   https://github.com/open-telemetry/opentelemetry-specification/blob/main/specification/metrics/data-model.md\n\
    \\n\
    \\n\
    \ The data model and relation between entities is shown in the\n\
    \ diagram below. Here, \"DataPoint\" is the term used to refer to any\n\
    \ one of the specific data point value types, and \"points\" is the term used\n\
    \ to refer to any one of the lists of points contained in the Metric.\n\
    \\n\
    \ - Metric is composed of a metadata and data.\n\
    \ - Metadata part contains a name, description, unit.\n\
    \ - Data is one of the possible types (Sum, Gauge, Histogram, Summary).\n\
    \ - DataPoint contains timestamps, attributes, and one of the possible value type\n\
    \   fields.\n\
    \\n\
    \     Metric\n\
    \  +------------+\n\
    \  |name        |\n\
    \  |description |\n\
    \  |unit        |     +------------------------------------+\n\
    \  |data        |---> |Gauge, Sum, Histogram, Summary, ... |\n\
    \  +------------+     +------------------------------------+\n\
    \\n\
    \    Data [One of Gauge, Sum, Histogram, Summary, ...]\n\
    \  +-----------+\n\
    \  |...        |  // Metadata about the Data.\n\
    \  |points     |--+\n\
    \  +-----------+  |\n\
    \                 |      +---------------------------+\n\
    \                 |      |DataPoint 1                |\n\
    \                 v      |+------+------+   +------+ |\n\
    \              +-----+   ||label |label |...|label | |\n\
    \              |  1  |-->||value1|value2|...|valueN| |\n\
    \              +-----+   |+------+------+   +------+ |\n\
    \              |  .  |   |+-----+                    |\n\
    \              |  .  |   ||value|                    |\n\
    \              |  .  |   |+-----+                    |\n\
    \              |  .  |   +---------------------------+\n\
    \              |  .  |                   .\n\
    \              |  .  |                   .\n\
    \              |  .  |                   .\n\
    \              |  .  |   +---------------------------+\n\
    \              |  .  |   |DataPoint M                |\n\
    \              +-----+   |+------+------+   +------+ |\n\
    \              |  M  |-->||label |label |...|label | |\n\
    \              +-----+   ||value1|value2|...|valueN| |\n\
    \                        |+------+------+   +------+ |\n\
    \                        |+-----+                    |\n\
    \                        ||value|                    |\n\
    \                        |+-----+                    |\n\
    \                        +---------------------------+\n\
    \\n\
    \ Each distinct type of DataPoint represents the output of a specific\n\
    \ aggregation function, the result of applying the DataPoint's\n\
    \ associated function of to one or more measurements.\n\
    \\n\
    \ All DataPoint types have three common fields:\n\
    \ - Attributes includes key-value pairs associated with the data point\n\
    \ - TimeUnixNano is required, set to the end time of the aggregation\n\
    \ - StartTimeUnixNano is optional, but strongly encouraged for DataPoints\n\
    \   having an AggregationTemporality field, as discussed below.\n\
    \\n\
    \ Both TimeUnixNano and StartTimeUnixNano values are expressed as\n\
    \ UNIX Epoch time in nanoseconds since 00:00:00 UTC on 1 January 1970.\n\
    \\n\
    \ # TimeUnixNano\n\
    \\n\
    \ This field is required, having consistent interpretation across\n\
    \ DataPoint types.  TimeUnixNano is the moment corresponding to when\n\
    \ the data point's aggregate value was captured.\n\
    \\n\
    \ Data points with the 0 value for TimeUnixNano SHOULD be rejected\n\
    \ by consumers.\n\
    \\n\
    \ # StartTimeUnixNano\n\
    \\n\
    \ StartTimeUnixNano in general allows detecting when a sequence of\n\
    \ observations is unbroken.  This field indicates to consumers the\n\
    \ start time for points with cumulative and delta\n\
    \ AggregationTemporality, and it should be included whenever possible\n\
    \ to support correct rate calculation.  Although it may be omitted\n\
    \ when the start time is truly unknown, setting StartTimeUnixNano is\n\
    \ strongly encouraged.\n\
    \\n\
    \\v\n\
    \\ETX\EOT\ETX\SOH\DC2\EOT\161\SOH\b\SO\n\
    \\v\n\
    \\ETX\EOT\ETX\t\DC2\EOT\162\SOH\STX\DC3\n\
    \\f\n\
    \\EOT\EOT\ETX\t\NUL\DC2\EOT\162\SOH\v\f\n\
    \\r\n\
    \\ENQ\EOT\ETX\t\NUL\SOH\DC2\EOT\162\SOH\v\f\n\
    \\r\n\
    \\ENQ\EOT\ETX\t\NUL\STX\DC2\EOT\162\SOH\v\f\n\
    \\f\n\
    \\EOT\EOT\ETX\t\SOH\DC2\EOT\162\SOH\SO\SI\n\
    \\r\n\
    \\ENQ\EOT\ETX\t\SOH\SOH\DC2\EOT\162\SOH\SO\SI\n\
    \\r\n\
    \\ENQ\EOT\ETX\t\SOH\STX\DC2\EOT\162\SOH\SO\SI\n\
    \\f\n\
    \\EOT\EOT\ETX\t\STX\DC2\EOT\162\SOH\DC1\DC2\n\
    \\r\n\
    \\ENQ\EOT\ETX\t\STX\SOH\DC2\EOT\162\SOH\DC1\DC2\n\
    \\r\n\
    \\ENQ\EOT\ETX\t\STX\STX\DC2\EOT\162\SOH\DC1\DC2\n\
    \U\n\
    \\EOT\EOT\ETX\STX\NUL\DC2\EOT\165\SOH\STX\DC2\SUBG name of the metric, including its DNS name prefix. It must be unique.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\NUL\ENQ\DC2\EOT\165\SOH\STX\b\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\NUL\SOH\DC2\EOT\165\SOH\t\r\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\NUL\ETX\DC2\EOT\165\SOH\DLE\DC1\n\
    \N\n\
    \\EOT\EOT\ETX\STX\SOH\DC2\EOT\168\SOH\STX\EM\SUB@ description of the metric, which can be used in documentation.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\SOH\ENQ\DC2\EOT\168\SOH\STX\b\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\SOH\SOH\DC2\EOT\168\SOH\t\DC4\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\SOH\ETX\DC2\EOT\168\SOH\ETB\CAN\n\
    \\129\SOH\n\
    \\EOT\EOT\ETX\STX\STX\DC2\EOT\172\SOH\STX\DC2\SUBs unit in which the metric value is reported. Follows the format\n\
    \ described by http://unitsofmeasure.org/ucum.html.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\STX\ENQ\DC2\EOT\172\SOH\STX\b\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\STX\SOH\DC2\EOT\172\SOH\t\r\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\STX\ETX\DC2\EOT\172\SOH\DLE\DC1\n\
    \\215\SOH\n\
    \\EOT\EOT\ETX\b\NUL\DC2\ACK\177\SOH\STX\183\SOH\ETX\SUB\198\SOH Data determines the aggregation type (if any) of the metric, what is the\n\
    \ reported value type for the data points, as well as the relatationship to\n\
    \ the time interval over which they are reported.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ETX\b\NUL\SOH\DC2\EOT\177\SOH\b\f\n\
    \\f\n\
    \\EOT\EOT\ETX\STX\ETX\DC2\EOT\178\SOH\EOT\DC4\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\ETX\ACK\DC2\EOT\178\SOH\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\ETX\SOH\DC2\EOT\178\SOH\n\
    \\SI\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\ETX\ETX\DC2\EOT\178\SOH\DC2\DC3\n\
    \\f\n\
    \\EOT\EOT\ETX\STX\EOT\DC2\EOT\179\SOH\EOT\DLE\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\EOT\ACK\DC2\EOT\179\SOH\EOT\a\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\EOT\SOH\DC2\EOT\179\SOH\b\v\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\EOT\ETX\DC2\EOT\179\SOH\SO\SI\n\
    \\f\n\
    \\EOT\EOT\ETX\STX\ENQ\DC2\EOT\180\SOH\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\ENQ\ACK\DC2\EOT\180\SOH\EOT\r\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\ENQ\SOH\DC2\EOT\180\SOH\SO\ETB\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\ENQ\ETX\DC2\EOT\180\SOH\SUB\ESC\n\
    \\f\n\
    \\EOT\EOT\ETX\STX\ACK\DC2\EOT\181\SOH\EOT4\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\ACK\ACK\DC2\EOT\181\SOH\EOT\CAN\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\ACK\SOH\DC2\EOT\181\SOH\EM.\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\ACK\ETX\DC2\EOT\181\SOH13\n\
    \\f\n\
    \\EOT\EOT\ETX\STX\a\DC2\EOT\182\SOH\EOT\EM\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\a\ACK\DC2\EOT\182\SOH\EOT\v\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\a\SOH\DC2\EOT\182\SOH\f\DC3\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\a\ETX\DC2\EOT\182\SOH\SYN\CAN\n\
    \\247\ETX\n\
    \\STX\EOT\EOT\DC2\ACK\195\SOH\NUL\197\SOH\SOH\SUB\232\ETX Gauge represents the type of a scalar metric that always exports the\n\
    \ \"current value\" for every data point. It should be used for an \"unknown\"\n\
    \ aggregation.\n\
    \\n\
    \ A Gauge does not support different aggregation temporalities. Given the\n\
    \ aggregation is unknown, points cannot be combined using the same\n\
    \ aggregation, regardless of aggregation temporalities. Therefore,\n\
    \ AggregationTemporality is not included. Consequently, this also means\n\
    \ \"StartTimeUnixNano\" is ignored for all data points.\n\
    \\n\
    \\v\n\
    \\ETX\EOT\EOT\SOH\DC2\EOT\195\SOH\b\r\n\
    \\f\n\
    \\EOT\EOT\EOT\STX\NUL\DC2\EOT\196\SOH\STX+\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\NUL\EOT\DC2\EOT\196\SOH\STX\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\NUL\ACK\DC2\EOT\196\SOH\v\SUB\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\NUL\SOH\DC2\EOT\196\SOH\ESC&\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\NUL\ETX\DC2\EOT\196\SOH)*\n\
    \\138\SOH\n\
    \\STX\EOT\ENQ\DC2\ACK\201\SOH\NUL\210\SOH\SOH\SUB| Sum represents the type of a scalar metric that is calculated as a sum of all\n\
    \ reported measurements over a time interval.\n\
    \\n\
    \\v\n\
    \\ETX\EOT\ENQ\SOH\DC2\EOT\201\SOH\b\v\n\
    \\f\n\
    \\EOT\EOT\ENQ\STX\NUL\DC2\EOT\202\SOH\STX+\n\
    \\r\n\
    \\ENQ\EOT\ENQ\STX\NUL\EOT\DC2\EOT\202\SOH\STX\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ENQ\STX\NUL\ACK\DC2\EOT\202\SOH\v\SUB\n\
    \\r\n\
    \\ENQ\EOT\ENQ\STX\NUL\SOH\DC2\EOT\202\SOH\ESC&\n\
    \\r\n\
    \\ENQ\EOT\ENQ\STX\NUL\ETX\DC2\EOT\202\SOH)*\n\
    \\163\SOH\n\
    \\EOT\EOT\ENQ\STX\SOH\DC2\EOT\206\SOH\STX5\SUB\148\SOH aggregation_temporality describes if the aggregator reports delta changes\n\
    \ since last report time, or cumulative changes since a fixed start time.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ENQ\STX\SOH\ACK\DC2\EOT\206\SOH\STX\CAN\n\
    \\r\n\
    \\ENQ\EOT\ENQ\STX\SOH\SOH\DC2\EOT\206\SOH\EM0\n\
    \\r\n\
    \\ENQ\EOT\ENQ\STX\SOH\ETX\DC2\EOT\206\SOH34\n\
    \:\n\
    \\EOT\EOT\ENQ\STX\STX\DC2\EOT\209\SOH\STX\CAN\SUB, If \"true\" means that the sum is monotonic.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ENQ\STX\STX\ENQ\DC2\EOT\209\SOH\STX\ACK\n\
    \\r\n\
    \\ENQ\EOT\ENQ\STX\STX\SOH\DC2\EOT\209\SOH\a\DC3\n\
    \\r\n\
    \\ENQ\EOT\ENQ\STX\STX\ETX\DC2\EOT\209\SOH\SYN\ETB\n\
    \\159\SOH\n\
    \\STX\EOT\ACK\DC2\ACK\214\SOH\NUL\220\SOH\SOH\SUB\144\SOH Histogram represents the type of a metric that is calculated by aggregating\n\
    \ as a Histogram of all reported measurements over a time interval.\n\
    \\n\
    \\v\n\
    \\ETX\EOT\ACK\SOH\DC2\EOT\214\SOH\b\DC1\n\
    \\f\n\
    \\EOT\EOT\ACK\STX\NUL\DC2\EOT\215\SOH\STX.\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\NUL\EOT\DC2\EOT\215\SOH\STX\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\NUL\ACK\DC2\EOT\215\SOH\v\GS\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\NUL\SOH\DC2\EOT\215\SOH\RS)\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\NUL\ETX\DC2\EOT\215\SOH,-\n\
    \\163\SOH\n\
    \\EOT\EOT\ACK\STX\SOH\DC2\EOT\219\SOH\STX5\SUB\148\SOH aggregation_temporality describes if the aggregator reports delta changes\n\
    \ since last report time, or cumulative changes since a fixed start time.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\SOH\ACK\DC2\EOT\219\SOH\STX\CAN\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\SOH\SOH\DC2\EOT\219\SOH\EM0\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\SOH\ETX\DC2\EOT\219\SOH34\n\
    \\188\SOH\n\
    \\STX\EOT\a\DC2\ACK\224\SOH\NUL\230\SOH\SOH\SUB\173\SOH ExponentialHistogram represents the type of a metric that is calculated by aggregating\n\
    \ as a ExponentialHistogram of all reported double measurements over a time interval.\n\
    \\n\
    \\v\n\
    \\ETX\EOT\a\SOH\DC2\EOT\224\SOH\b\FS\n\
    \\f\n\
    \\EOT\EOT\a\STX\NUL\DC2\EOT\225\SOH\STX9\n\
    \\r\n\
    \\ENQ\EOT\a\STX\NUL\EOT\DC2\EOT\225\SOH\STX\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\a\STX\NUL\ACK\DC2\EOT\225\SOH\v(\n\
    \\r\n\
    \\ENQ\EOT\a\STX\NUL\SOH\DC2\EOT\225\SOH)4\n\
    \\r\n\
    \\ENQ\EOT\a\STX\NUL\ETX\DC2\EOT\225\SOH78\n\
    \\163\SOH\n\
    \\EOT\EOT\a\STX\SOH\DC2\EOT\229\SOH\STX5\SUB\148\SOH aggregation_temporality describes if the aggregator reports delta changes\n\
    \ since last report time, or cumulative changes since a fixed start time.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\a\STX\SOH\ACK\DC2\EOT\229\SOH\STX\CAN\n\
    \\r\n\
    \\ENQ\EOT\a\STX\SOH\SOH\DC2\EOT\229\SOH\EM0\n\
    \\r\n\
    \\ENQ\EOT\a\STX\SOH\ETX\DC2\EOT\229\SOH34\n\
    \\229\ETX\n\
    \\STX\EOT\b\DC2\ACK\238\SOH\NUL\240\SOH\SOH\SUB\214\ETX Summary metric data are used to convey quantile summaries,\n\
    \ a Prometheus (see: https://prometheus.io/docs/concepts/metric_types/#summary)\n\
    \ and OpenMetrics (see: https://github.com/OpenObservability/OpenMetrics/blob/4dbf6075567ab43296eed941037c12951faafb92/protos/prometheus.proto#L45)\n\
    \ data type. These data points cannot always be merged in a meaningful way.\n\
    \ While they can be useful in some applications, histogram data points are\n\
    \ recommended for new applications.\n\
    \\n\
    \\v\n\
    \\ETX\EOT\b\SOH\DC2\EOT\238\SOH\b\SI\n\
    \\f\n\
    \\EOT\EOT\b\STX\NUL\DC2\EOT\239\SOH\STX,\n\
    \\r\n\
    \\ENQ\EOT\b\STX\NUL\EOT\DC2\EOT\239\SOH\STX\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\b\STX\NUL\ACK\DC2\EOT\239\SOH\v\ESC\n\
    \\r\n\
    \\ENQ\EOT\b\STX\NUL\SOH\DC2\EOT\239\SOH\FS'\n\
    \\r\n\
    \\ENQ\EOT\b\STX\NUL\ETX\DC2\EOT\239\SOH*+\n\
    \\190\SOH\n\
    \\STX\ENQ\NUL\DC2\ACK\245\SOH\NUL\183\STX\SOH\SUB\175\SOH AggregationTemporality defines how a metric aggregator reports aggregated\n\
    \ values. It describes how those values relate to the time interval over\n\
    \ which they are aggregated.\n\
    \\n\
    \\v\n\
    \\ETX\ENQ\NUL\SOH\DC2\EOT\245\SOH\ENQ\ESC\n\
    \W\n\
    \\EOT\ENQ\NUL\STX\NUL\DC2\EOT\247\SOH\STX*\SUBI UNSPECIFIED is the default AggregationTemporality, it MUST not be used.\n\
    \\n\
    \\r\n\
    \\ENQ\ENQ\NUL\STX\NUL\SOH\DC2\EOT\247\SOH\STX%\n\
    \\r\n\
    \\ENQ\ENQ\NUL\STX\NUL\STX\DC2\EOT\247\SOH()\n\
    \\236\t\n\
    \\EOT\ENQ\NUL\STX\SOH\DC2\EOT\145\STX\STX$\SUB\221\t DELTA is an AggregationTemporality for a metric aggregator which reports\n\
    \ changes since last report time. Successive metrics contain aggregation of\n\
    \ values from continuous and non-overlapping intervals.\n\
    \\n\
    \ The values for a DELTA metric are based only on the time interval\n\
    \ associated with one measurement cycle. There is no dependency on\n\
    \ previous measurements like is the case for CUMULATIVE metrics.\n\
    \\n\
    \ For example, consider a system measuring the number of requests that\n\
    \ it receives and reports the sum of these requests every second as a\n\
    \ DELTA metric:\n\
    \\n\
    \   1. The system starts receiving at time=t_0.\n\
    \   2. A request is received, the system measures 1 request.\n\
    \   3. A request is received, the system measures 1 request.\n\
    \   4. A request is received, the system measures 1 request.\n\
    \   5. The 1 second collection cycle ends. A metric is exported for the\n\
    \      number of requests received over the interval of time t_0 to\n\
    \      t_0+1 with a value of 3.\n\
    \   6. A request is received, the system measures 1 request.\n\
    \   7. A request is received, the system measures 1 request.\n\
    \   8. The 1 second collection cycle ends. A metric is exported for the\n\
    \      number of requests received over the interval of time t_0+1 to\n\
    \      t_0+2 with a value of 2.\n\
    \\n\
    \\r\n\
    \\ENQ\ENQ\NUL\STX\SOH\SOH\DC2\EOT\145\STX\STX\US\n\
    \\r\n\
    \\ENQ\ENQ\NUL\STX\SOH\STX\DC2\EOT\145\STX\"#\n\
    \\147\SI\n\
    \\EOT\ENQ\NUL\STX\STX\DC2\EOT\182\STX\STX)\SUB\132\SI CUMULATIVE is an AggregationTemporality for a metric aggregator which\n\
    \ reports changes since a fixed start time. This means that current values\n\
    \ of a CUMULATIVE metric depend on all previous measurements since the\n\
    \ start time. Because of this, the sender is required to retain this state\n\
    \ in some form. If this state is lost or invalidated, the CUMULATIVE metric\n\
    \ values MUST be reset and a new fixed start time following the last\n\
    \ reported measurement time sent MUST be used.\n\
    \\n\
    \ For example, consider a system measuring the number of requests that\n\
    \ it receives and reports the sum of these requests every second as a\n\
    \ CUMULATIVE metric:\n\
    \\n\
    \   1. The system starts receiving at time=t_0.\n\
    \   2. A request is received, the system measures 1 request.\n\
    \   3. A request is received, the system measures 1 request.\n\
    \   4. A request is received, the system measures 1 request.\n\
    \   5. The 1 second collection cycle ends. A metric is exported for the\n\
    \      number of requests received over the interval of time t_0 to\n\
    \      t_0+1 with a value of 3.\n\
    \   6. A request is received, the system measures 1 request.\n\
    \   7. A request is received, the system measures 1 request.\n\
    \   8. The 1 second collection cycle ends. A metric is exported for the\n\
    \      number of requests received over the interval of time t_0 to\n\
    \      t_0+2 with a value of 5.\n\
    \   9. The system experiences a fault and loses state.\n\
    \   10. The system recovers and resumes receiving at time=t_1.\n\
    \   11. A request is received, the system measures 1 request.\n\
    \   12. The 1 second collection cycle ends. A metric is exported for the\n\
    \      number of requests received over the interval of time t_1 to\n\
    \      t_0+1 with a value of 1.\n\
    \\n\
    \ Note: Even though, when reporting changes since last report time, using\n\
    \ CUMULATIVE is valid, it is not recommended. This may cause problems for\n\
    \ systems that do not use start_time to determine when the aggregation\n\
    \ value was reset (e.g. Prometheus).\n\
    \\n\
    \\r\n\
    \\ENQ\ENQ\NUL\STX\STX\SOH\DC2\EOT\182\STX\STX$\n\
    \\r\n\
    \\ENQ\ENQ\NUL\STX\STX\STX\DC2\EOT\182\STX'(\n\
    \\147\ETX\n\
    \\STX\ENQ\SOH\DC2\ACK\192\STX\NUL\203\STX\SOH\SUB\132\ETX DataPointFlags is defined as a protobuf 'uint32' type and is to be used as a\n\
    \ bit-field representing 32 distinct boolean flags.  Each flag defined in this\n\
    \ enum is a bit-mask.  To test the presence of a single flag in the flags of\n\
    \ a data point, for example, use an expression like:\n\
    \\n\
    \   (point.flags & DATA_POINT_FLAGS_NO_RECORDED_VALUE_MASK) == DATA_POINT_FLAGS_NO_RECORDED_VALUE_MASK\n\
    \\n\
    \\n\
    \\v\n\
    \\ETX\ENQ\SOH\SOH\DC2\EOT\192\STX\ENQ\DC3\n\
    \\150\SOH\n\
    \\EOT\ENQ\SOH\STX\NUL\DC2\EOT\195\STX\STX\"\SUB\135\SOH The zero value for the enum. Should not be used for comparisons.\n\
    \ Instead use bitwise \"and\" with the appropriate mask as shown above.\n\
    \\n\
    \\r\n\
    \\ENQ\ENQ\SOH\STX\NUL\SOH\DC2\EOT\195\STX\STX\GS\n\
    \\r\n\
    \\ENQ\ENQ\SOH\STX\NUL\STX\DC2\EOT\195\STX !\n\
    \\203\SOH\n\
    \\EOT\ENQ\SOH\STX\SOH\DC2\EOT\200\STX\STX.\SUB\188\SOH This DataPoint is valid but has no recorded value.  This value\n\
    \ SHOULD be used to reflect explicitly missing data in a series, as\n\
    \ for an equivalent to the Prometheus \"staleness marker\".\n\
    \\n\
    \\r\n\
    \\ENQ\ENQ\SOH\STX\SOH\SOH\DC2\EOT\200\STX\STX)\n\
    \\r\n\
    \\ENQ\ENQ\SOH\STX\SOH\STX\DC2\EOT\200\STX,-\n\
    \\129\SOH\n\
    \\STX\EOT\t\DC2\ACK\207\STX\NUL\243\STX\SOH\SUBs NumberDataPoint is a single data point in a timeseries that describes the\n\
    \ time-varying scalar value of a metric.\n\
    \\n\
    \\v\n\
    \\ETX\EOT\t\SOH\DC2\EOT\207\STX\b\ETB\n\
    \\v\n\
    \\ETX\EOT\t\t\DC2\EOT\208\STX\STX\r\n\
    \\f\n\
    \\EOT\EOT\t\t\NUL\DC2\EOT\208\STX\v\f\n\
    \\r\n\
    \\ENQ\EOT\t\t\NUL\SOH\DC2\EOT\208\STX\v\f\n\
    \\r\n\
    \\ENQ\EOT\t\t\NUL\STX\DC2\EOT\208\STX\v\f\n\
    \\136\STX\n\
    \\EOT\EOT\t\STX\NUL\DC2\EOT\214\STX\STXA\SUB\249\SOH The set of key/value pairs that uniquely identify the timeseries from\n\
    \ where this point belongs. The list may be empty (may contain 0 elements).\n\
    \ Attribute keys MUST be unique (it is not allowed to have more than one\n\
    \ attribute with the same key).\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\t\STX\NUL\EOT\DC2\EOT\214\STX\STX\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\t\STX\NUL\ACK\DC2\EOT\214\STX\v1\n\
    \\r\n\
    \\ENQ\EOT\t\STX\NUL\SOH\DC2\EOT\214\STX2<\n\
    \\r\n\
    \\ENQ\EOT\t\STX\NUL\ETX\DC2\EOT\214\STX?@\n\
    \\197\SOH\n\
    \\EOT\EOT\t\STX\SOH\DC2\EOT\221\STX\STX#\SUB\182\SOH StartTimeUnixNano is optional but strongly encouraged, see the\n\
    \ the detailed comments above Metric.\n\
    \\n\
    \ Value is UNIX Epoch time in nanoseconds since 00:00:00 UTC on 1 January\n\
    \ 1970.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\t\STX\SOH\ENQ\DC2\EOT\221\STX\STX\t\n\
    \\r\n\
    \\ENQ\EOT\t\STX\SOH\SOH\DC2\EOT\221\STX\n\
    \\RS\n\
    \\r\n\
    \\ENQ\EOT\t\STX\SOH\ETX\DC2\EOT\221\STX!\"\n\
    \\163\SOH\n\
    \\EOT\EOT\t\STX\STX\DC2\EOT\227\STX\STX\GS\SUB\148\SOH TimeUnixNano is required, see the detailed comments above Metric.\n\
    \\n\
    \ Value is UNIX Epoch time in nanoseconds since 00:00:00 UTC on 1 January\n\
    \ 1970.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\t\STX\STX\ENQ\DC2\EOT\227\STX\STX\t\n\
    \\r\n\
    \\ENQ\EOT\t\STX\STX\SOH\DC2\EOT\227\STX\n\
    \\CAN\n\
    \\r\n\
    \\ENQ\EOT\t\STX\STX\ETX\DC2\EOT\227\STX\ESC\FS\n\
    \\141\SOH\n\
    \\EOT\EOT\t\b\NUL\DC2\ACK\231\STX\STX\234\STX\ETX\SUB} The value itself.  A point is considered invalid when one of the recognized\n\
    \ value fields is not present inside this oneof.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\t\b\NUL\SOH\DC2\EOT\231\STX\b\r\n\
    \\f\n\
    \\EOT\EOT\t\STX\ETX\DC2\EOT\232\STX\EOT\EM\n\
    \\r\n\
    \\ENQ\EOT\t\STX\ETX\ENQ\DC2\EOT\232\STX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\t\STX\ETX\SOH\DC2\EOT\232\STX\v\DC4\n\
    \\r\n\
    \\ENQ\EOT\t\STX\ETX\ETX\DC2\EOT\232\STX\ETB\CAN\n\
    \\f\n\
    \\EOT\EOT\t\STX\EOT\DC2\EOT\233\STX\EOT\CAN\n\
    \\r\n\
    \\ENQ\EOT\t\STX\EOT\ENQ\DC2\EOT\233\STX\EOT\f\n\
    \\r\n\
    \\ENQ\EOT\t\STX\EOT\SOH\DC2\EOT\233\STX\r\DC3\n\
    \\r\n\
    \\ENQ\EOT\t\STX\EOT\ETX\DC2\EOT\233\STX\SYN\ETB\n\
    \o\n\
    \\EOT\EOT\t\STX\ENQ\DC2\EOT\238\STX\STX\"\SUBa (Optional) List of exemplars collected from\n\
    \ measurements that were used to form the data point\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\t\STX\ENQ\EOT\DC2\EOT\238\STX\STX\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\t\STX\ENQ\ACK\DC2\EOT\238\STX\v\DC3\n\
    \\r\n\
    \\ENQ\EOT\t\STX\ENQ\SOH\DC2\EOT\238\STX\DC4\GS\n\
    \\r\n\
    \\ENQ\EOT\t\STX\ENQ\ETX\DC2\EOT\238\STX !\n\
    \}\n\
    \\EOT\EOT\t\STX\ACK\DC2\EOT\242\STX\STX\DC3\SUBo Flags that apply to this specific data point.  See DataPointFlags\n\
    \ for the available flags and their meaning.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\t\STX\ACK\ENQ\DC2\EOT\242\STX\STX\b\n\
    \\r\n\
    \\ENQ\EOT\t\STX\ACK\SOH\DC2\EOT\242\STX\t\SO\n\
    \\r\n\
    \\ENQ\EOT\t\STX\ACK\ETX\DC2\EOT\242\STX\DC1\DC2\n\
    \\196\EOT\n\
    \\STX\EOT\n\
    \\DC2\ACK\255\STX\NUL\201\ETX\SOH\SUB\181\EOT HistogramDataPoint is a single data point in a timeseries that describes the\n\
    \ time-varying values of a Histogram. A Histogram contains summary statistics\n\
    \ for a population of values, it may optionally contain the distribution of\n\
    \ those values across a set of buckets.\n\
    \\n\
    \ If the histogram contains the distribution of values, then both\n\
    \ \"explicit_bounds\" and \"bucket counts\" fields must be defined.\n\
    \ If the histogram does not contain the distribution of values, then both\n\
    \ \"explicit_bounds\" and \"bucket_counts\" must be omitted and only \"count\" and\n\
    \ \"sum\" are known.\n\
    \\n\
    \\v\n\
    \\ETX\EOT\n\
    \\SOH\DC2\EOT\255\STX\b\SUB\n\
    \\v\n\
    \\ETX\EOT\n\
    \\t\DC2\EOT\128\ETX\STX\r\n\
    \\f\n\
    \\EOT\EOT\n\
    \\t\NUL\DC2\EOT\128\ETX\v\f\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\t\NUL\SOH\DC2\EOT\128\ETX\v\f\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\t\NUL\STX\DC2\EOT\128\ETX\v\f\n\
    \\136\STX\n\
    \\EOT\EOT\n\
    \\STX\NUL\DC2\EOT\134\ETX\STXA\SUB\249\SOH The set of key/value pairs that uniquely identify the timeseries from\n\
    \ where this point belongs. The list may be empty (may contain 0 elements).\n\
    \ Attribute keys MUST be unique (it is not allowed to have more than one\n\
    \ attribute with the same key).\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\NUL\EOT\DC2\EOT\134\ETX\STX\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\NUL\ACK\DC2\EOT\134\ETX\v1\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\NUL\SOH\DC2\EOT\134\ETX2<\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\NUL\ETX\DC2\EOT\134\ETX?@\n\
    \\197\SOH\n\
    \\EOT\EOT\n\
    \\STX\SOH\DC2\EOT\141\ETX\STX#\SUB\182\SOH StartTimeUnixNano is optional but strongly encouraged, see the\n\
    \ the detailed comments above Metric.\n\
    \\n\
    \ Value is UNIX Epoch time in nanoseconds since 00:00:00 UTC on 1 January\n\
    \ 1970.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\SOH\ENQ\DC2\EOT\141\ETX\STX\t\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\SOH\SOH\DC2\EOT\141\ETX\n\
    \\RS\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\SOH\ETX\DC2\EOT\141\ETX!\"\n\
    \\163\SOH\n\
    \\EOT\EOT\n\
    \\STX\STX\DC2\EOT\147\ETX\STX\GS\SUB\148\SOH TimeUnixNano is required, see the detailed comments above Metric.\n\
    \\n\
    \ Value is UNIX Epoch time in nanoseconds since 00:00:00 UTC on 1 January\n\
    \ 1970.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\STX\ENQ\DC2\EOT\147\ETX\STX\t\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\STX\SOH\DC2\EOT\147\ETX\n\
    \\CAN\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\STX\ETX\DC2\EOT\147\ETX\ESC\FS\n\
    \\186\SOH\n\
    \\EOT\EOT\n\
    \\STX\ETX\DC2\EOT\152\ETX\STX\DC4\SUB\171\SOH count is the number of values in the population. Must be non-negative. This\n\
    \ value must be equal to the sum of the \"count\" fields in buckets if a\n\
    \ histogram is provided.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\ETX\ENQ\DC2\EOT\152\ETX\STX\t\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\ETX\SOH\DC2\EOT\152\ETX\n\
    \\SI\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\ETX\ETX\DC2\EOT\152\ETX\DC2\DC3\n\
    \\245\ETX\n\
    \\EOT\EOT\n\
    \\STX\EOT\DC2\EOT\162\ETX\STX\SUB\SUB\230\ETX sum of the values in the population. If count is zero then this field\n\
    \ must be zero.\n\
    \\n\
    \ Note: Sum should only be filled out when measuring non-negative discrete\n\
    \ events, and is assumed to be monotonic over the values of these events.\n\
    \ Negative events *can* be recorded, but sum should not be filled out when\n\
    \ doing so.  This is specifically to enforce compatibility w/ OpenMetrics,\n\
    \ see: https://github.com/OpenObservability/OpenMetrics/blob/main/specification/OpenMetrics.md#histogram\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\EOT\EOT\DC2\EOT\162\ETX\STX\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\EOT\ENQ\DC2\EOT\162\ETX\v\DC1\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\EOT\SOH\DC2\EOT\162\ETX\DC2\NAK\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\EOT\ETX\DC2\EOT\162\ETX\CAN\EM\n\
    \\178\STX\n\
    \\EOT\EOT\n\
    \\STX\ENQ\DC2\EOT\171\ETX\STX%\SUB\163\STX bucket_counts is an optional field contains the count values of histogram\n\
    \ for each bucket.\n\
    \\n\
    \ The sum of the bucket_counts must equal the value in the count field.\n\
    \\n\
    \ The number of elements in bucket_counts array must be by one greater than\n\
    \ the number of elements in explicit_bounds array.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\ENQ\EOT\DC2\EOT\171\ETX\STX\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\ENQ\ENQ\DC2\EOT\171\ETX\v\DC2\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\ENQ\SOH\DC2\EOT\171\ETX\DC3 \n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\ENQ\ETX\DC2\EOT\171\ETX#$\n\
    \\215\EOT\n\
    \\EOT\EOT\n\
    \\STX\ACK\DC2\EOT\186\ETX\STX&\SUB\200\EOT explicit_bounds specifies buckets with explicitly defined bounds for values.\n\
    \\n\
    \ The boundaries for bucket at index i are:\n\
    \\n\
    \ (-infinity, explicit_bounds[i]] for i == 0\n\
    \ (explicit_bounds[i-1], explicit_bounds[i]] for 0 < i < size(explicit_bounds)\n\
    \ (explicit_bounds[i-1], +infinity) for i == size(explicit_bounds)\n\
    \\n\
    \ The values in the explicit_bounds array must be strictly increasing.\n\
    \\n\
    \ Histogram buckets are inclusive of their upper boundary, except the last\n\
    \ bucket where the boundary is at infinity. This format is intentionally\n\
    \ compatible with the OpenMetrics histogram definition.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\ACK\EOT\DC2\EOT\186\ETX\STX\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\ACK\ENQ\DC2\EOT\186\ETX\v\DC1\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\ACK\SOH\DC2\EOT\186\ETX\DC2!\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\ACK\ETX\DC2\EOT\186\ETX$%\n\
    \o\n\
    \\EOT\EOT\n\
    \\STX\a\DC2\EOT\190\ETX\STX\"\SUBa (Optional) List of exemplars collected from\n\
    \ measurements that were used to form the data point\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\a\EOT\DC2\EOT\190\ETX\STX\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\a\ACK\DC2\EOT\190\ETX\v\DC3\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\a\SOH\DC2\EOT\190\ETX\DC4\GS\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\a\ETX\DC2\EOT\190\ETX !\n\
    \}\n\
    \\EOT\EOT\n\
    \\STX\b\DC2\EOT\194\ETX\STX\DC4\SUBo Flags that apply to this specific data point.  See DataPointFlags\n\
    \ for the available flags and their meaning.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\b\ENQ\DC2\EOT\194\ETX\STX\b\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\b\SOH\DC2\EOT\194\ETX\t\SO\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\b\ETX\DC2\EOT\194\ETX\DC1\DC3\n\
    \E\n\
    \\EOT\EOT\n\
    \\STX\t\DC2\EOT\197\ETX\STX\ESC\SUB7 min is the minimum value over (start_time, end_time].\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\t\EOT\DC2\EOT\197\ETX\STX\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\t\ENQ\DC2\EOT\197\ETX\v\DC1\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\t\SOH\DC2\EOT\197\ETX\DC2\NAK\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\t\ETX\DC2\EOT\197\ETX\CAN\SUB\n\
    \E\n\
    \\EOT\EOT\n\
    \\STX\n\
    \\DC2\EOT\200\ETX\STX\ESC\SUB7 max is the maximum value over (start_time, end_time].\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\n\
    \\EOT\DC2\EOT\200\ETX\STX\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\n\
    \\ENQ\DC2\EOT\200\ETX\v\DC1\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\n\
    \\SOH\DC2\EOT\200\ETX\DC2\NAK\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\n\
    \\ETX\DC2\EOT\200\ETX\CAN\SUB\n\
    \\207\STX\n\
    \\STX\EOT\v\DC2\ACK\208\ETX\NUL\189\EOT\SOH\SUB\192\STX ExponentialHistogramDataPoint is a single data point in a timeseries that describes the\n\
    \ time-varying values of a ExponentialHistogram of double values. A ExponentialHistogram contains\n\
    \ summary statistics for a population of values, it may optionally contain the\n\
    \ distribution of those values across a set of buckets.\n\
    \\n\
    \\n\
    \\v\n\
    \\ETX\EOT\v\SOH\DC2\EOT\208\ETX\b%\n\
    \\136\STX\n\
    \\EOT\EOT\v\STX\NUL\DC2\EOT\213\ETX\STXA\SUB\249\SOH The set of key/value pairs that uniquely identify the timeseries from\n\
    \ where this point belongs. The list may be empty (may contain 0 elements).\n\
    \ Attribute keys MUST be unique (it is not allowed to have more than one\n\
    \ attribute with the same key).\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\NUL\EOT\DC2\EOT\213\ETX\STX\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\NUL\ACK\DC2\EOT\213\ETX\v1\n\
    \\r\n\
    \\ENQ\EOT\v\STX\NUL\SOH\DC2\EOT\213\ETX2<\n\
    \\r\n\
    \\ENQ\EOT\v\STX\NUL\ETX\DC2\EOT\213\ETX?@\n\
    \\197\SOH\n\
    \\EOT\EOT\v\STX\SOH\DC2\EOT\220\ETX\STX#\SUB\182\SOH StartTimeUnixNano is optional but strongly encouraged, see the\n\
    \ the detailed comments above Metric.\n\
    \\n\
    \ Value is UNIX Epoch time in nanoseconds since 00:00:00 UTC on 1 January\n\
    \ 1970.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\SOH\ENQ\DC2\EOT\220\ETX\STX\t\n\
    \\r\n\
    \\ENQ\EOT\v\STX\SOH\SOH\DC2\EOT\220\ETX\n\
    \\RS\n\
    \\r\n\
    \\ENQ\EOT\v\STX\SOH\ETX\DC2\EOT\220\ETX!\"\n\
    \\163\SOH\n\
    \\EOT\EOT\v\STX\STX\DC2\EOT\226\ETX\STX\GS\SUB\148\SOH TimeUnixNano is required, see the detailed comments above Metric.\n\
    \\n\
    \ Value is UNIX Epoch time in nanoseconds since 00:00:00 UTC on 1 January\n\
    \ 1970.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\STX\ENQ\DC2\EOT\226\ETX\STX\t\n\
    \\r\n\
    \\ENQ\EOT\v\STX\STX\SOH\DC2\EOT\226\ETX\n\
    \\CAN\n\
    \\r\n\
    \\ENQ\EOT\v\STX\STX\ETX\DC2\EOT\226\ETX\ESC\FS\n\
    \\221\SOH\n\
    \\EOT\EOT\v\STX\ETX\DC2\EOT\231\ETX\STX\DC4\SUB\206\SOH count is the number of values in the population. Must be\n\
    \ non-negative. This value must be equal to the sum of the \"bucket_counts\"\n\
    \ values in the positive and negative Buckets plus the \"zero_count\" field.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\ETX\ENQ\DC2\EOT\231\ETX\STX\t\n\
    \\r\n\
    \\ENQ\EOT\v\STX\ETX\SOH\DC2\EOT\231\ETX\n\
    \\SI\n\
    \\r\n\
    \\ENQ\EOT\v\STX\ETX\ETX\DC2\EOT\231\ETX\DC2\DC3\n\
    \\245\ETX\n\
    \\EOT\EOT\v\STX\EOT\DC2\EOT\241\ETX\STX\SUB\SUB\230\ETX sum of the values in the population. If count is zero then this field\n\
    \ must be zero.\n\
    \\n\
    \ Note: Sum should only be filled out when measuring non-negative discrete\n\
    \ events, and is assumed to be monotonic over the values of these events.\n\
    \ Negative events *can* be recorded, but sum should not be filled out when\n\
    \ doing so.  This is specifically to enforce compatibility w/ OpenMetrics,\n\
    \ see: https://github.com/OpenObservability/OpenMetrics/blob/main/specification/OpenMetrics.md#histogram\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\EOT\EOT\DC2\EOT\241\ETX\STX\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\EOT\ENQ\DC2\EOT\241\ETX\v\DC1\n\
    \\r\n\
    \\ENQ\EOT\v\STX\EOT\SOH\DC2\EOT\241\ETX\DC2\NAK\n\
    \\r\n\
    \\ENQ\EOT\v\STX\EOT\ETX\DC2\EOT\241\ETX\CAN\EM\n\
    \\226\EOT\n\
    \\EOT\EOT\v\STX\ENQ\DC2\EOT\130\EOT\STX\DC3\SUB\211\EOT scale describes the resolution of the histogram.  Boundaries are\n\
    \ located at powers of the base, where:\n\
    \\n\
    \   base = (2^(2^-scale))\n\
    \\n\
    \ The histogram bucket identified by `index`, a signed integer,\n\
    \ contains values that are greater than (base^index) and\n\
    \ less than or equal to (base^(index+1)).\n\
    \\n\
    \ The positive and negative ranges of the histogram are expressed\n\
    \ separately.  Negative values are mapped by their absolute value\n\
    \ into the negative range using the same scale as the positive range.\n\
    \\n\
    \ scale is not restricted by the protocol, as the permissible\n\
    \ values depend on the range of the data.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\ENQ\ENQ\DC2\EOT\130\EOT\STX\b\n\
    \\r\n\
    \\ENQ\EOT\v\STX\ENQ\SOH\DC2\EOT\130\EOT\t\SO\n\
    \\r\n\
    \\ENQ\EOT\v\STX\ENQ\ETX\DC2\EOT\130\EOT\DC1\DC2\n\
    \\170\ETX\n\
    \\EOT\EOT\v\STX\ACK\DC2\EOT\140\EOT\STX\EM\SUB\155\ETX zero_count is the count of values that are either exactly zero or\n\
    \ within the region considered zero by the instrumentation at the\n\
    \ tolerated degree of precision.  This bucket stores values that\n\
    \ cannot be expressed using the standard exponential formula as\n\
    \ well as values that have been rounded to zero.\n\
    \\n\
    \ Implementations MAY consider the zero bucket to have probability\n\
    \ mass equal to (zero_count / count).\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\ACK\ENQ\DC2\EOT\140\EOT\STX\t\n\
    \\r\n\
    \\ENQ\EOT\v\STX\ACK\SOH\DC2\EOT\140\EOT\n\
    \\DC4\n\
    \\r\n\
    \\ENQ\EOT\v\STX\ACK\ETX\DC2\EOT\140\EOT\ETB\CAN\n\
    \Q\n\
    \\EOT\EOT\v\STX\a\DC2\EOT\143\EOT\STX\ETB\SUBC positive carries the positive range of exponential bucket counts.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\a\ACK\DC2\EOT\143\EOT\STX\t\n\
    \\r\n\
    \\ENQ\EOT\v\STX\a\SOH\DC2\EOT\143\EOT\n\
    \\DC2\n\
    \\r\n\
    \\ENQ\EOT\v\STX\a\ETX\DC2\EOT\143\EOT\NAK\SYN\n\
    \Q\n\
    \\EOT\EOT\v\STX\b\DC2\EOT\146\EOT\STX\ETB\SUBC negative carries the negative range of exponential bucket counts.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\b\ACK\DC2\EOT\146\EOT\STX\t\n\
    \\r\n\
    \\ENQ\EOT\v\STX\b\SOH\DC2\EOT\146\EOT\n\
    \\DC2\n\
    \\r\n\
    \\ENQ\EOT\v\STX\b\ETX\DC2\EOT\146\EOT\NAK\SYN\n\
    \_\n\
    \\EOT\EOT\v\ETX\NUL\DC2\ACK\150\EOT\STX\166\EOT\ETX\SUBO Buckets are a set of bucket counts, encoded in a contiguous array\n\
    \ of counts.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\ETX\NUL\SOH\DC2\EOT\150\EOT\n\
    \\DC1\n\
    \\162\SOH\n\
    \\ACK\EOT\v\ETX\NUL\STX\NUL\DC2\EOT\154\EOT\EOT\SYN\SUB\145\SOH Offset is the bucket index of the first entry in the bucket_counts array.\n\
    \ \n\
    \ Note: This uses a varint encoding as a simple form of compression.\n\
    \\n\
    \\SI\n\
    \\a\EOT\v\ETX\NUL\STX\NUL\ENQ\DC2\EOT\154\EOT\EOT\n\
    \\n\
    \\SI\n\
    \\a\EOT\v\ETX\NUL\STX\NUL\SOH\DC2\EOT\154\EOT\v\DC1\n\
    \\SI\n\
    \\a\EOT\v\ETX\NUL\STX\NUL\ETX\DC2\EOT\154\EOT\DC4\NAK\n\
    \\187\ETX\n\
    \\ACK\EOT\v\ETX\NUL\STX\SOH\DC2\EOT\165\EOT\EOT&\SUB\170\ETX bucket_counts is an array of count values, where bucket_counts[i] carries\n\
    \ the count of the bucket at index (offset+i). bucket_counts[i] is the count\n\
    \ of values greater than base^(offset+i) and less than or equal to\n\
    \ base^(offset+i+1).\n\
    \\n\
    \ Note: By contrast, the explicit HistogramDataPoint uses\n\
    \ fixed64.  This field is expected to have many buckets,\n\
    \ especially zeros, so uint64 has been selected to ensure\n\
    \ varint encoding.\n\
    \\n\
    \\SI\n\
    \\a\EOT\v\ETX\NUL\STX\SOH\EOT\DC2\EOT\165\EOT\EOT\f\n\
    \\SI\n\
    \\a\EOT\v\ETX\NUL\STX\SOH\ENQ\DC2\EOT\165\EOT\r\DC3\n\
    \\SI\n\
    \\a\EOT\v\ETX\NUL\STX\SOH\SOH\DC2\EOT\165\EOT\DC4!\n\
    \\SI\n\
    \\a\EOT\v\ETX\NUL\STX\SOH\ETX\DC2\EOT\165\EOT$%\n\
    \}\n\
    \\EOT\EOT\v\STX\t\DC2\EOT\170\EOT\STX\DC4\SUBo Flags that apply to this specific data point.  See DataPointFlags\n\
    \ for the available flags and their meaning.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\t\ENQ\DC2\EOT\170\EOT\STX\b\n\
    \\r\n\
    \\ENQ\EOT\v\STX\t\SOH\DC2\EOT\170\EOT\t\SO\n\
    \\r\n\
    \\ENQ\EOT\v\STX\t\ETX\DC2\EOT\170\EOT\DC1\DC3\n\
    \o\n\
    \\EOT\EOT\v\STX\n\
    \\DC2\EOT\174\EOT\STX#\SUBa (Optional) List of exemplars collected from\n\
    \ measurements that were used to form the data point\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\n\
    \\EOT\DC2\EOT\174\EOT\STX\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\n\
    \\ACK\DC2\EOT\174\EOT\v\DC3\n\
    \\r\n\
    \\ENQ\EOT\v\STX\n\
    \\SOH\DC2\EOT\174\EOT\DC4\GS\n\
    \\r\n\
    \\ENQ\EOT\v\STX\n\
    \\ETX\DC2\EOT\174\EOT \"\n\
    \E\n\
    \\EOT\EOT\v\STX\v\DC2\EOT\177\EOT\STX\ESC\SUB7 min is the minimum value over (start_time, end_time].\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\v\EOT\DC2\EOT\177\EOT\STX\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\v\ENQ\DC2\EOT\177\EOT\v\DC1\n\
    \\r\n\
    \\ENQ\EOT\v\STX\v\SOH\DC2\EOT\177\EOT\DC2\NAK\n\
    \\r\n\
    \\ENQ\EOT\v\STX\v\ETX\DC2\EOT\177\EOT\CAN\SUB\n\
    \E\n\
    \\EOT\EOT\v\STX\f\DC2\EOT\180\EOT\STX\ESC\SUB7 max is the maximum value over (start_time, end_time].\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\f\EOT\DC2\EOT\180\EOT\STX\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\f\ENQ\DC2\EOT\180\EOT\v\DC1\n\
    \\r\n\
    \\ENQ\EOT\v\STX\f\SOH\DC2\EOT\180\EOT\DC2\NAK\n\
    \\r\n\
    \\ENQ\EOT\v\STX\f\ETX\DC2\EOT\180\EOT\CAN\SUB\n\
    \\229\STX\n\
    \\EOT\EOT\v\STX\r\DC2\EOT\188\EOT\STX\GS\SUB\214\STX ZeroThreshold may be optionally set to convey the width of the zero\n\
    \ region. Where the zero region is defined as the closed interval\n\
    \ [-ZeroThreshold, ZeroThreshold].\n\
    \ When ZeroThreshold is 0, zero count bucket stores values that cannot be\n\
    \ expressed using the standard exponential formula as well as values that\n\
    \ have been rounded to zero.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\r\ENQ\DC2\EOT\188\EOT\STX\b\n\
    \\r\n\
    \\ENQ\EOT\v\STX\r\SOH\DC2\EOT\188\EOT\t\ETB\n\
    \\r\n\
    \\ENQ\EOT\v\STX\r\ETX\DC2\EOT\188\EOT\SUB\FS\n\
    \\132\SOH\n\
    \\STX\EOT\f\DC2\ACK\193\EOT\NUL\254\EOT\SOH\SUBv SummaryDataPoint is a single data point in a timeseries that describes the\n\
    \ time-varying values of a Summary metric.\n\
    \\n\
    \\v\n\
    \\ETX\EOT\f\SOH\DC2\EOT\193\EOT\b\CAN\n\
    \\v\n\
    \\ETX\EOT\f\t\DC2\EOT\194\EOT\STX\r\n\
    \\f\n\
    \\EOT\EOT\f\t\NUL\DC2\EOT\194\EOT\v\f\n\
    \\r\n\
    \\ENQ\EOT\f\t\NUL\SOH\DC2\EOT\194\EOT\v\f\n\
    \\r\n\
    \\ENQ\EOT\f\t\NUL\STX\DC2\EOT\194\EOT\v\f\n\
    \\136\STX\n\
    \\EOT\EOT\f\STX\NUL\DC2\EOT\200\EOT\STXA\SUB\249\SOH The set of key/value pairs that uniquely identify the timeseries from\n\
    \ where this point belongs. The list may be empty (may contain 0 elements).\n\
    \ Attribute keys MUST be unique (it is not allowed to have more than one\n\
    \ attribute with the same key).\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\f\STX\NUL\EOT\DC2\EOT\200\EOT\STX\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\f\STX\NUL\ACK\DC2\EOT\200\EOT\v1\n\
    \\r\n\
    \\ENQ\EOT\f\STX\NUL\SOH\DC2\EOT\200\EOT2<\n\
    \\r\n\
    \\ENQ\EOT\f\STX\NUL\ETX\DC2\EOT\200\EOT?@\n\
    \\197\SOH\n\
    \\EOT\EOT\f\STX\SOH\DC2\EOT\207\EOT\STX#\SUB\182\SOH StartTimeUnixNano is optional but strongly encouraged, see the\n\
    \ the detailed comments above Metric.\n\
    \\n\
    \ Value is UNIX Epoch time in nanoseconds since 00:00:00 UTC on 1 January\n\
    \ 1970.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\f\STX\SOH\ENQ\DC2\EOT\207\EOT\STX\t\n\
    \\r\n\
    \\ENQ\EOT\f\STX\SOH\SOH\DC2\EOT\207\EOT\n\
    \\RS\n\
    \\r\n\
    \\ENQ\EOT\f\STX\SOH\ETX\DC2\EOT\207\EOT!\"\n\
    \\163\SOH\n\
    \\EOT\EOT\f\STX\STX\DC2\EOT\213\EOT\STX\GS\SUB\148\SOH TimeUnixNano is required, see the detailed comments above Metric.\n\
    \\n\
    \ Value is UNIX Epoch time in nanoseconds since 00:00:00 UTC on 1 January\n\
    \ 1970.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\f\STX\STX\ENQ\DC2\EOT\213\EOT\STX\t\n\
    \\r\n\
    \\ENQ\EOT\f\STX\STX\SOH\DC2\EOT\213\EOT\n\
    \\CAN\n\
    \\r\n\
    \\ENQ\EOT\f\STX\STX\ETX\DC2\EOT\213\EOT\ESC\FS\n\
    \V\n\
    \\EOT\EOT\f\STX\ETX\DC2\EOT\216\EOT\STX\DC4\SUBH count is the number of values in the population. Must be non-negative.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\f\STX\ETX\ENQ\DC2\EOT\216\EOT\STX\t\n\
    \\r\n\
    \\ENQ\EOT\f\STX\ETX\SOH\DC2\EOT\216\EOT\n\
    \\SI\n\
    \\r\n\
    \\ENQ\EOT\f\STX\ETX\ETX\DC2\EOT\216\EOT\DC2\DC3\n\
    \\243\ETX\n\
    \\EOT\EOT\f\STX\EOT\DC2\EOT\226\EOT\STX\DC1\SUB\228\ETX sum of the values in the population. If count is zero then this field\n\
    \ must be zero.\n\
    \\n\
    \ Note: Sum should only be filled out when measuring non-negative discrete\n\
    \ events, and is assumed to be monotonic over the values of these events.\n\
    \ Negative events *can* be recorded, but sum should not be filled out when\n\
    \ doing so.  This is specifically to enforce compatibility w/ OpenMetrics,\n\
    \ see: https://github.com/OpenObservability/OpenMetrics/blob/main/specification/OpenMetrics.md#summary\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\f\STX\EOT\ENQ\DC2\EOT\226\EOT\STX\b\n\
    \\r\n\
    \\ENQ\EOT\f\STX\EOT\SOH\DC2\EOT\226\EOT\t\f\n\
    \\r\n\
    \\ENQ\EOT\f\STX\EOT\ETX\DC2\EOT\226\EOT\SI\DLE\n\
    \\253\STX\n\
    \\EOT\EOT\f\ETX\NUL\DC2\ACK\236\EOT\STX\245\EOT\ETX\SUB\236\STX Represents the value at a given quantile of a distribution.\n\
    \\n\
    \ To record Min and Max values following conventions are used:\n\
    \ - The 1.0 quantile is equivalent to the maximum value observed.\n\
    \ - The 0.0 quantile is equivalent to the minimum value observed.\n\
    \\n\
    \ See the following issue for more context:\n\
    \ https://github.com/open-telemetry/opentelemetry-proto/issues/125\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\f\ETX\NUL\SOH\DC2\EOT\236\EOT\n\
    \\EM\n\
    \V\n\
    \\ACK\EOT\f\ETX\NUL\STX\NUL\DC2\EOT\239\EOT\EOT\CAN\SUBF The quantile of a distribution. Must be in the interval\n\
    \ [0.0, 1.0].\n\
    \\n\
    \\SI\n\
    \\a\EOT\f\ETX\NUL\STX\NUL\ENQ\DC2\EOT\239\EOT\EOT\n\
    \\n\
    \\SI\n\
    \\a\EOT\f\ETX\NUL\STX\NUL\SOH\DC2\EOT\239\EOT\v\DC3\n\
    \\SI\n\
    \\a\EOT\f\ETX\NUL\STX\NUL\ETX\DC2\EOT\239\EOT\SYN\ETB\n\
    \l\n\
    \\ACK\EOT\f\ETX\NUL\STX\SOH\DC2\EOT\244\EOT\EOT\NAK\SUB\\ The value at the given quantile of a distribution.\n\
    \\n\
    \ Quantile values must NOT be negative.\n\
    \\n\
    \\SI\n\
    \\a\EOT\f\ETX\NUL\STX\SOH\ENQ\DC2\EOT\244\EOT\EOT\n\
    \\n\
    \\SI\n\
    \\a\EOT\f\ETX\NUL\STX\SOH\SOH\DC2\EOT\244\EOT\v\DLE\n\
    \\SI\n\
    \\a\EOT\f\ETX\NUL\STX\SOH\ETX\DC2\EOT\244\EOT\DC3\DC4\n\
    \\167\SOH\n\
    \\EOT\EOT\f\STX\ENQ\DC2\EOT\249\EOT\STX/\SUB\152\SOH (Optional) list of values at different quantiles of the distribution calculated\n\
    \ from the current snapshot. The quantiles must be strictly increasing.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\f\STX\ENQ\EOT\DC2\EOT\249\EOT\STX\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\f\STX\ENQ\ACK\DC2\EOT\249\EOT\v\SUB\n\
    \\r\n\
    \\ENQ\EOT\f\STX\ENQ\SOH\DC2\EOT\249\EOT\ESC*\n\
    \\r\n\
    \\ENQ\EOT\f\STX\ENQ\ETX\DC2\EOT\249\EOT-.\n\
    \}\n\
    \\EOT\EOT\f\STX\ACK\DC2\EOT\253\EOT\STX\DC3\SUBo Flags that apply to this specific data point.  See DataPointFlags\n\
    \ for the available flags and their meaning.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\f\STX\ACK\ENQ\DC2\EOT\253\EOT\STX\b\n\
    \\r\n\
    \\ENQ\EOT\f\STX\ACK\SOH\DC2\EOT\253\EOT\t\SO\n\
    \\r\n\
    \\ENQ\EOT\f\STX\ACK\ETX\DC2\EOT\253\EOT\DC1\DC2\n\
    \\135\STX\n\
    \\STX\EOT\r\DC2\ACK\132\ENQ\NUL\163\ENQ\SOH\SUB\248\SOH A representation of an exemplar, which is a sample input measurement.\n\
    \ Exemplars also hold information about the environment when the measurement\n\
    \ was recorded, for example the span and trace ID of the active span when the\n\
    \ exemplar was recorded.\n\
    \\n\
    \\v\n\
    \\ETX\EOT\r\SOH\DC2\EOT\132\ENQ\b\DLE\n\
    \\v\n\
    \\ETX\EOT\r\t\DC2\EOT\133\ENQ\STX\r\n\
    \\f\n\
    \\EOT\EOT\r\t\NUL\DC2\EOT\133\ENQ\v\f\n\
    \\r\n\
    \\ENQ\EOT\r\t\NUL\SOH\DC2\EOT\133\ENQ\v\f\n\
    \\r\n\
    \\ENQ\EOT\r\t\NUL\STX\DC2\EOT\133\ENQ\v\f\n\
    \\217\SOH\n\
    \\EOT\EOT\r\STX\NUL\DC2\EOT\138\ENQ\STXJ\SUB\202\SOH The set of key/value pairs that were filtered out by the aggregator, but\n\
    \ recorded alongside the original measurement. Only key/value pairs that were\n\
    \ filtered out by the aggregator should be included\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\r\STX\NUL\EOT\DC2\EOT\138\ENQ\STX\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\r\STX\NUL\ACK\DC2\EOT\138\ENQ\v1\n\
    \\r\n\
    \\ENQ\EOT\r\STX\NUL\SOH\DC2\EOT\138\ENQ2E\n\
    \\r\n\
    \\ENQ\EOT\r\STX\NUL\ETX\DC2\EOT\138\ENQHI\n\
    \\162\SOH\n\
    \\EOT\EOT\r\STX\SOH\DC2\EOT\144\ENQ\STX\GS\SUB\147\SOH time_unix_nano is the exact time when this exemplar was recorded\n\
    \\n\
    \ Value is UNIX Epoch time in nanoseconds since 00:00:00 UTC on 1 January\n\
    \ 1970.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\r\STX\SOH\ENQ\DC2\EOT\144\ENQ\STX\t\n\
    \\r\n\
    \\ENQ\EOT\r\STX\SOH\SOH\DC2\EOT\144\ENQ\n\
    \\CAN\n\
    \\r\n\
    \\ENQ\EOT\r\STX\SOH\ETX\DC2\EOT\144\ENQ\ESC\FS\n\
    \\176\SOH\n\
    \\EOT\EOT\r\b\NUL\DC2\ACK\149\ENQ\STX\152\ENQ\ETX\SUB\159\SOH The value of the measurement that was recorded. An exemplar is\n\
    \ considered invalid when one of the recognized value fields is not present\n\
    \ inside this oneof.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\r\b\NUL\SOH\DC2\EOT\149\ENQ\b\r\n\
    \\f\n\
    \\EOT\EOT\r\STX\STX\DC2\EOT\150\ENQ\EOT\EM\n\
    \\r\n\
    \\ENQ\EOT\r\STX\STX\ENQ\DC2\EOT\150\ENQ\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\r\STX\STX\SOH\DC2\EOT\150\ENQ\v\DC4\n\
    \\r\n\
    \\ENQ\EOT\r\STX\STX\ETX\DC2\EOT\150\ENQ\ETB\CAN\n\
    \\f\n\
    \\EOT\EOT\r\STX\ETX\DC2\EOT\151\ENQ\EOT\CAN\n\
    \\r\n\
    \\ENQ\EOT\r\STX\ETX\ENQ\DC2\EOT\151\ENQ\EOT\f\n\
    \\r\n\
    \\ENQ\EOT\r\STX\ETX\SOH\DC2\EOT\151\ENQ\r\DC3\n\
    \\r\n\
    \\ENQ\EOT\r\STX\ETX\ETX\DC2\EOT\151\ENQ\SYN\ETB\n\
    \\165\SOH\n\
    \\EOT\EOT\r\STX\EOT\DC2\EOT\157\ENQ\STX\DC4\SUB\150\SOH (Optional) Span ID of the exemplar trace.\n\
    \ span_id may be missing if the measurement is not recorded inside a trace\n\
    \ or if the trace is not sampled.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\r\STX\EOT\ENQ\DC2\EOT\157\ENQ\STX\a\n\
    \\r\n\
    \\ENQ\EOT\r\STX\EOT\SOH\DC2\EOT\157\ENQ\b\SI\n\
    \\r\n\
    \\ENQ\EOT\r\STX\EOT\ETX\DC2\EOT\157\ENQ\DC2\DC3\n\
    \\167\SOH\n\
    \\EOT\EOT\r\STX\ENQ\DC2\EOT\162\ENQ\STX\NAK\SUB\152\SOH (Optional) Trace ID of the exemplar trace.\n\
    \ trace_id may be missing if the measurement is not recorded inside a trace\n\
    \ or if the trace is not sampled.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\r\STX\ENQ\ENQ\DC2\EOT\162\ENQ\STX\a\n\
    \\r\n\
    \\ENQ\EOT\r\STX\ENQ\SOH\DC2\EOT\162\ENQ\b\DLE\n\
    \\r\n\
    \\ENQ\EOT\r\STX\ENQ\ETX\DC2\EOT\162\ENQ\DC3\DC4b\ACKproto3"