diff --git a/Proto/Utxorpc/V1alpha/Cardano/Cardano.hs b/Proto/Utxorpc/V1alpha/Cardano/Cardano.hs --- a/Proto/Utxorpc/V1alpha/Cardano/Cardano.hs +++ b/Proto/Utxorpc/V1alpha/Cardano/Cardano.hs @@ -10944,9581 +10944,9640 @@ * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'payload' @:: Lens' Redeemer (Prelude.Maybe PlutusData)@ * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.index' @:: Lens' Redeemer Data.Word.Word32@ * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.exUnits' @:: Lens' Redeemer ExUnits@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'exUnits' @:: Lens' Redeemer (Prelude.Maybe ExUnits)@ -} -data Redeemer - = Redeemer'_constructor {_Redeemer'purpose :: !RedeemerPurpose, - _Redeemer'payload :: !(Prelude.Maybe PlutusData), - _Redeemer'index :: !Data.Word.Word32, - _Redeemer'exUnits :: !(Prelude.Maybe ExUnits), - _Redeemer'_unknownFields :: !Data.ProtoLens.FieldSet} - deriving stock (Prelude.Eq, Prelude.Ord) -instance Prelude.Show Redeemer where - showsPrec _ __x __s - = Prelude.showChar - '{' - (Prelude.showString - (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) -instance Data.ProtoLens.Field.HasField Redeemer "purpose" RedeemerPurpose where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Redeemer'purpose (\ x__ y__ -> x__ {_Redeemer'purpose = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField Redeemer "payload" PlutusData where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Redeemer'payload (\ x__ y__ -> x__ {_Redeemer'payload = y__})) - (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) -instance Data.ProtoLens.Field.HasField Redeemer "maybe'payload" (Prelude.Maybe PlutusData) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Redeemer'payload (\ x__ y__ -> x__ {_Redeemer'payload = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField Redeemer "index" Data.Word.Word32 where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Redeemer'index (\ x__ y__ -> x__ {_Redeemer'index = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField Redeemer "exUnits" ExUnits where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Redeemer'exUnits (\ x__ y__ -> x__ {_Redeemer'exUnits = y__})) - (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) -instance Data.ProtoLens.Field.HasField Redeemer "maybe'exUnits" (Prelude.Maybe ExUnits) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Redeemer'exUnits (\ x__ y__ -> x__ {_Redeemer'exUnits = y__})) - Prelude.id -instance Data.ProtoLens.Message Redeemer where - messageName _ = Data.Text.pack "utxorpc.v1alpha.cardano.Redeemer" - packedMessageDescriptor _ - = "\n\ - \\bRedeemer\DC2B\n\ - \\apurpose\CAN\SOH \SOH(\SO2(.utxorpc.v1alpha.cardano.RedeemerPurposeR\apurpose\DC2=\n\ - \\apayload\CAN\STX \SOH(\v2#.utxorpc.v1alpha.cardano.PlutusDataR\apayload\DC2\DC4\n\ - \\ENQindex\CAN\ETX \SOH(\rR\ENQindex\DC2;\n\ - \\bex_units\CAN\EOT \SOH(\v2 .utxorpc.v1alpha.cardano.ExUnitsR\aexUnits" - packedFileDescriptor _ = packedFileDescriptor - fieldsByTag - = let - purpose__field_descriptor - = Data.ProtoLens.FieldDescriptor - "purpose" - (Data.ProtoLens.ScalarField Data.ProtoLens.EnumField :: - Data.ProtoLens.FieldTypeDescriptor RedeemerPurpose) - (Data.ProtoLens.PlainField - Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"purpose")) :: - Data.ProtoLens.FieldDescriptor Redeemer - payload__field_descriptor - = Data.ProtoLens.FieldDescriptor - "payload" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor PlutusData) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'payload")) :: - Data.ProtoLens.FieldDescriptor Redeemer - index__field_descriptor - = Data.ProtoLens.FieldDescriptor - "index" - (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: - Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) - (Data.ProtoLens.PlainField - Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"index")) :: - Data.ProtoLens.FieldDescriptor Redeemer - exUnits__field_descriptor - = Data.ProtoLens.FieldDescriptor - "ex_units" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor ExUnits) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'exUnits")) :: - Data.ProtoLens.FieldDescriptor Redeemer - in - Data.Map.fromList - [(Data.ProtoLens.Tag 1, purpose__field_descriptor), - (Data.ProtoLens.Tag 2, payload__field_descriptor), - (Data.ProtoLens.Tag 3, index__field_descriptor), - (Data.ProtoLens.Tag 4, exUnits__field_descriptor)] - unknownFields - = Lens.Family2.Unchecked.lens - _Redeemer'_unknownFields - (\ x__ y__ -> x__ {_Redeemer'_unknownFields = y__}) - defMessage - = Redeemer'_constructor - {_Redeemer'purpose = Data.ProtoLens.fieldDefault, - _Redeemer'payload = Prelude.Nothing, - _Redeemer'index = Data.ProtoLens.fieldDefault, - _Redeemer'exUnits = Prelude.Nothing, _Redeemer'_unknownFields = []} - parseMessage - = let - loop :: Redeemer -> Data.ProtoLens.Encoding.Bytes.Parser Redeemer - loop x - = do end <- Data.ProtoLens.Encoding.Bytes.atEnd - if end then - do (let missing = [] - in - if Prelude.null missing then - Prelude.return () - else - Prelude.fail - ((Prelude.++) - "Missing required fields: " - (Prelude.show (missing :: [Prelude.String])))) - Prelude.return - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) - else - do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt - case tag of - 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (Prelude.fmap - Prelude.toEnum - (Prelude.fmap - Prelude.fromIntegral - Data.ProtoLens.Encoding.Bytes.getVarInt)) - "purpose" - loop (Lens.Family2.set (Data.ProtoLens.Field.field @"purpose") y x) - 18 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) - "payload" - loop (Lens.Family2.set (Data.ProtoLens.Field.field @"payload") y x) - 24 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (Prelude.fmap - Prelude.fromIntegral - Data.ProtoLens.Encoding.Bytes.getVarInt) - "index" - loop (Lens.Family2.set (Data.ProtoLens.Field.field @"index") y x) - 34 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) - "ex_units" - loop (Lens.Family2.set (Data.ProtoLens.Field.field @"exUnits") y x) - wire - -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire - wire - loop - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) - in - (Data.ProtoLens.Encoding.Bytes.) - (do loop Data.ProtoLens.defMessage) "Redeemer" - buildMessage - = \ _x - -> (Data.Monoid.<>) - (let - _v = Lens.Family2.view (Data.ProtoLens.Field.field @"purpose") _x - in - if (Prelude.==) _v Data.ProtoLens.fieldDefault then - Data.Monoid.mempty - else - (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 8) - ((Prelude..) - ((Prelude..) - Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) - Prelude.fromEnum _v)) - ((Data.Monoid.<>) - (case - Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'payload") _x - of - Prelude.Nothing -> Data.Monoid.mempty - (Prelude.Just _v) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 18) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - ((Data.Monoid.<>) - (let - _v = Lens.Family2.view (Data.ProtoLens.Field.field @"index") _x - in - if (Prelude.==) _v Data.ProtoLens.fieldDefault then - Data.Monoid.mempty - else - (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 24) - ((Prelude..) - Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) - ((Data.Monoid.<>) - (case - Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'exUnits") _x - of - Prelude.Nothing -> Data.Monoid.mempty - (Prelude.Just _v) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 34) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - (Data.ProtoLens.Encoding.Wire.buildFieldSet - (Lens.Family2.view Data.ProtoLens.unknownFields _x))))) -instance Control.DeepSeq.NFData Redeemer where - rnf - = \ x__ - -> Control.DeepSeq.deepseq - (_Redeemer'_unknownFields x__) - (Control.DeepSeq.deepseq - (_Redeemer'purpose x__) - (Control.DeepSeq.deepseq - (_Redeemer'payload x__) - (Control.DeepSeq.deepseq - (_Redeemer'index x__) - (Control.DeepSeq.deepseq (_Redeemer'exUnits x__) ())))) -newtype RedeemerPurpose'UnrecognizedValue - = RedeemerPurpose'UnrecognizedValue Data.Int.Int32 - deriving stock (Prelude.Eq, Prelude.Ord, Prelude.Show) -data RedeemerPurpose - = REDEEMER_PURPOSE_UNSPECIFIED | - REDEEMER_PURPOSE_SPEND | - REDEEMER_PURPOSE_MINT | - REDEEMER_PURPOSE_CERT | - REDEEMER_PURPOSE_REWARD | - REDEEMER_PURPOSE_VOTE | - REDEEMER_PURPOSE_PROPOSE | - RedeemerPurpose'Unrecognized !RedeemerPurpose'UnrecognizedValue - deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) -instance Data.ProtoLens.MessageEnum RedeemerPurpose where - maybeToEnum 0 = Prelude.Just REDEEMER_PURPOSE_UNSPECIFIED - maybeToEnum 1 = Prelude.Just REDEEMER_PURPOSE_SPEND - maybeToEnum 2 = Prelude.Just REDEEMER_PURPOSE_MINT - maybeToEnum 3 = Prelude.Just REDEEMER_PURPOSE_CERT - maybeToEnum 4 = Prelude.Just REDEEMER_PURPOSE_REWARD - maybeToEnum 5 = Prelude.Just REDEEMER_PURPOSE_VOTE - maybeToEnum 6 = Prelude.Just REDEEMER_PURPOSE_PROPOSE - maybeToEnum k - = Prelude.Just - (RedeemerPurpose'Unrecognized - (RedeemerPurpose'UnrecognizedValue (Prelude.fromIntegral k))) - showEnum REDEEMER_PURPOSE_UNSPECIFIED - = "REDEEMER_PURPOSE_UNSPECIFIED" - showEnum REDEEMER_PURPOSE_SPEND = "REDEEMER_PURPOSE_SPEND" - showEnum REDEEMER_PURPOSE_MINT = "REDEEMER_PURPOSE_MINT" - showEnum REDEEMER_PURPOSE_CERT = "REDEEMER_PURPOSE_CERT" - showEnum REDEEMER_PURPOSE_REWARD = "REDEEMER_PURPOSE_REWARD" - showEnum REDEEMER_PURPOSE_VOTE = "REDEEMER_PURPOSE_VOTE" - showEnum REDEEMER_PURPOSE_PROPOSE = "REDEEMER_PURPOSE_PROPOSE" - showEnum - (RedeemerPurpose'Unrecognized (RedeemerPurpose'UnrecognizedValue k)) - = Prelude.show k - readEnum k - | (Prelude.==) k "REDEEMER_PURPOSE_UNSPECIFIED" - = Prelude.Just REDEEMER_PURPOSE_UNSPECIFIED - | (Prelude.==) k "REDEEMER_PURPOSE_SPEND" - = Prelude.Just REDEEMER_PURPOSE_SPEND - | (Prelude.==) k "REDEEMER_PURPOSE_MINT" - = Prelude.Just REDEEMER_PURPOSE_MINT - | (Prelude.==) k "REDEEMER_PURPOSE_CERT" - = Prelude.Just REDEEMER_PURPOSE_CERT - | (Prelude.==) k "REDEEMER_PURPOSE_REWARD" - = Prelude.Just REDEEMER_PURPOSE_REWARD - | (Prelude.==) k "REDEEMER_PURPOSE_VOTE" - = Prelude.Just REDEEMER_PURPOSE_VOTE - | (Prelude.==) k "REDEEMER_PURPOSE_PROPOSE" - = Prelude.Just REDEEMER_PURPOSE_PROPOSE - | Prelude.otherwise - = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum -instance Prelude.Bounded RedeemerPurpose where - minBound = REDEEMER_PURPOSE_UNSPECIFIED - maxBound = REDEEMER_PURPOSE_PROPOSE -instance Prelude.Enum RedeemerPurpose where - toEnum k__ - = Prelude.maybe - (Prelude.error - ((Prelude.++) - "toEnum: unknown value for enum RedeemerPurpose: " - (Prelude.show k__))) - Prelude.id (Data.ProtoLens.maybeToEnum k__) - fromEnum REDEEMER_PURPOSE_UNSPECIFIED = 0 - fromEnum REDEEMER_PURPOSE_SPEND = 1 - fromEnum REDEEMER_PURPOSE_MINT = 2 - fromEnum REDEEMER_PURPOSE_CERT = 3 - fromEnum REDEEMER_PURPOSE_REWARD = 4 - fromEnum REDEEMER_PURPOSE_VOTE = 5 - fromEnum REDEEMER_PURPOSE_PROPOSE = 6 - fromEnum - (RedeemerPurpose'Unrecognized (RedeemerPurpose'UnrecognizedValue k)) - = Prelude.fromIntegral k - succ REDEEMER_PURPOSE_PROPOSE - = Prelude.error - "RedeemerPurpose.succ: bad argument REDEEMER_PURPOSE_PROPOSE. This value would be out of bounds." - succ REDEEMER_PURPOSE_UNSPECIFIED = REDEEMER_PURPOSE_SPEND - succ REDEEMER_PURPOSE_SPEND = REDEEMER_PURPOSE_MINT - succ REDEEMER_PURPOSE_MINT = REDEEMER_PURPOSE_CERT - succ REDEEMER_PURPOSE_CERT = REDEEMER_PURPOSE_REWARD - succ REDEEMER_PURPOSE_REWARD = REDEEMER_PURPOSE_VOTE - succ REDEEMER_PURPOSE_VOTE = REDEEMER_PURPOSE_PROPOSE - succ (RedeemerPurpose'Unrecognized _) - = Prelude.error - "RedeemerPurpose.succ: bad argument: unrecognized value" - pred REDEEMER_PURPOSE_UNSPECIFIED - = Prelude.error - "RedeemerPurpose.pred: bad argument REDEEMER_PURPOSE_UNSPECIFIED. This value would be out of bounds." - pred REDEEMER_PURPOSE_SPEND = REDEEMER_PURPOSE_UNSPECIFIED - pred REDEEMER_PURPOSE_MINT = REDEEMER_PURPOSE_SPEND - pred REDEEMER_PURPOSE_CERT = REDEEMER_PURPOSE_MINT - pred REDEEMER_PURPOSE_REWARD = REDEEMER_PURPOSE_CERT - pred REDEEMER_PURPOSE_VOTE = REDEEMER_PURPOSE_REWARD - pred REDEEMER_PURPOSE_PROPOSE = REDEEMER_PURPOSE_VOTE - pred (RedeemerPurpose'Unrecognized _) - = Prelude.error - "RedeemerPurpose.pred: bad argument: unrecognized value" - enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom - enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo - enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen - enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo -instance Data.ProtoLens.FieldDefault RedeemerPurpose where - fieldDefault = REDEEMER_PURPOSE_UNSPECIFIED -instance Control.DeepSeq.NFData RedeemerPurpose where - rnf x__ = Prelude.seq x__ () -{- | Fields : - - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.stakeCredential' @:: Lens' RegCert StakeCredential@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'stakeCredential' @:: Lens' RegCert (Prelude.Maybe StakeCredential)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.coin' @:: Lens' RegCert Data.Word.Word64@ -} -data RegCert - = RegCert'_constructor {_RegCert'stakeCredential :: !(Prelude.Maybe StakeCredential), - _RegCert'coin :: !Data.Word.Word64, - _RegCert'_unknownFields :: !Data.ProtoLens.FieldSet} - deriving stock (Prelude.Eq, Prelude.Ord) -instance Prelude.Show RegCert where - showsPrec _ __x __s - = Prelude.showChar - '{' - (Prelude.showString - (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) -instance Data.ProtoLens.Field.HasField RegCert "stakeCredential" StakeCredential where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _RegCert'stakeCredential - (\ x__ y__ -> x__ {_RegCert'stakeCredential = y__})) - (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) -instance Data.ProtoLens.Field.HasField RegCert "maybe'stakeCredential" (Prelude.Maybe StakeCredential) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _RegCert'stakeCredential - (\ x__ y__ -> x__ {_RegCert'stakeCredential = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField RegCert "coin" Data.Word.Word64 where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _RegCert'coin (\ x__ y__ -> x__ {_RegCert'coin = y__})) - Prelude.id -instance Data.ProtoLens.Message RegCert where - messageName _ = Data.Text.pack "utxorpc.v1alpha.cardano.RegCert" - packedMessageDescriptor _ - = "\n\ - \\aRegCert\DC2S\n\ - \\DLEstake_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SIstakeCredential\DC2\DC2\n\ - \\EOTcoin\CAN\STX \SOH(\EOTR\EOTcoin" - packedFileDescriptor _ = packedFileDescriptor - fieldsByTag - = let - stakeCredential__field_descriptor - = Data.ProtoLens.FieldDescriptor - "stake_credential" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor StakeCredential) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'stakeCredential")) :: - Data.ProtoLens.FieldDescriptor RegCert - coin__field_descriptor - = Data.ProtoLens.FieldDescriptor - "coin" - (Data.ProtoLens.ScalarField Data.ProtoLens.UInt64Field :: - Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64) - (Data.ProtoLens.PlainField - Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"coin")) :: - Data.ProtoLens.FieldDescriptor RegCert - in - Data.Map.fromList - [(Data.ProtoLens.Tag 1, stakeCredential__field_descriptor), - (Data.ProtoLens.Tag 2, coin__field_descriptor)] - unknownFields - = Lens.Family2.Unchecked.lens - _RegCert'_unknownFields - (\ x__ y__ -> x__ {_RegCert'_unknownFields = y__}) - defMessage - = RegCert'_constructor - {_RegCert'stakeCredential = Prelude.Nothing, - _RegCert'coin = Data.ProtoLens.fieldDefault, - _RegCert'_unknownFields = []} - parseMessage - = let - loop :: RegCert -> Data.ProtoLens.Encoding.Bytes.Parser RegCert - loop x - = do end <- Data.ProtoLens.Encoding.Bytes.atEnd - if end then - do (let missing = [] - in - if Prelude.null missing then - Prelude.return () - else - Prelude.fail - ((Prelude.++) - "Missing required fields: " - (Prelude.show (missing :: [Prelude.String])))) - Prelude.return - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) - else - do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt - case tag of - 10 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) - "stake_credential" - loop - (Lens.Family2.set - (Data.ProtoLens.Field.field @"stakeCredential") y x) - 16 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - Data.ProtoLens.Encoding.Bytes.getVarInt "coin" - loop (Lens.Family2.set (Data.ProtoLens.Field.field @"coin") y x) - wire - -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire - wire - loop - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) - in - (Data.ProtoLens.Encoding.Bytes.) - (do loop Data.ProtoLens.defMessage) "RegCert" - buildMessage - = \ _x - -> (Data.Monoid.<>) - (case - Lens.Family2.view - (Data.ProtoLens.Field.field @"maybe'stakeCredential") _x - of - Prelude.Nothing -> Data.Monoid.mempty - (Prelude.Just _v) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 10) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - ((Data.Monoid.<>) - (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"coin") _x - in - if (Prelude.==) _v Data.ProtoLens.fieldDefault then - Data.Monoid.mempty - else - (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 16) - (Data.ProtoLens.Encoding.Bytes.putVarInt _v)) - (Data.ProtoLens.Encoding.Wire.buildFieldSet - (Lens.Family2.view Data.ProtoLens.unknownFields _x))) -instance Control.DeepSeq.NFData RegCert where - rnf - = \ x__ - -> Control.DeepSeq.deepseq - (_RegCert'_unknownFields x__) - (Control.DeepSeq.deepseq - (_RegCert'stakeCredential x__) - (Control.DeepSeq.deepseq (_RegCert'coin x__) ())) -{- | Fields : - - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.drepCredential' @:: Lens' RegDRepCert StakeCredential@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'drepCredential' @:: Lens' RegDRepCert (Prelude.Maybe StakeCredential)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.coin' @:: Lens' RegDRepCert Data.Word.Word64@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.anchor' @:: Lens' RegDRepCert Anchor@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'anchor' @:: Lens' RegDRepCert (Prelude.Maybe Anchor)@ -} -data RegDRepCert - = RegDRepCert'_constructor {_RegDRepCert'drepCredential :: !(Prelude.Maybe StakeCredential), - _RegDRepCert'coin :: !Data.Word.Word64, - _RegDRepCert'anchor :: !(Prelude.Maybe Anchor), - _RegDRepCert'_unknownFields :: !Data.ProtoLens.FieldSet} - deriving stock (Prelude.Eq, Prelude.Ord) -instance Prelude.Show RegDRepCert where - showsPrec _ __x __s - = Prelude.showChar - '{' - (Prelude.showString - (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) -instance Data.ProtoLens.Field.HasField RegDRepCert "drepCredential" StakeCredential where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _RegDRepCert'drepCredential - (\ x__ y__ -> x__ {_RegDRepCert'drepCredential = y__})) - (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) -instance Data.ProtoLens.Field.HasField RegDRepCert "maybe'drepCredential" (Prelude.Maybe StakeCredential) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _RegDRepCert'drepCredential - (\ x__ y__ -> x__ {_RegDRepCert'drepCredential = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField RegDRepCert "coin" Data.Word.Word64 where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _RegDRepCert'coin (\ x__ y__ -> x__ {_RegDRepCert'coin = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField RegDRepCert "anchor" Anchor where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _RegDRepCert'anchor (\ x__ y__ -> x__ {_RegDRepCert'anchor = y__})) - (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) -instance Data.ProtoLens.Field.HasField RegDRepCert "maybe'anchor" (Prelude.Maybe Anchor) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _RegDRepCert'anchor (\ x__ y__ -> x__ {_RegDRepCert'anchor = y__})) - Prelude.id -instance Data.ProtoLens.Message RegDRepCert where - messageName _ - = Data.Text.pack "utxorpc.v1alpha.cardano.RegDRepCert" - packedMessageDescriptor _ - = "\n\ - \\vRegDRepCert\DC2Q\n\ - \\SIdrep_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SOdrepCredential\DC2\DC2\n\ - \\EOTcoin\CAN\STX \SOH(\EOTR\EOTcoin\DC27\n\ - \\ACKanchor\CAN\ETX \SOH(\v2\US.utxorpc.v1alpha.cardano.AnchorR\ACKanchor" - packedFileDescriptor _ = packedFileDescriptor - fieldsByTag - = let - drepCredential__field_descriptor - = Data.ProtoLens.FieldDescriptor - "drep_credential" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor StakeCredential) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'drepCredential")) :: - Data.ProtoLens.FieldDescriptor RegDRepCert - coin__field_descriptor - = Data.ProtoLens.FieldDescriptor - "coin" - (Data.ProtoLens.ScalarField Data.ProtoLens.UInt64Field :: - Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64) - (Data.ProtoLens.PlainField - Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"coin")) :: - Data.ProtoLens.FieldDescriptor RegDRepCert - anchor__field_descriptor - = Data.ProtoLens.FieldDescriptor - "anchor" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor Anchor) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'anchor")) :: - Data.ProtoLens.FieldDescriptor RegDRepCert - in - Data.Map.fromList - [(Data.ProtoLens.Tag 1, drepCredential__field_descriptor), - (Data.ProtoLens.Tag 2, coin__field_descriptor), - (Data.ProtoLens.Tag 3, anchor__field_descriptor)] - unknownFields - = Lens.Family2.Unchecked.lens - _RegDRepCert'_unknownFields - (\ x__ y__ -> x__ {_RegDRepCert'_unknownFields = y__}) - defMessage - = RegDRepCert'_constructor - {_RegDRepCert'drepCredential = Prelude.Nothing, - _RegDRepCert'coin = Data.ProtoLens.fieldDefault, - _RegDRepCert'anchor = Prelude.Nothing, - _RegDRepCert'_unknownFields = []} - parseMessage - = let - loop :: - RegDRepCert -> Data.ProtoLens.Encoding.Bytes.Parser RegDRepCert - loop x - = do end <- Data.ProtoLens.Encoding.Bytes.atEnd - if end then - do (let missing = [] - in - if Prelude.null missing then - Prelude.return () - else - Prelude.fail - ((Prelude.++) - "Missing required fields: " - (Prelude.show (missing :: [Prelude.String])))) - Prelude.return - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) - else - do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt - case tag of - 10 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) - "drep_credential" - loop - (Lens.Family2.set - (Data.ProtoLens.Field.field @"drepCredential") y x) - 16 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - Data.ProtoLens.Encoding.Bytes.getVarInt "coin" - loop (Lens.Family2.set (Data.ProtoLens.Field.field @"coin") y x) - 26 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) - "anchor" - loop (Lens.Family2.set (Data.ProtoLens.Field.field @"anchor") y x) - wire - -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire - wire - loop - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) - in - (Data.ProtoLens.Encoding.Bytes.) - (do loop Data.ProtoLens.defMessage) "RegDRepCert" - buildMessage - = \ _x - -> (Data.Monoid.<>) - (case - Lens.Family2.view - (Data.ProtoLens.Field.field @"maybe'drepCredential") _x - of - Prelude.Nothing -> Data.Monoid.mempty - (Prelude.Just _v) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 10) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - ((Data.Monoid.<>) - (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"coin") _x - in - if (Prelude.==) _v Data.ProtoLens.fieldDefault then - Data.Monoid.mempty - else - (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 16) - (Data.ProtoLens.Encoding.Bytes.putVarInt _v)) - ((Data.Monoid.<>) - (case - Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'anchor") _x - of - Prelude.Nothing -> Data.Monoid.mempty - (Prelude.Just _v) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 26) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - (Data.ProtoLens.Encoding.Wire.buildFieldSet - (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) -instance Control.DeepSeq.NFData RegDRepCert where - rnf - = \ x__ - -> Control.DeepSeq.deepseq - (_RegDRepCert'_unknownFields x__) - (Control.DeepSeq.deepseq - (_RegDRepCert'drepCredential x__) - (Control.DeepSeq.deepseq - (_RegDRepCert'coin x__) - (Control.DeepSeq.deepseq (_RegDRepCert'anchor x__) ()))) -{- | Fields : - - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.ipV4' @:: Lens' Relay Data.ByteString.ByteString@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.ipV6' @:: Lens' Relay Data.ByteString.ByteString@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.dnsName' @:: Lens' Relay Data.Text.Text@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.port' @:: Lens' Relay Data.Word.Word32@ -} -data Relay - = Relay'_constructor {_Relay'ipV4 :: !Data.ByteString.ByteString, - _Relay'ipV6 :: !Data.ByteString.ByteString, - _Relay'dnsName :: !Data.Text.Text, - _Relay'port :: !Data.Word.Word32, - _Relay'_unknownFields :: !Data.ProtoLens.FieldSet} - deriving stock (Prelude.Eq, Prelude.Ord) -instance Prelude.Show Relay where - showsPrec _ __x __s - = Prelude.showChar - '{' - (Prelude.showString - (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) -instance Data.ProtoLens.Field.HasField Relay "ipV4" Data.ByteString.ByteString where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Relay'ipV4 (\ x__ y__ -> x__ {_Relay'ipV4 = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField Relay "ipV6" Data.ByteString.ByteString where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Relay'ipV6 (\ x__ y__ -> x__ {_Relay'ipV6 = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField Relay "dnsName" Data.Text.Text where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Relay'dnsName (\ x__ y__ -> x__ {_Relay'dnsName = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField Relay "port" Data.Word.Word32 where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Relay'port (\ x__ y__ -> x__ {_Relay'port = y__})) - Prelude.id -instance Data.ProtoLens.Message Relay where - messageName _ = Data.Text.pack "utxorpc.v1alpha.cardano.Relay" - packedMessageDescriptor _ - = "\n\ - \\ENQRelay\DC2\DC3\n\ - \\ENQip_v4\CAN\SOH \SOH(\fR\EOTipV4\DC2\DC3\n\ - \\ENQip_v6\CAN\STX \SOH(\fR\EOTipV6\DC2\EM\n\ - \\bdns_name\CAN\ETX \SOH(\tR\adnsName\DC2\DC2\n\ - \\EOTport\CAN\EOT \SOH(\rR\EOTport" - packedFileDescriptor _ = packedFileDescriptor - fieldsByTag - = let - ipV4__field_descriptor - = Data.ProtoLens.FieldDescriptor - "ip_v4" - (Data.ProtoLens.ScalarField Data.ProtoLens.BytesField :: - Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString) - (Data.ProtoLens.PlainField - Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"ipV4")) :: - Data.ProtoLens.FieldDescriptor Relay - ipV6__field_descriptor - = Data.ProtoLens.FieldDescriptor - "ip_v6" - (Data.ProtoLens.ScalarField Data.ProtoLens.BytesField :: - Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString) - (Data.ProtoLens.PlainField - Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"ipV6")) :: - Data.ProtoLens.FieldDescriptor Relay - dnsName__field_descriptor - = Data.ProtoLens.FieldDescriptor - "dns_name" - (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: - Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) - (Data.ProtoLens.PlainField - Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"dnsName")) :: - Data.ProtoLens.FieldDescriptor Relay - port__field_descriptor - = Data.ProtoLens.FieldDescriptor - "port" - (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: - Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) - (Data.ProtoLens.PlainField - Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"port")) :: - Data.ProtoLens.FieldDescriptor Relay - in - Data.Map.fromList - [(Data.ProtoLens.Tag 1, ipV4__field_descriptor), - (Data.ProtoLens.Tag 2, ipV6__field_descriptor), - (Data.ProtoLens.Tag 3, dnsName__field_descriptor), - (Data.ProtoLens.Tag 4, port__field_descriptor)] - unknownFields - = Lens.Family2.Unchecked.lens - _Relay'_unknownFields - (\ x__ y__ -> x__ {_Relay'_unknownFields = y__}) - defMessage - = Relay'_constructor - {_Relay'ipV4 = Data.ProtoLens.fieldDefault, - _Relay'ipV6 = Data.ProtoLens.fieldDefault, - _Relay'dnsName = Data.ProtoLens.fieldDefault, - _Relay'port = Data.ProtoLens.fieldDefault, - _Relay'_unknownFields = []} - parseMessage - = let - loop :: Relay -> Data.ProtoLens.Encoding.Bytes.Parser Relay - loop x - = do end <- Data.ProtoLens.Encoding.Bytes.atEnd - if end then - do (let missing = [] - in - if Prelude.null missing then - Prelude.return () - else - Prelude.fail - ((Prelude.++) - "Missing required fields: " - (Prelude.show (missing :: [Prelude.String])))) - Prelude.return - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) - else - do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt - case tag of - 10 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.getBytes - (Prelude.fromIntegral len)) - "ip_v4" - loop (Lens.Family2.set (Data.ProtoLens.Field.field @"ipV4") y x) - 18 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.getBytes - (Prelude.fromIntegral len)) - "ip_v6" - loop (Lens.Family2.set (Data.ProtoLens.Field.field @"ipV6") y x) - 26 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.getText - (Prelude.fromIntegral len)) - "dns_name" - loop (Lens.Family2.set (Data.ProtoLens.Field.field @"dnsName") y x) - 32 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (Prelude.fmap - Prelude.fromIntegral - Data.ProtoLens.Encoding.Bytes.getVarInt) - "port" - loop (Lens.Family2.set (Data.ProtoLens.Field.field @"port") y x) - wire - -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire - wire - loop - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) - in - (Data.ProtoLens.Encoding.Bytes.) - (do loop Data.ProtoLens.defMessage) "Relay" - buildMessage - = \ _x - -> (Data.Monoid.<>) - (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"ipV4") _x - in - if (Prelude.==) _v Data.ProtoLens.fieldDefault then - Data.Monoid.mempty - else - (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 10) - ((\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - _v)) - ((Data.Monoid.<>) - (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"ipV6") _x - in - if (Prelude.==) _v Data.ProtoLens.fieldDefault then - Data.Monoid.mempty - else - (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 18) - ((\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - _v)) - ((Data.Monoid.<>) - (let - _v = Lens.Family2.view (Data.ProtoLens.Field.field @"dnsName") _x - in - if (Prelude.==) _v Data.ProtoLens.fieldDefault then - Data.Monoid.mempty - else - (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 26) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.Text.Encoding.encodeUtf8 _v)) - ((Data.Monoid.<>) - (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"port") _x - in - if (Prelude.==) _v Data.ProtoLens.fieldDefault then - Data.Monoid.mempty - else - (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 32) - ((Prelude..) - Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) - (Data.ProtoLens.Encoding.Wire.buildFieldSet - (Lens.Family2.view Data.ProtoLens.unknownFields _x))))) -instance Control.DeepSeq.NFData Relay where - rnf - = \ x__ - -> Control.DeepSeq.deepseq - (_Relay'_unknownFields x__) - (Control.DeepSeq.deepseq - (_Relay'ipV4 x__) - (Control.DeepSeq.deepseq - (_Relay'ipV6 x__) - (Control.DeepSeq.deepseq - (_Relay'dnsName x__) - (Control.DeepSeq.deepseq (_Relay'port x__) ())))) -{- | Fields : - - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.committeeColdCredential' @:: Lens' ResignCommitteeColdCert StakeCredential@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'committeeColdCredential' @:: Lens' ResignCommitteeColdCert (Prelude.Maybe StakeCredential)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.anchor' @:: Lens' ResignCommitteeColdCert Anchor@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'anchor' @:: Lens' ResignCommitteeColdCert (Prelude.Maybe Anchor)@ -} -data ResignCommitteeColdCert - = ResignCommitteeColdCert'_constructor {_ResignCommitteeColdCert'committeeColdCredential :: !(Prelude.Maybe StakeCredential), - _ResignCommitteeColdCert'anchor :: !(Prelude.Maybe Anchor), - _ResignCommitteeColdCert'_unknownFields :: !Data.ProtoLens.FieldSet} - deriving stock (Prelude.Eq, Prelude.Ord) -instance Prelude.Show ResignCommitteeColdCert where - showsPrec _ __x __s - = Prelude.showChar - '{' - (Prelude.showString - (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) -instance Data.ProtoLens.Field.HasField ResignCommitteeColdCert "committeeColdCredential" StakeCredential where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _ResignCommitteeColdCert'committeeColdCredential - (\ x__ y__ - -> x__ {_ResignCommitteeColdCert'committeeColdCredential = y__})) - (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) -instance Data.ProtoLens.Field.HasField ResignCommitteeColdCert "maybe'committeeColdCredential" (Prelude.Maybe StakeCredential) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _ResignCommitteeColdCert'committeeColdCredential - (\ x__ y__ - -> x__ {_ResignCommitteeColdCert'committeeColdCredential = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField ResignCommitteeColdCert "anchor" Anchor where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _ResignCommitteeColdCert'anchor - (\ x__ y__ -> x__ {_ResignCommitteeColdCert'anchor = y__})) - (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) -instance Data.ProtoLens.Field.HasField ResignCommitteeColdCert "maybe'anchor" (Prelude.Maybe Anchor) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _ResignCommitteeColdCert'anchor - (\ x__ y__ -> x__ {_ResignCommitteeColdCert'anchor = y__})) - Prelude.id -instance Data.ProtoLens.Message ResignCommitteeColdCert where - messageName _ - = Data.Text.pack "utxorpc.v1alpha.cardano.ResignCommitteeColdCert" - packedMessageDescriptor _ - = "\n\ - \\ETBResignCommitteeColdCert\DC2d\n\ - \\EMcommittee_cold_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\ETBcommitteeColdCredential\DC27\n\ - \\ACKanchor\CAN\STX \SOH(\v2\US.utxorpc.v1alpha.cardano.AnchorR\ACKanchor" - packedFileDescriptor _ = packedFileDescriptor - fieldsByTag - = let - committeeColdCredential__field_descriptor - = Data.ProtoLens.FieldDescriptor - "committee_cold_credential" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor StakeCredential) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'committeeColdCredential")) :: - Data.ProtoLens.FieldDescriptor ResignCommitteeColdCert - anchor__field_descriptor - = Data.ProtoLens.FieldDescriptor - "anchor" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor Anchor) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'anchor")) :: - Data.ProtoLens.FieldDescriptor ResignCommitteeColdCert - in - Data.Map.fromList - [(Data.ProtoLens.Tag 1, committeeColdCredential__field_descriptor), - (Data.ProtoLens.Tag 2, anchor__field_descriptor)] - unknownFields - = Lens.Family2.Unchecked.lens - _ResignCommitteeColdCert'_unknownFields - (\ x__ y__ -> x__ {_ResignCommitteeColdCert'_unknownFields = y__}) - defMessage - = ResignCommitteeColdCert'_constructor - {_ResignCommitteeColdCert'committeeColdCredential = Prelude.Nothing, - _ResignCommitteeColdCert'anchor = Prelude.Nothing, - _ResignCommitteeColdCert'_unknownFields = []} - parseMessage - = let - loop :: - ResignCommitteeColdCert - -> Data.ProtoLens.Encoding.Bytes.Parser ResignCommitteeColdCert - loop x - = do end <- Data.ProtoLens.Encoding.Bytes.atEnd - if end then - do (let missing = [] - in - if Prelude.null missing then - Prelude.return () - else - Prelude.fail - ((Prelude.++) - "Missing required fields: " - (Prelude.show (missing :: [Prelude.String])))) - Prelude.return - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) - else - do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt - case tag of - 10 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) - "committee_cold_credential" - loop - (Lens.Family2.set - (Data.ProtoLens.Field.field @"committeeColdCredential") y x) - 18 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) - "anchor" - loop (Lens.Family2.set (Data.ProtoLens.Field.field @"anchor") y x) - wire - -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire - wire - loop - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) - in - (Data.ProtoLens.Encoding.Bytes.) - (do loop Data.ProtoLens.defMessage) "ResignCommitteeColdCert" - buildMessage - = \ _x - -> (Data.Monoid.<>) - (case - Lens.Family2.view - (Data.ProtoLens.Field.field @"maybe'committeeColdCredential") _x - of - Prelude.Nothing -> Data.Monoid.mempty - (Prelude.Just _v) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 10) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - ((Data.Monoid.<>) - (case - Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'anchor") _x - of - Prelude.Nothing -> Data.Monoid.mempty - (Prelude.Just _v) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 18) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - (Data.ProtoLens.Encoding.Wire.buildFieldSet - (Lens.Family2.view Data.ProtoLens.unknownFields _x))) -instance Control.DeepSeq.NFData ResignCommitteeColdCert where - rnf - = \ x__ - -> Control.DeepSeq.deepseq - (_ResignCommitteeColdCert'_unknownFields x__) - (Control.DeepSeq.deepseq - (_ResignCommitteeColdCert'committeeColdCredential x__) - (Control.DeepSeq.deepseq (_ResignCommitteeColdCert'anchor x__) ())) -{- | Fields : - - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'script' @:: Lens' Script (Prelude.Maybe Script'Script)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'native' @:: Lens' Script (Prelude.Maybe NativeScript)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.native' @:: Lens' Script NativeScript@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'plutusV1' @:: Lens' Script (Prelude.Maybe Data.ByteString.ByteString)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.plutusV1' @:: Lens' Script Data.ByteString.ByteString@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'plutusV2' @:: Lens' Script (Prelude.Maybe Data.ByteString.ByteString)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.plutusV2' @:: Lens' Script Data.ByteString.ByteString@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'plutusV3' @:: Lens' Script (Prelude.Maybe Data.ByteString.ByteString)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.plutusV3' @:: Lens' Script Data.ByteString.ByteString@ -} -data Script - = Script'_constructor {_Script'script :: !(Prelude.Maybe Script'Script), - _Script'_unknownFields :: !Data.ProtoLens.FieldSet} - deriving stock (Prelude.Eq, Prelude.Ord) -instance Prelude.Show Script where - showsPrec _ __x __s - = Prelude.showChar - '{' - (Prelude.showString - (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) -data Script'Script - = Script'Native !NativeScript | - Script'PlutusV1 !Data.ByteString.ByteString | - Script'PlutusV2 !Data.ByteString.ByteString | - Script'PlutusV3 !Data.ByteString.ByteString - deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) -instance Data.ProtoLens.Field.HasField Script "maybe'script" (Prelude.Maybe Script'Script) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Script'script (\ x__ y__ -> x__ {_Script'script = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField Script "maybe'native" (Prelude.Maybe NativeScript) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Script'script (\ x__ y__ -> x__ {_Script'script = y__})) - (Lens.Family2.Unchecked.lens - (\ x__ - -> case x__ of - (Prelude.Just (Script'Native x__val)) -> Prelude.Just x__val - _otherwise -> Prelude.Nothing) - (\ _ y__ -> Prelude.fmap Script'Native y__)) -instance Data.ProtoLens.Field.HasField Script "native" NativeScript where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Script'script (\ x__ y__ -> x__ {_Script'script = y__})) - ((Prelude..) - (Lens.Family2.Unchecked.lens - (\ x__ - -> case x__ of - (Prelude.Just (Script'Native x__val)) -> Prelude.Just x__val - _otherwise -> Prelude.Nothing) - (\ _ y__ -> Prelude.fmap Script'Native y__)) - (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage)) -instance Data.ProtoLens.Field.HasField Script "maybe'plutusV1" (Prelude.Maybe Data.ByteString.ByteString) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Script'script (\ x__ y__ -> x__ {_Script'script = y__})) - (Lens.Family2.Unchecked.lens - (\ x__ - -> case x__ of - (Prelude.Just (Script'PlutusV1 x__val)) -> Prelude.Just x__val - _otherwise -> Prelude.Nothing) - (\ _ y__ -> Prelude.fmap Script'PlutusV1 y__)) -instance Data.ProtoLens.Field.HasField Script "plutusV1" Data.ByteString.ByteString where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Script'script (\ x__ y__ -> x__ {_Script'script = y__})) - ((Prelude..) - (Lens.Family2.Unchecked.lens - (\ x__ - -> case x__ of - (Prelude.Just (Script'PlutusV1 x__val)) -> Prelude.Just x__val - _otherwise -> Prelude.Nothing) - (\ _ y__ -> Prelude.fmap Script'PlutusV1 y__)) - (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)) -instance Data.ProtoLens.Field.HasField Script "maybe'plutusV2" (Prelude.Maybe Data.ByteString.ByteString) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Script'script (\ x__ y__ -> x__ {_Script'script = y__})) - (Lens.Family2.Unchecked.lens - (\ x__ - -> case x__ of - (Prelude.Just (Script'PlutusV2 x__val)) -> Prelude.Just x__val - _otherwise -> Prelude.Nothing) - (\ _ y__ -> Prelude.fmap Script'PlutusV2 y__)) -instance Data.ProtoLens.Field.HasField Script "plutusV2" Data.ByteString.ByteString where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Script'script (\ x__ y__ -> x__ {_Script'script = y__})) - ((Prelude..) - (Lens.Family2.Unchecked.lens - (\ x__ - -> case x__ of - (Prelude.Just (Script'PlutusV2 x__val)) -> Prelude.Just x__val - _otherwise -> Prelude.Nothing) - (\ _ y__ -> Prelude.fmap Script'PlutusV2 y__)) - (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)) -instance Data.ProtoLens.Field.HasField Script "maybe'plutusV3" (Prelude.Maybe Data.ByteString.ByteString) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Script'script (\ x__ y__ -> x__ {_Script'script = y__})) - (Lens.Family2.Unchecked.lens - (\ x__ - -> case x__ of - (Prelude.Just (Script'PlutusV3 x__val)) -> Prelude.Just x__val - _otherwise -> Prelude.Nothing) - (\ _ y__ -> Prelude.fmap Script'PlutusV3 y__)) -instance Data.ProtoLens.Field.HasField Script "plutusV3" Data.ByteString.ByteString where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Script'script (\ x__ y__ -> x__ {_Script'script = y__})) - ((Prelude..) - (Lens.Family2.Unchecked.lens - (\ x__ - -> case x__ of - (Prelude.Just (Script'PlutusV3 x__val)) -> Prelude.Just x__val - _otherwise -> Prelude.Nothing) - (\ _ y__ -> Prelude.fmap Script'PlutusV3 y__)) - (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)) -instance Data.ProtoLens.Message Script where - messageName _ = Data.Text.pack "utxorpc.v1alpha.cardano.Script" - packedMessageDescriptor _ - = "\n\ - \\ACKScript\DC2?\n\ - \\ACKnative\CAN\SOH \SOH(\v2%.utxorpc.v1alpha.cardano.NativeScriptH\NULR\ACKnative\DC2\GS\n\ - \\tplutus_v1\CAN\STX \SOH(\fH\NULR\bplutusV1\DC2\GS\n\ - \\tplutus_v2\CAN\ETX \SOH(\fH\NULR\bplutusV2\DC2\GS\n\ - \\tplutus_v3\CAN\EOT \SOH(\fH\NULR\bplutusV3B\b\n\ - \\ACKscript" - packedFileDescriptor _ = packedFileDescriptor - fieldsByTag - = let - native__field_descriptor - = Data.ProtoLens.FieldDescriptor - "native" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor NativeScript) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'native")) :: - Data.ProtoLens.FieldDescriptor Script - plutusV1__field_descriptor - = Data.ProtoLens.FieldDescriptor - "plutus_v1" - (Data.ProtoLens.ScalarField Data.ProtoLens.BytesField :: - Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'plutusV1")) :: - Data.ProtoLens.FieldDescriptor Script - plutusV2__field_descriptor - = Data.ProtoLens.FieldDescriptor - "plutus_v2" - (Data.ProtoLens.ScalarField Data.ProtoLens.BytesField :: - Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'plutusV2")) :: - Data.ProtoLens.FieldDescriptor Script - plutusV3__field_descriptor - = Data.ProtoLens.FieldDescriptor - "plutus_v3" - (Data.ProtoLens.ScalarField Data.ProtoLens.BytesField :: - Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'plutusV3")) :: - Data.ProtoLens.FieldDescriptor Script - in - Data.Map.fromList - [(Data.ProtoLens.Tag 1, native__field_descriptor), - (Data.ProtoLens.Tag 2, plutusV1__field_descriptor), - (Data.ProtoLens.Tag 3, plutusV2__field_descriptor), - (Data.ProtoLens.Tag 4, plutusV3__field_descriptor)] - unknownFields - = Lens.Family2.Unchecked.lens - _Script'_unknownFields - (\ x__ y__ -> x__ {_Script'_unknownFields = y__}) - defMessage - = Script'_constructor - {_Script'script = Prelude.Nothing, _Script'_unknownFields = []} - parseMessage - = let - loop :: Script -> Data.ProtoLens.Encoding.Bytes.Parser Script - loop x - = do end <- Data.ProtoLens.Encoding.Bytes.atEnd - if end then - do (let missing = [] - in - if Prelude.null missing then - Prelude.return () - else - Prelude.fail - ((Prelude.++) - "Missing required fields: " - (Prelude.show (missing :: [Prelude.String])))) - Prelude.return - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) - else - do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt - case tag of - 10 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) - "native" - loop (Lens.Family2.set (Data.ProtoLens.Field.field @"native") y x) - 18 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.getBytes - (Prelude.fromIntegral len)) - "plutus_v1" - loop - (Lens.Family2.set (Data.ProtoLens.Field.field @"plutusV1") y x) - 26 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.getBytes - (Prelude.fromIntegral len)) - "plutus_v2" - loop - (Lens.Family2.set (Data.ProtoLens.Field.field @"plutusV2") y x) - 34 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.getBytes - (Prelude.fromIntegral len)) - "plutus_v3" - loop - (Lens.Family2.set (Data.ProtoLens.Field.field @"plutusV3") y x) - wire - -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire - wire - loop - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) - in - (Data.ProtoLens.Encoding.Bytes.) - (do loop Data.ProtoLens.defMessage) "Script" - buildMessage - = \ _x - -> (Data.Monoid.<>) - (case - Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'script") _x - of - Prelude.Nothing -> Data.Monoid.mempty - (Prelude.Just (Script'Native v)) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 10) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage v) - (Prelude.Just (Script'PlutusV1 v)) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 18) - ((\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - v) - (Prelude.Just (Script'PlutusV2 v)) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 26) - ((\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - v) - (Prelude.Just (Script'PlutusV3 v)) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 34) - ((\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - v)) - (Data.ProtoLens.Encoding.Wire.buildFieldSet - (Lens.Family2.view Data.ProtoLens.unknownFields _x)) -instance Control.DeepSeq.NFData Script where - rnf - = \ x__ - -> Control.DeepSeq.deepseq - (_Script'_unknownFields x__) - (Control.DeepSeq.deepseq (_Script'script x__) ()) -instance Control.DeepSeq.NFData Script'Script where - rnf (Script'Native x__) = Control.DeepSeq.rnf x__ - rnf (Script'PlutusV1 x__) = Control.DeepSeq.rnf x__ - rnf (Script'PlutusV2 x__) = Control.DeepSeq.rnf x__ - rnf (Script'PlutusV3 x__) = Control.DeepSeq.rnf x__ -_Script'Native :: - Data.ProtoLens.Prism.Prism' Script'Script NativeScript -_Script'Native - = Data.ProtoLens.Prism.prism' - Script'Native - (\ p__ - -> case p__ of - (Script'Native p__val) -> Prelude.Just p__val - _otherwise -> Prelude.Nothing) -_Script'PlutusV1 :: - Data.ProtoLens.Prism.Prism' Script'Script Data.ByteString.ByteString -_Script'PlutusV1 - = Data.ProtoLens.Prism.prism' - Script'PlutusV1 - (\ p__ - -> case p__ of - (Script'PlutusV1 p__val) -> Prelude.Just p__val - _otherwise -> Prelude.Nothing) -_Script'PlutusV2 :: - Data.ProtoLens.Prism.Prism' Script'Script Data.ByteString.ByteString -_Script'PlutusV2 - = Data.ProtoLens.Prism.prism' - Script'PlutusV2 - (\ p__ - -> case p__ of - (Script'PlutusV2 p__val) -> Prelude.Just p__val - _otherwise -> Prelude.Nothing) -_Script'PlutusV3 :: - Data.ProtoLens.Prism.Prism' Script'Script Data.ByteString.ByteString -_Script'PlutusV3 - = Data.ProtoLens.Prism.prism' - Script'PlutusV3 - (\ p__ - -> case p__ of - (Script'PlutusV3 p__val) -> Prelude.Just p__val - _otherwise -> Prelude.Nothing) -{- | Fields : - - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.k' @:: Lens' ScriptNOfK Data.Word.Word32@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.scripts' @:: Lens' ScriptNOfK [NativeScript]@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.vec'scripts' @:: Lens' ScriptNOfK (Data.Vector.Vector NativeScript)@ -} -data ScriptNOfK - = ScriptNOfK'_constructor {_ScriptNOfK'k :: !Data.Word.Word32, - _ScriptNOfK'scripts :: !(Data.Vector.Vector NativeScript), - _ScriptNOfK'_unknownFields :: !Data.ProtoLens.FieldSet} - deriving stock (Prelude.Eq, Prelude.Ord) -instance Prelude.Show ScriptNOfK where - showsPrec _ __x __s - = Prelude.showChar - '{' - (Prelude.showString - (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) -instance Data.ProtoLens.Field.HasField ScriptNOfK "k" Data.Word.Word32 where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _ScriptNOfK'k (\ x__ y__ -> x__ {_ScriptNOfK'k = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField ScriptNOfK "scripts" [NativeScript] where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _ScriptNOfK'scripts (\ x__ y__ -> x__ {_ScriptNOfK'scripts = y__})) - (Lens.Family2.Unchecked.lens - Data.Vector.Generic.toList - (\ _ y__ -> Data.Vector.Generic.fromList y__)) -instance Data.ProtoLens.Field.HasField ScriptNOfK "vec'scripts" (Data.Vector.Vector NativeScript) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _ScriptNOfK'scripts (\ x__ y__ -> x__ {_ScriptNOfK'scripts = y__})) - Prelude.id -instance Data.ProtoLens.Message ScriptNOfK where - messageName _ = Data.Text.pack "utxorpc.v1alpha.cardano.ScriptNOfK" - packedMessageDescriptor _ - = "\n\ - \\n\ - \ScriptNOfK\DC2\f\n\ - \\SOHk\CAN\SOH \SOH(\rR\SOHk\DC2?\n\ - \\ascripts\CAN\STX \ETX(\v2%.utxorpc.v1alpha.cardano.NativeScriptR\ascripts" - packedFileDescriptor _ = packedFileDescriptor - fieldsByTag - = let - k__field_descriptor - = Data.ProtoLens.FieldDescriptor - "k" - (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: - Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) - (Data.ProtoLens.PlainField - Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"k")) :: - Data.ProtoLens.FieldDescriptor ScriptNOfK - scripts__field_descriptor - = Data.ProtoLens.FieldDescriptor - "scripts" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor NativeScript) - (Data.ProtoLens.RepeatedField - Data.ProtoLens.Unpacked (Data.ProtoLens.Field.field @"scripts")) :: - Data.ProtoLens.FieldDescriptor ScriptNOfK - in - Data.Map.fromList - [(Data.ProtoLens.Tag 1, k__field_descriptor), - (Data.ProtoLens.Tag 2, scripts__field_descriptor)] - unknownFields - = Lens.Family2.Unchecked.lens - _ScriptNOfK'_unknownFields - (\ x__ y__ -> x__ {_ScriptNOfK'_unknownFields = y__}) - defMessage - = ScriptNOfK'_constructor - {_ScriptNOfK'k = Data.ProtoLens.fieldDefault, - _ScriptNOfK'scripts = Data.Vector.Generic.empty, - _ScriptNOfK'_unknownFields = []} - parseMessage - = let - loop :: - ScriptNOfK - -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld NativeScript - -> Data.ProtoLens.Encoding.Bytes.Parser ScriptNOfK - loop x mutable'scripts - = do end <- Data.ProtoLens.Encoding.Bytes.atEnd - if end then - do frozen'scripts <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO - (Data.ProtoLens.Encoding.Growing.unsafeFreeze - mutable'scripts) - (let missing = [] - in - if Prelude.null missing then - Prelude.return () - else - Prelude.fail - ((Prelude.++) - "Missing required fields: " - (Prelude.show (missing :: [Prelude.String])))) - Prelude.return - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) - (Lens.Family2.set - (Data.ProtoLens.Field.field @"vec'scripts") frozen'scripts x)) - else - do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt - case tag of - 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (Prelude.fmap - Prelude.fromIntegral - Data.ProtoLens.Encoding.Bytes.getVarInt) - "k" - loop - (Lens.Family2.set (Data.ProtoLens.Field.field @"k") y x) - mutable'scripts - 18 - -> do !y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) - Data.ProtoLens.parseMessage) - "scripts" - v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO - (Data.ProtoLens.Encoding.Growing.append mutable'scripts y) - loop x v - wire - -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire - wire - loop - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) - mutable'scripts - in - (Data.ProtoLens.Encoding.Bytes.) - (do mutable'scripts <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO - Data.ProtoLens.Encoding.Growing.new - loop Data.ProtoLens.defMessage mutable'scripts) - "ScriptNOfK" - buildMessage - = \ _x - -> (Data.Monoid.<>) - (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"k") _x - in - if (Prelude.==) _v Data.ProtoLens.fieldDefault then - Data.Monoid.mempty - else - (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 8) - ((Prelude..) - Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) - ((Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.foldMapBuilder - (\ _v - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 18) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - (Lens.Family2.view (Data.ProtoLens.Field.field @"vec'scripts") _x)) - (Data.ProtoLens.Encoding.Wire.buildFieldSet - (Lens.Family2.view Data.ProtoLens.unknownFields _x))) -instance Control.DeepSeq.NFData ScriptNOfK where - rnf - = \ x__ - -> Control.DeepSeq.deepseq - (_ScriptNOfK'_unknownFields x__) - (Control.DeepSeq.deepseq - (_ScriptNOfK'k x__) - (Control.DeepSeq.deepseq (_ScriptNOfK'scripts x__) ())) -{- | Fields : - - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'stakeCredential' @:: Lens' StakeCredential (Prelude.Maybe StakeCredential'StakeCredential)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'addrKeyHash' @:: Lens' StakeCredential (Prelude.Maybe Data.ByteString.ByteString)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.addrKeyHash' @:: Lens' StakeCredential Data.ByteString.ByteString@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'scriptHash' @:: Lens' StakeCredential (Prelude.Maybe Data.ByteString.ByteString)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.scriptHash' @:: Lens' StakeCredential Data.ByteString.ByteString@ -} -data StakeCredential - = StakeCredential'_constructor {_StakeCredential'stakeCredential :: !(Prelude.Maybe StakeCredential'StakeCredential), - _StakeCredential'_unknownFields :: !Data.ProtoLens.FieldSet} - deriving stock (Prelude.Eq, Prelude.Ord) -instance Prelude.Show StakeCredential where - showsPrec _ __x __s - = Prelude.showChar - '{' - (Prelude.showString - (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) -data StakeCredential'StakeCredential - = StakeCredential'AddrKeyHash !Data.ByteString.ByteString | - StakeCredential'ScriptHash !Data.ByteString.ByteString - deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) -instance Data.ProtoLens.Field.HasField StakeCredential "maybe'stakeCredential" (Prelude.Maybe StakeCredential'StakeCredential) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _StakeCredential'stakeCredential - (\ x__ y__ -> x__ {_StakeCredential'stakeCredential = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField StakeCredential "maybe'addrKeyHash" (Prelude.Maybe Data.ByteString.ByteString) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _StakeCredential'stakeCredential - (\ x__ y__ -> x__ {_StakeCredential'stakeCredential = y__})) - (Lens.Family2.Unchecked.lens - (\ x__ - -> case x__ of - (Prelude.Just (StakeCredential'AddrKeyHash x__val)) - -> Prelude.Just x__val - _otherwise -> Prelude.Nothing) - (\ _ y__ -> Prelude.fmap StakeCredential'AddrKeyHash y__)) -instance Data.ProtoLens.Field.HasField StakeCredential "addrKeyHash" Data.ByteString.ByteString where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _StakeCredential'stakeCredential - (\ x__ y__ -> x__ {_StakeCredential'stakeCredential = y__})) - ((Prelude..) - (Lens.Family2.Unchecked.lens - (\ x__ - -> case x__ of - (Prelude.Just (StakeCredential'AddrKeyHash x__val)) - -> Prelude.Just x__val - _otherwise -> Prelude.Nothing) - (\ _ y__ -> Prelude.fmap StakeCredential'AddrKeyHash y__)) - (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)) -instance Data.ProtoLens.Field.HasField StakeCredential "maybe'scriptHash" (Prelude.Maybe Data.ByteString.ByteString) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _StakeCredential'stakeCredential - (\ x__ y__ -> x__ {_StakeCredential'stakeCredential = y__})) - (Lens.Family2.Unchecked.lens - (\ x__ - -> case x__ of - (Prelude.Just (StakeCredential'ScriptHash x__val)) - -> Prelude.Just x__val - _otherwise -> Prelude.Nothing) - (\ _ y__ -> Prelude.fmap StakeCredential'ScriptHash y__)) -instance Data.ProtoLens.Field.HasField StakeCredential "scriptHash" Data.ByteString.ByteString where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _StakeCredential'stakeCredential - (\ x__ y__ -> x__ {_StakeCredential'stakeCredential = y__})) - ((Prelude..) - (Lens.Family2.Unchecked.lens - (\ x__ - -> case x__ of - (Prelude.Just (StakeCredential'ScriptHash x__val)) - -> Prelude.Just x__val - _otherwise -> Prelude.Nothing) - (\ _ y__ -> Prelude.fmap StakeCredential'ScriptHash y__)) - (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)) -instance Data.ProtoLens.Message StakeCredential where - messageName _ - = Data.Text.pack "utxorpc.v1alpha.cardano.StakeCredential" - packedMessageDescriptor _ - = "\n\ - \\SIStakeCredential\DC2$\n\ - \\raddr_key_hash\CAN\SOH \SOH(\fH\NULR\vaddrKeyHash\DC2!\n\ - \\vscript_hash\CAN\STX \SOH(\fH\NULR\n\ - \scriptHashB\DC2\n\ - \\DLEstake_credential" - packedFileDescriptor _ = packedFileDescriptor - fieldsByTag - = let - addrKeyHash__field_descriptor - = Data.ProtoLens.FieldDescriptor - "addr_key_hash" - (Data.ProtoLens.ScalarField Data.ProtoLens.BytesField :: - Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'addrKeyHash")) :: - Data.ProtoLens.FieldDescriptor StakeCredential - scriptHash__field_descriptor - = Data.ProtoLens.FieldDescriptor - "script_hash" - (Data.ProtoLens.ScalarField Data.ProtoLens.BytesField :: - Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'scriptHash")) :: - Data.ProtoLens.FieldDescriptor StakeCredential - in - Data.Map.fromList - [(Data.ProtoLens.Tag 1, addrKeyHash__field_descriptor), - (Data.ProtoLens.Tag 2, scriptHash__field_descriptor)] - unknownFields - = Lens.Family2.Unchecked.lens - _StakeCredential'_unknownFields - (\ x__ y__ -> x__ {_StakeCredential'_unknownFields = y__}) - defMessage - = StakeCredential'_constructor - {_StakeCredential'stakeCredential = Prelude.Nothing, - _StakeCredential'_unknownFields = []} - parseMessage - = let - loop :: - StakeCredential - -> Data.ProtoLens.Encoding.Bytes.Parser StakeCredential - loop x - = do end <- Data.ProtoLens.Encoding.Bytes.atEnd - if end then - do (let missing = [] - in - if Prelude.null missing then - Prelude.return () - else - Prelude.fail - ((Prelude.++) - "Missing required fields: " - (Prelude.show (missing :: [Prelude.String])))) - Prelude.return - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) - else - do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt - case tag of - 10 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.getBytes - (Prelude.fromIntegral len)) - "addr_key_hash" - loop - (Lens.Family2.set (Data.ProtoLens.Field.field @"addrKeyHash") y x) - 18 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.getBytes - (Prelude.fromIntegral len)) - "script_hash" - loop - (Lens.Family2.set (Data.ProtoLens.Field.field @"scriptHash") y x) - wire - -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire - wire - loop - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) - in - (Data.ProtoLens.Encoding.Bytes.) - (do loop Data.ProtoLens.defMessage) "StakeCredential" - buildMessage - = \ _x - -> (Data.Monoid.<>) - (case - Lens.Family2.view - (Data.ProtoLens.Field.field @"maybe'stakeCredential") _x - of - Prelude.Nothing -> Data.Monoid.mempty - (Prelude.Just (StakeCredential'AddrKeyHash v)) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 10) - ((\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - v) - (Prelude.Just (StakeCredential'ScriptHash v)) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 18) - ((\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - v)) - (Data.ProtoLens.Encoding.Wire.buildFieldSet - (Lens.Family2.view Data.ProtoLens.unknownFields _x)) -instance Control.DeepSeq.NFData StakeCredential where - rnf - = \ x__ - -> Control.DeepSeq.deepseq - (_StakeCredential'_unknownFields x__) - (Control.DeepSeq.deepseq (_StakeCredential'stakeCredential x__) ()) -instance Control.DeepSeq.NFData StakeCredential'StakeCredential where - rnf (StakeCredential'AddrKeyHash x__) = Control.DeepSeq.rnf x__ - rnf (StakeCredential'ScriptHash x__) = Control.DeepSeq.rnf x__ -_StakeCredential'AddrKeyHash :: - Data.ProtoLens.Prism.Prism' StakeCredential'StakeCredential Data.ByteString.ByteString -_StakeCredential'AddrKeyHash - = Data.ProtoLens.Prism.prism' - StakeCredential'AddrKeyHash - (\ p__ - -> case p__ of - (StakeCredential'AddrKeyHash p__val) -> Prelude.Just p__val - _otherwise -> Prelude.Nothing) -_StakeCredential'ScriptHash :: - Data.ProtoLens.Prism.Prism' StakeCredential'StakeCredential Data.ByteString.ByteString -_StakeCredential'ScriptHash - = Data.ProtoLens.Prism.prism' - StakeCredential'ScriptHash - (\ p__ - -> case p__ of - (StakeCredential'ScriptHash p__val) -> Prelude.Just p__val - _otherwise -> Prelude.Nothing) -{- | Fields : - - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.stakeCredential' @:: Lens' StakeDelegationCert StakeCredential@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'stakeCredential' @:: Lens' StakeDelegationCert (Prelude.Maybe StakeCredential)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.poolKeyhash' @:: Lens' StakeDelegationCert Data.ByteString.ByteString@ -} -data StakeDelegationCert - = StakeDelegationCert'_constructor {_StakeDelegationCert'stakeCredential :: !(Prelude.Maybe StakeCredential), - _StakeDelegationCert'poolKeyhash :: !Data.ByteString.ByteString, - _StakeDelegationCert'_unknownFields :: !Data.ProtoLens.FieldSet} - deriving stock (Prelude.Eq, Prelude.Ord) -instance Prelude.Show StakeDelegationCert where - showsPrec _ __x __s - = Prelude.showChar - '{' - (Prelude.showString - (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) -instance Data.ProtoLens.Field.HasField StakeDelegationCert "stakeCredential" StakeCredential where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _StakeDelegationCert'stakeCredential - (\ x__ y__ -> x__ {_StakeDelegationCert'stakeCredential = y__})) - (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) -instance Data.ProtoLens.Field.HasField StakeDelegationCert "maybe'stakeCredential" (Prelude.Maybe StakeCredential) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _StakeDelegationCert'stakeCredential - (\ x__ y__ -> x__ {_StakeDelegationCert'stakeCredential = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField StakeDelegationCert "poolKeyhash" Data.ByteString.ByteString where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _StakeDelegationCert'poolKeyhash - (\ x__ y__ -> x__ {_StakeDelegationCert'poolKeyhash = y__})) - Prelude.id -instance Data.ProtoLens.Message StakeDelegationCert where - messageName _ - = Data.Text.pack "utxorpc.v1alpha.cardano.StakeDelegationCert" - packedMessageDescriptor _ - = "\n\ - \\DC3StakeDelegationCert\DC2S\n\ - \\DLEstake_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SIstakeCredential\DC2!\n\ - \\fpool_keyhash\CAN\STX \SOH(\fR\vpoolKeyhash" - packedFileDescriptor _ = packedFileDescriptor - fieldsByTag - = let - stakeCredential__field_descriptor - = Data.ProtoLens.FieldDescriptor - "stake_credential" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor StakeCredential) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'stakeCredential")) :: - Data.ProtoLens.FieldDescriptor StakeDelegationCert - poolKeyhash__field_descriptor - = Data.ProtoLens.FieldDescriptor - "pool_keyhash" - (Data.ProtoLens.ScalarField Data.ProtoLens.BytesField :: - Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString) - (Data.ProtoLens.PlainField - Data.ProtoLens.Optional - (Data.ProtoLens.Field.field @"poolKeyhash")) :: - Data.ProtoLens.FieldDescriptor StakeDelegationCert - in - Data.Map.fromList - [(Data.ProtoLens.Tag 1, stakeCredential__field_descriptor), - (Data.ProtoLens.Tag 2, poolKeyhash__field_descriptor)] - unknownFields - = Lens.Family2.Unchecked.lens - _StakeDelegationCert'_unknownFields - (\ x__ y__ -> x__ {_StakeDelegationCert'_unknownFields = y__}) - defMessage - = StakeDelegationCert'_constructor - {_StakeDelegationCert'stakeCredential = Prelude.Nothing, - _StakeDelegationCert'poolKeyhash = Data.ProtoLens.fieldDefault, - _StakeDelegationCert'_unknownFields = []} - parseMessage - = let - loop :: - StakeDelegationCert - -> Data.ProtoLens.Encoding.Bytes.Parser StakeDelegationCert - loop x - = do end <- Data.ProtoLens.Encoding.Bytes.atEnd - if end then - do (let missing = [] - in - if Prelude.null missing then - Prelude.return () - else - Prelude.fail - ((Prelude.++) - "Missing required fields: " - (Prelude.show (missing :: [Prelude.String])))) - Prelude.return - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) - else - do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt - case tag of - 10 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) - "stake_credential" - loop - (Lens.Family2.set - (Data.ProtoLens.Field.field @"stakeCredential") y x) - 18 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.getBytes - (Prelude.fromIntegral len)) - "pool_keyhash" - loop - (Lens.Family2.set (Data.ProtoLens.Field.field @"poolKeyhash") y x) - wire - -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire - wire - loop - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) - in - (Data.ProtoLens.Encoding.Bytes.) - (do loop Data.ProtoLens.defMessage) "StakeDelegationCert" - buildMessage - = \ _x - -> (Data.Monoid.<>) - (case - Lens.Family2.view - (Data.ProtoLens.Field.field @"maybe'stakeCredential") _x - of - Prelude.Nothing -> Data.Monoid.mempty - (Prelude.Just _v) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 10) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - ((Data.Monoid.<>) - (let - _v - = Lens.Family2.view (Data.ProtoLens.Field.field @"poolKeyhash") _x - in - if (Prelude.==) _v Data.ProtoLens.fieldDefault then - Data.Monoid.mempty - else - (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 18) - ((\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - _v)) - (Data.ProtoLens.Encoding.Wire.buildFieldSet - (Lens.Family2.view Data.ProtoLens.unknownFields _x))) -instance Control.DeepSeq.NFData StakeDelegationCert where - rnf - = \ x__ - -> Control.DeepSeq.deepseq - (_StakeDelegationCert'_unknownFields x__) - (Control.DeepSeq.deepseq - (_StakeDelegationCert'stakeCredential x__) - (Control.DeepSeq.deepseq - (_StakeDelegationCert'poolKeyhash x__) ())) -{- | Fields : - - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.stakeCredential' @:: Lens' StakeRegDelegCert StakeCredential@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'stakeCredential' @:: Lens' StakeRegDelegCert (Prelude.Maybe StakeCredential)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.poolKeyhash' @:: Lens' StakeRegDelegCert Data.ByteString.ByteString@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.coin' @:: Lens' StakeRegDelegCert Data.Word.Word64@ -} -data StakeRegDelegCert - = StakeRegDelegCert'_constructor {_StakeRegDelegCert'stakeCredential :: !(Prelude.Maybe StakeCredential), - _StakeRegDelegCert'poolKeyhash :: !Data.ByteString.ByteString, - _StakeRegDelegCert'coin :: !Data.Word.Word64, - _StakeRegDelegCert'_unknownFields :: !Data.ProtoLens.FieldSet} - deriving stock (Prelude.Eq, Prelude.Ord) -instance Prelude.Show StakeRegDelegCert where - showsPrec _ __x __s - = Prelude.showChar - '{' - (Prelude.showString - (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) -instance Data.ProtoLens.Field.HasField StakeRegDelegCert "stakeCredential" StakeCredential where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _StakeRegDelegCert'stakeCredential - (\ x__ y__ -> x__ {_StakeRegDelegCert'stakeCredential = y__})) - (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) -instance Data.ProtoLens.Field.HasField StakeRegDelegCert "maybe'stakeCredential" (Prelude.Maybe StakeCredential) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _StakeRegDelegCert'stakeCredential - (\ x__ y__ -> x__ {_StakeRegDelegCert'stakeCredential = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField StakeRegDelegCert "poolKeyhash" Data.ByteString.ByteString where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _StakeRegDelegCert'poolKeyhash - (\ x__ y__ -> x__ {_StakeRegDelegCert'poolKeyhash = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField StakeRegDelegCert "coin" Data.Word.Word64 where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _StakeRegDelegCert'coin - (\ x__ y__ -> x__ {_StakeRegDelegCert'coin = y__})) - Prelude.id -instance Data.ProtoLens.Message StakeRegDelegCert where - messageName _ - = Data.Text.pack "utxorpc.v1alpha.cardano.StakeRegDelegCert" - packedMessageDescriptor _ - = "\n\ - \\DC1StakeRegDelegCert\DC2S\n\ - \\DLEstake_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SIstakeCredential\DC2!\n\ - \\fpool_keyhash\CAN\STX \SOH(\fR\vpoolKeyhash\DC2\DC2\n\ - \\EOTcoin\CAN\ETX \SOH(\EOTR\EOTcoin" - packedFileDescriptor _ = packedFileDescriptor - fieldsByTag - = let - stakeCredential__field_descriptor - = Data.ProtoLens.FieldDescriptor - "stake_credential" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor StakeCredential) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'stakeCredential")) :: - Data.ProtoLens.FieldDescriptor StakeRegDelegCert - poolKeyhash__field_descriptor - = Data.ProtoLens.FieldDescriptor - "pool_keyhash" - (Data.ProtoLens.ScalarField Data.ProtoLens.BytesField :: - Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString) - (Data.ProtoLens.PlainField - Data.ProtoLens.Optional - (Data.ProtoLens.Field.field @"poolKeyhash")) :: - Data.ProtoLens.FieldDescriptor StakeRegDelegCert - coin__field_descriptor - = Data.ProtoLens.FieldDescriptor - "coin" - (Data.ProtoLens.ScalarField Data.ProtoLens.UInt64Field :: - Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64) - (Data.ProtoLens.PlainField - Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"coin")) :: - Data.ProtoLens.FieldDescriptor StakeRegDelegCert - in - Data.Map.fromList - [(Data.ProtoLens.Tag 1, stakeCredential__field_descriptor), - (Data.ProtoLens.Tag 2, poolKeyhash__field_descriptor), - (Data.ProtoLens.Tag 3, coin__field_descriptor)] - unknownFields - = Lens.Family2.Unchecked.lens - _StakeRegDelegCert'_unknownFields - (\ x__ y__ -> x__ {_StakeRegDelegCert'_unknownFields = y__}) - defMessage - = StakeRegDelegCert'_constructor - {_StakeRegDelegCert'stakeCredential = Prelude.Nothing, - _StakeRegDelegCert'poolKeyhash = Data.ProtoLens.fieldDefault, - _StakeRegDelegCert'coin = Data.ProtoLens.fieldDefault, - _StakeRegDelegCert'_unknownFields = []} - parseMessage - = let - loop :: - StakeRegDelegCert - -> Data.ProtoLens.Encoding.Bytes.Parser StakeRegDelegCert - loop x - = do end <- Data.ProtoLens.Encoding.Bytes.atEnd - if end then - do (let missing = [] - in - if Prelude.null missing then - Prelude.return () - else - Prelude.fail - ((Prelude.++) - "Missing required fields: " - (Prelude.show (missing :: [Prelude.String])))) - Prelude.return - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) - else - do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt - case tag of - 10 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) - "stake_credential" - loop - (Lens.Family2.set - (Data.ProtoLens.Field.field @"stakeCredential") y x) - 18 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.getBytes - (Prelude.fromIntegral len)) - "pool_keyhash" - loop - (Lens.Family2.set (Data.ProtoLens.Field.field @"poolKeyhash") y x) - 24 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - Data.ProtoLens.Encoding.Bytes.getVarInt "coin" - loop (Lens.Family2.set (Data.ProtoLens.Field.field @"coin") y x) - wire - -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire - wire - loop - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) - in - (Data.ProtoLens.Encoding.Bytes.) - (do loop Data.ProtoLens.defMessage) "StakeRegDelegCert" - buildMessage - = \ _x - -> (Data.Monoid.<>) - (case - Lens.Family2.view - (Data.ProtoLens.Field.field @"maybe'stakeCredential") _x - of - Prelude.Nothing -> Data.Monoid.mempty - (Prelude.Just _v) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 10) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - ((Data.Monoid.<>) - (let - _v - = Lens.Family2.view (Data.ProtoLens.Field.field @"poolKeyhash") _x - in - if (Prelude.==) _v Data.ProtoLens.fieldDefault then - Data.Monoid.mempty - else - (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 18) - ((\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - _v)) - ((Data.Monoid.<>) - (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"coin") _x - in - if (Prelude.==) _v Data.ProtoLens.fieldDefault then - Data.Monoid.mempty - else - (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 24) - (Data.ProtoLens.Encoding.Bytes.putVarInt _v)) - (Data.ProtoLens.Encoding.Wire.buildFieldSet - (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) -instance Control.DeepSeq.NFData StakeRegDelegCert where - rnf - = \ x__ - -> Control.DeepSeq.deepseq - (_StakeRegDelegCert'_unknownFields x__) - (Control.DeepSeq.deepseq - (_StakeRegDelegCert'stakeCredential x__) - (Control.DeepSeq.deepseq - (_StakeRegDelegCert'poolKeyhash x__) - (Control.DeepSeq.deepseq (_StakeRegDelegCert'coin x__) ()))) -{- | Fields : - - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.stakeCredential' @:: Lens' StakeVoteDelegCert StakeCredential@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'stakeCredential' @:: Lens' StakeVoteDelegCert (Prelude.Maybe StakeCredential)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.poolKeyhash' @:: Lens' StakeVoteDelegCert Data.ByteString.ByteString@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.drep' @:: Lens' StakeVoteDelegCert DRep@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'drep' @:: Lens' StakeVoteDelegCert (Prelude.Maybe DRep)@ -} -data StakeVoteDelegCert - = StakeVoteDelegCert'_constructor {_StakeVoteDelegCert'stakeCredential :: !(Prelude.Maybe StakeCredential), - _StakeVoteDelegCert'poolKeyhash :: !Data.ByteString.ByteString, - _StakeVoteDelegCert'drep :: !(Prelude.Maybe DRep), - _StakeVoteDelegCert'_unknownFields :: !Data.ProtoLens.FieldSet} - deriving stock (Prelude.Eq, Prelude.Ord) -instance Prelude.Show StakeVoteDelegCert where - showsPrec _ __x __s - = Prelude.showChar - '{' - (Prelude.showString - (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) -instance Data.ProtoLens.Field.HasField StakeVoteDelegCert "stakeCredential" StakeCredential where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _StakeVoteDelegCert'stakeCredential - (\ x__ y__ -> x__ {_StakeVoteDelegCert'stakeCredential = y__})) - (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) -instance Data.ProtoLens.Field.HasField StakeVoteDelegCert "maybe'stakeCredential" (Prelude.Maybe StakeCredential) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _StakeVoteDelegCert'stakeCredential - (\ x__ y__ -> x__ {_StakeVoteDelegCert'stakeCredential = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField StakeVoteDelegCert "poolKeyhash" Data.ByteString.ByteString where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _StakeVoteDelegCert'poolKeyhash - (\ x__ y__ -> x__ {_StakeVoteDelegCert'poolKeyhash = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField StakeVoteDelegCert "drep" DRep where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _StakeVoteDelegCert'drep - (\ x__ y__ -> x__ {_StakeVoteDelegCert'drep = y__})) - (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) -instance Data.ProtoLens.Field.HasField StakeVoteDelegCert "maybe'drep" (Prelude.Maybe DRep) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _StakeVoteDelegCert'drep - (\ x__ y__ -> x__ {_StakeVoteDelegCert'drep = y__})) - Prelude.id -instance Data.ProtoLens.Message StakeVoteDelegCert where - messageName _ - = Data.Text.pack "utxorpc.v1alpha.cardano.StakeVoteDelegCert" - packedMessageDescriptor _ - = "\n\ - \\DC2StakeVoteDelegCert\DC2S\n\ - \\DLEstake_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SIstakeCredential\DC2!\n\ - \\fpool_keyhash\CAN\STX \SOH(\fR\vpoolKeyhash\DC21\n\ - \\EOTdrep\CAN\ETX \SOH(\v2\GS.utxorpc.v1alpha.cardano.DRepR\EOTdrep" - packedFileDescriptor _ = packedFileDescriptor - fieldsByTag - = let - stakeCredential__field_descriptor - = Data.ProtoLens.FieldDescriptor - "stake_credential" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor StakeCredential) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'stakeCredential")) :: - Data.ProtoLens.FieldDescriptor StakeVoteDelegCert - poolKeyhash__field_descriptor - = Data.ProtoLens.FieldDescriptor - "pool_keyhash" - (Data.ProtoLens.ScalarField Data.ProtoLens.BytesField :: - Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString) - (Data.ProtoLens.PlainField - Data.ProtoLens.Optional - (Data.ProtoLens.Field.field @"poolKeyhash")) :: - Data.ProtoLens.FieldDescriptor StakeVoteDelegCert - drep__field_descriptor - = Data.ProtoLens.FieldDescriptor - "drep" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor DRep) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'drep")) :: - Data.ProtoLens.FieldDescriptor StakeVoteDelegCert - in - Data.Map.fromList - [(Data.ProtoLens.Tag 1, stakeCredential__field_descriptor), - (Data.ProtoLens.Tag 2, poolKeyhash__field_descriptor), - (Data.ProtoLens.Tag 3, drep__field_descriptor)] - unknownFields - = Lens.Family2.Unchecked.lens - _StakeVoteDelegCert'_unknownFields - (\ x__ y__ -> x__ {_StakeVoteDelegCert'_unknownFields = y__}) - defMessage - = StakeVoteDelegCert'_constructor - {_StakeVoteDelegCert'stakeCredential = Prelude.Nothing, - _StakeVoteDelegCert'poolKeyhash = Data.ProtoLens.fieldDefault, - _StakeVoteDelegCert'drep = Prelude.Nothing, - _StakeVoteDelegCert'_unknownFields = []} - parseMessage - = let - loop :: - StakeVoteDelegCert - -> Data.ProtoLens.Encoding.Bytes.Parser StakeVoteDelegCert - loop x - = do end <- Data.ProtoLens.Encoding.Bytes.atEnd - if end then - do (let missing = [] - in - if Prelude.null missing then - Prelude.return () - else - Prelude.fail - ((Prelude.++) - "Missing required fields: " - (Prelude.show (missing :: [Prelude.String])))) - Prelude.return - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) - else - do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt - case tag of - 10 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) - "stake_credential" - loop - (Lens.Family2.set - (Data.ProtoLens.Field.field @"stakeCredential") y x) - 18 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.getBytes - (Prelude.fromIntegral len)) - "pool_keyhash" - loop - (Lens.Family2.set (Data.ProtoLens.Field.field @"poolKeyhash") y x) - 26 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) - "drep" - loop (Lens.Family2.set (Data.ProtoLens.Field.field @"drep") y x) - wire - -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire - wire - loop - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) - in - (Data.ProtoLens.Encoding.Bytes.) - (do loop Data.ProtoLens.defMessage) "StakeVoteDelegCert" - buildMessage - = \ _x - -> (Data.Monoid.<>) - (case - Lens.Family2.view - (Data.ProtoLens.Field.field @"maybe'stakeCredential") _x - of - Prelude.Nothing -> Data.Monoid.mempty - (Prelude.Just _v) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 10) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - ((Data.Monoid.<>) - (let - _v - = Lens.Family2.view (Data.ProtoLens.Field.field @"poolKeyhash") _x - in - if (Prelude.==) _v Data.ProtoLens.fieldDefault then - Data.Monoid.mempty - else - (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 18) - ((\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - _v)) - ((Data.Monoid.<>) - (case - Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'drep") _x - of - Prelude.Nothing -> Data.Monoid.mempty - (Prelude.Just _v) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 26) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - (Data.ProtoLens.Encoding.Wire.buildFieldSet - (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) -instance Control.DeepSeq.NFData StakeVoteDelegCert where - rnf - = \ x__ - -> Control.DeepSeq.deepseq - (_StakeVoteDelegCert'_unknownFields x__) - (Control.DeepSeq.deepseq - (_StakeVoteDelegCert'stakeCredential x__) - (Control.DeepSeq.deepseq - (_StakeVoteDelegCert'poolKeyhash x__) - (Control.DeepSeq.deepseq (_StakeVoteDelegCert'drep x__) ()))) -{- | Fields : - - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.stakeCredential' @:: Lens' StakeVoteRegDelegCert StakeCredential@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'stakeCredential' @:: Lens' StakeVoteRegDelegCert (Prelude.Maybe StakeCredential)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.poolKeyhash' @:: Lens' StakeVoteRegDelegCert Data.ByteString.ByteString@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.drep' @:: Lens' StakeVoteRegDelegCert DRep@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'drep' @:: Lens' StakeVoteRegDelegCert (Prelude.Maybe DRep)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.coin' @:: Lens' StakeVoteRegDelegCert Data.Word.Word64@ -} -data StakeVoteRegDelegCert - = StakeVoteRegDelegCert'_constructor {_StakeVoteRegDelegCert'stakeCredential :: !(Prelude.Maybe StakeCredential), - _StakeVoteRegDelegCert'poolKeyhash :: !Data.ByteString.ByteString, - _StakeVoteRegDelegCert'drep :: !(Prelude.Maybe DRep), - _StakeVoteRegDelegCert'coin :: !Data.Word.Word64, - _StakeVoteRegDelegCert'_unknownFields :: !Data.ProtoLens.FieldSet} - deriving stock (Prelude.Eq, Prelude.Ord) -instance Prelude.Show StakeVoteRegDelegCert where - showsPrec _ __x __s - = Prelude.showChar - '{' - (Prelude.showString - (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) -instance Data.ProtoLens.Field.HasField StakeVoteRegDelegCert "stakeCredential" StakeCredential where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _StakeVoteRegDelegCert'stakeCredential - (\ x__ y__ -> x__ {_StakeVoteRegDelegCert'stakeCredential = y__})) - (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) -instance Data.ProtoLens.Field.HasField StakeVoteRegDelegCert "maybe'stakeCredential" (Prelude.Maybe StakeCredential) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _StakeVoteRegDelegCert'stakeCredential - (\ x__ y__ -> x__ {_StakeVoteRegDelegCert'stakeCredential = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField StakeVoteRegDelegCert "poolKeyhash" Data.ByteString.ByteString where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _StakeVoteRegDelegCert'poolKeyhash - (\ x__ y__ -> x__ {_StakeVoteRegDelegCert'poolKeyhash = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField StakeVoteRegDelegCert "drep" DRep where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _StakeVoteRegDelegCert'drep - (\ x__ y__ -> x__ {_StakeVoteRegDelegCert'drep = y__})) - (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) -instance Data.ProtoLens.Field.HasField StakeVoteRegDelegCert "maybe'drep" (Prelude.Maybe DRep) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _StakeVoteRegDelegCert'drep - (\ x__ y__ -> x__ {_StakeVoteRegDelegCert'drep = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField StakeVoteRegDelegCert "coin" Data.Word.Word64 where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _StakeVoteRegDelegCert'coin - (\ x__ y__ -> x__ {_StakeVoteRegDelegCert'coin = y__})) - Prelude.id -instance Data.ProtoLens.Message StakeVoteRegDelegCert where - messageName _ - = Data.Text.pack "utxorpc.v1alpha.cardano.StakeVoteRegDelegCert" - packedMessageDescriptor _ - = "\n\ - \\NAKStakeVoteRegDelegCert\DC2S\n\ - \\DLEstake_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SIstakeCredential\DC2!\n\ - \\fpool_keyhash\CAN\STX \SOH(\fR\vpoolKeyhash\DC21\n\ - \\EOTdrep\CAN\ETX \SOH(\v2\GS.utxorpc.v1alpha.cardano.DRepR\EOTdrep\DC2\DC2\n\ - \\EOTcoin\CAN\EOT \SOH(\EOTR\EOTcoin" - packedFileDescriptor _ = packedFileDescriptor - fieldsByTag - = let - stakeCredential__field_descriptor - = Data.ProtoLens.FieldDescriptor - "stake_credential" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor StakeCredential) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'stakeCredential")) :: - Data.ProtoLens.FieldDescriptor StakeVoteRegDelegCert - poolKeyhash__field_descriptor - = Data.ProtoLens.FieldDescriptor - "pool_keyhash" - (Data.ProtoLens.ScalarField Data.ProtoLens.BytesField :: - Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString) - (Data.ProtoLens.PlainField - Data.ProtoLens.Optional - (Data.ProtoLens.Field.field @"poolKeyhash")) :: - Data.ProtoLens.FieldDescriptor StakeVoteRegDelegCert - drep__field_descriptor - = Data.ProtoLens.FieldDescriptor - "drep" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor DRep) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'drep")) :: - Data.ProtoLens.FieldDescriptor StakeVoteRegDelegCert - coin__field_descriptor - = Data.ProtoLens.FieldDescriptor - "coin" - (Data.ProtoLens.ScalarField Data.ProtoLens.UInt64Field :: - Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64) - (Data.ProtoLens.PlainField - Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"coin")) :: - Data.ProtoLens.FieldDescriptor StakeVoteRegDelegCert - in - Data.Map.fromList - [(Data.ProtoLens.Tag 1, stakeCredential__field_descriptor), - (Data.ProtoLens.Tag 2, poolKeyhash__field_descriptor), - (Data.ProtoLens.Tag 3, drep__field_descriptor), - (Data.ProtoLens.Tag 4, coin__field_descriptor)] - unknownFields - = Lens.Family2.Unchecked.lens - _StakeVoteRegDelegCert'_unknownFields - (\ x__ y__ -> x__ {_StakeVoteRegDelegCert'_unknownFields = y__}) - defMessage - = StakeVoteRegDelegCert'_constructor - {_StakeVoteRegDelegCert'stakeCredential = Prelude.Nothing, - _StakeVoteRegDelegCert'poolKeyhash = Data.ProtoLens.fieldDefault, - _StakeVoteRegDelegCert'drep = Prelude.Nothing, - _StakeVoteRegDelegCert'coin = Data.ProtoLens.fieldDefault, - _StakeVoteRegDelegCert'_unknownFields = []} - parseMessage - = let - loop :: - StakeVoteRegDelegCert - -> Data.ProtoLens.Encoding.Bytes.Parser StakeVoteRegDelegCert - loop x - = do end <- Data.ProtoLens.Encoding.Bytes.atEnd - if end then - do (let missing = [] - in - if Prelude.null missing then - Prelude.return () - else - Prelude.fail - ((Prelude.++) - "Missing required fields: " - (Prelude.show (missing :: [Prelude.String])))) - Prelude.return - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) - else - do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt - case tag of - 10 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) - "stake_credential" - loop - (Lens.Family2.set - (Data.ProtoLens.Field.field @"stakeCredential") y x) - 18 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.getBytes - (Prelude.fromIntegral len)) - "pool_keyhash" - loop - (Lens.Family2.set (Data.ProtoLens.Field.field @"poolKeyhash") y x) - 26 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) - "drep" - loop (Lens.Family2.set (Data.ProtoLens.Field.field @"drep") y x) - 32 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - Data.ProtoLens.Encoding.Bytes.getVarInt "coin" - loop (Lens.Family2.set (Data.ProtoLens.Field.field @"coin") y x) - wire - -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire - wire - loop - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) - in - (Data.ProtoLens.Encoding.Bytes.) - (do loop Data.ProtoLens.defMessage) "StakeVoteRegDelegCert" - buildMessage - = \ _x - -> (Data.Monoid.<>) - (case - Lens.Family2.view - (Data.ProtoLens.Field.field @"maybe'stakeCredential") _x - of - Prelude.Nothing -> Data.Monoid.mempty - (Prelude.Just _v) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 10) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - ((Data.Monoid.<>) - (let - _v - = Lens.Family2.view (Data.ProtoLens.Field.field @"poolKeyhash") _x - in - if (Prelude.==) _v Data.ProtoLens.fieldDefault then - Data.Monoid.mempty - else - (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 18) - ((\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - _v)) - ((Data.Monoid.<>) - (case - Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'drep") _x - of - Prelude.Nothing -> Data.Monoid.mempty - (Prelude.Just _v) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 26) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - ((Data.Monoid.<>) - (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"coin") _x - in - if (Prelude.==) _v Data.ProtoLens.fieldDefault then - Data.Monoid.mempty - else - (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 32) - (Data.ProtoLens.Encoding.Bytes.putVarInt _v)) - (Data.ProtoLens.Encoding.Wire.buildFieldSet - (Lens.Family2.view Data.ProtoLens.unknownFields _x))))) -instance Control.DeepSeq.NFData StakeVoteRegDelegCert where - rnf - = \ x__ - -> Control.DeepSeq.deepseq - (_StakeVoteRegDelegCert'_unknownFields x__) - (Control.DeepSeq.deepseq - (_StakeVoteRegDelegCert'stakeCredential x__) - (Control.DeepSeq.deepseq - (_StakeVoteRegDelegCert'poolKeyhash x__) - (Control.DeepSeq.deepseq - (_StakeVoteRegDelegCert'drep x__) - (Control.DeepSeq.deepseq (_StakeVoteRegDelegCert'coin x__) ())))) -{- | Fields : - - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.inputs' @:: Lens' Tx [TxInput]@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.vec'inputs' @:: Lens' Tx (Data.Vector.Vector TxInput)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.outputs' @:: Lens' Tx [TxOutput]@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.vec'outputs' @:: Lens' Tx (Data.Vector.Vector TxOutput)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.certificates' @:: Lens' Tx [Certificate]@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.vec'certificates' @:: Lens' Tx (Data.Vector.Vector Certificate)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.withdrawals' @:: Lens' Tx [Withdrawal]@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.vec'withdrawals' @:: Lens' Tx (Data.Vector.Vector Withdrawal)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.mint' @:: Lens' Tx [Multiasset]@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.vec'mint' @:: Lens' Tx (Data.Vector.Vector Multiasset)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.referenceInputs' @:: Lens' Tx [TxInput]@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.vec'referenceInputs' @:: Lens' Tx (Data.Vector.Vector TxInput)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.witnesses' @:: Lens' Tx WitnessSet@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'witnesses' @:: Lens' Tx (Prelude.Maybe WitnessSet)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.collateral' @:: Lens' Tx Collateral@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'collateral' @:: Lens' Tx (Prelude.Maybe Collateral)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.fee' @:: Lens' Tx Data.Word.Word64@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.validity' @:: Lens' Tx TxValidity@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'validity' @:: Lens' Tx (Prelude.Maybe TxValidity)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.successful' @:: Lens' Tx Prelude.Bool@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.auxiliary' @:: Lens' Tx AuxData@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'auxiliary' @:: Lens' Tx (Prelude.Maybe AuxData)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.hash' @:: Lens' Tx Data.ByteString.ByteString@ -} -data Tx - = Tx'_constructor {_Tx'inputs :: !(Data.Vector.Vector TxInput), - _Tx'outputs :: !(Data.Vector.Vector TxOutput), - _Tx'certificates :: !(Data.Vector.Vector Certificate), - _Tx'withdrawals :: !(Data.Vector.Vector Withdrawal), - _Tx'mint :: !(Data.Vector.Vector Multiasset), - _Tx'referenceInputs :: !(Data.Vector.Vector TxInput), - _Tx'witnesses :: !(Prelude.Maybe WitnessSet), - _Tx'collateral :: !(Prelude.Maybe Collateral), - _Tx'fee :: !Data.Word.Word64, - _Tx'validity :: !(Prelude.Maybe TxValidity), - _Tx'successful :: !Prelude.Bool, - _Tx'auxiliary :: !(Prelude.Maybe AuxData), - _Tx'hash :: !Data.ByteString.ByteString, - _Tx'_unknownFields :: !Data.ProtoLens.FieldSet} - deriving stock (Prelude.Eq, Prelude.Ord) -instance Prelude.Show Tx where - showsPrec _ __x __s - = Prelude.showChar - '{' - (Prelude.showString - (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) -instance Data.ProtoLens.Field.HasField Tx "inputs" [TxInput] where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Tx'inputs (\ x__ y__ -> x__ {_Tx'inputs = y__})) - (Lens.Family2.Unchecked.lens - Data.Vector.Generic.toList - (\ _ y__ -> Data.Vector.Generic.fromList y__)) -instance Data.ProtoLens.Field.HasField Tx "vec'inputs" (Data.Vector.Vector TxInput) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Tx'inputs (\ x__ y__ -> x__ {_Tx'inputs = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField Tx "outputs" [TxOutput] where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Tx'outputs (\ x__ y__ -> x__ {_Tx'outputs = y__})) - (Lens.Family2.Unchecked.lens - Data.Vector.Generic.toList - (\ _ y__ -> Data.Vector.Generic.fromList y__)) -instance Data.ProtoLens.Field.HasField Tx "vec'outputs" (Data.Vector.Vector TxOutput) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Tx'outputs (\ x__ y__ -> x__ {_Tx'outputs = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField Tx "certificates" [Certificate] where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Tx'certificates (\ x__ y__ -> x__ {_Tx'certificates = y__})) - (Lens.Family2.Unchecked.lens - Data.Vector.Generic.toList - (\ _ y__ -> Data.Vector.Generic.fromList y__)) -instance Data.ProtoLens.Field.HasField Tx "vec'certificates" (Data.Vector.Vector Certificate) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Tx'certificates (\ x__ y__ -> x__ {_Tx'certificates = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField Tx "withdrawals" [Withdrawal] where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Tx'withdrawals (\ x__ y__ -> x__ {_Tx'withdrawals = y__})) - (Lens.Family2.Unchecked.lens - Data.Vector.Generic.toList - (\ _ y__ -> Data.Vector.Generic.fromList y__)) -instance Data.ProtoLens.Field.HasField Tx "vec'withdrawals" (Data.Vector.Vector Withdrawal) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Tx'withdrawals (\ x__ y__ -> x__ {_Tx'withdrawals = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField Tx "mint" [Multiasset] where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Tx'mint (\ x__ y__ -> x__ {_Tx'mint = y__})) - (Lens.Family2.Unchecked.lens - Data.Vector.Generic.toList - (\ _ y__ -> Data.Vector.Generic.fromList y__)) -instance Data.ProtoLens.Field.HasField Tx "vec'mint" (Data.Vector.Vector Multiasset) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Tx'mint (\ x__ y__ -> x__ {_Tx'mint = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField Tx "referenceInputs" [TxInput] where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Tx'referenceInputs (\ x__ y__ -> x__ {_Tx'referenceInputs = y__})) - (Lens.Family2.Unchecked.lens - Data.Vector.Generic.toList - (\ _ y__ -> Data.Vector.Generic.fromList y__)) -instance Data.ProtoLens.Field.HasField Tx "vec'referenceInputs" (Data.Vector.Vector TxInput) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Tx'referenceInputs (\ x__ y__ -> x__ {_Tx'referenceInputs = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField Tx "witnesses" WitnessSet where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Tx'witnesses (\ x__ y__ -> x__ {_Tx'witnesses = y__})) - (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) -instance Data.ProtoLens.Field.HasField Tx "maybe'witnesses" (Prelude.Maybe WitnessSet) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Tx'witnesses (\ x__ y__ -> x__ {_Tx'witnesses = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField Tx "collateral" Collateral where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Tx'collateral (\ x__ y__ -> x__ {_Tx'collateral = y__})) - (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) -instance Data.ProtoLens.Field.HasField Tx "maybe'collateral" (Prelude.Maybe Collateral) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Tx'collateral (\ x__ y__ -> x__ {_Tx'collateral = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField Tx "fee" Data.Word.Word64 where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Tx'fee (\ x__ y__ -> x__ {_Tx'fee = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField Tx "validity" TxValidity where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Tx'validity (\ x__ y__ -> x__ {_Tx'validity = y__})) - (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) -instance Data.ProtoLens.Field.HasField Tx "maybe'validity" (Prelude.Maybe TxValidity) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Tx'validity (\ x__ y__ -> x__ {_Tx'validity = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField Tx "successful" Prelude.Bool where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Tx'successful (\ x__ y__ -> x__ {_Tx'successful = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField Tx "auxiliary" AuxData where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Tx'auxiliary (\ x__ y__ -> x__ {_Tx'auxiliary = y__})) - (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) -instance Data.ProtoLens.Field.HasField Tx "maybe'auxiliary" (Prelude.Maybe AuxData) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Tx'auxiliary (\ x__ y__ -> x__ {_Tx'auxiliary = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField Tx "hash" Data.ByteString.ByteString where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Tx'hash (\ x__ y__ -> x__ {_Tx'hash = y__})) - Prelude.id -instance Data.ProtoLens.Message Tx where - messageName _ = Data.Text.pack "utxorpc.v1alpha.cardano.Tx" - packedMessageDescriptor _ - = "\n\ - \\STXTx\DC28\n\ - \\ACKinputs\CAN\SOH \ETX(\v2 .utxorpc.v1alpha.cardano.TxInputR\ACKinputs\DC2;\n\ - \\aoutputs\CAN\STX \ETX(\v2!.utxorpc.v1alpha.cardano.TxOutputR\aoutputs\DC2H\n\ - \\fcertificates\CAN\ETX \ETX(\v2$.utxorpc.v1alpha.cardano.CertificateR\fcertificates\DC2E\n\ - \\vwithdrawals\CAN\EOT \ETX(\v2#.utxorpc.v1alpha.cardano.WithdrawalR\vwithdrawals\DC27\n\ - \\EOTmint\CAN\ENQ \ETX(\v2#.utxorpc.v1alpha.cardano.MultiassetR\EOTmint\DC2K\n\ - \\DLEreference_inputs\CAN\ACK \ETX(\v2 .utxorpc.v1alpha.cardano.TxInputR\SIreferenceInputs\DC2A\n\ - \\twitnesses\CAN\a \SOH(\v2#.utxorpc.v1alpha.cardano.WitnessSetR\twitnesses\DC2C\n\ - \\n\ - \collateral\CAN\b \SOH(\v2#.utxorpc.v1alpha.cardano.CollateralR\n\ - \collateral\DC2\DLE\n\ - \\ETXfee\CAN\t \SOH(\EOTR\ETXfee\DC2?\n\ - \\bvalidity\CAN\n\ - \ \SOH(\v2#.utxorpc.v1alpha.cardano.TxValidityR\bvalidity\DC2\RS\n\ - \\n\ - \successful\CAN\v \SOH(\bR\n\ - \successful\DC2>\n\ - \\tauxiliary\CAN\f \SOH(\v2 .utxorpc.v1alpha.cardano.AuxDataR\tauxiliary\DC2\DC2\n\ - \\EOThash\CAN\r \SOH(\fR\EOThash" - packedFileDescriptor _ = packedFileDescriptor - fieldsByTag - = let - inputs__field_descriptor - = Data.ProtoLens.FieldDescriptor - "inputs" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor TxInput) - (Data.ProtoLens.RepeatedField - Data.ProtoLens.Unpacked (Data.ProtoLens.Field.field @"inputs")) :: - Data.ProtoLens.FieldDescriptor Tx - outputs__field_descriptor - = Data.ProtoLens.FieldDescriptor - "outputs" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor TxOutput) - (Data.ProtoLens.RepeatedField - Data.ProtoLens.Unpacked (Data.ProtoLens.Field.field @"outputs")) :: - Data.ProtoLens.FieldDescriptor Tx - certificates__field_descriptor - = Data.ProtoLens.FieldDescriptor - "certificates" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor Certificate) - (Data.ProtoLens.RepeatedField - Data.ProtoLens.Unpacked - (Data.ProtoLens.Field.field @"certificates")) :: - Data.ProtoLens.FieldDescriptor Tx - withdrawals__field_descriptor - = Data.ProtoLens.FieldDescriptor - "withdrawals" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor Withdrawal) - (Data.ProtoLens.RepeatedField - Data.ProtoLens.Unpacked - (Data.ProtoLens.Field.field @"withdrawals")) :: - Data.ProtoLens.FieldDescriptor Tx - mint__field_descriptor - = Data.ProtoLens.FieldDescriptor - "mint" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor Multiasset) - (Data.ProtoLens.RepeatedField - Data.ProtoLens.Unpacked (Data.ProtoLens.Field.field @"mint")) :: - Data.ProtoLens.FieldDescriptor Tx - referenceInputs__field_descriptor - = Data.ProtoLens.FieldDescriptor - "reference_inputs" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor TxInput) - (Data.ProtoLens.RepeatedField - Data.ProtoLens.Unpacked - (Data.ProtoLens.Field.field @"referenceInputs")) :: - Data.ProtoLens.FieldDescriptor Tx - witnesses__field_descriptor - = Data.ProtoLens.FieldDescriptor - "witnesses" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor WitnessSet) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'witnesses")) :: - Data.ProtoLens.FieldDescriptor Tx - collateral__field_descriptor - = Data.ProtoLens.FieldDescriptor - "collateral" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor Collateral) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'collateral")) :: - Data.ProtoLens.FieldDescriptor Tx - fee__field_descriptor - = Data.ProtoLens.FieldDescriptor - "fee" - (Data.ProtoLens.ScalarField Data.ProtoLens.UInt64Field :: - Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64) - (Data.ProtoLens.PlainField - Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"fee")) :: - Data.ProtoLens.FieldDescriptor Tx - validity__field_descriptor - = Data.ProtoLens.FieldDescriptor - "validity" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor TxValidity) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'validity")) :: - Data.ProtoLens.FieldDescriptor Tx - successful__field_descriptor - = Data.ProtoLens.FieldDescriptor - "successful" - (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: - Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) - (Data.ProtoLens.PlainField - Data.ProtoLens.Optional - (Data.ProtoLens.Field.field @"successful")) :: - Data.ProtoLens.FieldDescriptor Tx - auxiliary__field_descriptor - = Data.ProtoLens.FieldDescriptor - "auxiliary" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor AuxData) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'auxiliary")) :: - Data.ProtoLens.FieldDescriptor Tx - hash__field_descriptor - = Data.ProtoLens.FieldDescriptor - "hash" - (Data.ProtoLens.ScalarField Data.ProtoLens.BytesField :: - Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString) - (Data.ProtoLens.PlainField - Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"hash")) :: - Data.ProtoLens.FieldDescriptor Tx - in - Data.Map.fromList - [(Data.ProtoLens.Tag 1, inputs__field_descriptor), - (Data.ProtoLens.Tag 2, outputs__field_descriptor), - (Data.ProtoLens.Tag 3, certificates__field_descriptor), - (Data.ProtoLens.Tag 4, withdrawals__field_descriptor), - (Data.ProtoLens.Tag 5, mint__field_descriptor), - (Data.ProtoLens.Tag 6, referenceInputs__field_descriptor), - (Data.ProtoLens.Tag 7, witnesses__field_descriptor), - (Data.ProtoLens.Tag 8, collateral__field_descriptor), - (Data.ProtoLens.Tag 9, fee__field_descriptor), - (Data.ProtoLens.Tag 10, validity__field_descriptor), - (Data.ProtoLens.Tag 11, successful__field_descriptor), - (Data.ProtoLens.Tag 12, auxiliary__field_descriptor), - (Data.ProtoLens.Tag 13, hash__field_descriptor)] - unknownFields - = Lens.Family2.Unchecked.lens - _Tx'_unknownFields (\ x__ y__ -> x__ {_Tx'_unknownFields = y__}) - defMessage - = Tx'_constructor - {_Tx'inputs = Data.Vector.Generic.empty, - _Tx'outputs = Data.Vector.Generic.empty, - _Tx'certificates = Data.Vector.Generic.empty, - _Tx'withdrawals = Data.Vector.Generic.empty, - _Tx'mint = Data.Vector.Generic.empty, - _Tx'referenceInputs = Data.Vector.Generic.empty, - _Tx'witnesses = Prelude.Nothing, _Tx'collateral = Prelude.Nothing, - _Tx'fee = Data.ProtoLens.fieldDefault, - _Tx'validity = Prelude.Nothing, - _Tx'successful = Data.ProtoLens.fieldDefault, - _Tx'auxiliary = Prelude.Nothing, - _Tx'hash = Data.ProtoLens.fieldDefault, _Tx'_unknownFields = []} - parseMessage - = let - loop :: - Tx - -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Certificate - -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld TxInput - -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Multiasset - -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld TxOutput - -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld TxInput - -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Withdrawal - -> Data.ProtoLens.Encoding.Bytes.Parser Tx - loop - x - mutable'certificates - mutable'inputs - mutable'mint - mutable'outputs - mutable'referenceInputs - mutable'withdrawals - = do end <- Data.ProtoLens.Encoding.Bytes.atEnd - if end then - do frozen'certificates <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO - (Data.ProtoLens.Encoding.Growing.unsafeFreeze - mutable'certificates) - frozen'inputs <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO - (Data.ProtoLens.Encoding.Growing.unsafeFreeze - mutable'inputs) - frozen'mint <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO - (Data.ProtoLens.Encoding.Growing.unsafeFreeze mutable'mint) - frozen'outputs <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO - (Data.ProtoLens.Encoding.Growing.unsafeFreeze - mutable'outputs) - frozen'referenceInputs <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO - (Data.ProtoLens.Encoding.Growing.unsafeFreeze - mutable'referenceInputs) - frozen'withdrawals <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO - (Data.ProtoLens.Encoding.Growing.unsafeFreeze - mutable'withdrawals) - (let missing = [] - in - if Prelude.null missing then - Prelude.return () - else - Prelude.fail - ((Prelude.++) - "Missing required fields: " - (Prelude.show (missing :: [Prelude.String])))) - Prelude.return - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) - (Lens.Family2.set - (Data.ProtoLens.Field.field @"vec'certificates") - frozen'certificates - (Lens.Family2.set - (Data.ProtoLens.Field.field @"vec'inputs") frozen'inputs - (Lens.Family2.set - (Data.ProtoLens.Field.field @"vec'mint") frozen'mint - (Lens.Family2.set - (Data.ProtoLens.Field.field @"vec'outputs") frozen'outputs - (Lens.Family2.set - (Data.ProtoLens.Field.field @"vec'referenceInputs") - frozen'referenceInputs - (Lens.Family2.set - (Data.ProtoLens.Field.field @"vec'withdrawals") - frozen'withdrawals x))))))) - else - do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt - case tag of - 10 - -> do !y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) - Data.ProtoLens.parseMessage) - "inputs" - v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO - (Data.ProtoLens.Encoding.Growing.append mutable'inputs y) - loop - x mutable'certificates v mutable'mint mutable'outputs - mutable'referenceInputs mutable'withdrawals - 18 - -> do !y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) - Data.ProtoLens.parseMessage) - "outputs" - v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO - (Data.ProtoLens.Encoding.Growing.append mutable'outputs y) - loop - x mutable'certificates mutable'inputs mutable'mint v - mutable'referenceInputs mutable'withdrawals - 26 - -> do !y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) - Data.ProtoLens.parseMessage) - "certificates" - v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO - (Data.ProtoLens.Encoding.Growing.append - mutable'certificates y) - loop - x v mutable'inputs mutable'mint mutable'outputs - mutable'referenceInputs mutable'withdrawals - 34 - -> do !y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) - Data.ProtoLens.parseMessage) - "withdrawals" - v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO - (Data.ProtoLens.Encoding.Growing.append - mutable'withdrawals y) - loop - x mutable'certificates mutable'inputs mutable'mint mutable'outputs - mutable'referenceInputs v - 42 - -> do !y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) - Data.ProtoLens.parseMessage) - "mint" - v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO - (Data.ProtoLens.Encoding.Growing.append mutable'mint y) - loop - x mutable'certificates mutable'inputs v mutable'outputs - mutable'referenceInputs mutable'withdrawals - 50 - -> do !y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) - Data.ProtoLens.parseMessage) - "reference_inputs" - v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO - (Data.ProtoLens.Encoding.Growing.append - mutable'referenceInputs y) - loop - x mutable'certificates mutable'inputs mutable'mint mutable'outputs - v mutable'withdrawals - 58 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) - "witnesses" - loop - (Lens.Family2.set (Data.ProtoLens.Field.field @"witnesses") y x) - mutable'certificates mutable'inputs mutable'mint mutable'outputs - mutable'referenceInputs mutable'withdrawals - 66 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) - "collateral" - loop - (Lens.Family2.set (Data.ProtoLens.Field.field @"collateral") y x) - mutable'certificates mutable'inputs mutable'mint mutable'outputs - mutable'referenceInputs mutable'withdrawals - 72 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - Data.ProtoLens.Encoding.Bytes.getVarInt "fee" - loop - (Lens.Family2.set (Data.ProtoLens.Field.field @"fee") y x) - mutable'certificates mutable'inputs mutable'mint mutable'outputs - mutable'referenceInputs mutable'withdrawals - 82 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) - "validity" - loop - (Lens.Family2.set (Data.ProtoLens.Field.field @"validity") y x) - mutable'certificates mutable'inputs mutable'mint mutable'outputs - mutable'referenceInputs mutable'withdrawals - 88 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (Prelude.fmap - ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) - "successful" - loop - (Lens.Family2.set (Data.ProtoLens.Field.field @"successful") y x) - mutable'certificates mutable'inputs mutable'mint mutable'outputs - mutable'referenceInputs mutable'withdrawals - 98 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) - "auxiliary" - loop - (Lens.Family2.set (Data.ProtoLens.Field.field @"auxiliary") y x) - mutable'certificates mutable'inputs mutable'mint mutable'outputs - mutable'referenceInputs mutable'withdrawals - 106 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.getBytes - (Prelude.fromIntegral len)) - "hash" - loop - (Lens.Family2.set (Data.ProtoLens.Field.field @"hash") y x) - mutable'certificates mutable'inputs mutable'mint mutable'outputs - mutable'referenceInputs mutable'withdrawals - wire - -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire - wire - loop - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) - mutable'certificates mutable'inputs mutable'mint mutable'outputs - mutable'referenceInputs mutable'withdrawals - in - (Data.ProtoLens.Encoding.Bytes.) - (do mutable'certificates <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO - Data.ProtoLens.Encoding.Growing.new - mutable'inputs <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO - Data.ProtoLens.Encoding.Growing.new - mutable'mint <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO - Data.ProtoLens.Encoding.Growing.new - mutable'outputs <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO - Data.ProtoLens.Encoding.Growing.new - mutable'referenceInputs <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO - Data.ProtoLens.Encoding.Growing.new - mutable'withdrawals <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO - Data.ProtoLens.Encoding.Growing.new - loop - Data.ProtoLens.defMessage mutable'certificates mutable'inputs - mutable'mint mutable'outputs mutable'referenceInputs - mutable'withdrawals) - "Tx" - buildMessage - = \ _x - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.foldMapBuilder - (\ _v - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 10) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - (Lens.Family2.view (Data.ProtoLens.Field.field @"vec'inputs") _x)) - ((Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.foldMapBuilder - (\ _v - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 18) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - (Lens.Family2.view (Data.ProtoLens.Field.field @"vec'outputs") _x)) - ((Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.foldMapBuilder - (\ _v - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 26) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - (Lens.Family2.view - (Data.ProtoLens.Field.field @"vec'certificates") _x)) - ((Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.foldMapBuilder - (\ _v - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 34) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - (Lens.Family2.view - (Data.ProtoLens.Field.field @"vec'withdrawals") _x)) - ((Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.foldMapBuilder - (\ _v - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 42) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral - (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - (Lens.Family2.view (Data.ProtoLens.Field.field @"vec'mint") _x)) - ((Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.foldMapBuilder - (\ _v - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 50) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral - (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - (Lens.Family2.view - (Data.ProtoLens.Field.field @"vec'referenceInputs") _x)) - ((Data.Monoid.<>) - (case - Lens.Family2.view - (Data.ProtoLens.Field.field @"maybe'witnesses") _x - of - Prelude.Nothing -> Data.Monoid.mempty - (Prelude.Just _v) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 58) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral - (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - ((Data.Monoid.<>) - (case - Lens.Family2.view - (Data.ProtoLens.Field.field @"maybe'collateral") _x - of - Prelude.Nothing -> Data.Monoid.mempty - (Prelude.Just _v) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 66) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral - (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - ((Data.Monoid.<>) - (let - _v - = Lens.Family2.view (Data.ProtoLens.Field.field @"fee") _x - in - if (Prelude.==) _v Data.ProtoLens.fieldDefault then - Data.Monoid.mempty - else - (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 72) - (Data.ProtoLens.Encoding.Bytes.putVarInt _v)) - ((Data.Monoid.<>) - (case - Lens.Family2.view - (Data.ProtoLens.Field.field @"maybe'validity") _x - of - Prelude.Nothing -> Data.Monoid.mempty - (Prelude.Just _v) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 82) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral - (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes - bs)) - Data.ProtoLens.encodeMessage _v)) - ((Data.Monoid.<>) - (let - _v - = Lens.Family2.view - (Data.ProtoLens.Field.field @"successful") _x - in - if (Prelude.==) _v Data.ProtoLens.fieldDefault then - Data.Monoid.mempty - else - (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 88) - ((Prelude..) - Data.ProtoLens.Encoding.Bytes.putVarInt - (\ b -> if b then 1 else 0) _v)) - ((Data.Monoid.<>) - (case - Lens.Family2.view - (Data.ProtoLens.Field.field @"maybe'auxiliary") - _x - of - Prelude.Nothing -> Data.Monoid.mempty - (Prelude.Just _v) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 98) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral - (Data.ByteString.length - bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes - bs)) - Data.ProtoLens.encodeMessage _v)) - ((Data.Monoid.<>) - (let - _v - = Lens.Family2.view - (Data.ProtoLens.Field.field @"hash") _x - in - if (Prelude.==) - _v Data.ProtoLens.fieldDefault then - Data.Monoid.mempty - else - (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - 106) - ((\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral - (Data.ByteString.length - bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes - bs)) - _v)) - (Data.ProtoLens.Encoding.Wire.buildFieldSet - (Lens.Family2.view - Data.ProtoLens.unknownFields _x)))))))))))))) -instance Control.DeepSeq.NFData Tx where - rnf - = \ x__ - -> Control.DeepSeq.deepseq - (_Tx'_unknownFields x__) - (Control.DeepSeq.deepseq - (_Tx'inputs x__) - (Control.DeepSeq.deepseq - (_Tx'outputs x__) - (Control.DeepSeq.deepseq - (_Tx'certificates x__) - (Control.DeepSeq.deepseq - (_Tx'withdrawals x__) - (Control.DeepSeq.deepseq - (_Tx'mint x__) - (Control.DeepSeq.deepseq - (_Tx'referenceInputs x__) - (Control.DeepSeq.deepseq - (_Tx'witnesses x__) - (Control.DeepSeq.deepseq - (_Tx'collateral x__) - (Control.DeepSeq.deepseq - (_Tx'fee x__) - (Control.DeepSeq.deepseq - (_Tx'validity x__) - (Control.DeepSeq.deepseq - (_Tx'successful x__) - (Control.DeepSeq.deepseq - (_Tx'auxiliary x__) - (Control.DeepSeq.deepseq - (_Tx'hash x__) ()))))))))))))) -{- | Fields : - - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.fee' @:: Lens' TxEval Data.Word.Word64@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.exUnits' @:: Lens' TxEval ExUnits@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'exUnits' @:: Lens' TxEval (Prelude.Maybe ExUnits)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.errors' @:: Lens' TxEval [EvalError]@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.vec'errors' @:: Lens' TxEval (Data.Vector.Vector EvalError)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.traces' @:: Lens' TxEval [EvalTrace]@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.vec'traces' @:: Lens' TxEval (Data.Vector.Vector EvalTrace)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.redeemers' @:: Lens' TxEval [Redeemer]@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.vec'redeemers' @:: Lens' TxEval (Data.Vector.Vector Redeemer)@ -} -data TxEval - = TxEval'_constructor {_TxEval'fee :: !Data.Word.Word64, - _TxEval'exUnits :: !(Prelude.Maybe ExUnits), - _TxEval'errors :: !(Data.Vector.Vector EvalError), - _TxEval'traces :: !(Data.Vector.Vector EvalTrace), - _TxEval'redeemers :: !(Data.Vector.Vector Redeemer), - _TxEval'_unknownFields :: !Data.ProtoLens.FieldSet} - deriving stock (Prelude.Eq, Prelude.Ord) -instance Prelude.Show TxEval where - showsPrec _ __x __s - = Prelude.showChar - '{' - (Prelude.showString - (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) -instance Data.ProtoLens.Field.HasField TxEval "fee" Data.Word.Word64 where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _TxEval'fee (\ x__ y__ -> x__ {_TxEval'fee = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField TxEval "exUnits" ExUnits where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _TxEval'exUnits (\ x__ y__ -> x__ {_TxEval'exUnits = y__})) - (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) -instance Data.ProtoLens.Field.HasField TxEval "maybe'exUnits" (Prelude.Maybe ExUnits) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _TxEval'exUnits (\ x__ y__ -> x__ {_TxEval'exUnits = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField TxEval "errors" [EvalError] where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _TxEval'errors (\ x__ y__ -> x__ {_TxEval'errors = y__})) - (Lens.Family2.Unchecked.lens - Data.Vector.Generic.toList - (\ _ y__ -> Data.Vector.Generic.fromList y__)) -instance Data.ProtoLens.Field.HasField TxEval "vec'errors" (Data.Vector.Vector EvalError) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _TxEval'errors (\ x__ y__ -> x__ {_TxEval'errors = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField TxEval "traces" [EvalTrace] where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _TxEval'traces (\ x__ y__ -> x__ {_TxEval'traces = y__})) - (Lens.Family2.Unchecked.lens - Data.Vector.Generic.toList - (\ _ y__ -> Data.Vector.Generic.fromList y__)) -instance Data.ProtoLens.Field.HasField TxEval "vec'traces" (Data.Vector.Vector EvalTrace) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _TxEval'traces (\ x__ y__ -> x__ {_TxEval'traces = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField TxEval "redeemers" [Redeemer] where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _TxEval'redeemers (\ x__ y__ -> x__ {_TxEval'redeemers = y__})) - (Lens.Family2.Unchecked.lens - Data.Vector.Generic.toList - (\ _ y__ -> Data.Vector.Generic.fromList y__)) -instance Data.ProtoLens.Field.HasField TxEval "vec'redeemers" (Data.Vector.Vector Redeemer) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _TxEval'redeemers (\ x__ y__ -> x__ {_TxEval'redeemers = y__})) - Prelude.id -instance Data.ProtoLens.Message TxEval where - messageName _ = Data.Text.pack "utxorpc.v1alpha.cardano.TxEval" - packedMessageDescriptor _ - = "\n\ - \\ACKTxEval\DC2\DLE\n\ - \\ETXfee\CAN\SOH \SOH(\EOTR\ETXfee\DC2;\n\ - \\bex_units\CAN\STX \SOH(\v2 .utxorpc.v1alpha.cardano.ExUnitsR\aexUnits\DC2:\n\ - \\ACKerrors\CAN\ETX \ETX(\v2\".utxorpc.v1alpha.cardano.EvalErrorR\ACKerrors\DC2:\n\ - \\ACKtraces\CAN\EOT \ETX(\v2\".utxorpc.v1alpha.cardano.EvalTraceR\ACKtraces\DC2?\n\ - \\tredeemers\CAN\ENQ \ETX(\v2!.utxorpc.v1alpha.cardano.RedeemerR\tredeemers" - packedFileDescriptor _ = packedFileDescriptor - fieldsByTag - = let - fee__field_descriptor - = Data.ProtoLens.FieldDescriptor - "fee" - (Data.ProtoLens.ScalarField Data.ProtoLens.UInt64Field :: - Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64) - (Data.ProtoLens.PlainField - Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"fee")) :: - Data.ProtoLens.FieldDescriptor TxEval - exUnits__field_descriptor - = Data.ProtoLens.FieldDescriptor - "ex_units" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor ExUnits) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'exUnits")) :: - Data.ProtoLens.FieldDescriptor TxEval - errors__field_descriptor - = Data.ProtoLens.FieldDescriptor - "errors" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor EvalError) - (Data.ProtoLens.RepeatedField - Data.ProtoLens.Unpacked (Data.ProtoLens.Field.field @"errors")) :: - Data.ProtoLens.FieldDescriptor TxEval - traces__field_descriptor - = Data.ProtoLens.FieldDescriptor - "traces" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor EvalTrace) - (Data.ProtoLens.RepeatedField - Data.ProtoLens.Unpacked (Data.ProtoLens.Field.field @"traces")) :: - Data.ProtoLens.FieldDescriptor TxEval - redeemers__field_descriptor - = Data.ProtoLens.FieldDescriptor - "redeemers" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor Redeemer) - (Data.ProtoLens.RepeatedField - Data.ProtoLens.Unpacked - (Data.ProtoLens.Field.field @"redeemers")) :: - Data.ProtoLens.FieldDescriptor TxEval - in - Data.Map.fromList - [(Data.ProtoLens.Tag 1, fee__field_descriptor), - (Data.ProtoLens.Tag 2, exUnits__field_descriptor), - (Data.ProtoLens.Tag 3, errors__field_descriptor), - (Data.ProtoLens.Tag 4, traces__field_descriptor), - (Data.ProtoLens.Tag 5, redeemers__field_descriptor)] - unknownFields - = Lens.Family2.Unchecked.lens - _TxEval'_unknownFields - (\ x__ y__ -> x__ {_TxEval'_unknownFields = y__}) - defMessage - = TxEval'_constructor - {_TxEval'fee = Data.ProtoLens.fieldDefault, - _TxEval'exUnits = Prelude.Nothing, - _TxEval'errors = Data.Vector.Generic.empty, - _TxEval'traces = Data.Vector.Generic.empty, - _TxEval'redeemers = Data.Vector.Generic.empty, - _TxEval'_unknownFields = []} - parseMessage - = let - loop :: - TxEval - -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld EvalError - -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Redeemer - -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld EvalTrace - -> Data.ProtoLens.Encoding.Bytes.Parser TxEval - loop x mutable'errors mutable'redeemers mutable'traces - = do end <- Data.ProtoLens.Encoding.Bytes.atEnd - if end then - do frozen'errors <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO - (Data.ProtoLens.Encoding.Growing.unsafeFreeze - mutable'errors) - frozen'redeemers <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO - (Data.ProtoLens.Encoding.Growing.unsafeFreeze - mutable'redeemers) - frozen'traces <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO - (Data.ProtoLens.Encoding.Growing.unsafeFreeze - mutable'traces) - (let missing = [] - in - if Prelude.null missing then - Prelude.return () - else - Prelude.fail - ((Prelude.++) - "Missing required fields: " - (Prelude.show (missing :: [Prelude.String])))) - Prelude.return - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) - (Lens.Family2.set - (Data.ProtoLens.Field.field @"vec'errors") frozen'errors - (Lens.Family2.set - (Data.ProtoLens.Field.field @"vec'redeemers") frozen'redeemers - (Lens.Family2.set - (Data.ProtoLens.Field.field @"vec'traces") frozen'traces x)))) - else - do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt - case tag of - 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) - Data.ProtoLens.Encoding.Bytes.getVarInt "fee" - loop - (Lens.Family2.set (Data.ProtoLens.Field.field @"fee") y x) - mutable'errors mutable'redeemers mutable'traces - 18 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) - "ex_units" - loop - (Lens.Family2.set (Data.ProtoLens.Field.field @"exUnits") y x) - mutable'errors mutable'redeemers mutable'traces - 26 - -> do !y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) - Data.ProtoLens.parseMessage) - "errors" - v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO - (Data.ProtoLens.Encoding.Growing.append mutable'errors y) - loop x v mutable'redeemers mutable'traces - 34 - -> do !y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) - Data.ProtoLens.parseMessage) - "traces" - v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO - (Data.ProtoLens.Encoding.Growing.append mutable'traces y) - loop x mutable'errors mutable'redeemers v - 42 - -> do !y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) - Data.ProtoLens.parseMessage) - "redeemers" - v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO - (Data.ProtoLens.Encoding.Growing.append mutable'redeemers y) - loop x mutable'errors v mutable'traces - wire - -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire - wire - loop - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) - mutable'errors mutable'redeemers mutable'traces - in - (Data.ProtoLens.Encoding.Bytes.) - (do mutable'errors <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO - Data.ProtoLens.Encoding.Growing.new - mutable'redeemers <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO - Data.ProtoLens.Encoding.Growing.new - mutable'traces <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO - Data.ProtoLens.Encoding.Growing.new - loop - Data.ProtoLens.defMessage mutable'errors mutable'redeemers - mutable'traces) - "TxEval" - buildMessage - = \ _x - -> (Data.Monoid.<>) - (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"fee") _x - in - if (Prelude.==) _v Data.ProtoLens.fieldDefault then - Data.Monoid.mempty - else - (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 8) - (Data.ProtoLens.Encoding.Bytes.putVarInt _v)) - ((Data.Monoid.<>) - (case - Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'exUnits") _x - of - Prelude.Nothing -> Data.Monoid.mempty - (Prelude.Just _v) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 18) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - ((Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.foldMapBuilder - (\ _v - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 26) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - (Lens.Family2.view (Data.ProtoLens.Field.field @"vec'errors") _x)) - ((Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.foldMapBuilder - (\ _v - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 34) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - (Lens.Family2.view (Data.ProtoLens.Field.field @"vec'traces") _x)) - ((Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.foldMapBuilder - (\ _v - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 42) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral - (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - (Lens.Family2.view - (Data.ProtoLens.Field.field @"vec'redeemers") _x)) - (Data.ProtoLens.Encoding.Wire.buildFieldSet - (Lens.Family2.view Data.ProtoLens.unknownFields _x)))))) -instance Control.DeepSeq.NFData TxEval where - rnf - = \ x__ - -> Control.DeepSeq.deepseq - (_TxEval'_unknownFields x__) - (Control.DeepSeq.deepseq - (_TxEval'fee x__) - (Control.DeepSeq.deepseq - (_TxEval'exUnits x__) - (Control.DeepSeq.deepseq - (_TxEval'errors x__) - (Control.DeepSeq.deepseq - (_TxEval'traces x__) - (Control.DeepSeq.deepseq (_TxEval'redeemers x__) ()))))) -{- | Fields : - - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.txHash' @:: Lens' TxInput Data.ByteString.ByteString@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.outputIndex' @:: Lens' TxInput Data.Word.Word32@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.asOutput' @:: Lens' TxInput TxOutput@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'asOutput' @:: Lens' TxInput (Prelude.Maybe TxOutput)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.redeemer' @:: Lens' TxInput Redeemer@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'redeemer' @:: Lens' TxInput (Prelude.Maybe Redeemer)@ -} -data TxInput - = TxInput'_constructor {_TxInput'txHash :: !Data.ByteString.ByteString, - _TxInput'outputIndex :: !Data.Word.Word32, - _TxInput'asOutput :: !(Prelude.Maybe TxOutput), - _TxInput'redeemer :: !(Prelude.Maybe Redeemer), - _TxInput'_unknownFields :: !Data.ProtoLens.FieldSet} - deriving stock (Prelude.Eq, Prelude.Ord) -instance Prelude.Show TxInput where - showsPrec _ __x __s - = Prelude.showChar - '{' - (Prelude.showString - (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) -instance Data.ProtoLens.Field.HasField TxInput "txHash" Data.ByteString.ByteString where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _TxInput'txHash (\ x__ y__ -> x__ {_TxInput'txHash = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField TxInput "outputIndex" Data.Word.Word32 where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _TxInput'outputIndex - (\ x__ y__ -> x__ {_TxInput'outputIndex = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField TxInput "asOutput" TxOutput where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _TxInput'asOutput (\ x__ y__ -> x__ {_TxInput'asOutput = y__})) - (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) -instance Data.ProtoLens.Field.HasField TxInput "maybe'asOutput" (Prelude.Maybe TxOutput) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _TxInput'asOutput (\ x__ y__ -> x__ {_TxInput'asOutput = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField TxInput "redeemer" Redeemer where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _TxInput'redeemer (\ x__ y__ -> x__ {_TxInput'redeemer = y__})) - (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) -instance Data.ProtoLens.Field.HasField TxInput "maybe'redeemer" (Prelude.Maybe Redeemer) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _TxInput'redeemer (\ x__ y__ -> x__ {_TxInput'redeemer = y__})) - Prelude.id -instance Data.ProtoLens.Message TxInput where - messageName _ = Data.Text.pack "utxorpc.v1alpha.cardano.TxInput" - packedMessageDescriptor _ - = "\n\ - \\aTxInput\DC2\ETB\n\ - \\atx_hash\CAN\SOH \SOH(\fR\ACKtxHash\DC2!\n\ - \\foutput_index\CAN\STX \SOH(\rR\voutputIndex\DC2>\n\ - \\tas_output\CAN\ETX \SOH(\v2!.utxorpc.v1alpha.cardano.TxOutputR\basOutput\DC2=\n\ - \\bredeemer\CAN\EOT \SOH(\v2!.utxorpc.v1alpha.cardano.RedeemerR\bredeemer" - packedFileDescriptor _ = packedFileDescriptor - fieldsByTag - = let - txHash__field_descriptor - = Data.ProtoLens.FieldDescriptor - "tx_hash" - (Data.ProtoLens.ScalarField Data.ProtoLens.BytesField :: - Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString) - (Data.ProtoLens.PlainField - Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"txHash")) :: - Data.ProtoLens.FieldDescriptor TxInput - outputIndex__field_descriptor - = Data.ProtoLens.FieldDescriptor - "output_index" - (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: - Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) - (Data.ProtoLens.PlainField - Data.ProtoLens.Optional - (Data.ProtoLens.Field.field @"outputIndex")) :: - Data.ProtoLens.FieldDescriptor TxInput - asOutput__field_descriptor - = Data.ProtoLens.FieldDescriptor - "as_output" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor TxOutput) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'asOutput")) :: - Data.ProtoLens.FieldDescriptor TxInput - redeemer__field_descriptor - = Data.ProtoLens.FieldDescriptor - "redeemer" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor Redeemer) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'redeemer")) :: - Data.ProtoLens.FieldDescriptor TxInput - in - Data.Map.fromList - [(Data.ProtoLens.Tag 1, txHash__field_descriptor), - (Data.ProtoLens.Tag 2, outputIndex__field_descriptor), - (Data.ProtoLens.Tag 3, asOutput__field_descriptor), - (Data.ProtoLens.Tag 4, redeemer__field_descriptor)] - unknownFields - = Lens.Family2.Unchecked.lens - _TxInput'_unknownFields - (\ x__ y__ -> x__ {_TxInput'_unknownFields = y__}) - defMessage - = TxInput'_constructor - {_TxInput'txHash = Data.ProtoLens.fieldDefault, - _TxInput'outputIndex = Data.ProtoLens.fieldDefault, - _TxInput'asOutput = Prelude.Nothing, - _TxInput'redeemer = Prelude.Nothing, _TxInput'_unknownFields = []} - parseMessage - = let - loop :: TxInput -> Data.ProtoLens.Encoding.Bytes.Parser TxInput - loop x - = do end <- Data.ProtoLens.Encoding.Bytes.atEnd - if end then - do (let missing = [] - in - if Prelude.null missing then - Prelude.return () - else - Prelude.fail - ((Prelude.++) - "Missing required fields: " - (Prelude.show (missing :: [Prelude.String])))) - Prelude.return - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) - else - do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt - case tag of - 10 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.getBytes - (Prelude.fromIntegral len)) - "tx_hash" - loop (Lens.Family2.set (Data.ProtoLens.Field.field @"txHash") y x) - 16 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (Prelude.fmap - Prelude.fromIntegral - Data.ProtoLens.Encoding.Bytes.getVarInt) - "output_index" - loop - (Lens.Family2.set (Data.ProtoLens.Field.field @"outputIndex") y x) - 26 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) - "as_output" - loop - (Lens.Family2.set (Data.ProtoLens.Field.field @"asOutput") y x) - 34 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) - "redeemer" - loop - (Lens.Family2.set (Data.ProtoLens.Field.field @"redeemer") y x) - wire - -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire - wire - loop - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) - in - (Data.ProtoLens.Encoding.Bytes.) - (do loop Data.ProtoLens.defMessage) "TxInput" - buildMessage - = \ _x - -> (Data.Monoid.<>) - (let - _v = Lens.Family2.view (Data.ProtoLens.Field.field @"txHash") _x - in - if (Prelude.==) _v Data.ProtoLens.fieldDefault then - Data.Monoid.mempty - else - (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 10) - ((\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - _v)) - ((Data.Monoid.<>) - (let - _v - = Lens.Family2.view (Data.ProtoLens.Field.field @"outputIndex") _x - in - if (Prelude.==) _v Data.ProtoLens.fieldDefault then - Data.Monoid.mempty - else - (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 16) - ((Prelude..) - Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) - ((Data.Monoid.<>) - (case - Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'asOutput") _x - of - Prelude.Nothing -> Data.Monoid.mempty - (Prelude.Just _v) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 26) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - ((Data.Monoid.<>) - (case - Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'redeemer") _x - of - Prelude.Nothing -> Data.Monoid.mempty - (Prelude.Just _v) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 34) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - (Data.ProtoLens.Encoding.Wire.buildFieldSet - (Lens.Family2.view Data.ProtoLens.unknownFields _x))))) -instance Control.DeepSeq.NFData TxInput where - rnf - = \ x__ - -> Control.DeepSeq.deepseq - (_TxInput'_unknownFields x__) - (Control.DeepSeq.deepseq - (_TxInput'txHash x__) - (Control.DeepSeq.deepseq - (_TxInput'outputIndex x__) - (Control.DeepSeq.deepseq - (_TxInput'asOutput x__) - (Control.DeepSeq.deepseq (_TxInput'redeemer x__) ())))) -{- | Fields : - - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.address' @:: Lens' TxOutput Data.ByteString.ByteString@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.coin' @:: Lens' TxOutput Data.Word.Word64@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.assets' @:: Lens' TxOutput [Multiasset]@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.vec'assets' @:: Lens' TxOutput (Data.Vector.Vector Multiasset)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.datum' @:: Lens' TxOutput Datum@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'datum' @:: Lens' TxOutput (Prelude.Maybe Datum)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.script' @:: Lens' TxOutput Script@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'script' @:: Lens' TxOutput (Prelude.Maybe Script)@ -} -data TxOutput - = TxOutput'_constructor {_TxOutput'address :: !Data.ByteString.ByteString, - _TxOutput'coin :: !Data.Word.Word64, - _TxOutput'assets :: !(Data.Vector.Vector Multiasset), - _TxOutput'datum :: !(Prelude.Maybe Datum), - _TxOutput'script :: !(Prelude.Maybe Script), - _TxOutput'_unknownFields :: !Data.ProtoLens.FieldSet} - deriving stock (Prelude.Eq, Prelude.Ord) -instance Prelude.Show TxOutput where - showsPrec _ __x __s - = Prelude.showChar - '{' - (Prelude.showString - (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) -instance Data.ProtoLens.Field.HasField TxOutput "address" Data.ByteString.ByteString where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _TxOutput'address (\ x__ y__ -> x__ {_TxOutput'address = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField TxOutput "coin" Data.Word.Word64 where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _TxOutput'coin (\ x__ y__ -> x__ {_TxOutput'coin = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField TxOutput "assets" [Multiasset] where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _TxOutput'assets (\ x__ y__ -> x__ {_TxOutput'assets = y__})) - (Lens.Family2.Unchecked.lens - Data.Vector.Generic.toList - (\ _ y__ -> Data.Vector.Generic.fromList y__)) -instance Data.ProtoLens.Field.HasField TxOutput "vec'assets" (Data.Vector.Vector Multiasset) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _TxOutput'assets (\ x__ y__ -> x__ {_TxOutput'assets = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField TxOutput "datum" Datum where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _TxOutput'datum (\ x__ y__ -> x__ {_TxOutput'datum = y__})) - (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) -instance Data.ProtoLens.Field.HasField TxOutput "maybe'datum" (Prelude.Maybe Datum) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _TxOutput'datum (\ x__ y__ -> x__ {_TxOutput'datum = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField TxOutput "script" Script where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _TxOutput'script (\ x__ y__ -> x__ {_TxOutput'script = y__})) - (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) -instance Data.ProtoLens.Field.HasField TxOutput "maybe'script" (Prelude.Maybe Script) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _TxOutput'script (\ x__ y__ -> x__ {_TxOutput'script = y__})) - Prelude.id -instance Data.ProtoLens.Message TxOutput where - messageName _ = Data.Text.pack "utxorpc.v1alpha.cardano.TxOutput" - packedMessageDescriptor _ - = "\n\ - \\bTxOutput\DC2\CAN\n\ - \\aaddress\CAN\SOH \SOH(\fR\aaddress\DC2\DC2\n\ - \\EOTcoin\CAN\STX \SOH(\EOTR\EOTcoin\DC2;\n\ - \\ACKassets\CAN\ETX \ETX(\v2#.utxorpc.v1alpha.cardano.MultiassetR\ACKassets\DC24\n\ - \\ENQdatum\CAN\EOT \SOH(\v2\RS.utxorpc.v1alpha.cardano.DatumR\ENQdatum\DC27\n\ - \\ACKscript\CAN\ENQ \SOH(\v2\US.utxorpc.v1alpha.cardano.ScriptR\ACKscript" - packedFileDescriptor _ = packedFileDescriptor - fieldsByTag - = let - address__field_descriptor - = Data.ProtoLens.FieldDescriptor - "address" - (Data.ProtoLens.ScalarField Data.ProtoLens.BytesField :: - Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString) - (Data.ProtoLens.PlainField - Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"address")) :: - Data.ProtoLens.FieldDescriptor TxOutput - coin__field_descriptor - = Data.ProtoLens.FieldDescriptor - "coin" - (Data.ProtoLens.ScalarField Data.ProtoLens.UInt64Field :: - Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64) - (Data.ProtoLens.PlainField - Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"coin")) :: - Data.ProtoLens.FieldDescriptor TxOutput - assets__field_descriptor - = Data.ProtoLens.FieldDescriptor - "assets" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor Multiasset) - (Data.ProtoLens.RepeatedField - Data.ProtoLens.Unpacked (Data.ProtoLens.Field.field @"assets")) :: - Data.ProtoLens.FieldDescriptor TxOutput - datum__field_descriptor - = Data.ProtoLens.FieldDescriptor - "datum" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor Datum) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'datum")) :: - Data.ProtoLens.FieldDescriptor TxOutput - script__field_descriptor - = Data.ProtoLens.FieldDescriptor - "script" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor Script) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'script")) :: - Data.ProtoLens.FieldDescriptor TxOutput - in - Data.Map.fromList - [(Data.ProtoLens.Tag 1, address__field_descriptor), - (Data.ProtoLens.Tag 2, coin__field_descriptor), - (Data.ProtoLens.Tag 3, assets__field_descriptor), - (Data.ProtoLens.Tag 4, datum__field_descriptor), - (Data.ProtoLens.Tag 5, script__field_descriptor)] - unknownFields - = Lens.Family2.Unchecked.lens - _TxOutput'_unknownFields - (\ x__ y__ -> x__ {_TxOutput'_unknownFields = y__}) - defMessage - = TxOutput'_constructor - {_TxOutput'address = Data.ProtoLens.fieldDefault, - _TxOutput'coin = Data.ProtoLens.fieldDefault, - _TxOutput'assets = Data.Vector.Generic.empty, - _TxOutput'datum = Prelude.Nothing, - _TxOutput'script = Prelude.Nothing, _TxOutput'_unknownFields = []} - parseMessage - = let - loop :: - TxOutput - -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Multiasset - -> Data.ProtoLens.Encoding.Bytes.Parser TxOutput - loop x mutable'assets - = do end <- Data.ProtoLens.Encoding.Bytes.atEnd - if end then - do frozen'assets <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO - (Data.ProtoLens.Encoding.Growing.unsafeFreeze - mutable'assets) - (let missing = [] - in - if Prelude.null missing then - Prelude.return () - else - Prelude.fail - ((Prelude.++) - "Missing required fields: " - (Prelude.show (missing :: [Prelude.String])))) - Prelude.return - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) - (Lens.Family2.set - (Data.ProtoLens.Field.field @"vec'assets") frozen'assets x)) - else - do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt - case tag of - 10 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.getBytes - (Prelude.fromIntegral len)) - "address" - loop - (Lens.Family2.set (Data.ProtoLens.Field.field @"address") y x) - mutable'assets - 16 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - Data.ProtoLens.Encoding.Bytes.getVarInt "coin" - loop - (Lens.Family2.set (Data.ProtoLens.Field.field @"coin") y x) - mutable'assets - 26 - -> do !y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) - Data.ProtoLens.parseMessage) - "assets" - v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO - (Data.ProtoLens.Encoding.Growing.append mutable'assets y) - loop x v - 34 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) - "datum" - loop - (Lens.Family2.set (Data.ProtoLens.Field.field @"datum") y x) - mutable'assets - 42 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) - "script" - loop - (Lens.Family2.set (Data.ProtoLens.Field.field @"script") y x) - mutable'assets - wire - -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire - wire - loop - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) - mutable'assets - in - (Data.ProtoLens.Encoding.Bytes.) - (do mutable'assets <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO - Data.ProtoLens.Encoding.Growing.new - loop Data.ProtoLens.defMessage mutable'assets) - "TxOutput" - buildMessage - = \ _x - -> (Data.Monoid.<>) - (let - _v = Lens.Family2.view (Data.ProtoLens.Field.field @"address") _x - in - if (Prelude.==) _v Data.ProtoLens.fieldDefault then - Data.Monoid.mempty - else - (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 10) - ((\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - _v)) - ((Data.Monoid.<>) - (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"coin") _x - in - if (Prelude.==) _v Data.ProtoLens.fieldDefault then - Data.Monoid.mempty - else - (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 16) - (Data.ProtoLens.Encoding.Bytes.putVarInt _v)) - ((Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.foldMapBuilder - (\ _v - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 26) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - (Lens.Family2.view (Data.ProtoLens.Field.field @"vec'assets") _x)) - ((Data.Monoid.<>) - (case - Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'datum") _x - of - Prelude.Nothing -> Data.Monoid.mempty - (Prelude.Just _v) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 34) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - ((Data.Monoid.<>) - (case - Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'script") _x - of - Prelude.Nothing -> Data.Monoid.mempty - (Prelude.Just _v) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 42) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - (Data.ProtoLens.Encoding.Wire.buildFieldSet - (Lens.Family2.view Data.ProtoLens.unknownFields _x)))))) -instance Control.DeepSeq.NFData TxOutput where - rnf - = \ x__ - -> Control.DeepSeq.deepseq - (_TxOutput'_unknownFields x__) - (Control.DeepSeq.deepseq - (_TxOutput'address x__) - (Control.DeepSeq.deepseq - (_TxOutput'coin x__) - (Control.DeepSeq.deepseq - (_TxOutput'assets x__) - (Control.DeepSeq.deepseq - (_TxOutput'datum x__) - (Control.DeepSeq.deepseq (_TxOutput'script x__) ()))))) -{- | Fields : - - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.address' @:: Lens' TxOutputPattern AddressPattern@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'address' @:: Lens' TxOutputPattern (Prelude.Maybe AddressPattern)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.asset' @:: Lens' TxOutputPattern AssetPattern@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'asset' @:: Lens' TxOutputPattern (Prelude.Maybe AssetPattern)@ -} -data TxOutputPattern - = TxOutputPattern'_constructor {_TxOutputPattern'address :: !(Prelude.Maybe AddressPattern), - _TxOutputPattern'asset :: !(Prelude.Maybe AssetPattern), - _TxOutputPattern'_unknownFields :: !Data.ProtoLens.FieldSet} - deriving stock (Prelude.Eq, Prelude.Ord) -instance Prelude.Show TxOutputPattern where - showsPrec _ __x __s - = Prelude.showChar - '{' - (Prelude.showString - (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) -instance Data.ProtoLens.Field.HasField TxOutputPattern "address" AddressPattern where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _TxOutputPattern'address - (\ x__ y__ -> x__ {_TxOutputPattern'address = y__})) - (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) -instance Data.ProtoLens.Field.HasField TxOutputPattern "maybe'address" (Prelude.Maybe AddressPattern) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _TxOutputPattern'address - (\ x__ y__ -> x__ {_TxOutputPattern'address = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField TxOutputPattern "asset" AssetPattern where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _TxOutputPattern'asset - (\ x__ y__ -> x__ {_TxOutputPattern'asset = y__})) - (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) -instance Data.ProtoLens.Field.HasField TxOutputPattern "maybe'asset" (Prelude.Maybe AssetPattern) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _TxOutputPattern'asset - (\ x__ y__ -> x__ {_TxOutputPattern'asset = y__})) - Prelude.id -instance Data.ProtoLens.Message TxOutputPattern where - messageName _ - = Data.Text.pack "utxorpc.v1alpha.cardano.TxOutputPattern" - packedMessageDescriptor _ - = "\n\ - \\SITxOutputPattern\DC2A\n\ - \\aaddress\CAN\SOH \SOH(\v2'.utxorpc.v1alpha.cardano.AddressPatternR\aaddress\DC2;\n\ - \\ENQasset\CAN\STX \SOH(\v2%.utxorpc.v1alpha.cardano.AssetPatternR\ENQasset" - packedFileDescriptor _ = packedFileDescriptor - fieldsByTag - = let - address__field_descriptor - = Data.ProtoLens.FieldDescriptor - "address" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor AddressPattern) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'address")) :: - Data.ProtoLens.FieldDescriptor TxOutputPattern - asset__field_descriptor - = Data.ProtoLens.FieldDescriptor - "asset" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor AssetPattern) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'asset")) :: - Data.ProtoLens.FieldDescriptor TxOutputPattern - in - Data.Map.fromList - [(Data.ProtoLens.Tag 1, address__field_descriptor), - (Data.ProtoLens.Tag 2, asset__field_descriptor)] - unknownFields - = Lens.Family2.Unchecked.lens - _TxOutputPattern'_unknownFields - (\ x__ y__ -> x__ {_TxOutputPattern'_unknownFields = y__}) - defMessage - = TxOutputPattern'_constructor - {_TxOutputPattern'address = Prelude.Nothing, - _TxOutputPattern'asset = Prelude.Nothing, - _TxOutputPattern'_unknownFields = []} - parseMessage - = let - loop :: - TxOutputPattern - -> Data.ProtoLens.Encoding.Bytes.Parser TxOutputPattern - loop x - = do end <- Data.ProtoLens.Encoding.Bytes.atEnd - if end then - do (let missing = [] - in - if Prelude.null missing then - Prelude.return () - else - Prelude.fail - ((Prelude.++) - "Missing required fields: " - (Prelude.show (missing :: [Prelude.String])))) - Prelude.return - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) - else - do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt - case tag of - 10 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) - "address" - loop (Lens.Family2.set (Data.ProtoLens.Field.field @"address") y x) - 18 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) - "asset" - loop (Lens.Family2.set (Data.ProtoLens.Field.field @"asset") y x) - wire - -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire - wire - loop - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) - in - (Data.ProtoLens.Encoding.Bytes.) - (do loop Data.ProtoLens.defMessage) "TxOutputPattern" - buildMessage - = \ _x - -> (Data.Monoid.<>) - (case - Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'address") _x - of - Prelude.Nothing -> Data.Monoid.mempty - (Prelude.Just _v) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 10) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - ((Data.Monoid.<>) - (case - Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'asset") _x - of - Prelude.Nothing -> Data.Monoid.mempty - (Prelude.Just _v) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 18) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - (Data.ProtoLens.Encoding.Wire.buildFieldSet - (Lens.Family2.view Data.ProtoLens.unknownFields _x))) -instance Control.DeepSeq.NFData TxOutputPattern where - rnf - = \ x__ - -> Control.DeepSeq.deepseq - (_TxOutputPattern'_unknownFields x__) - (Control.DeepSeq.deepseq - (_TxOutputPattern'address x__) - (Control.DeepSeq.deepseq (_TxOutputPattern'asset x__) ())) -{- | Fields : - - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.consumes' @:: Lens' TxPattern TxOutputPattern@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'consumes' @:: Lens' TxPattern (Prelude.Maybe TxOutputPattern)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.produces' @:: Lens' TxPattern TxOutputPattern@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'produces' @:: Lens' TxPattern (Prelude.Maybe TxOutputPattern)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.hasAddress' @:: Lens' TxPattern AddressPattern@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'hasAddress' @:: Lens' TxPattern (Prelude.Maybe AddressPattern)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.movesAsset' @:: Lens' TxPattern AssetPattern@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'movesAsset' @:: Lens' TxPattern (Prelude.Maybe AssetPattern)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.mintsAsset' @:: Lens' TxPattern AssetPattern@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'mintsAsset' @:: Lens' TxPattern (Prelude.Maybe AssetPattern)@ -} -data TxPattern - = TxPattern'_constructor {_TxPattern'consumes :: !(Prelude.Maybe TxOutputPattern), - _TxPattern'produces :: !(Prelude.Maybe TxOutputPattern), - _TxPattern'hasAddress :: !(Prelude.Maybe AddressPattern), - _TxPattern'movesAsset :: !(Prelude.Maybe AssetPattern), - _TxPattern'mintsAsset :: !(Prelude.Maybe AssetPattern), - _TxPattern'_unknownFields :: !Data.ProtoLens.FieldSet} - deriving stock (Prelude.Eq, Prelude.Ord) -instance Prelude.Show TxPattern where - showsPrec _ __x __s - = Prelude.showChar - '{' - (Prelude.showString - (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) -instance Data.ProtoLens.Field.HasField TxPattern "consumes" TxOutputPattern where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _TxPattern'consumes (\ x__ y__ -> x__ {_TxPattern'consumes = y__})) - (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) -instance Data.ProtoLens.Field.HasField TxPattern "maybe'consumes" (Prelude.Maybe TxOutputPattern) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _TxPattern'consumes (\ x__ y__ -> x__ {_TxPattern'consumes = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField TxPattern "produces" TxOutputPattern where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _TxPattern'produces (\ x__ y__ -> x__ {_TxPattern'produces = y__})) - (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) -instance Data.ProtoLens.Field.HasField TxPattern "maybe'produces" (Prelude.Maybe TxOutputPattern) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _TxPattern'produces (\ x__ y__ -> x__ {_TxPattern'produces = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField TxPattern "hasAddress" AddressPattern where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _TxPattern'hasAddress - (\ x__ y__ -> x__ {_TxPattern'hasAddress = y__})) - (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) -instance Data.ProtoLens.Field.HasField TxPattern "maybe'hasAddress" (Prelude.Maybe AddressPattern) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _TxPattern'hasAddress - (\ x__ y__ -> x__ {_TxPattern'hasAddress = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField TxPattern "movesAsset" AssetPattern where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _TxPattern'movesAsset - (\ x__ y__ -> x__ {_TxPattern'movesAsset = y__})) - (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) -instance Data.ProtoLens.Field.HasField TxPattern "maybe'movesAsset" (Prelude.Maybe AssetPattern) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _TxPattern'movesAsset - (\ x__ y__ -> x__ {_TxPattern'movesAsset = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField TxPattern "mintsAsset" AssetPattern where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _TxPattern'mintsAsset - (\ x__ y__ -> x__ {_TxPattern'mintsAsset = y__})) - (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) -instance Data.ProtoLens.Field.HasField TxPattern "maybe'mintsAsset" (Prelude.Maybe AssetPattern) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _TxPattern'mintsAsset - (\ x__ y__ -> x__ {_TxPattern'mintsAsset = y__})) - Prelude.id -instance Data.ProtoLens.Message TxPattern where - messageName _ = Data.Text.pack "utxorpc.v1alpha.cardano.TxPattern" - packedMessageDescriptor _ - = "\n\ - \\tTxPattern\DC2D\n\ - \\bconsumes\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.TxOutputPatternR\bconsumes\DC2D\n\ - \\bproduces\CAN\STX \SOH(\v2(.utxorpc.v1alpha.cardano.TxOutputPatternR\bproduces\DC2H\n\ - \\vhas_address\CAN\ETX \SOH(\v2'.utxorpc.v1alpha.cardano.AddressPatternR\n\ - \hasAddress\DC2F\n\ - \\vmoves_asset\CAN\EOT \SOH(\v2%.utxorpc.v1alpha.cardano.AssetPatternR\n\ - \movesAsset\DC2F\n\ - \\vmints_asset\CAN\ENQ \SOH(\v2%.utxorpc.v1alpha.cardano.AssetPatternR\n\ - \mintsAsset" - packedFileDescriptor _ = packedFileDescriptor - fieldsByTag - = let - consumes__field_descriptor - = Data.ProtoLens.FieldDescriptor - "consumes" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor TxOutputPattern) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'consumes")) :: - Data.ProtoLens.FieldDescriptor TxPattern - produces__field_descriptor - = Data.ProtoLens.FieldDescriptor - "produces" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor TxOutputPattern) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'produces")) :: - Data.ProtoLens.FieldDescriptor TxPattern - hasAddress__field_descriptor - = Data.ProtoLens.FieldDescriptor - "has_address" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor AddressPattern) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'hasAddress")) :: - Data.ProtoLens.FieldDescriptor TxPattern - movesAsset__field_descriptor - = Data.ProtoLens.FieldDescriptor - "moves_asset" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor AssetPattern) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'movesAsset")) :: - Data.ProtoLens.FieldDescriptor TxPattern - mintsAsset__field_descriptor - = Data.ProtoLens.FieldDescriptor - "mints_asset" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor AssetPattern) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'mintsAsset")) :: - Data.ProtoLens.FieldDescriptor TxPattern - in - Data.Map.fromList - [(Data.ProtoLens.Tag 1, consumes__field_descriptor), - (Data.ProtoLens.Tag 2, produces__field_descriptor), - (Data.ProtoLens.Tag 3, hasAddress__field_descriptor), - (Data.ProtoLens.Tag 4, movesAsset__field_descriptor), - (Data.ProtoLens.Tag 5, mintsAsset__field_descriptor)] - unknownFields - = Lens.Family2.Unchecked.lens - _TxPattern'_unknownFields - (\ x__ y__ -> x__ {_TxPattern'_unknownFields = y__}) - defMessage - = TxPattern'_constructor - {_TxPattern'consumes = Prelude.Nothing, - _TxPattern'produces = Prelude.Nothing, - _TxPattern'hasAddress = Prelude.Nothing, - _TxPattern'movesAsset = Prelude.Nothing, - _TxPattern'mintsAsset = Prelude.Nothing, - _TxPattern'_unknownFields = []} - parseMessage - = let - loop :: TxPattern -> Data.ProtoLens.Encoding.Bytes.Parser TxPattern - loop x - = do end <- Data.ProtoLens.Encoding.Bytes.atEnd - if end then - do (let missing = [] - in - if Prelude.null missing then - Prelude.return () - else - Prelude.fail - ((Prelude.++) - "Missing required fields: " - (Prelude.show (missing :: [Prelude.String])))) - Prelude.return - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) - else - do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt - case tag of - 10 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) - "consumes" - loop - (Lens.Family2.set (Data.ProtoLens.Field.field @"consumes") y x) - 18 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) - "produces" - loop - (Lens.Family2.set (Data.ProtoLens.Field.field @"produces") y x) - 26 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) - "has_address" - loop - (Lens.Family2.set (Data.ProtoLens.Field.field @"hasAddress") y x) - 34 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) - "moves_asset" - loop - (Lens.Family2.set (Data.ProtoLens.Field.field @"movesAsset") y x) - 42 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) - "mints_asset" - loop - (Lens.Family2.set (Data.ProtoLens.Field.field @"mintsAsset") y x) - wire - -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire - wire - loop - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) - in - (Data.ProtoLens.Encoding.Bytes.) - (do loop Data.ProtoLens.defMessage) "TxPattern" - buildMessage - = \ _x - -> (Data.Monoid.<>) - (case - Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'consumes") _x - of - Prelude.Nothing -> Data.Monoid.mempty - (Prelude.Just _v) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 10) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - ((Data.Monoid.<>) - (case - Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'produces") _x - of - Prelude.Nothing -> Data.Monoid.mempty - (Prelude.Just _v) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 18) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - ((Data.Monoid.<>) - (case - Lens.Family2.view - (Data.ProtoLens.Field.field @"maybe'hasAddress") _x - of - Prelude.Nothing -> Data.Monoid.mempty - (Prelude.Just _v) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 26) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - ((Data.Monoid.<>) - (case - Lens.Family2.view - (Data.ProtoLens.Field.field @"maybe'movesAsset") _x - of - Prelude.Nothing -> Data.Monoid.mempty - (Prelude.Just _v) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 34) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - ((Data.Monoid.<>) - (case - Lens.Family2.view - (Data.ProtoLens.Field.field @"maybe'mintsAsset") _x - of - Prelude.Nothing -> Data.Monoid.mempty - (Prelude.Just _v) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 42) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - (Data.ProtoLens.Encoding.Wire.buildFieldSet - (Lens.Family2.view Data.ProtoLens.unknownFields _x)))))) -instance Control.DeepSeq.NFData TxPattern where - rnf - = \ x__ - -> Control.DeepSeq.deepseq - (_TxPattern'_unknownFields x__) - (Control.DeepSeq.deepseq - (_TxPattern'consumes x__) - (Control.DeepSeq.deepseq - (_TxPattern'produces x__) - (Control.DeepSeq.deepseq - (_TxPattern'hasAddress x__) - (Control.DeepSeq.deepseq - (_TxPattern'movesAsset x__) - (Control.DeepSeq.deepseq (_TxPattern'mintsAsset x__) ()))))) -{- | Fields : - - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.start' @:: Lens' TxValidity Data.Word.Word64@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.ttl' @:: Lens' TxValidity Data.Word.Word64@ -} -data TxValidity - = TxValidity'_constructor {_TxValidity'start :: !Data.Word.Word64, - _TxValidity'ttl :: !Data.Word.Word64, - _TxValidity'_unknownFields :: !Data.ProtoLens.FieldSet} - deriving stock (Prelude.Eq, Prelude.Ord) -instance Prelude.Show TxValidity where - showsPrec _ __x __s - = Prelude.showChar - '{' - (Prelude.showString - (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) -instance Data.ProtoLens.Field.HasField TxValidity "start" Data.Word.Word64 where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _TxValidity'start (\ x__ y__ -> x__ {_TxValidity'start = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField TxValidity "ttl" Data.Word.Word64 where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _TxValidity'ttl (\ x__ y__ -> x__ {_TxValidity'ttl = y__})) - Prelude.id -instance Data.ProtoLens.Message TxValidity where - messageName _ = Data.Text.pack "utxorpc.v1alpha.cardano.TxValidity" - packedMessageDescriptor _ - = "\n\ - \\n\ - \TxValidity\DC2\DC4\n\ - \\ENQstart\CAN\SOH \SOH(\EOTR\ENQstart\DC2\DLE\n\ - \\ETXttl\CAN\STX \SOH(\EOTR\ETXttl" - packedFileDescriptor _ = packedFileDescriptor - fieldsByTag - = let - start__field_descriptor - = Data.ProtoLens.FieldDescriptor - "start" - (Data.ProtoLens.ScalarField Data.ProtoLens.UInt64Field :: - Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64) - (Data.ProtoLens.PlainField - Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"start")) :: - Data.ProtoLens.FieldDescriptor TxValidity - ttl__field_descriptor - = Data.ProtoLens.FieldDescriptor - "ttl" - (Data.ProtoLens.ScalarField Data.ProtoLens.UInt64Field :: - Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64) - (Data.ProtoLens.PlainField - Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"ttl")) :: - Data.ProtoLens.FieldDescriptor TxValidity - in - Data.Map.fromList - [(Data.ProtoLens.Tag 1, start__field_descriptor), - (Data.ProtoLens.Tag 2, ttl__field_descriptor)] - unknownFields - = Lens.Family2.Unchecked.lens - _TxValidity'_unknownFields - (\ x__ y__ -> x__ {_TxValidity'_unknownFields = y__}) - defMessage - = TxValidity'_constructor - {_TxValidity'start = Data.ProtoLens.fieldDefault, - _TxValidity'ttl = Data.ProtoLens.fieldDefault, - _TxValidity'_unknownFields = []} - parseMessage - = let - loop :: - TxValidity -> Data.ProtoLens.Encoding.Bytes.Parser TxValidity - loop x - = do end <- Data.ProtoLens.Encoding.Bytes.atEnd - if end then - do (let missing = [] - in - if Prelude.null missing then - Prelude.return () - else - Prelude.fail - ((Prelude.++) - "Missing required fields: " - (Prelude.show (missing :: [Prelude.String])))) - Prelude.return - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) - else - do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt - case tag of - 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) - Data.ProtoLens.Encoding.Bytes.getVarInt "start" - loop (Lens.Family2.set (Data.ProtoLens.Field.field @"start") y x) - 16 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - Data.ProtoLens.Encoding.Bytes.getVarInt "ttl" - loop (Lens.Family2.set (Data.ProtoLens.Field.field @"ttl") y x) - wire - -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire - wire - loop - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) - in - (Data.ProtoLens.Encoding.Bytes.) - (do loop Data.ProtoLens.defMessage) "TxValidity" - buildMessage - = \ _x - -> (Data.Monoid.<>) - (let - _v = Lens.Family2.view (Data.ProtoLens.Field.field @"start") _x - in - if (Prelude.==) _v Data.ProtoLens.fieldDefault then - Data.Monoid.mempty - else - (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 8) - (Data.ProtoLens.Encoding.Bytes.putVarInt _v)) - ((Data.Monoid.<>) - (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"ttl") _x - in - if (Prelude.==) _v Data.ProtoLens.fieldDefault then - Data.Monoid.mempty - else - (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 16) - (Data.ProtoLens.Encoding.Bytes.putVarInt _v)) - (Data.ProtoLens.Encoding.Wire.buildFieldSet - (Lens.Family2.view Data.ProtoLens.unknownFields _x))) -instance Control.DeepSeq.NFData TxValidity where - rnf - = \ x__ - -> Control.DeepSeq.deepseq - (_TxValidity'_unknownFields x__) - (Control.DeepSeq.deepseq - (_TxValidity'start x__) - (Control.DeepSeq.deepseq (_TxValidity'ttl x__) ())) -{- | Fields : - - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.stakeCredential' @:: Lens' UnRegCert StakeCredential@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'stakeCredential' @:: Lens' UnRegCert (Prelude.Maybe StakeCredential)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.coin' @:: Lens' UnRegCert Data.Word.Word64@ -} -data UnRegCert - = UnRegCert'_constructor {_UnRegCert'stakeCredential :: !(Prelude.Maybe StakeCredential), - _UnRegCert'coin :: !Data.Word.Word64, - _UnRegCert'_unknownFields :: !Data.ProtoLens.FieldSet} - deriving stock (Prelude.Eq, Prelude.Ord) -instance Prelude.Show UnRegCert where - showsPrec _ __x __s - = Prelude.showChar - '{' - (Prelude.showString - (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) -instance Data.ProtoLens.Field.HasField UnRegCert "stakeCredential" StakeCredential where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _UnRegCert'stakeCredential - (\ x__ y__ -> x__ {_UnRegCert'stakeCredential = y__})) - (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) -instance Data.ProtoLens.Field.HasField UnRegCert "maybe'stakeCredential" (Prelude.Maybe StakeCredential) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _UnRegCert'stakeCredential - (\ x__ y__ -> x__ {_UnRegCert'stakeCredential = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField UnRegCert "coin" Data.Word.Word64 where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _UnRegCert'coin (\ x__ y__ -> x__ {_UnRegCert'coin = y__})) - Prelude.id -instance Data.ProtoLens.Message UnRegCert where - messageName _ = Data.Text.pack "utxorpc.v1alpha.cardano.UnRegCert" - packedMessageDescriptor _ - = "\n\ - \\tUnRegCert\DC2S\n\ - \\DLEstake_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SIstakeCredential\DC2\DC2\n\ - \\EOTcoin\CAN\STX \SOH(\EOTR\EOTcoin" - packedFileDescriptor _ = packedFileDescriptor - fieldsByTag - = let - stakeCredential__field_descriptor - = Data.ProtoLens.FieldDescriptor - "stake_credential" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor StakeCredential) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'stakeCredential")) :: - Data.ProtoLens.FieldDescriptor UnRegCert - coin__field_descriptor - = Data.ProtoLens.FieldDescriptor - "coin" - (Data.ProtoLens.ScalarField Data.ProtoLens.UInt64Field :: - Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64) - (Data.ProtoLens.PlainField - Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"coin")) :: - Data.ProtoLens.FieldDescriptor UnRegCert - in - Data.Map.fromList - [(Data.ProtoLens.Tag 1, stakeCredential__field_descriptor), - (Data.ProtoLens.Tag 2, coin__field_descriptor)] - unknownFields - = Lens.Family2.Unchecked.lens - _UnRegCert'_unknownFields - (\ x__ y__ -> x__ {_UnRegCert'_unknownFields = y__}) - defMessage - = UnRegCert'_constructor - {_UnRegCert'stakeCredential = Prelude.Nothing, - _UnRegCert'coin = Data.ProtoLens.fieldDefault, - _UnRegCert'_unknownFields = []} - parseMessage - = let - loop :: UnRegCert -> Data.ProtoLens.Encoding.Bytes.Parser UnRegCert - loop x - = do end <- Data.ProtoLens.Encoding.Bytes.atEnd - if end then - do (let missing = [] - in - if Prelude.null missing then - Prelude.return () - else - Prelude.fail - ((Prelude.++) - "Missing required fields: " - (Prelude.show (missing :: [Prelude.String])))) - Prelude.return - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) - else - do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt - case tag of - 10 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) - "stake_credential" - loop - (Lens.Family2.set - (Data.ProtoLens.Field.field @"stakeCredential") y x) - 16 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - Data.ProtoLens.Encoding.Bytes.getVarInt "coin" - loop (Lens.Family2.set (Data.ProtoLens.Field.field @"coin") y x) - wire - -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire - wire - loop - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) - in - (Data.ProtoLens.Encoding.Bytes.) - (do loop Data.ProtoLens.defMessage) "UnRegCert" - buildMessage - = \ _x - -> (Data.Monoid.<>) - (case - Lens.Family2.view - (Data.ProtoLens.Field.field @"maybe'stakeCredential") _x - of - Prelude.Nothing -> Data.Monoid.mempty - (Prelude.Just _v) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 10) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - ((Data.Monoid.<>) - (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"coin") _x - in - if (Prelude.==) _v Data.ProtoLens.fieldDefault then - Data.Monoid.mempty - else - (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 16) - (Data.ProtoLens.Encoding.Bytes.putVarInt _v)) - (Data.ProtoLens.Encoding.Wire.buildFieldSet - (Lens.Family2.view Data.ProtoLens.unknownFields _x))) -instance Control.DeepSeq.NFData UnRegCert where - rnf - = \ x__ - -> Control.DeepSeq.deepseq - (_UnRegCert'_unknownFields x__) - (Control.DeepSeq.deepseq - (_UnRegCert'stakeCredential x__) - (Control.DeepSeq.deepseq (_UnRegCert'coin x__) ())) -{- | Fields : - - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.drepCredential' @:: Lens' UnRegDRepCert StakeCredential@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'drepCredential' @:: Lens' UnRegDRepCert (Prelude.Maybe StakeCredential)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.coin' @:: Lens' UnRegDRepCert Data.Word.Word64@ -} -data UnRegDRepCert - = UnRegDRepCert'_constructor {_UnRegDRepCert'drepCredential :: !(Prelude.Maybe StakeCredential), - _UnRegDRepCert'coin :: !Data.Word.Word64, - _UnRegDRepCert'_unknownFields :: !Data.ProtoLens.FieldSet} - deriving stock (Prelude.Eq, Prelude.Ord) -instance Prelude.Show UnRegDRepCert where - showsPrec _ __x __s - = Prelude.showChar - '{' - (Prelude.showString - (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) -instance Data.ProtoLens.Field.HasField UnRegDRepCert "drepCredential" StakeCredential where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _UnRegDRepCert'drepCredential - (\ x__ y__ -> x__ {_UnRegDRepCert'drepCredential = y__})) - (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) -instance Data.ProtoLens.Field.HasField UnRegDRepCert "maybe'drepCredential" (Prelude.Maybe StakeCredential) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _UnRegDRepCert'drepCredential - (\ x__ y__ -> x__ {_UnRegDRepCert'drepCredential = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField UnRegDRepCert "coin" Data.Word.Word64 where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _UnRegDRepCert'coin (\ x__ y__ -> x__ {_UnRegDRepCert'coin = y__})) - Prelude.id -instance Data.ProtoLens.Message UnRegDRepCert where - messageName _ - = Data.Text.pack "utxorpc.v1alpha.cardano.UnRegDRepCert" - packedMessageDescriptor _ - = "\n\ - \\rUnRegDRepCert\DC2Q\n\ - \\SIdrep_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SOdrepCredential\DC2\DC2\n\ - \\EOTcoin\CAN\STX \SOH(\EOTR\EOTcoin" - packedFileDescriptor _ = packedFileDescriptor - fieldsByTag - = let - drepCredential__field_descriptor - = Data.ProtoLens.FieldDescriptor - "drep_credential" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor StakeCredential) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'drepCredential")) :: - Data.ProtoLens.FieldDescriptor UnRegDRepCert - coin__field_descriptor - = Data.ProtoLens.FieldDescriptor - "coin" - (Data.ProtoLens.ScalarField Data.ProtoLens.UInt64Field :: - Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64) - (Data.ProtoLens.PlainField - Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"coin")) :: - Data.ProtoLens.FieldDescriptor UnRegDRepCert - in - Data.Map.fromList - [(Data.ProtoLens.Tag 1, drepCredential__field_descriptor), - (Data.ProtoLens.Tag 2, coin__field_descriptor)] - unknownFields - = Lens.Family2.Unchecked.lens - _UnRegDRepCert'_unknownFields - (\ x__ y__ -> x__ {_UnRegDRepCert'_unknownFields = y__}) - defMessage - = UnRegDRepCert'_constructor - {_UnRegDRepCert'drepCredential = Prelude.Nothing, - _UnRegDRepCert'coin = Data.ProtoLens.fieldDefault, - _UnRegDRepCert'_unknownFields = []} - parseMessage - = let - loop :: - UnRegDRepCert -> Data.ProtoLens.Encoding.Bytes.Parser UnRegDRepCert - loop x - = do end <- Data.ProtoLens.Encoding.Bytes.atEnd - if end then - do (let missing = [] - in - if Prelude.null missing then - Prelude.return () - else - Prelude.fail - ((Prelude.++) - "Missing required fields: " - (Prelude.show (missing :: [Prelude.String])))) - Prelude.return - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) - else - do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt - case tag of - 10 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) - "drep_credential" - loop - (Lens.Family2.set - (Data.ProtoLens.Field.field @"drepCredential") y x) - 16 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - Data.ProtoLens.Encoding.Bytes.getVarInt "coin" - loop (Lens.Family2.set (Data.ProtoLens.Field.field @"coin") y x) - wire - -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire - wire - loop - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) - in - (Data.ProtoLens.Encoding.Bytes.) - (do loop Data.ProtoLens.defMessage) "UnRegDRepCert" - buildMessage - = \ _x - -> (Data.Monoid.<>) - (case - Lens.Family2.view - (Data.ProtoLens.Field.field @"maybe'drepCredential") _x - of - Prelude.Nothing -> Data.Monoid.mempty - (Prelude.Just _v) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 10) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - ((Data.Monoid.<>) - (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"coin") _x - in - if (Prelude.==) _v Data.ProtoLens.fieldDefault then - Data.Monoid.mempty - else - (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 16) - (Data.ProtoLens.Encoding.Bytes.putVarInt _v)) - (Data.ProtoLens.Encoding.Wire.buildFieldSet - (Lens.Family2.view Data.ProtoLens.unknownFields _x))) -instance Control.DeepSeq.NFData UnRegDRepCert where - rnf - = \ x__ - -> Control.DeepSeq.deepseq - (_UnRegDRepCert'_unknownFields x__) - (Control.DeepSeq.deepseq - (_UnRegDRepCert'drepCredential x__) - (Control.DeepSeq.deepseq (_UnRegDRepCert'coin x__) ())) -{- | Fields : - - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.drepCredential' @:: Lens' UpdateDRepCert StakeCredential@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'drepCredential' @:: Lens' UpdateDRepCert (Prelude.Maybe StakeCredential)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.anchor' @:: Lens' UpdateDRepCert Anchor@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'anchor' @:: Lens' UpdateDRepCert (Prelude.Maybe Anchor)@ -} -data UpdateDRepCert - = UpdateDRepCert'_constructor {_UpdateDRepCert'drepCredential :: !(Prelude.Maybe StakeCredential), - _UpdateDRepCert'anchor :: !(Prelude.Maybe Anchor), - _UpdateDRepCert'_unknownFields :: !Data.ProtoLens.FieldSet} - deriving stock (Prelude.Eq, Prelude.Ord) -instance Prelude.Show UpdateDRepCert where - showsPrec _ __x __s - = Prelude.showChar - '{' - (Prelude.showString - (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) -instance Data.ProtoLens.Field.HasField UpdateDRepCert "drepCredential" StakeCredential where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _UpdateDRepCert'drepCredential - (\ x__ y__ -> x__ {_UpdateDRepCert'drepCredential = y__})) - (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) -instance Data.ProtoLens.Field.HasField UpdateDRepCert "maybe'drepCredential" (Prelude.Maybe StakeCredential) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _UpdateDRepCert'drepCredential - (\ x__ y__ -> x__ {_UpdateDRepCert'drepCredential = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField UpdateDRepCert "anchor" Anchor where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _UpdateDRepCert'anchor - (\ x__ y__ -> x__ {_UpdateDRepCert'anchor = y__})) - (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) -instance Data.ProtoLens.Field.HasField UpdateDRepCert "maybe'anchor" (Prelude.Maybe Anchor) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _UpdateDRepCert'anchor - (\ x__ y__ -> x__ {_UpdateDRepCert'anchor = y__})) - Prelude.id -instance Data.ProtoLens.Message UpdateDRepCert where - messageName _ - = Data.Text.pack "utxorpc.v1alpha.cardano.UpdateDRepCert" - packedMessageDescriptor _ - = "\n\ - \\SOUpdateDRepCert\DC2Q\n\ - \\SIdrep_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SOdrepCredential\DC27\n\ - \\ACKanchor\CAN\STX \SOH(\v2\US.utxorpc.v1alpha.cardano.AnchorR\ACKanchor" - packedFileDescriptor _ = packedFileDescriptor - fieldsByTag - = let - drepCredential__field_descriptor - = Data.ProtoLens.FieldDescriptor - "drep_credential" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor StakeCredential) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'drepCredential")) :: - Data.ProtoLens.FieldDescriptor UpdateDRepCert - anchor__field_descriptor - = Data.ProtoLens.FieldDescriptor - "anchor" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor Anchor) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'anchor")) :: - Data.ProtoLens.FieldDescriptor UpdateDRepCert - in - Data.Map.fromList - [(Data.ProtoLens.Tag 1, drepCredential__field_descriptor), - (Data.ProtoLens.Tag 2, anchor__field_descriptor)] - unknownFields - = Lens.Family2.Unchecked.lens - _UpdateDRepCert'_unknownFields - (\ x__ y__ -> x__ {_UpdateDRepCert'_unknownFields = y__}) - defMessage - = UpdateDRepCert'_constructor - {_UpdateDRepCert'drepCredential = Prelude.Nothing, - _UpdateDRepCert'anchor = Prelude.Nothing, - _UpdateDRepCert'_unknownFields = []} - parseMessage - = let - loop :: - UpdateDRepCert - -> Data.ProtoLens.Encoding.Bytes.Parser UpdateDRepCert - loop x - = do end <- Data.ProtoLens.Encoding.Bytes.atEnd - if end then - do (let missing = [] - in - if Prelude.null missing then - Prelude.return () - else - Prelude.fail - ((Prelude.++) - "Missing required fields: " - (Prelude.show (missing :: [Prelude.String])))) - Prelude.return - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) - else - do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt - case tag of - 10 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) - "drep_credential" - loop - (Lens.Family2.set - (Data.ProtoLens.Field.field @"drepCredential") y x) - 18 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) - "anchor" - loop (Lens.Family2.set (Data.ProtoLens.Field.field @"anchor") y x) - wire - -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire - wire - loop - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) - in - (Data.ProtoLens.Encoding.Bytes.) - (do loop Data.ProtoLens.defMessage) "UpdateDRepCert" - buildMessage - = \ _x - -> (Data.Monoid.<>) - (case - Lens.Family2.view - (Data.ProtoLens.Field.field @"maybe'drepCredential") _x - of - Prelude.Nothing -> Data.Monoid.mempty - (Prelude.Just _v) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 10) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - ((Data.Monoid.<>) - (case - Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'anchor") _x - of - Prelude.Nothing -> Data.Monoid.mempty - (Prelude.Just _v) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 18) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - (Data.ProtoLens.Encoding.Wire.buildFieldSet - (Lens.Family2.view Data.ProtoLens.unknownFields _x))) -instance Control.DeepSeq.NFData UpdateDRepCert where - rnf - = \ x__ - -> Control.DeepSeq.deepseq - (_UpdateDRepCert'_unknownFields x__) - (Control.DeepSeq.deepseq - (_UpdateDRepCert'drepCredential x__) - (Control.DeepSeq.deepseq (_UpdateDRepCert'anchor x__) ())) -{- | Fields : - - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.vkey' @:: Lens' VKeyWitness Data.ByteString.ByteString@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.signature' @:: Lens' VKeyWitness Data.ByteString.ByteString@ -} -data VKeyWitness - = VKeyWitness'_constructor {_VKeyWitness'vkey :: !Data.ByteString.ByteString, - _VKeyWitness'signature :: !Data.ByteString.ByteString, - _VKeyWitness'_unknownFields :: !Data.ProtoLens.FieldSet} - deriving stock (Prelude.Eq, Prelude.Ord) -instance Prelude.Show VKeyWitness where - showsPrec _ __x __s - = Prelude.showChar - '{' - (Prelude.showString - (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) -instance Data.ProtoLens.Field.HasField VKeyWitness "vkey" Data.ByteString.ByteString where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _VKeyWitness'vkey (\ x__ y__ -> x__ {_VKeyWitness'vkey = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField VKeyWitness "signature" Data.ByteString.ByteString where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _VKeyWitness'signature - (\ x__ y__ -> x__ {_VKeyWitness'signature = y__})) - Prelude.id -instance Data.ProtoLens.Message VKeyWitness where - messageName _ - = Data.Text.pack "utxorpc.v1alpha.cardano.VKeyWitness" - packedMessageDescriptor _ - = "\n\ - \\vVKeyWitness\DC2\DC2\n\ - \\EOTvkey\CAN\SOH \SOH(\fR\EOTvkey\DC2\FS\n\ - \\tsignature\CAN\STX \SOH(\fR\tsignature" - packedFileDescriptor _ = packedFileDescriptor - fieldsByTag - = let - vkey__field_descriptor - = Data.ProtoLens.FieldDescriptor - "vkey" - (Data.ProtoLens.ScalarField Data.ProtoLens.BytesField :: - Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString) - (Data.ProtoLens.PlainField - Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"vkey")) :: - Data.ProtoLens.FieldDescriptor VKeyWitness - signature__field_descriptor - = Data.ProtoLens.FieldDescriptor - "signature" - (Data.ProtoLens.ScalarField Data.ProtoLens.BytesField :: - Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString) - (Data.ProtoLens.PlainField - Data.ProtoLens.Optional - (Data.ProtoLens.Field.field @"signature")) :: - Data.ProtoLens.FieldDescriptor VKeyWitness - in - Data.Map.fromList - [(Data.ProtoLens.Tag 1, vkey__field_descriptor), - (Data.ProtoLens.Tag 2, signature__field_descriptor)] - unknownFields - = Lens.Family2.Unchecked.lens - _VKeyWitness'_unknownFields - (\ x__ y__ -> x__ {_VKeyWitness'_unknownFields = y__}) - defMessage - = VKeyWitness'_constructor - {_VKeyWitness'vkey = Data.ProtoLens.fieldDefault, - _VKeyWitness'signature = Data.ProtoLens.fieldDefault, - _VKeyWitness'_unknownFields = []} - parseMessage - = let - loop :: - VKeyWitness -> Data.ProtoLens.Encoding.Bytes.Parser VKeyWitness - loop x - = do end <- Data.ProtoLens.Encoding.Bytes.atEnd - if end then - do (let missing = [] - in - if Prelude.null missing then - Prelude.return () - else - Prelude.fail - ((Prelude.++) - "Missing required fields: " - (Prelude.show (missing :: [Prelude.String])))) - Prelude.return - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) - else - do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt - case tag of - 10 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.getBytes - (Prelude.fromIntegral len)) - "vkey" - loop (Lens.Family2.set (Data.ProtoLens.Field.field @"vkey") y x) - 18 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.getBytes - (Prelude.fromIntegral len)) - "signature" - loop - (Lens.Family2.set (Data.ProtoLens.Field.field @"signature") y x) - wire - -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire - wire - loop - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) - in - (Data.ProtoLens.Encoding.Bytes.) - (do loop Data.ProtoLens.defMessage) "VKeyWitness" - buildMessage - = \ _x - -> (Data.Monoid.<>) - (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"vkey") _x - in - if (Prelude.==) _v Data.ProtoLens.fieldDefault then - Data.Monoid.mempty - else - (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 10) - ((\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - _v)) - ((Data.Monoid.<>) - (let - _v = Lens.Family2.view (Data.ProtoLens.Field.field @"signature") _x - in - if (Prelude.==) _v Data.ProtoLens.fieldDefault then - Data.Monoid.mempty - else - (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 18) - ((\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - _v)) - (Data.ProtoLens.Encoding.Wire.buildFieldSet - (Lens.Family2.view Data.ProtoLens.unknownFields _x))) -instance Control.DeepSeq.NFData VKeyWitness where - rnf - = \ x__ - -> Control.DeepSeq.deepseq - (_VKeyWitness'_unknownFields x__) - (Control.DeepSeq.deepseq - (_VKeyWitness'vkey x__) - (Control.DeepSeq.deepseq (_VKeyWitness'signature x__) ())) -{- | Fields : - - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.stakeCredential' @:: Lens' VoteDelegCert StakeCredential@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'stakeCredential' @:: Lens' VoteDelegCert (Prelude.Maybe StakeCredential)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.drep' @:: Lens' VoteDelegCert DRep@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'drep' @:: Lens' VoteDelegCert (Prelude.Maybe DRep)@ -} -data VoteDelegCert - = VoteDelegCert'_constructor {_VoteDelegCert'stakeCredential :: !(Prelude.Maybe StakeCredential), - _VoteDelegCert'drep :: !(Prelude.Maybe DRep), - _VoteDelegCert'_unknownFields :: !Data.ProtoLens.FieldSet} - deriving stock (Prelude.Eq, Prelude.Ord) -instance Prelude.Show VoteDelegCert where - showsPrec _ __x __s - = Prelude.showChar - '{' - (Prelude.showString - (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) -instance Data.ProtoLens.Field.HasField VoteDelegCert "stakeCredential" StakeCredential where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _VoteDelegCert'stakeCredential - (\ x__ y__ -> x__ {_VoteDelegCert'stakeCredential = y__})) - (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) -instance Data.ProtoLens.Field.HasField VoteDelegCert "maybe'stakeCredential" (Prelude.Maybe StakeCredential) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _VoteDelegCert'stakeCredential - (\ x__ y__ -> x__ {_VoteDelegCert'stakeCredential = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField VoteDelegCert "drep" DRep where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _VoteDelegCert'drep (\ x__ y__ -> x__ {_VoteDelegCert'drep = y__})) - (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) -instance Data.ProtoLens.Field.HasField VoteDelegCert "maybe'drep" (Prelude.Maybe DRep) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _VoteDelegCert'drep (\ x__ y__ -> x__ {_VoteDelegCert'drep = y__})) - Prelude.id -instance Data.ProtoLens.Message VoteDelegCert where - messageName _ - = Data.Text.pack "utxorpc.v1alpha.cardano.VoteDelegCert" - packedMessageDescriptor _ - = "\n\ - \\rVoteDelegCert\DC2S\n\ - \\DLEstake_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SIstakeCredential\DC21\n\ - \\EOTdrep\CAN\STX \SOH(\v2\GS.utxorpc.v1alpha.cardano.DRepR\EOTdrep" - packedFileDescriptor _ = packedFileDescriptor - fieldsByTag - = let - stakeCredential__field_descriptor - = Data.ProtoLens.FieldDescriptor - "stake_credential" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor StakeCredential) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'stakeCredential")) :: - Data.ProtoLens.FieldDescriptor VoteDelegCert - drep__field_descriptor - = Data.ProtoLens.FieldDescriptor - "drep" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor DRep) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'drep")) :: - Data.ProtoLens.FieldDescriptor VoteDelegCert - in - Data.Map.fromList - [(Data.ProtoLens.Tag 1, stakeCredential__field_descriptor), - (Data.ProtoLens.Tag 2, drep__field_descriptor)] - unknownFields - = Lens.Family2.Unchecked.lens - _VoteDelegCert'_unknownFields - (\ x__ y__ -> x__ {_VoteDelegCert'_unknownFields = y__}) - defMessage - = VoteDelegCert'_constructor - {_VoteDelegCert'stakeCredential = Prelude.Nothing, - _VoteDelegCert'drep = Prelude.Nothing, - _VoteDelegCert'_unknownFields = []} - parseMessage - = let - loop :: - VoteDelegCert -> Data.ProtoLens.Encoding.Bytes.Parser VoteDelegCert - loop x - = do end <- Data.ProtoLens.Encoding.Bytes.atEnd - if end then - do (let missing = [] - in - if Prelude.null missing then - Prelude.return () - else - Prelude.fail - ((Prelude.++) - "Missing required fields: " - (Prelude.show (missing :: [Prelude.String])))) - Prelude.return - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) - else - do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt - case tag of - 10 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) - "stake_credential" - loop - (Lens.Family2.set - (Data.ProtoLens.Field.field @"stakeCredential") y x) - 18 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) - "drep" - loop (Lens.Family2.set (Data.ProtoLens.Field.field @"drep") y x) - wire - -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire - wire - loop - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) - in - (Data.ProtoLens.Encoding.Bytes.) - (do loop Data.ProtoLens.defMessage) "VoteDelegCert" - buildMessage - = \ _x - -> (Data.Monoid.<>) - (case - Lens.Family2.view - (Data.ProtoLens.Field.field @"maybe'stakeCredential") _x - of - Prelude.Nothing -> Data.Monoid.mempty - (Prelude.Just _v) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 10) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - ((Data.Monoid.<>) - (case - Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'drep") _x - of - Prelude.Nothing -> Data.Monoid.mempty - (Prelude.Just _v) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 18) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - (Data.ProtoLens.Encoding.Wire.buildFieldSet - (Lens.Family2.view Data.ProtoLens.unknownFields _x))) -instance Control.DeepSeq.NFData VoteDelegCert where - rnf - = \ x__ - -> Control.DeepSeq.deepseq - (_VoteDelegCert'_unknownFields x__) - (Control.DeepSeq.deepseq - (_VoteDelegCert'stakeCredential x__) - (Control.DeepSeq.deepseq (_VoteDelegCert'drep x__) ())) -{- | Fields : - - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.stakeCredential' @:: Lens' VoteRegDelegCert StakeCredential@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'stakeCredential' @:: Lens' VoteRegDelegCert (Prelude.Maybe StakeCredential)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.drep' @:: Lens' VoteRegDelegCert DRep@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'drep' @:: Lens' VoteRegDelegCert (Prelude.Maybe DRep)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.coin' @:: Lens' VoteRegDelegCert Data.Word.Word64@ -} -data VoteRegDelegCert - = VoteRegDelegCert'_constructor {_VoteRegDelegCert'stakeCredential :: !(Prelude.Maybe StakeCredential), - _VoteRegDelegCert'drep :: !(Prelude.Maybe DRep), - _VoteRegDelegCert'coin :: !Data.Word.Word64, - _VoteRegDelegCert'_unknownFields :: !Data.ProtoLens.FieldSet} - deriving stock (Prelude.Eq, Prelude.Ord) -instance Prelude.Show VoteRegDelegCert where - showsPrec _ __x __s - = Prelude.showChar - '{' - (Prelude.showString - (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) -instance Data.ProtoLens.Field.HasField VoteRegDelegCert "stakeCredential" StakeCredential where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _VoteRegDelegCert'stakeCredential - (\ x__ y__ -> x__ {_VoteRegDelegCert'stakeCredential = y__})) - (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) -instance Data.ProtoLens.Field.HasField VoteRegDelegCert "maybe'stakeCredential" (Prelude.Maybe StakeCredential) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _VoteRegDelegCert'stakeCredential - (\ x__ y__ -> x__ {_VoteRegDelegCert'stakeCredential = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField VoteRegDelegCert "drep" DRep where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _VoteRegDelegCert'drep - (\ x__ y__ -> x__ {_VoteRegDelegCert'drep = y__})) - (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) -instance Data.ProtoLens.Field.HasField VoteRegDelegCert "maybe'drep" (Prelude.Maybe DRep) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _VoteRegDelegCert'drep - (\ x__ y__ -> x__ {_VoteRegDelegCert'drep = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField VoteRegDelegCert "coin" Data.Word.Word64 where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _VoteRegDelegCert'coin - (\ x__ y__ -> x__ {_VoteRegDelegCert'coin = y__})) - Prelude.id -instance Data.ProtoLens.Message VoteRegDelegCert where - messageName _ - = Data.Text.pack "utxorpc.v1alpha.cardano.VoteRegDelegCert" - packedMessageDescriptor _ - = "\n\ - \\DLEVoteRegDelegCert\DC2S\n\ - \\DLEstake_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SIstakeCredential\DC21\n\ - \\EOTdrep\CAN\STX \SOH(\v2\GS.utxorpc.v1alpha.cardano.DRepR\EOTdrep\DC2\DC2\n\ - \\EOTcoin\CAN\ETX \SOH(\EOTR\EOTcoin" - packedFileDescriptor _ = packedFileDescriptor - fieldsByTag - = let - stakeCredential__field_descriptor - = Data.ProtoLens.FieldDescriptor - "stake_credential" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor StakeCredential) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'stakeCredential")) :: - Data.ProtoLens.FieldDescriptor VoteRegDelegCert - drep__field_descriptor - = Data.ProtoLens.FieldDescriptor - "drep" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor DRep) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'drep")) :: - Data.ProtoLens.FieldDescriptor VoteRegDelegCert - coin__field_descriptor - = Data.ProtoLens.FieldDescriptor - "coin" - (Data.ProtoLens.ScalarField Data.ProtoLens.UInt64Field :: - Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64) - (Data.ProtoLens.PlainField - Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"coin")) :: - Data.ProtoLens.FieldDescriptor VoteRegDelegCert - in - Data.Map.fromList - [(Data.ProtoLens.Tag 1, stakeCredential__field_descriptor), - (Data.ProtoLens.Tag 2, drep__field_descriptor), - (Data.ProtoLens.Tag 3, coin__field_descriptor)] - unknownFields - = Lens.Family2.Unchecked.lens - _VoteRegDelegCert'_unknownFields - (\ x__ y__ -> x__ {_VoteRegDelegCert'_unknownFields = y__}) - defMessage - = VoteRegDelegCert'_constructor - {_VoteRegDelegCert'stakeCredential = Prelude.Nothing, - _VoteRegDelegCert'drep = Prelude.Nothing, - _VoteRegDelegCert'coin = Data.ProtoLens.fieldDefault, - _VoteRegDelegCert'_unknownFields = []} - parseMessage - = let - loop :: - VoteRegDelegCert - -> Data.ProtoLens.Encoding.Bytes.Parser VoteRegDelegCert - loop x - = do end <- Data.ProtoLens.Encoding.Bytes.atEnd - if end then - do (let missing = [] - in - if Prelude.null missing then - Prelude.return () - else - Prelude.fail - ((Prelude.++) - "Missing required fields: " - (Prelude.show (missing :: [Prelude.String])))) - Prelude.return - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) - else - do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt - case tag of - 10 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) - "stake_credential" - loop - (Lens.Family2.set - (Data.ProtoLens.Field.field @"stakeCredential") y x) - 18 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) - "drep" - loop (Lens.Family2.set (Data.ProtoLens.Field.field @"drep") y x) - 24 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - Data.ProtoLens.Encoding.Bytes.getVarInt "coin" - loop (Lens.Family2.set (Data.ProtoLens.Field.field @"coin") y x) - wire - -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire - wire - loop - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) - in - (Data.ProtoLens.Encoding.Bytes.) - (do loop Data.ProtoLens.defMessage) "VoteRegDelegCert" - buildMessage - = \ _x - -> (Data.Monoid.<>) - (case - Lens.Family2.view - (Data.ProtoLens.Field.field @"maybe'stakeCredential") _x - of - Prelude.Nothing -> Data.Monoid.mempty - (Prelude.Just _v) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 10) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - ((Data.Monoid.<>) - (case - Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'drep") _x - of - Prelude.Nothing -> Data.Monoid.mempty - (Prelude.Just _v) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 18) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - ((Data.Monoid.<>) - (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"coin") _x - in - if (Prelude.==) _v Data.ProtoLens.fieldDefault then - Data.Monoid.mempty - else - (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 24) - (Data.ProtoLens.Encoding.Bytes.putVarInt _v)) - (Data.ProtoLens.Encoding.Wire.buildFieldSet - (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) -instance Control.DeepSeq.NFData VoteRegDelegCert where - rnf - = \ x__ - -> Control.DeepSeq.deepseq - (_VoteRegDelegCert'_unknownFields x__) - (Control.DeepSeq.deepseq - (_VoteRegDelegCert'stakeCredential x__) - (Control.DeepSeq.deepseq - (_VoteRegDelegCert'drep x__) - (Control.DeepSeq.deepseq (_VoteRegDelegCert'coin x__) ()))) -{- | Fields : - - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.rewardAccount' @:: Lens' Withdrawal Data.ByteString.ByteString@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.coin' @:: Lens' Withdrawal Data.Word.Word64@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.redeemer' @:: Lens' Withdrawal Redeemer@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'redeemer' @:: Lens' Withdrawal (Prelude.Maybe Redeemer)@ -} -data Withdrawal - = Withdrawal'_constructor {_Withdrawal'rewardAccount :: !Data.ByteString.ByteString, - _Withdrawal'coin :: !Data.Word.Word64, - _Withdrawal'redeemer :: !(Prelude.Maybe Redeemer), - _Withdrawal'_unknownFields :: !Data.ProtoLens.FieldSet} - deriving stock (Prelude.Eq, Prelude.Ord) -instance Prelude.Show Withdrawal where - showsPrec _ __x __s - = Prelude.showChar - '{' - (Prelude.showString - (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) -instance Data.ProtoLens.Field.HasField Withdrawal "rewardAccount" Data.ByteString.ByteString where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Withdrawal'rewardAccount - (\ x__ y__ -> x__ {_Withdrawal'rewardAccount = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField Withdrawal "coin" Data.Word.Word64 where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Withdrawal'coin (\ x__ y__ -> x__ {_Withdrawal'coin = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField Withdrawal "redeemer" Redeemer where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Withdrawal'redeemer - (\ x__ y__ -> x__ {_Withdrawal'redeemer = y__})) - (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) -instance Data.ProtoLens.Field.HasField Withdrawal "maybe'redeemer" (Prelude.Maybe Redeemer) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _Withdrawal'redeemer - (\ x__ y__ -> x__ {_Withdrawal'redeemer = y__})) - Prelude.id -instance Data.ProtoLens.Message Withdrawal where - messageName _ = Data.Text.pack "utxorpc.v1alpha.cardano.Withdrawal" - packedMessageDescriptor _ - = "\n\ - \\n\ - \Withdrawal\DC2%\n\ - \\SOreward_account\CAN\SOH \SOH(\fR\rrewardAccount\DC2\DC2\n\ - \\EOTcoin\CAN\STX \SOH(\EOTR\EOTcoin\DC2=\n\ - \\bredeemer\CAN\ETX \SOH(\v2!.utxorpc.v1alpha.cardano.RedeemerR\bredeemer" - packedFileDescriptor _ = packedFileDescriptor - fieldsByTag - = let - rewardAccount__field_descriptor - = Data.ProtoLens.FieldDescriptor - "reward_account" - (Data.ProtoLens.ScalarField Data.ProtoLens.BytesField :: - Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString) - (Data.ProtoLens.PlainField - Data.ProtoLens.Optional - (Data.ProtoLens.Field.field @"rewardAccount")) :: - Data.ProtoLens.FieldDescriptor Withdrawal - coin__field_descriptor - = Data.ProtoLens.FieldDescriptor - "coin" - (Data.ProtoLens.ScalarField Data.ProtoLens.UInt64Field :: - Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64) - (Data.ProtoLens.PlainField - Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"coin")) :: - Data.ProtoLens.FieldDescriptor Withdrawal - redeemer__field_descriptor - = Data.ProtoLens.FieldDescriptor - "redeemer" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor Redeemer) - (Data.ProtoLens.OptionalField - (Data.ProtoLens.Field.field @"maybe'redeemer")) :: - Data.ProtoLens.FieldDescriptor Withdrawal - in - Data.Map.fromList - [(Data.ProtoLens.Tag 1, rewardAccount__field_descriptor), - (Data.ProtoLens.Tag 2, coin__field_descriptor), - (Data.ProtoLens.Tag 3, redeemer__field_descriptor)] - unknownFields - = Lens.Family2.Unchecked.lens - _Withdrawal'_unknownFields - (\ x__ y__ -> x__ {_Withdrawal'_unknownFields = y__}) - defMessage - = Withdrawal'_constructor - {_Withdrawal'rewardAccount = Data.ProtoLens.fieldDefault, - _Withdrawal'coin = Data.ProtoLens.fieldDefault, - _Withdrawal'redeemer = Prelude.Nothing, - _Withdrawal'_unknownFields = []} - parseMessage - = let - loop :: - Withdrawal -> Data.ProtoLens.Encoding.Bytes.Parser Withdrawal - loop x - = do end <- Data.ProtoLens.Encoding.Bytes.atEnd - if end then - do (let missing = [] - in - if Prelude.null missing then - Prelude.return () - else - Prelude.fail - ((Prelude.++) - "Missing required fields: " - (Prelude.show (missing :: [Prelude.String])))) - Prelude.return - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) - else - do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt - case tag of - 10 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.getBytes - (Prelude.fromIntegral len)) - "reward_account" - loop - (Lens.Family2.set - (Data.ProtoLens.Field.field @"rewardAccount") y x) - 16 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - Data.ProtoLens.Encoding.Bytes.getVarInt "coin" - loop (Lens.Family2.set (Data.ProtoLens.Field.field @"coin") y x) - 26 - -> do y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) - "redeemer" - loop - (Lens.Family2.set (Data.ProtoLens.Field.field @"redeemer") y x) - wire - -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire - wire - loop - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) - in - (Data.ProtoLens.Encoding.Bytes.) - (do loop Data.ProtoLens.defMessage) "Withdrawal" - buildMessage - = \ _x - -> (Data.Monoid.<>) - (let - _v - = Lens.Family2.view - (Data.ProtoLens.Field.field @"rewardAccount") _x - in - if (Prelude.==) _v Data.ProtoLens.fieldDefault then - Data.Monoid.mempty - else - (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 10) - ((\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - _v)) - ((Data.Monoid.<>) - (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"coin") _x - in - if (Prelude.==) _v Data.ProtoLens.fieldDefault then - Data.Monoid.mempty - else - (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 16) - (Data.ProtoLens.Encoding.Bytes.putVarInt _v)) - ((Data.Monoid.<>) - (case - Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'redeemer") _x - of - Prelude.Nothing -> Data.Monoid.mempty - (Prelude.Just _v) - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 26) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - (Data.ProtoLens.Encoding.Wire.buildFieldSet - (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) -instance Control.DeepSeq.NFData Withdrawal where - rnf - = \ x__ - -> Control.DeepSeq.deepseq - (_Withdrawal'_unknownFields x__) - (Control.DeepSeq.deepseq - (_Withdrawal'rewardAccount x__) - (Control.DeepSeq.deepseq - (_Withdrawal'coin x__) - (Control.DeepSeq.deepseq (_Withdrawal'redeemer x__) ()))) -{- | Fields : - - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.vkeywitness' @:: Lens' WitnessSet [VKeyWitness]@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.vec'vkeywitness' @:: Lens' WitnessSet (Data.Vector.Vector VKeyWitness)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.script' @:: Lens' WitnessSet [Script]@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.vec'script' @:: Lens' WitnessSet (Data.Vector.Vector Script)@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.plutusDatums' @:: Lens' WitnessSet [PlutusData]@ - * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.vec'plutusDatums' @:: Lens' WitnessSet (Data.Vector.Vector PlutusData)@ -} -data WitnessSet - = WitnessSet'_constructor {_WitnessSet'vkeywitness :: !(Data.Vector.Vector VKeyWitness), - _WitnessSet'script :: !(Data.Vector.Vector Script), - _WitnessSet'plutusDatums :: !(Data.Vector.Vector PlutusData), - _WitnessSet'_unknownFields :: !Data.ProtoLens.FieldSet} - deriving stock (Prelude.Eq, Prelude.Ord) -instance Prelude.Show WitnessSet where - showsPrec _ __x __s - = Prelude.showChar - '{' - (Prelude.showString - (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) -instance Data.ProtoLens.Field.HasField WitnessSet "vkeywitness" [VKeyWitness] where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _WitnessSet'vkeywitness - (\ x__ y__ -> x__ {_WitnessSet'vkeywitness = y__})) - (Lens.Family2.Unchecked.lens - Data.Vector.Generic.toList - (\ _ y__ -> Data.Vector.Generic.fromList y__)) -instance Data.ProtoLens.Field.HasField WitnessSet "vec'vkeywitness" (Data.Vector.Vector VKeyWitness) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _WitnessSet'vkeywitness - (\ x__ y__ -> x__ {_WitnessSet'vkeywitness = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField WitnessSet "script" [Script] where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _WitnessSet'script (\ x__ y__ -> x__ {_WitnessSet'script = y__})) - (Lens.Family2.Unchecked.lens - Data.Vector.Generic.toList - (\ _ y__ -> Data.Vector.Generic.fromList y__)) -instance Data.ProtoLens.Field.HasField WitnessSet "vec'script" (Data.Vector.Vector Script) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _WitnessSet'script (\ x__ y__ -> x__ {_WitnessSet'script = y__})) - Prelude.id -instance Data.ProtoLens.Field.HasField WitnessSet "plutusDatums" [PlutusData] where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _WitnessSet'plutusDatums - (\ x__ y__ -> x__ {_WitnessSet'plutusDatums = y__})) - (Lens.Family2.Unchecked.lens - Data.Vector.Generic.toList - (\ _ y__ -> Data.Vector.Generic.fromList y__)) -instance Data.ProtoLens.Field.HasField WitnessSet "vec'plutusDatums" (Data.Vector.Vector PlutusData) where - fieldOf _ - = (Prelude..) - (Lens.Family2.Unchecked.lens - _WitnessSet'plutusDatums - (\ x__ y__ -> x__ {_WitnessSet'plutusDatums = y__})) - Prelude.id -instance Data.ProtoLens.Message WitnessSet where - messageName _ = Data.Text.pack "utxorpc.v1alpha.cardano.WitnessSet" - packedMessageDescriptor _ - = "\n\ - \\n\ - \WitnessSet\DC2F\n\ - \\vvkeywitness\CAN\SOH \ETX(\v2$.utxorpc.v1alpha.cardano.VKeyWitnessR\vvkeywitness\DC27\n\ - \\ACKscript\CAN\STX \ETX(\v2\US.utxorpc.v1alpha.cardano.ScriptR\ACKscript\DC2H\n\ - \\rplutus_datums\CAN\ETX \ETX(\v2#.utxorpc.v1alpha.cardano.PlutusDataR\fplutusDatums" - packedFileDescriptor _ = packedFileDescriptor - fieldsByTag - = let - vkeywitness__field_descriptor - = Data.ProtoLens.FieldDescriptor - "vkeywitness" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor VKeyWitness) - (Data.ProtoLens.RepeatedField - Data.ProtoLens.Unpacked - (Data.ProtoLens.Field.field @"vkeywitness")) :: - Data.ProtoLens.FieldDescriptor WitnessSet - script__field_descriptor - = Data.ProtoLens.FieldDescriptor - "script" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor Script) - (Data.ProtoLens.RepeatedField - Data.ProtoLens.Unpacked (Data.ProtoLens.Field.field @"script")) :: - Data.ProtoLens.FieldDescriptor WitnessSet - plutusDatums__field_descriptor - = Data.ProtoLens.FieldDescriptor - "plutus_datums" - (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: - Data.ProtoLens.FieldTypeDescriptor PlutusData) - (Data.ProtoLens.RepeatedField - Data.ProtoLens.Unpacked - (Data.ProtoLens.Field.field @"plutusDatums")) :: - Data.ProtoLens.FieldDescriptor WitnessSet - in - Data.Map.fromList - [(Data.ProtoLens.Tag 1, vkeywitness__field_descriptor), - (Data.ProtoLens.Tag 2, script__field_descriptor), - (Data.ProtoLens.Tag 3, plutusDatums__field_descriptor)] - unknownFields - = Lens.Family2.Unchecked.lens - _WitnessSet'_unknownFields - (\ x__ y__ -> x__ {_WitnessSet'_unknownFields = y__}) - defMessage - = WitnessSet'_constructor - {_WitnessSet'vkeywitness = Data.Vector.Generic.empty, - _WitnessSet'script = Data.Vector.Generic.empty, - _WitnessSet'plutusDatums = Data.Vector.Generic.empty, - _WitnessSet'_unknownFields = []} - parseMessage - = let - loop :: - WitnessSet - -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld PlutusData - -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Script - -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld VKeyWitness - -> Data.ProtoLens.Encoding.Bytes.Parser WitnessSet - loop x mutable'plutusDatums mutable'script mutable'vkeywitness - = do end <- Data.ProtoLens.Encoding.Bytes.atEnd - if end then - do frozen'plutusDatums <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO - (Data.ProtoLens.Encoding.Growing.unsafeFreeze - mutable'plutusDatums) - frozen'script <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO - (Data.ProtoLens.Encoding.Growing.unsafeFreeze - mutable'script) - frozen'vkeywitness <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO - (Data.ProtoLens.Encoding.Growing.unsafeFreeze - mutable'vkeywitness) - (let missing = [] - in - if Prelude.null missing then - Prelude.return () - else - Prelude.fail - ((Prelude.++) - "Missing required fields: " - (Prelude.show (missing :: [Prelude.String])))) - Prelude.return - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) - (Lens.Family2.set - (Data.ProtoLens.Field.field @"vec'plutusDatums") - frozen'plutusDatums - (Lens.Family2.set - (Data.ProtoLens.Field.field @"vec'script") frozen'script - (Lens.Family2.set - (Data.ProtoLens.Field.field @"vec'vkeywitness") - frozen'vkeywitness x)))) - else - do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt - case tag of - 10 - -> do !y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) - Data.ProtoLens.parseMessage) - "vkeywitness" - v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO - (Data.ProtoLens.Encoding.Growing.append - mutable'vkeywitness y) - loop x mutable'plutusDatums mutable'script v - 18 - -> do !y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) - Data.ProtoLens.parseMessage) - "script" - v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO - (Data.ProtoLens.Encoding.Growing.append mutable'script y) - loop x mutable'plutusDatums v mutable'vkeywitness - 26 - -> do !y <- (Data.ProtoLens.Encoding.Bytes.) - (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt - Data.ProtoLens.Encoding.Bytes.isolate - (Prelude.fromIntegral len) - Data.ProtoLens.parseMessage) - "plutus_datums" - v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO - (Data.ProtoLens.Encoding.Growing.append - mutable'plutusDatums y) - loop x v mutable'script mutable'vkeywitness - wire - -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire - wire - loop - (Lens.Family2.over - Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) - mutable'plutusDatums mutable'script mutable'vkeywitness - in - (Data.ProtoLens.Encoding.Bytes.) - (do mutable'plutusDatums <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO - Data.ProtoLens.Encoding.Growing.new - mutable'script <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO - Data.ProtoLens.Encoding.Growing.new - mutable'vkeywitness <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO - Data.ProtoLens.Encoding.Growing.new - loop - Data.ProtoLens.defMessage mutable'plutusDatums mutable'script - mutable'vkeywitness) - "WitnessSet" - buildMessage - = \ _x - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.foldMapBuilder - (\ _v - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 10) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - (Lens.Family2.view - (Data.ProtoLens.Field.field @"vec'vkeywitness") _x)) - ((Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.foldMapBuilder - (\ _v - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 18) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - (Lens.Family2.view (Data.ProtoLens.Field.field @"vec'script") _x)) - ((Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.foldMapBuilder - (\ _v - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt 26) - ((Prelude..) - (\ bs - -> (Data.Monoid.<>) - (Data.ProtoLens.Encoding.Bytes.putVarInt - (Prelude.fromIntegral (Data.ByteString.length bs))) - (Data.ProtoLens.Encoding.Bytes.putBytes bs)) - Data.ProtoLens.encodeMessage _v)) - (Lens.Family2.view - (Data.ProtoLens.Field.field @"vec'plutusDatums") _x)) - (Data.ProtoLens.Encoding.Wire.buildFieldSet - (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) -instance Control.DeepSeq.NFData WitnessSet where - rnf - = \ x__ - -> Control.DeepSeq.deepseq - (_WitnessSet'_unknownFields x__) - (Control.DeepSeq.deepseq - (_WitnessSet'vkeywitness x__) - (Control.DeepSeq.deepseq - (_WitnessSet'script x__) - (Control.DeepSeq.deepseq (_WitnessSet'plutusDatums x__) ()))) -packedFileDescriptor :: Data.ByteString.ByteString -packedFileDescriptor - = "\n\ - \%utxorpc/v1alpha/cardano/cardano.proto\DC2\ETButxorpc.v1alpha.cardano\"\224\SOH\n\ - \\bRedeemer\DC2B\n\ - \\apurpose\CAN\SOH \SOH(\SO2(.utxorpc.v1alpha.cardano.RedeemerPurposeR\apurpose\DC2=\n\ - \\apayload\CAN\STX \SOH(\v2#.utxorpc.v1alpha.cardano.PlutusDataR\apayload\DC2\DC4\n\ - \\ENQindex\CAN\ETX \SOH(\rR\ENQindex\DC2;\n\ - \\bex_units\CAN\EOT \SOH(\v2 .utxorpc.v1alpha.cardano.ExUnitsR\aexUnits\"\196\SOH\n\ - \\aTxInput\DC2\ETB\n\ - \\atx_hash\CAN\SOH \SOH(\fR\ACKtxHash\DC2!\n\ - \\foutput_index\CAN\STX \SOH(\rR\voutputIndex\DC2>\n\ - \\tas_output\CAN\ETX \SOH(\v2!.utxorpc.v1alpha.cardano.TxOutputR\basOutput\DC2=\n\ - \\bredeemer\CAN\EOT \SOH(\v2!.utxorpc.v1alpha.cardano.RedeemerR\bredeemer\"\228\SOH\n\ - \\bTxOutput\DC2\CAN\n\ - \\aaddress\CAN\SOH \SOH(\fR\aaddress\DC2\DC2\n\ - \\EOTcoin\CAN\STX \SOH(\EOTR\EOTcoin\DC2;\n\ - \\ACKassets\CAN\ETX \ETX(\v2#.utxorpc.v1alpha.cardano.MultiassetR\ACKassets\DC24\n\ - \\ENQdatum\CAN\EOT \SOH(\v2\RS.utxorpc.v1alpha.cardano.DatumR\ENQdatum\DC27\n\ - \\ACKscript\CAN\ENQ \SOH(\v2\US.utxorpc.v1alpha.cardano.ScriptR\ACKscript\"\DEL\n\ - \\ENQDatum\DC2\DC2\n\ - \\EOThash\CAN\SOH \SOH(\fR\EOThash\DC2=\n\ - \\apayload\CAN\STX \SOH(\v2#.utxorpc.v1alpha.cardano.PlutusDataR\apayload\DC2#\n\ - \\roriginal_cbor\CAN\ETX \SOH(\fR\foriginalCbor\"Y\n\ - \\ENQAsset\DC2\DC2\n\ - \\EOTname\CAN\SOH \SOH(\fR\EOTname\DC2\US\n\ - \\voutput_coin\CAN\STX \SOH(\EOTR\n\ - \outputCoin\DC2\ESC\n\ - \\tmint_coin\CAN\ETX \SOH(\ETXR\bmintCoin\"\160\SOH\n\ - \\n\ - \Multiasset\DC2\ESC\n\ - \\tpolicy_id\CAN\SOH \SOH(\fR\bpolicyId\DC26\n\ - \\ACKassets\CAN\STX \ETX(\v2\RS.utxorpc.v1alpha.cardano.AssetR\ACKassets\DC2=\n\ - \\bredeemer\CAN\ETX \SOH(\v2!.utxorpc.v1alpha.cardano.RedeemerR\bredeemer\"4\n\ - \\n\ - \TxValidity\DC2\DC4\n\ - \\ENQstart\CAN\SOH \SOH(\EOTR\ENQstart\DC2\DLE\n\ - \\ETXttl\CAN\STX \SOH(\EOTR\ETXttl\"\201\SOH\n\ - \\n\ - \Collateral\DC2@\n\ - \\n\ - \collateral\CAN\SOH \ETX(\v2 .utxorpc.v1alpha.cardano.TxInputR\n\ - \collateral\DC2N\n\ - \\DC1collateral_return\CAN\STX \SOH(\v2!.utxorpc.v1alpha.cardano.TxOutputR\DLEcollateralReturn\DC2)\n\ - \\DLEtotal_collateral\CAN\ETX \SOH(\EOTR\SItotalCollateral\"\134\SOH\n\ - \\n\ - \Withdrawal\DC2%\n\ - \\SOreward_account\CAN\SOH \SOH(\fR\rrewardAccount\DC2\DC2\n\ - \\EOTcoin\CAN\STX \SOH(\EOTR\EOTcoin\DC2=\n\ - \\bredeemer\CAN\ETX \SOH(\v2!.utxorpc.v1alpha.cardano.RedeemerR\bredeemer\"\215\SOH\n\ - \\n\ - \WitnessSet\DC2F\n\ - \\vvkeywitness\CAN\SOH \ETX(\v2$.utxorpc.v1alpha.cardano.VKeyWitnessR\vvkeywitness\DC27\n\ - \\ACKscript\CAN\STX \ETX(\v2\US.utxorpc.v1alpha.cardano.ScriptR\ACKscript\DC2H\n\ - \\rplutus_datums\CAN\ETX \ETX(\v2#.utxorpc.v1alpha.cardano.PlutusDataR\fplutusDatums\"\131\SOH\n\ - \\aAuxData\DC2=\n\ - \\bmetadata\CAN\SOH \ETX(\v2!.utxorpc.v1alpha.cardano.MetadataR\bmetadata\DC29\n\ - \\ascripts\CAN\STX \ETX(\v2\US.utxorpc.v1alpha.cardano.ScriptR\ascripts\"\225\ENQ\n\ - \\STXTx\DC28\n\ - \\ACKinputs\CAN\SOH \ETX(\v2 .utxorpc.v1alpha.cardano.TxInputR\ACKinputs\DC2;\n\ - \\aoutputs\CAN\STX \ETX(\v2!.utxorpc.v1alpha.cardano.TxOutputR\aoutputs\DC2H\n\ - \\fcertificates\CAN\ETX \ETX(\v2$.utxorpc.v1alpha.cardano.CertificateR\fcertificates\DC2E\n\ - \\vwithdrawals\CAN\EOT \ETX(\v2#.utxorpc.v1alpha.cardano.WithdrawalR\vwithdrawals\DC27\n\ - \\EOTmint\CAN\ENQ \ETX(\v2#.utxorpc.v1alpha.cardano.MultiassetR\EOTmint\DC2K\n\ - \\DLEreference_inputs\CAN\ACK \ETX(\v2 .utxorpc.v1alpha.cardano.TxInputR\SIreferenceInputs\DC2A\n\ - \\twitnesses\CAN\a \SOH(\v2#.utxorpc.v1alpha.cardano.WitnessSetR\twitnesses\DC2C\n\ - \\n\ - \collateral\CAN\b \SOH(\v2#.utxorpc.v1alpha.cardano.CollateralR\n\ - \collateral\DC2\DLE\n\ - \\ETXfee\CAN\t \SOH(\EOTR\ETXfee\DC2?\n\ - \\bvalidity\CAN\n\ - \ \SOH(\v2#.utxorpc.v1alpha.cardano.TxValidityR\bvalidity\DC2\RS\n\ - \\n\ - \successful\CAN\v \SOH(\bR\n\ - \successful\DC2>\n\ - \\tauxiliary\CAN\f \SOH(\v2 .utxorpc.v1alpha.cardano.AuxDataR\tauxiliary\DC2\DC2\n\ - \\EOThash\CAN\r \SOH(\fR\EOThash\"M\n\ - \\vBlockHeader\DC2\DC2\n\ - \\EOTslot\CAN\SOH \SOH(\EOTR\EOTslot\DC2\DC2\n\ - \\EOThash\CAN\STX \SOH(\fR\EOThash\DC2\SYN\n\ - \\ACKheight\CAN\ETX \SOH(\EOTR\ACKheight\"8\n\ - \\tBlockBody\DC2+\n\ - \\STXtx\CAN\SOH \ETX(\v2\ESC.utxorpc.v1alpha.cardano.TxR\STXtx\"}\n\ - \\ENQBlock\DC2<\n\ - \\ACKheader\CAN\SOH \SOH(\v2$.utxorpc.v1alpha.cardano.BlockHeaderR\ACKheader\DC26\n\ - \\EOTbody\CAN\STX \SOH(\v2\".utxorpc.v1alpha.cardano.BlockBodyR\EOTbody\"?\n\ - \\vVKeyWitness\DC2\DC2\n\ - \\EOTvkey\CAN\SOH \SOH(\fR\EOTvkey\DC2\FS\n\ - \\tsignature\CAN\STX \SOH(\fR\tsignature\"\128\ETX\n\ - \\fNativeScript\DC2%\n\ - \\rscript_pubkey\CAN\SOH \SOH(\fH\NULR\fscriptPubkey\DC2J\n\ - \\n\ - \script_all\CAN\STX \SOH(\v2).utxorpc.v1alpha.cardano.NativeScriptListH\NULR\tscriptAll\DC2J\n\ - \\n\ - \script_any\CAN\ETX \SOH(\v2).utxorpc.v1alpha.cardano.NativeScriptListH\NULR\tscriptAny\DC2H\n\ - \\rscript_n_of_k\CAN\EOT \SOH(\v2#.utxorpc.v1alpha.cardano.ScriptNOfKH\NULR\n\ - \scriptNOfK\DC2'\n\ - \\SOinvalid_before\CAN\ENQ \SOH(\EOTH\NULR\rinvalidBefore\DC2-\n\ - \\DC1invalid_hereafter\CAN\ACK \SOH(\EOTH\NULR\DLEinvalidHereafterB\SI\n\ - \\rnative_script\"O\n\ - \\DLENativeScriptList\DC2;\n\ - \\ENQitems\CAN\SOH \ETX(\v2%.utxorpc.v1alpha.cardano.NativeScriptR\ENQitems\"[\n\ - \\n\ - \ScriptNOfK\DC2\f\n\ - \\SOHk\CAN\SOH \SOH(\rR\SOHk\DC2?\n\ - \\ascripts\CAN\STX \ETX(\v2%.utxorpc.v1alpha.cardano.NativeScriptR\ascripts\"\128\SOH\n\ - \\ACKConstr\DC2\DLE\n\ - \\ETXtag\CAN\SOH \SOH(\rR\ETXtag\DC2'\n\ - \\SIany_constructor\CAN\STX \SOH(\EOTR\SOanyConstructor\DC2;\n\ - \\ACKfields\CAN\ETX \ETX(\v2#.utxorpc.v1alpha.cardano.PlutusDataR\ACKfields\"c\n\ - \\ACKBigInt\DC2\DC2\n\ - \\ETXint\CAN\SOH \SOH(\ETXH\NULR\ETXint\DC2\FS\n\ - \\tbig_u_int\CAN\STX \SOH(\fH\NULR\abigUInt\DC2\FS\n\ - \\tbig_n_int\CAN\ETX \SOH(\fH\NULR\abigNIntB\t\n\ - \\abig_int\"\130\SOH\n\ - \\SOPlutusDataPair\DC25\n\ - \\ETXkey\CAN\SOH \SOH(\v2#.utxorpc.v1alpha.cardano.PlutusDataR\ETXkey\DC29\n\ - \\ENQvalue\CAN\STX \SOH(\v2#.utxorpc.v1alpha.cardano.PlutusDataR\ENQvalue\"\183\STX\n\ - \\n\ - \PlutusData\DC29\n\ - \\ACKconstr\CAN\STX \SOH(\v2\US.utxorpc.v1alpha.cardano.ConstrH\NULR\ACKconstr\DC2:\n\ - \\ETXmap\CAN\ETX \SOH(\v2&.utxorpc.v1alpha.cardano.PlutusDataMapH\NULR\ETXmap\DC2:\n\ - \\abig_int\CAN\EOT \SOH(\v2\US.utxorpc.v1alpha.cardano.BigIntH\NULR\ACKbigInt\DC2%\n\ - \\rbounded_bytes\CAN\ENQ \SOH(\fH\NULR\fboundedBytes\DC2@\n\ - \\ENQarray\CAN\ACK \SOH(\v2(.utxorpc.v1alpha.cardano.PlutusDataArrayH\NULR\ENQarrayB\r\n\ - \\vplutus_data\"N\n\ - \\rPlutusDataMap\DC2=\n\ - \\ENQpairs\CAN\SOH \ETX(\v2'.utxorpc.v1alpha.cardano.PlutusDataPairR\ENQpairs\"L\n\ - \\SIPlutusDataArray\DC29\n\ - \\ENQitems\CAN\SOH \ETX(\v2#.utxorpc.v1alpha.cardano.PlutusDataR\ENQitems\"\176\SOH\n\ - \\ACKScript\DC2?\n\ - \\ACKnative\CAN\SOH \SOH(\v2%.utxorpc.v1alpha.cardano.NativeScriptH\NULR\ACKnative\DC2\GS\n\ - \\tplutus_v1\CAN\STX \SOH(\fH\NULR\bplutusV1\DC2\GS\n\ - \\tplutus_v2\CAN\ETX \SOH(\fH\NULR\bplutusV2\DC2\GS\n\ - \\tplutus_v3\CAN\EOT \SOH(\fH\NULR\bplutusV3B\b\n\ - \\ACKscript\"\214\SOH\n\ - \\tMetadatum\DC2\DC2\n\ - \\ETXint\CAN\SOH \SOH(\ETXH\NULR\ETXint\DC2\SYN\n\ - \\ENQbytes\CAN\STX \SOH(\fH\NULR\ENQbytes\DC2\DC4\n\ - \\EOTtext\CAN\ETX \SOH(\tH\NULR\EOTtext\DC2?\n\ - \\ENQarray\CAN\EOT \SOH(\v2'.utxorpc.v1alpha.cardano.MetadatumArrayH\NULR\ENQarray\DC29\n\ - \\ETXmap\CAN\ENQ \SOH(\v2%.utxorpc.v1alpha.cardano.MetadatumMapH\NULR\ETXmapB\v\n\ - \\tmetadatum\"J\n\ - \\SOMetadatumArray\DC28\n\ - \\ENQitems\CAN\SOH \ETX(\v2\".utxorpc.v1alpha.cardano.MetadatumR\ENQitems\"L\n\ - \\fMetadatumMap\DC2<\n\ - \\ENQpairs\CAN\SOH \ETX(\v2&.utxorpc.v1alpha.cardano.MetadatumPairR\ENQpairs\"\DEL\n\ - \\rMetadatumPair\DC24\n\ - \\ETXkey\CAN\SOH \SOH(\v2\".utxorpc.v1alpha.cardano.MetadatumR\ETXkey\DC28\n\ - \\ENQvalue\CAN\STX \SOH(\v2\".utxorpc.v1alpha.cardano.MetadatumR\ENQvalue\"Z\n\ - \\bMetadata\DC2\DC4\n\ - \\ENQlabel\CAN\SOH \SOH(\EOTR\ENQlabel\DC28\n\ - \\ENQvalue\CAN\STX \SOH(\v2\".utxorpc.v1alpha.cardano.MetadatumR\ENQvalue\"n\n\ - \\SIStakeCredential\DC2$\n\ - \\raddr_key_hash\CAN\SOH \SOH(\fH\NULR\vaddrKeyHash\DC2!\n\ - \\vscript_hash\CAN\STX \SOH(\fH\NULR\n\ - \scriptHashB\DC2\n\ - \\DLEstake_credential\"P\n\ - \\SORationalNumber\DC2\FS\n\ - \\tnumerator\CAN\SOH \SOH(\ENQR\tnumerator\DC2 \n\ - \\vdenominator\CAN\STX \SOH(\rR\vdenominator\"`\n\ - \\ENQRelay\DC2\DC3\n\ - \\ENQip_v4\CAN\SOH \SOH(\fR\EOTipV4\DC2\DC3\n\ - \\ENQip_v6\CAN\STX \SOH(\fR\EOTipV6\DC2\EM\n\ - \\bdns_name\CAN\ETX \SOH(\tR\adnsName\DC2\DC2\n\ - \\EOTport\CAN\EOT \SOH(\rR\EOTport\"4\n\ - \\fPoolMetadata\DC2\DLE\n\ - \\ETXurl\CAN\SOH \SOH(\tR\ETXurl\DC2\DC2\n\ - \\EOThash\CAN\STX \SOH(\fR\EOThash\"\251\r\n\ - \\vCertificate\DC2Y\n\ - \\DC2stake_registration\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialH\NULR\DC1stakeRegistration\DC2]\n\ - \\DC4stake_deregistration\CAN\STX \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialH\NULR\DC3stakeDeregistration\DC2Y\n\ - \\DLEstake_delegation\CAN\ETX \SOH(\v2,.utxorpc.v1alpha.cardano.StakeDelegationCertH\NULR\SIstakeDelegation\DC2\\\n\ - \\DC1pool_registration\CAN\EOT \SOH(\v2-.utxorpc.v1alpha.cardano.PoolRegistrationCertH\NULR\DLEpoolRegistration\DC2V\n\ - \\SIpool_retirement\CAN\ENQ \SOH(\v2+.utxorpc.v1alpha.cardano.PoolRetirementCertH\NULR\SOpoolRetirement\DC2i\n\ - \\SYNgenesis_key_delegation\CAN\ACK \SOH(\v21.utxorpc.v1alpha.cardano.GenesisKeyDelegationCertH\NULR\DC4genesisKeyDelegation\DC2=\n\ - \\bmir_cert\CAN\a \SOH(\v2 .utxorpc.v1alpha.cardano.MirCertH\NULR\amirCert\DC2=\n\ - \\breg_cert\CAN\b \SOH(\v2 .utxorpc.v1alpha.cardano.RegCertH\NULR\aregCert\DC2C\n\ - \\n\ - \unreg_cert\CAN\t \SOH(\v2\".utxorpc.v1alpha.cardano.UnRegCertH\NULR\tunregCert\DC2P\n\ - \\SIvote_deleg_cert\CAN\n\ - \ \SOH(\v2&.utxorpc.v1alpha.cardano.VoteDelegCertH\NULR\rvoteDelegCert\DC2`\n\ - \\NAKstake_vote_deleg_cert\CAN\v \SOH(\v2+.utxorpc.v1alpha.cardano.StakeVoteDelegCertH\NULR\DC2stakeVoteDelegCert\DC2]\n\ - \\DC4stake_reg_deleg_cert\CAN\f \SOH(\v2*.utxorpc.v1alpha.cardano.StakeRegDelegCertH\NULR\DC1stakeRegDelegCert\DC2Z\n\ - \\DC3vote_reg_deleg_cert\CAN\r \SOH(\v2).utxorpc.v1alpha.cardano.VoteRegDelegCertH\NULR\DLEvoteRegDelegCert\DC2j\n\ - \\EMstake_vote_reg_deleg_cert\CAN\SO \SOH(\v2..utxorpc.v1alpha.cardano.StakeVoteRegDelegCertH\NULR\NAKstakeVoteRegDelegCert\DC2f\n\ - \\ETBauth_committee_hot_cert\CAN\SI \SOH(\v2-.utxorpc.v1alpha.cardano.AuthCommitteeHotCertH\NULR\DC4authCommitteeHotCert\DC2o\n\ - \\SUBresign_committee_cold_cert\CAN\DLE \SOH(\v20.utxorpc.v1alpha.cardano.ResignCommitteeColdCertH\NULR\ETBresignCommitteeColdCert\DC2J\n\ - \\rreg_drep_cert\CAN\DC1 \SOH(\v2$.utxorpc.v1alpha.cardano.RegDRepCertH\NULR\vregDrepCert\DC2P\n\ - \\SIunreg_drep_cert\CAN\DC2 \SOH(\v2&.utxorpc.v1alpha.cardano.UnRegDRepCertH\NULR\runregDrepCert\DC2S\n\ - \\DLEupdate_drep_cert\CAN\DC3 \SOH(\v2'.utxorpc.v1alpha.cardano.UpdateDRepCertH\NULR\SOupdateDrepCert\DC2=\n\ - \\bredeemer\CANd \SOH(\v2!.utxorpc.v1alpha.cardano.RedeemerR\bredeemerB\r\n\ - \\vcertificate\"\141\SOH\n\ - \\DC3StakeDelegationCert\DC2S\n\ - \\DLEstake_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SIstakeCredential\DC2!\n\ - \\fpool_keyhash\CAN\STX \SOH(\fR\vpoolKeyhash\"\140\ETX\n\ - \\DC4PoolRegistrationCert\DC2\SUB\n\ - \\boperator\CAN\SOH \SOH(\fR\boperator\DC2\US\n\ - \\vvrf_keyhash\CAN\STX \SOH(\fR\n\ - \vrfKeyhash\DC2\SYN\n\ - \\ACKpledge\CAN\ETX \SOH(\EOTR\ACKpledge\DC2\DC2\n\ - \\EOTcost\CAN\EOT \SOH(\EOTR\EOTcost\DC2?\n\ - \\ACKmargin\CAN\ENQ \SOH(\v2'.utxorpc.v1alpha.cardano.RationalNumberR\ACKmargin\DC2%\n\ - \\SOreward_account\CAN\ACK \SOH(\fR\rrewardAccount\DC2\US\n\ - \\vpool_owners\CAN\a \ETX(\fR\n\ - \poolOwners\DC26\n\ - \\ACKrelays\CAN\b \ETX(\v2\RS.utxorpc.v1alpha.cardano.RelayR\ACKrelays\DC2J\n\ - \\rpool_metadata\CAN\t \SOH(\v2%.utxorpc.v1alpha.cardano.PoolMetadataR\fpoolMetadata\"M\n\ - \\DC2PoolRetirementCert\DC2!\n\ - \\fpool_keyhash\CAN\SOH \SOH(\fR\vpoolKeyhash\DC2\DC4\n\ - \\ENQepoch\CAN\STX \SOH(\EOTR\ENQepoch\"\146\SOH\n\ - \\CANGenesisKeyDelegationCert\DC2!\n\ - \\fgenesis_hash\CAN\SOH \SOH(\fR\vgenesisHash\DC22\n\ - \\NAKgenesis_delegate_hash\CAN\STX \SOH(\fR\DC3genesisDelegateHash\DC2\US\n\ - \\vvrf_keyhash\CAN\ETX \SOH(\fR\n\ - \vrfKeyhash\"\DEL\n\ - \\tMirTarget\DC2S\n\ - \\DLEstake_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SIstakeCredential\DC2\GS\n\ - \\n\ - \delta_coin\CAN\STX \SOH(\ETXR\tdeltaCoin\"\146\SOH\n\ - \\aMirCert\DC26\n\ - \\EOTfrom\CAN\SOH \SOH(\SO2\".utxorpc.v1alpha.cardano.MirSourceR\EOTfrom\DC22\n\ - \\STXto\CAN\STX \ETX(\v2\".utxorpc.v1alpha.cardano.MirTargetR\STXto\DC2\ESC\n\ - \\tother_pot\CAN\ETX \SOH(\EOTR\botherPot\"r\n\ - \\aRegCert\DC2S\n\ - \\DLEstake_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SIstakeCredential\DC2\DC2\n\ - \\EOTcoin\CAN\STX \SOH(\EOTR\EOTcoin\"t\n\ - \\tUnRegCert\DC2S\n\ - \\DLEstake_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SIstakeCredential\DC2\DC2\n\ - \\EOTcoin\CAN\STX \SOH(\EOTR\EOTcoin\"\154\SOH\n\ - \\EOTDRep\DC2$\n\ - \\raddr_key_hash\CAN\SOH \SOH(\fH\NULR\vaddrKeyHash\DC2!\n\ - \\vscript_hash\CAN\STX \SOH(\fH\NULR\n\ - \scriptHash\DC2\SUB\n\ - \\aabstain\CAN\ETX \SOH(\bH\NULR\aabstain\DC2%\n\ - \\rno_confidence\CAN\EOT \SOH(\bH\NULR\fnoConfidenceB\ACK\n\ - \\EOTdrep\"\151\SOH\n\ - \\rVoteDelegCert\DC2S\n\ - \\DLEstake_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SIstakeCredential\DC21\n\ - \\EOTdrep\CAN\STX \SOH(\v2\GS.utxorpc.v1alpha.cardano.DRepR\EOTdrep\"\191\SOH\n\ - \\DC2StakeVoteDelegCert\DC2S\n\ - \\DLEstake_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SIstakeCredential\DC2!\n\ - \\fpool_keyhash\CAN\STX \SOH(\fR\vpoolKeyhash\DC21\n\ - \\EOTdrep\CAN\ETX \SOH(\v2\GS.utxorpc.v1alpha.cardano.DRepR\EOTdrep\"\159\SOH\n\ - \\DC1StakeRegDelegCert\DC2S\n\ - \\DLEstake_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SIstakeCredential\DC2!\n\ - \\fpool_keyhash\CAN\STX \SOH(\fR\vpoolKeyhash\DC2\DC2\n\ - \\EOTcoin\CAN\ETX \SOH(\EOTR\EOTcoin\"\174\SOH\n\ - \\DLEVoteRegDelegCert\DC2S\n\ - \\DLEstake_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SIstakeCredential\DC21\n\ - \\EOTdrep\CAN\STX \SOH(\v2\GS.utxorpc.v1alpha.cardano.DRepR\EOTdrep\DC2\DC2\n\ - \\EOTcoin\CAN\ETX \SOH(\EOTR\EOTcoin\"\214\SOH\n\ - \\NAKStakeVoteRegDelegCert\DC2S\n\ - \\DLEstake_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SIstakeCredential\DC2!\n\ - \\fpool_keyhash\CAN\STX \SOH(\fR\vpoolKeyhash\DC21\n\ - \\EOTdrep\CAN\ETX \SOH(\v2\GS.utxorpc.v1alpha.cardano.DRepR\EOTdrep\DC2\DC2\n\ - \\EOTcoin\CAN\EOT \SOH(\EOTR\EOTcoin\"\224\SOH\n\ - \\DC4AuthCommitteeHotCert\DC2d\n\ - \\EMcommittee_cold_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\ETBcommitteeColdCredential\DC2b\n\ - \\CANcommittee_hot_credential\CAN\STX \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SYNcommitteeHotCredential\"=\n\ - \\ACKAnchor\DC2\DLE\n\ - \\ETXurl\CAN\SOH \SOH(\tR\ETXurl\DC2!\n\ - \\fcontent_hash\CAN\STX \SOH(\fR\vcontentHash\"\184\SOH\n\ - \\ETBResignCommitteeColdCert\DC2d\n\ - \\EMcommittee_cold_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\ETBcommitteeColdCredential\DC27\n\ - \\ACKanchor\CAN\STX \SOH(\v2\US.utxorpc.v1alpha.cardano.AnchorR\ACKanchor\"\173\SOH\n\ - \\vRegDRepCert\DC2Q\n\ - \\SIdrep_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SOdrepCredential\DC2\DC2\n\ - \\EOTcoin\CAN\STX \SOH(\EOTR\EOTcoin\DC27\n\ - \\ACKanchor\CAN\ETX \SOH(\v2\US.utxorpc.v1alpha.cardano.AnchorR\ACKanchor\"v\n\ - \\rUnRegDRepCert\DC2Q\n\ - \\SIdrep_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SOdrepCredential\DC2\DC2\n\ - \\EOTcoin\CAN\STX \SOH(\EOTR\EOTcoin\"\156\SOH\n\ - \\SOUpdateDRepCert\DC2Q\n\ - \\SIdrep_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SOdrepCredential\DC27\n\ - \\ACKanchor\CAN\STX \SOH(\v2\US.utxorpc.v1alpha.cardano.AnchorR\ACKanchor\"\129\SOH\n\ - \\SOAddressPattern\DC2#\n\ - \\rexact_address\CAN\SOH \SOH(\fR\fexactAddress\DC2!\n\ - \\fpayment_part\CAN\STX \SOH(\fR\vpaymentPart\DC2'\n\ - \\SIdelegation_part\CAN\ETX \SOH(\fR\SOdelegationPart\"J\n\ - \\fAssetPattern\DC2\ESC\n\ - \\tpolicy_id\CAN\SOH \SOH(\fR\bpolicyId\DC2\GS\n\ - \\n\ - \asset_name\CAN\STX \SOH(\fR\tassetName\"\145\SOH\n\ - \\SITxOutputPattern\DC2A\n\ - \\aaddress\CAN\SOH \SOH(\v2'.utxorpc.v1alpha.cardano.AddressPatternR\aaddress\DC2;\n\ - \\ENQasset\CAN\STX \SOH(\v2%.utxorpc.v1alpha.cardano.AssetPatternR\ENQasset\"\241\STX\n\ - \\tTxPattern\DC2D\n\ - \\bconsumes\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.TxOutputPatternR\bconsumes\DC2D\n\ - \\bproduces\CAN\STX \SOH(\v2(.utxorpc.v1alpha.cardano.TxOutputPatternR\bproduces\DC2H\n\ - \\vhas_address\CAN\ETX \SOH(\v2'.utxorpc.v1alpha.cardano.AddressPatternR\n\ - \hasAddress\DC2F\n\ - \\vmoves_asset\CAN\EOT \SOH(\v2%.utxorpc.v1alpha.cardano.AssetPatternR\n\ - \movesAsset\DC2F\n\ - \\vmints_asset\CAN\ENQ \SOH(\v2%.utxorpc.v1alpha.cardano.AssetPatternR\n\ - \mintsAsset\"7\n\ - \\aExUnits\DC2\DC4\n\ - \\ENQsteps\CAN\SOH \SOH(\EOTR\ENQsteps\DC2\SYN\n\ - \\ACKmemory\CAN\STX \SOH(\EOTR\ACKmemory\"\138\SOH\n\ - \\bExPrices\DC2=\n\ - \\ENQsteps\CAN\SOH \SOH(\v2'.utxorpc.v1alpha.cardano.RationalNumberR\ENQsteps\DC2?\n\ - \\ACKmemory\CAN\STX \SOH(\v2'.utxorpc.v1alpha.cardano.RationalNumberR\ACKmemory\"=\n\ - \\SIProtocolVersion\DC2\DC4\n\ - \\ENQmajor\CAN\SOH \SOH(\rR\ENQmajor\DC2\DC4\n\ - \\ENQminor\CAN\STX \SOH(\rR\ENQminor\"#\n\ - \\tCostModel\DC2\SYN\n\ - \\ACKvalues\CAN\SOH \ETX(\ETXR\ACKvalues\"\207\SOH\n\ - \\n\ - \CostModels\DC2?\n\ - \\tplutus_v1\CAN\SOH \SOH(\v2\".utxorpc.v1alpha.cardano.CostModelR\bplutusV1\DC2?\n\ - \\tplutus_v2\CAN\STX \SOH(\v2\".utxorpc.v1alpha.cardano.CostModelR\bplutusV2\DC2?\n\ - \\tplutus_v3\CAN\ETX \SOH(\v2\".utxorpc.v1alpha.cardano.CostModelR\bplutusV3\"\182\n\ - \\n\ - \\aPParams\DC2-\n\ - \\DC3coins_per_utxo_byte\CAN\SOH \SOH(\EOTR\DLEcoinsPerUtxoByte\DC2\RS\n\ - \\vmax_tx_size\CAN\STX \SOH(\EOTR\tmaxTxSize\DC2.\n\ - \\DC3min_fee_coefficient\CAN\ETX \SOH(\EOTR\DC1minFeeCoefficient\DC2(\n\ - \\DLEmin_fee_constant\CAN\EOT \SOH(\EOTR\SOminFeeConstant\DC2-\n\ - \\DC3max_block_body_size\CAN\ENQ \SOH(\EOTR\DLEmaxBlockBodySize\DC21\n\ - \\NAKmax_block_header_size\CAN\ACK \SOH(\EOTR\DC2maxBlockHeaderSize\DC2*\n\ - \\DC1stake_key_deposit\CAN\a \SOH(\EOTR\SIstakeKeyDeposit\DC2!\n\ - \\fpool_deposit\CAN\b \SOH(\EOTR\vpoolDeposit\DC2=\n\ - \\ESCpool_retirement_epoch_bound\CAN\t \SOH(\EOTR\CANpoolRetirementEpochBound\DC25\n\ - \\ETBdesired_number_of_pools\CAN\n\ - \ \SOH(\EOTR\DC4desiredNumberOfPools\DC2N\n\ - \\SOpool_influence\CAN\v \SOH(\v2'.utxorpc.v1alpha.cardano.RationalNumberR\rpoolInfluence\DC2V\n\ - \\DC2monetary_expansion\CAN\f \SOH(\v2'.utxorpc.v1alpha.cardano.RationalNumberR\DC1monetaryExpansion\DC2V\n\ - \\DC2treasury_expansion\CAN\r \SOH(\v2'.utxorpc.v1alpha.cardano.RationalNumberR\DC1treasuryExpansion\DC2\"\n\ - \\rmin_pool_cost\CAN\SO \SOH(\EOTR\vminPoolCost\DC2S\n\ - \\DLEprotocol_version\CAN\SI \SOH(\v2(.utxorpc.v1alpha.cardano.ProtocolVersionR\SIprotocolVersion\DC2$\n\ - \\SOmax_value_size\CAN\DLE \SOH(\EOTR\fmaxValueSize\DC23\n\ - \\NAKcollateral_percentage\CAN\DC1 \SOH(\EOTR\DC4collateralPercentage\DC22\n\ - \\NAKmax_collateral_inputs\CAN\DC2 \SOH(\EOTR\DC3maxCollateralInputs\DC2D\n\ - \\vcost_models\CAN\DC3 \SOH(\v2#.utxorpc.v1alpha.cardano.CostModelsR\n\ - \costModels\DC29\n\ - \\ACKprices\CAN\DC4 \SOH(\v2!.utxorpc.v1alpha.cardano.ExPricesR\ACKprices\DC2n\n\ - \#max_execution_units_per_transaction\CAN\NAK \SOH(\v2 .utxorpc.v1alpha.cardano.ExUnitsR\USmaxExecutionUnitsPerTransaction\DC2b\n\ - \\GSmax_execution_units_per_block\CAN\SYN \SOH(\v2 .utxorpc.v1alpha.cardano.ExUnitsR\EMmaxExecutionUnitsPerBlock\"\GS\n\ - \\tEvalError\DC2\DLE\n\ - \\ETXmsg\CAN\SOH \SOH(\tR\ETXmsg\"\GS\n\ - \\tEvalTrace\DC2\DLE\n\ - \\ETXmsg\CAN\SOH \SOH(\tR\ETXmsg\"\144\STX\n\ - \\ACKTxEval\DC2\DLE\n\ - \\ETXfee\CAN\SOH \SOH(\EOTR\ETXfee\DC2;\n\ - \\bex_units\CAN\STX \SOH(\v2 .utxorpc.v1alpha.cardano.ExUnitsR\aexUnits\DC2:\n\ - \\ACKerrors\CAN\ETX \ETX(\v2\".utxorpc.v1alpha.cardano.EvalErrorR\ACKerrors\DC2:\n\ - \\ACKtraces\CAN\EOT \ETX(\v2\".utxorpc.v1alpha.cardano.EvalTraceR\ACKtraces\DC2?\n\ - \\tredeemers\CAN\ENQ \ETX(\v2!.utxorpc.v1alpha.cardano.RedeemerR\tredeemers*\219\SOH\n\ - \\SIRedeemerPurpose\DC2 \n\ - \\FSREDEEMER_PURPOSE_UNSPECIFIED\DLE\NUL\DC2\SUB\n\ - \\SYNREDEEMER_PURPOSE_SPEND\DLE\SOH\DC2\EM\n\ - \\NAKREDEEMER_PURPOSE_MINT\DLE\STX\DC2\EM\n\ - \\NAKREDEEMER_PURPOSE_CERT\DLE\ETX\DC2\ESC\n\ - \\ETBREDEEMER_PURPOSE_REWARD\DLE\EOT\DC2\EM\n\ - \\NAKREDEEMER_PURPOSE_VOTE\DLE\ENQ\DC2\FS\n\ - \\CANREDEEMER_PURPOSE_PROPOSE\DLE\ACK*Y\n\ - \\tMirSource\DC2\SUB\n\ - \\SYNMIR_SOURCE_UNSPECIFIED\DLE\NUL\DC2\ETB\n\ - \\DC3MIR_SOURCE_RESERVES\DLE\SOH\DC2\ETB\n\ - \\DC3MIR_SOURCE_TREASURY\DLE\STXB\224\SOH\n\ - \\ESCcom.utxorpc.v1alpha.cardanoB\fCardanoProtoP\SOHZ5github.com/utxorpc/go-codegen/utxorpc/v1alpha/cardano\162\STX\ETXUVC\170\STX\ETBUtxorpc.V1alpha.Cardano\202\STX\ETBUtxorpc\\V1alpha\\Cardano\226\STX#Utxorpc\\V1alpha\\Cardano\\GPBMetadata\234\STX\EMUtxorpc::V1alpha::CardanoJ\237\187\SOH\n\ - \\a\DC2\ENQ\NUL\NUL\139\EOT\SOH\n\ - \\b\n\ - \\SOH\f\DC2\ETX\NUL\NUL\DC2\n\ - \\b\n\ - \\SOH\STX\DC2\ETX\STX\NUL \n\ - \7\n\ - \\STX\ENQ\NUL\DC2\EOT\ENQ\NUL\r\SOH\SUB+ Purpose of the redeemer in a transaction.\n\ - \\n\ - \\n\ - \\n\ - \\ETX\ENQ\NUL\SOH\DC2\ETX\ENQ\ENQ\DC4\n\ - \\v\n\ - \\EOT\ENQ\NUL\STX\NUL\DC2\ETX\ACK\STX#\n\ - \\f\n\ - \\ENQ\ENQ\NUL\STX\NUL\SOH\DC2\ETX\ACK\STX\RS\n\ - \\f\n\ - \\ENQ\ENQ\NUL\STX\NUL\STX\DC2\ETX\ACK!\"\n\ - \\v\n\ - \\EOT\ENQ\NUL\STX\SOH\DC2\ETX\a\STX\GS\n\ - \\f\n\ - \\ENQ\ENQ\NUL\STX\SOH\SOH\DC2\ETX\a\STX\CAN\n\ - \\f\n\ - \\ENQ\ENQ\NUL\STX\SOH\STX\DC2\ETX\a\ESC\FS\n\ - \\v\n\ - \\EOT\ENQ\NUL\STX\STX\DC2\ETX\b\STX\FS\n\ - \\f\n\ - \\ENQ\ENQ\NUL\STX\STX\SOH\DC2\ETX\b\STX\ETB\n\ - \\f\n\ - \\ENQ\ENQ\NUL\STX\STX\STX\DC2\ETX\b\SUB\ESC\n\ - \\v\n\ - \\EOT\ENQ\NUL\STX\ETX\DC2\ETX\t\STX\FS\n\ - \\f\n\ - \\ENQ\ENQ\NUL\STX\ETX\SOH\DC2\ETX\t\STX\ETB\n\ - \\f\n\ - \\ENQ\ENQ\NUL\STX\ETX\STX\DC2\ETX\t\SUB\ESC\n\ - \\v\n\ - \\EOT\ENQ\NUL\STX\EOT\DC2\ETX\n\ - \\STX\RS\n\ - \\f\n\ - \\ENQ\ENQ\NUL\STX\EOT\SOH\DC2\ETX\n\ - \\STX\EM\n\ - \\f\n\ - \\ENQ\ENQ\NUL\STX\EOT\STX\DC2\ETX\n\ - \\FS\GS\n\ - \\v\n\ - \\EOT\ENQ\NUL\STX\ENQ\DC2\ETX\v\STX\FS\n\ - \\f\n\ - \\ENQ\ENQ\NUL\STX\ENQ\SOH\DC2\ETX\v\STX\ETB\n\ - \\f\n\ - \\ENQ\ENQ\NUL\STX\ENQ\STX\DC2\ETX\v\SUB\ESC\n\ - \\v\n\ - \\EOT\ENQ\NUL\STX\ACK\DC2\ETX\f\STX\US\n\ - \\f\n\ - \\ENQ\ENQ\NUL\STX\ACK\SOH\DC2\ETX\f\STX\SUB\n\ - \\f\n\ - \\ENQ\ENQ\NUL\STX\ACK\STX\DC2\ETX\f\GS\RS\n\ - \7\n\ - \\STX\EOT\NUL\DC2\EOT\DLE\NUL\NAK\SOH\SUB+ Redeemer information for a Plutus script.\n\ - \\n\ - \\n\ - \\n\ - \\ETX\EOT\NUL\SOH\DC2\ETX\DLE\b\DLE\n\ - \'\n\ - \\EOT\EOT\NUL\STX\NUL\DC2\ETX\DC1\STX\RS\"\SUB Purpose of the redeemer.\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\NUL\STX\NUL\ACK\DC2\ETX\DC1\STX\DC1\n\ - \\f\n\ - \\ENQ\EOT\NUL\STX\NUL\SOH\DC2\ETX\DC1\DC2\EM\n\ - \\f\n\ - \\ENQ\EOT\NUL\STX\NUL\ETX\DC2\ETX\DC1\FS\GS\n\ - \8\n\ - \\EOT\EOT\NUL\STX\SOH\DC2\ETX\DC2\STX\EM\"+ Plutus data associated with the redeemer.\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\NUL\STX\SOH\ACK\DC2\ETX\DC2\STX\f\n\ - \\f\n\ - \\ENQ\EOT\NUL\STX\SOH\SOH\DC2\ETX\DC2\r\DC4\n\ - \\f\n\ - \\ENQ\EOT\NUL\STX\SOH\ETX\DC2\ETX\DC2\ETB\CAN\n\ - \&\n\ - \\EOT\EOT\NUL\STX\STX\DC2\ETX\DC3\STX\DC3\"\EM Index of the redee mer.\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\NUL\STX\STX\ENQ\DC2\ETX\DC3\STX\b\n\ - \\f\n\ - \\ENQ\EOT\NUL\STX\STX\SOH\DC2\ETX\DC3\t\SO\n\ - \\f\n\ - \\ENQ\EOT\NUL\STX\STX\ETX\DC2\ETX\DC3\DC1\DC2\n\ - \8\n\ - \\EOT\EOT\NUL\STX\ETX\DC2\ETX\DC4\STX\ETB\"+ Execution units consumed by the redeemer.\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\NUL\STX\ETX\ACK\DC2\ETX\DC4\STX\t\n\ - \\f\n\ - \\ENQ\EOT\NUL\STX\ETX\SOH\DC2\ETX\DC4\n\ - \\DC2\n\ - \\f\n\ - \\ENQ\EOT\NUL\STX\ETX\ETX\DC2\ETX\DC4\NAK\SYN\n\ - \G\n\ - \\STX\EOT\SOH\DC2\EOT\CAN\NUL\GS\SOH\SUB; Represents a transaction input in the Cardano blockchain.\n\ - \\n\ - \\n\ - \\n\ - \\ETX\EOT\SOH\SOH\DC2\ETX\CAN\b\SI\n\ - \0\n\ - \\EOT\EOT\SOH\STX\NUL\DC2\ETX\EM\STX\DC4\"# Hash of the previous transaction.\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\SOH\STX\NUL\ENQ\DC2\ETX\EM\STX\a\n\ - \\f\n\ - \\ENQ\EOT\SOH\STX\NUL\SOH\DC2\ETX\EM\b\SI\n\ - \\f\n\ - \\ENQ\EOT\SOH\STX\NUL\ETX\DC2\ETX\EM\DC2\DC3\n\ - \?\n\ - \\EOT\EOT\SOH\STX\SOH\DC2\ETX\SUB\STX\SUB\"2 Index of the output in the previous transaction.\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\SOH\STX\SOH\ENQ\DC2\ETX\SUB\STX\b\n\ - \\f\n\ - \\ENQ\EOT\SOH\STX\SOH\SOH\DC2\ETX\SUB\t\NAK\n\ - \\f\n\ - \\ENQ\EOT\SOH\STX\SOH\ETX\DC2\ETX\SUB\CAN\EM\n\ - \T\n\ - \\EOT\EOT\SOH\STX\STX\DC2\ETX\ESC\STX\EM\"G Content of the input represented as output of the related transaction\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\SOH\STX\STX\ACK\DC2\ETX\ESC\STX\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\SOH\STX\STX\SOH\DC2\ETX\ESC\v\DC4\n\ - \\f\n\ - \\ENQ\EOT\SOH\STX\STX\ETX\DC2\ETX\ESC\ETB\CAN\n\ - \.\n\ - \\EOT\EOT\SOH\STX\ETX\DC2\ETX\FS\STX\CAN\"! Redeemer for the Plutus script.\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\SOH\STX\ETX\ACK\DC2\ETX\FS\STX\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\SOH\STX\ETX\SOH\DC2\ETX\FS\v\DC3\n\ - \\f\n\ - \\ENQ\EOT\SOH\STX\ETX\ETX\DC2\ETX\FS\SYN\ETB\n\ - \H\n\ - \\STX\EOT\STX\DC2\EOT \NUL&\SOH\SUB< Represents a transaction output in the Cardano blockchain.\n\ - \\n\ - \\n\ - \\n\ - \\ETX\EOT\STX\SOH\DC2\ETX \b\DLE\n\ - \,\n\ - \\EOT\EOT\STX\STX\NUL\DC2\ETX!\STX\DC4\"\US Address receiving the output.\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\STX\STX\NUL\ENQ\DC2\ETX!\STX\a\n\ - \\f\n\ - \\ENQ\EOT\STX\STX\NUL\SOH\DC2\ETX!\b\SI\n\ - \\f\n\ - \\ENQ\EOT\STX\STX\NUL\ETX\DC2\ETX!\DC2\DC3\n\ - \+\n\ - \\EOT\EOT\STX\STX\SOH\DC2\ETX\"\STX\DC2\"\RS Amount of ADA in the output.\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\STX\STX\SOH\ENQ\DC2\ETX\"\STX\b\n\ - \\f\n\ - \\ENQ\EOT\STX\STX\SOH\SOH\DC2\ETX\"\t\r\n\ - \\f\n\ - \\ENQ\EOT\STX\STX\SOH\ETX\DC2\ETX\"\DLE\DC1\n\ - \@\n\ - \\EOT\EOT\STX\STX\STX\DC2\ETX#\STX!\"3 Additional native (non-ADA) assets in the output.\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\STX\STX\STX\EOT\DC2\ETX#\STX\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\STX\STX\STX\ACK\DC2\ETX#\v\NAK\n\ - \\f\n\ - \\ENQ\EOT\STX\STX\STX\SOH\DC2\ETX#\SYN\FS\n\ - \\f\n\ - \\ENQ\EOT\STX\STX\STX\ETX\DC2\ETX#\US \n\ - \6\n\ - \\EOT\EOT\STX\STX\ETX\DC2\ETX$\STX\DC2\") Plutus data associated with the output.\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\STX\STX\ETX\ACK\DC2\ETX$\STX\a\n\ - \\f\n\ - \\ENQ\EOT\STX\STX\ETX\SOH\DC2\ETX$\b\r\n\ - \\f\n\ - \\ENQ\EOT\STX\STX\ETX\ETX\DC2\ETX$\DLE\DC1\n\ - \1\n\ - \\EOT\EOT\STX\STX\EOT\DC2\ETX%\STX\DC4\"$ Script associated with the output.\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\STX\STX\EOT\ACK\DC2\ETX%\STX\b\n\ - \\f\n\ - \\ENQ\EOT\STX\STX\EOT\SOH\DC2\ETX%\t\SI\n\ - \\f\n\ - \\ENQ\EOT\STX\STX\EOT\ETX\DC2\ETX%\DC2\DC3\n\ - \\n\ - \\n\ - \\STX\EOT\ETX\DC2\EOT(\NUL,\SOH\n\ - \\n\ - \\n\ - \\ETX\EOT\ETX\SOH\DC2\ETX(\b\r\n\ - \2\n\ - \\EOT\EOT\ETX\STX\NUL\DC2\ETX)\STX\DC1\"% Hash of this datum as seen on-chain\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\ETX\STX\NUL\ENQ\DC2\ETX)\STX\a\n\ - \\f\n\ - \\ENQ\EOT\ETX\STX\NUL\SOH\DC2\ETX)\b\f\n\ - \\f\n\ - \\ENQ\EOT\ETX\STX\NUL\ETX\DC2\ETX)\SI\DLE\n\ - \)\n\ - \\EOT\EOT\ETX\STX\SOH\DC2\ETX*\STX\EM\"\FS Parsed Plutus data payload\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\ETX\STX\SOH\ACK\DC2\ETX*\STX\f\n\ - \\f\n\ - \\ENQ\EOT\ETX\STX\SOH\SOH\DC2\ETX*\r\DC4\n\ - \\f\n\ - \\ENQ\EOT\ETX\STX\SOH\ETX\DC2\ETX*\ETB\CAN\n\ - \:\n\ - \\EOT\EOT\ETX\STX\STX\DC2\ETX+\STX\SUB\"- Original cbor-encoded data as seen on-chain\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\ETX\STX\STX\ENQ\DC2\ETX+\STX\a\n\ - \\f\n\ - \\ENQ\EOT\ETX\STX\STX\SOH\DC2\ETX+\b\NAK\n\ - \\f\n\ - \\ENQ\EOT\ETX\STX\STX\ETX\DC2\ETX+\CAN\EM\n\ - \B\n\ - \\STX\EOT\EOT\DC2\EOT/\NUL3\SOH\SUB6 Represents a custom asset in the Cardano blockchain.\n\ - \\n\ - \\n\ - \\n\ - \\ETX\EOT\EOT\SOH\DC2\ETX/\b\r\n\ - \(\n\ - \\EOT\EOT\EOT\STX\NUL\DC2\ETX0\STX\DC1\"\ESC Name of the custom asset.\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\EOT\STX\NUL\ENQ\DC2\ETX0\STX\a\n\ - \\f\n\ - \\ENQ\EOT\EOT\STX\NUL\SOH\DC2\ETX0\b\f\n\ - \\f\n\ - \\ENQ\EOT\EOT\STX\NUL\ETX\DC2\ETX0\SI\DLE\n\ - \A\n\ - \\EOT\EOT\EOT\STX\SOH\DC2\ETX1\STX\EM\"4 Quantity of the custom asset in case of an output.\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\EOT\STX\SOH\ENQ\DC2\ETX1\STX\b\n\ - \\f\n\ - \\ENQ\EOT\EOT\STX\SOH\SOH\DC2\ETX1\t\DC4\n\ - \\f\n\ - \\ENQ\EOT\EOT\STX\SOH\ETX\DC2\ETX1\ETB\CAN\n\ - \>\n\ - \\EOT\EOT\EOT\STX\STX\DC2\ETX2\STX\SYN\"1 Quantity of the custom asset in case of a mint.\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\EOT\STX\STX\ENQ\DC2\ETX2\STX\a\n\ - \\f\n\ - \\ENQ\EOT\EOT\STX\STX\SOH\DC2\ETX2\b\DC1\n\ - \\f\n\ - \\ENQ\EOT\EOT\STX\STX\ETX\DC2\ETX2\DC4\NAK\n\ - \G\n\ - \\STX\EOT\ENQ\DC2\EOT6\NUL:\SOH\SUB; Represents a multi-asset group in the Cardano blockchain.\n\ - \\n\ - \\n\ - \\n\ - \\ETX\EOT\ENQ\SOH\DC2\ETX6\b\DC2\n\ - \5\n\ - \\EOT\EOT\ENQ\STX\NUL\DC2\ETX7\STX\SYN\"( Policy ID governing the custom assets.\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\ENQ\STX\NUL\ENQ\DC2\ETX7\STX\a\n\ - \\f\n\ - \\ENQ\EOT\ENQ\STX\NUL\SOH\DC2\ETX7\b\DC1\n\ - \\f\n\ - \\ENQ\EOT\ENQ\STX\NUL\ETX\DC2\ETX7\DC4\NAK\n\ - \%\n\ - \\EOT\EOT\ENQ\STX\SOH\DC2\ETX8\STX\FS\"\CAN List of custom assets.\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\ENQ\STX\SOH\EOT\DC2\ETX8\STX\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\ENQ\STX\SOH\ACK\DC2\ETX8\v\DLE\n\ - \\f\n\ - \\ENQ\EOT\ENQ\STX\SOH\SOH\DC2\ETX8\DC1\ETB\n\ - \\f\n\ - \\ENQ\EOT\ENQ\STX\SOH\ETX\DC2\ETX8\SUB\ESC\n\ - \.\n\ - \\EOT\EOT\ENQ\STX\STX\DC2\ETX9\STX\CAN\"! Redeemer for the Plutus script.\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\ENQ\STX\STX\ACK\DC2\ETX9\STX\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\ENQ\STX\STX\SOH\DC2\ETX9\v\DC3\n\ - \\f\n\ - \\ENQ\EOT\ENQ\STX\STX\ETX\DC2\ETX9\SYN\ETB\n\ - \@\n\ - \\STX\EOT\ACK\DC2\EOT=\NUL@\SOH\SUB4 Represents the validity interval of a transaction.\n\ - \\n\ - \\n\ - \\n\ - \\ETX\EOT\ACK\SOH\DC2\ETX=\b\DC2\n\ - \.\n\ - \\EOT\EOT\ACK\STX\NUL\DC2\ETX>\STX\DC3\"! Start of the validity interval.\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\ACK\STX\NUL\ENQ\DC2\ETX>\STX\b\n\ - \\f\n\ - \\ENQ\EOT\ACK\STX\NUL\SOH\DC2\ETX>\t\SO\n\ - \\f\n\ - \\ENQ\EOT\ACK\STX\NUL\ETX\DC2\ETX>\DC1\DC2\n\ - \@\n\ - \\EOT\EOT\ACK\STX\SOH\DC2\ETX?\STX\DC1\"3 End of the validity interval (TTL: Time to Live).\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\ACK\STX\SOH\ENQ\DC2\ETX?\STX\b\n\ - \\f\n\ - \\ENQ\EOT\ACK\STX\SOH\SOH\DC2\ETX?\t\f\n\ - \\f\n\ - \\ENQ\EOT\ACK\STX\SOH\ETX\DC2\ETX?\SI\DLE\n\ - \F\n\ - \\STX\EOT\a\DC2\EOTC\NULG\SOH\SUB: Represents the collateral information for a transaction.\n\ - \\n\ - \\n\ - \\n\ - \\ETX\EOT\a\SOH\DC2\ETXC\b\DC2\n\ - \5\n\ - \\EOT\EOT\a\STX\NUL\DC2\ETXD\STX\"\"( Collateral inputs for the transaction.\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\a\STX\NUL\EOT\DC2\ETXD\STX\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\a\STX\NUL\ACK\DC2\ETXD\v\DC2\n\ - \\f\n\ - \\ENQ\EOT\a\STX\NUL\SOH\DC2\ETXD\DC3\GS\n\ - \\f\n\ - \\ENQ\EOT\a\STX\NUL\ETX\DC2\ETXD !\n\ - \;\n\ - \\EOT\EOT\a\STX\SOH\DC2\ETXE\STX!\". Collateral return in case of script failure.\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\a\STX\SOH\ACK\DC2\ETXE\STX\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\a\STX\SOH\SOH\DC2\ETXE\v\FS\n\ - \\f\n\ - \\ENQ\EOT\a\STX\SOH\ETX\DC2\ETXE\US \n\ - \*\n\ - \\EOT\EOT\a\STX\STX\DC2\ETXF\STX\RS\"\GS Total amount of collateral.\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\a\STX\STX\ENQ\DC2\ETXF\STX\b\n\ - \\f\n\ - \\ENQ\EOT\a\STX\STX\SOH\DC2\ETXF\t\EM\n\ - \\f\n\ - \\ENQ\EOT\a\STX\STX\ETX\DC2\ETXF\FS\GS\n\ - \<\n\ - \\STX\EOT\b\DC2\EOTJ\NULN\SOH\SUB0 Represents a withdrawal from a reward account.\n\ - \\n\ - \\n\ - \\n\ - \\ETX\EOT\b\SOH\DC2\ETXJ\b\DC2\n\ - \-\n\ - \\EOT\EOT\b\STX\NUL\DC2\ETXK\STX\ESC\" Address of the reward account.\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\b\STX\NUL\ENQ\DC2\ETXK\STX\a\n\ - \\f\n\ - \\ENQ\EOT\b\STX\NUL\SOH\DC2\ETXK\b\SYN\n\ - \\f\n\ - \\ENQ\EOT\b\STX\NUL\ETX\DC2\ETXK\EM\SUB\n\ - \'\n\ - \\EOT\EOT\b\STX\SOH\DC2\ETXL\STX\DC2\"\SUB Amount of ADA withdrawn.\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\b\STX\SOH\ENQ\DC2\ETXL\STX\b\n\ - \\f\n\ - \\ENQ\EOT\b\STX\SOH\SOH\DC2\ETXL\t\r\n\ - \\f\n\ - \\ENQ\EOT\b\STX\SOH\ETX\DC2\ETXL\DLE\DC1\n\ - \.\n\ - \\EOT\EOT\b\STX\STX\DC2\ETXM\STX\CAN\"! Redeemer for the Plutus script.\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\b\STX\STX\ACK\DC2\ETXM\STX\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\b\STX\STX\SOH\DC2\ETXM\v\DC3\n\ - \\f\n\ - \\ENQ\EOT\b\STX\STX\ETX\DC2\ETXM\SYN\ETB\n\ - \G\n\ - \\STX\EOT\t\DC2\EOTQ\NULU\SOH\SUB; Represents a set of witnesses that validate a transaction\n\ - \\n\ - \\n\ - \\n\ - \\ETX\EOT\t\SOH\DC2\ETXQ\b\DC2\n\ - \&\n\ - \\EOT\EOT\t\STX\NUL\DC2\ETXR\STX'\"\EM List of VKey witnesses.\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\t\STX\NUL\EOT\DC2\ETXR\STX\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\t\STX\NUL\ACK\DC2\ETXR\v\SYN\n\ - \\f\n\ - \\ENQ\EOT\t\STX\NUL\SOH\DC2\ETXR\ETB\"\n\ - \\f\n\ - \\ENQ\EOT\t\STX\NUL\ETX\DC2\ETXR%&\n\ - \\US\n\ - \\EOT\EOT\t\STX\SOH\DC2\ETXS\STX\GS\"\DC2 List of scripts.\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\t\STX\SOH\EOT\DC2\ETXS\STX\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\t\STX\SOH\ACK\DC2\ETXS\v\DC1\n\ - \\f\n\ - \\ENQ\EOT\t\STX\SOH\SOH\DC2\ETXS\DC2\CAN\n\ - \\f\n\ - \\ENQ\EOT\t\STX\SOH\ETX\DC2\ETXS\ESC\FS\n\ - \L\n\ - \\EOT\EOT\t\STX\STX\DC2\ETXT\STX(\"? List of Plutus data elements associated with the transaction.\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\t\STX\STX\EOT\DC2\ETXT\STX\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\t\STX\STX\ACK\DC2\ETXT\v\NAK\n\ - \\f\n\ - \\ENQ\EOT\t\STX\STX\SOH\DC2\ETXT\SYN#\n\ - \\f\n\ - \\ENQ\EOT\t\STX\STX\ETX\DC2\ETXT&'\n\ - \H\n\ - \\STX\EOT\n\ - \\DC2\EOTX\NUL[\SOH\SUB< Auxiliary data not directly tied to the validation process\n\ - \\n\ - \\n\ - \\n\ - \\ETX\EOT\n\ - \\SOH\DC2\ETXX\b\SI\n\ - \3\n\ - \\EOT\EOT\n\ - \\STX\NUL\DC2\ETXY\STX!\"& List of auxiliary metadata elements.\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\n\ - \\STX\NUL\EOT\DC2\ETXY\STX\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\n\ - \\STX\NUL\ACK\DC2\ETXY\v\DC3\n\ - \\f\n\ - \\ENQ\EOT\n\ - \\STX\NUL\SOH\DC2\ETXY\DC4\FS\n\ - \\f\n\ - \\ENQ\EOT\n\ - \\STX\NUL\ETX\DC2\ETXY\US \n\ - \)\n\ - \\EOT\EOT\n\ - \\STX\SOH\DC2\ETXZ\STX\RS\"\FS List of auxiliary scripts.\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\n\ - \\STX\SOH\EOT\DC2\ETXZ\STX\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\n\ - \\STX\SOH\ACK\DC2\ETXZ\v\DC1\n\ - \\f\n\ - \\ENQ\EOT\n\ - \\STX\SOH\SOH\DC2\ETXZ\DC2\EM\n\ - \\f\n\ - \\ENQ\EOT\n\ - \\STX\SOH\ETX\DC2\ETXZ\FS\GS\n\ - \A\n\ - \\STX\EOT\v\DC2\EOT^\NULl\SOH\SUB5 Represents a transaction in the Cardano blockchain.\n\ - \\n\ - \\n\ - \\n\ - \\ETX\EOT\v\SOH\DC2\ETX^\b\n\ - \\n\ - \)\n\ - \\EOT\EOT\v\STX\NUL\DC2\ETX_\STX\RS\"\FS List of transaction inputs\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\v\STX\NUL\EOT\DC2\ETX_\STX\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\v\STX\NUL\ACK\DC2\ETX_\v\DC2\n\ - \\f\n\ - \\ENQ\EOT\v\STX\NUL\SOH\DC2\ETX_\DC3\EM\n\ - \\f\n\ - \\ENQ\EOT\v\STX\NUL\ETX\DC2\ETX_\FS\GS\n\ - \*\n\ - \\EOT\EOT\v\STX\SOH\DC2\ETX`\STX \"\GS List of transaction outputs\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\v\STX\SOH\EOT\DC2\ETX`\STX\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\v\STX\SOH\ACK\DC2\ETX`\v\DC3\n\ - \\f\n\ - \\ENQ\EOT\v\STX\SOH\SOH\DC2\ETX`\DC4\ESC\n\ - \\f\n\ - \\ENQ\EOT\v\STX\SOH\ETX\DC2\ETX`\RS\US\n\ - \#\n\ - \\EOT\EOT\v\STX\STX\DC2\ETXa\STX(\"\SYN List of certificates\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\v\STX\STX\EOT\DC2\ETXa\STX\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\v\STX\STX\ACK\DC2\ETXa\v\SYN\n\ - \\f\n\ - \\ENQ\EOT\v\STX\STX\SOH\DC2\ETXa\ETB#\n\ - \\f\n\ - \\ENQ\EOT\v\STX\STX\ETX\DC2\ETXa&'\n\ - \\"\n\ - \\EOT\EOT\v\STX\ETX\DC2\ETXb\STX&\"\NAK List of withdrawals\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\v\STX\ETX\EOT\DC2\ETXb\STX\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\v\STX\ETX\ACK\DC2\ETXb\v\NAK\n\ - \\f\n\ - \\ENQ\EOT\v\STX\ETX\SOH\DC2\ETXb\SYN!\n\ - \\f\n\ - \\ENQ\EOT\v\STX\ETX\ETX\DC2\ETXb$%\n\ - \+\n\ - \\EOT\EOT\v\STX\EOT\DC2\ETXc\STX\US\"\RS List of minted custom assets\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\v\STX\EOT\EOT\DC2\ETXc\STX\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\v\STX\EOT\ACK\DC2\ETXc\v\NAK\n\ - \\f\n\ - \\ENQ\EOT\v\STX\EOT\SOH\DC2\ETXc\SYN\SUB\n\ - \\f\n\ - \\ENQ\EOT\v\STX\EOT\ETX\DC2\ETXc\GS\RS\n\ - \'\n\ - \\EOT\EOT\v\STX\ENQ\DC2\ETXd\STX(\"\SUB List of reference inputs\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\v\STX\ENQ\EOT\DC2\ETXd\STX\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\v\STX\ENQ\ACK\DC2\ETXd\v\DC2\n\ - \\f\n\ - \\ENQ\EOT\v\STX\ENQ\SOH\DC2\ETXd\DC3#\n\ - \\f\n\ - \\ENQ\EOT\v\STX\ENQ\ETX\DC2\ETXd&'\n\ - \5\n\ - \\EOT\EOT\v\STX\ACK\DC2\ETXe\STX\ESC\"( Witnesses that validte the transaction\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\v\STX\ACK\ACK\DC2\ETXe\STX\f\n\ - \\f\n\ - \\ENQ\EOT\v\STX\ACK\SOH\DC2\ETXe\r\SYN\n\ - \\f\n\ - \\ENQ\EOT\v\STX\ACK\ETX\DC2\ETXe\EM\SUB\n\ - \?\n\ - \\EOT\EOT\v\STX\a\DC2\ETXf\STX\FS\"2 Collateral details in case of failed transaction\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\v\STX\a\ACK\DC2\ETXf\STX\f\n\ - \\f\n\ - \\ENQ\EOT\v\STX\a\SOH\DC2\ETXf\r\ETB\n\ - \\f\n\ - \\ENQ\EOT\v\STX\a\ETX\DC2\ETXf\SUB\ESC\n\ - \%\n\ - \\EOT\EOT\v\STX\b\DC2\ETXg\STX\DC1\"\CAN Transaction fee in ADA\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\v\STX\b\ENQ\DC2\ETXg\STX\b\n\ - \\f\n\ - \\ENQ\EOT\v\STX\b\SOH\DC2\ETXg\t\f\n\ - \\f\n\ - \\ENQ\EOT\v\STX\b\ETX\DC2\ETXg\SI\DLE\n\ - \3\n\ - \\EOT\EOT\v\STX\t\DC2\ETXh\STX\ESC\"& Validity interval of the transaction\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\v\STX\t\ACK\DC2\ETXh\STX\f\n\ - \\f\n\ - \\ENQ\EOT\v\STX\t\SOH\DC2\ETXh\r\NAK\n\ - \\f\n\ - \\ENQ\EOT\v\STX\t\ETX\DC2\ETXh\CAN\SUB\n\ - \E\n\ - \\EOT\EOT\v\STX\n\ - \\DC2\ETXi\STX\ETB\"8 Flag indicating whether the transaction was successful\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\v\STX\n\ - \\ENQ\DC2\ETXi\STX\ACK\n\ - \\f\n\ - \\ENQ\EOT\v\STX\n\ - \\SOH\DC2\ETXi\a\DC1\n\ - \\f\n\ - \\ENQ\EOT\v\STX\n\ - \\ETX\DC2\ETXi\DC4\SYN\n\ - \I\n\ - \\EOT\EOT\v\STX\v\DC2\ETXj\STX\EM\"< Auxiliary data not directly tied to the validation process\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\v\STX\v\ACK\DC2\ETXj\STX\t\n\ - \\f\n\ - \\ENQ\EOT\v\STX\v\SOH\DC2\ETXj\n\ - \\DC3\n\ - \\f\n\ - \\ENQ\EOT\v\STX\v\ETX\DC2\ETXj\SYN\CAN\n\ - \E\n\ - \\EOT\EOT\v\STX\f\DC2\ETXk\STX\DC2\"8 Hash of the transaction that serves as main identifier\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\v\STX\f\ENQ\DC2\ETXk\STX\a\n\ - \\f\n\ - \\ENQ\EOT\v\STX\f\SOH\DC2\ETXk\b\f\n\ - \\f\n\ - \\ENQ\EOT\v\STX\f\ETX\DC2\ETXk\SI\DC1\n\ - \:\n\ - \\STX\EOT\f\DC2\EOTo\NULs\SOH\SUB. Contains the header information for a block.\n\ - \\n\ - \\n\ - \\n\ - \\ETX\EOT\f\SOH\DC2\ETXo\b\DC3\n\ - \\ESC\n\ - \\EOT\EOT\f\STX\NUL\DC2\ETXp\STX\DC2\"\SO Slot number.\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\f\STX\NUL\ENQ\DC2\ETXp\STX\b\n\ - \\f\n\ - \\ENQ\EOT\f\STX\NUL\SOH\DC2\ETXp\t\r\n\ - \\f\n\ - \\ENQ\EOT\f\STX\NUL\ETX\DC2\ETXp\DLE\DC1\n\ - \\SUB\n\ - \\EOT\EOT\f\STX\SOH\DC2\ETXq\STX\DC1\"\r Block hash.\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\f\STX\SOH\ENQ\DC2\ETXq\STX\a\n\ - \\f\n\ - \\ENQ\EOT\f\STX\SOH\SOH\DC2\ETXq\b\f\n\ - \\f\n\ - \\ENQ\EOT\f\STX\SOH\ETX\DC2\ETXq\SI\DLE\n\ - \\FS\n\ - \\EOT\EOT\f\STX\STX\DC2\ETXr\STX\DC4\"\SI Block height.\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\f\STX\STX\ENQ\DC2\ETXr\STX\b\n\ - \\f\n\ - \\ENQ\EOT\f\STX\STX\SOH\DC2\ETXr\t\SI\n\ - \\f\n\ - \\ENQ\EOT\f\STX\STX\ETX\DC2\ETXr\DC2\DC3\n\ - \8\n\ - \\STX\EOT\r\DC2\EOTv\NULx\SOH\SUB, Contains the transaction data for a block.\n\ - \\n\ - \\n\ - \\n\ - \\ETX\EOT\r\SOH\DC2\ETXv\b\DC1\n\ - \$\n\ - \\EOT\EOT\r\STX\NUL\DC2\ETXw\STX\NAK\"\ETB List of transactions.\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\r\STX\NUL\EOT\DC2\ETXw\STX\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\r\STX\NUL\ACK\DC2\ETXw\v\r\n\ - \\f\n\ - \\ENQ\EOT\r\STX\NUL\SOH\DC2\ETXw\SO\DLE\n\ - \\f\n\ - \\ENQ\EOT\r\STX\NUL\ETX\DC2\ETXw\DC3\DC4\n\ - \E\n\ - \\STX\EOT\SO\DC2\EOT{\NUL~\SOH\SUB9 Represents a complete block, including header and body.\n\ - \\n\ - \\n\ - \\n\ - \\ETX\EOT\SO\SOH\DC2\ETX{\b\r\n\ - \\FS\n\ - \\EOT\EOT\SO\STX\NUL\DC2\ETX|\STX\EM\"\SI Block header.\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\SO\STX\NUL\ACK\DC2\ETX|\STX\r\n\ - \\f\n\ - \\ENQ\EOT\SO\STX\NUL\SOH\DC2\ETX|\SO\DC4\n\ - \\f\n\ - \\ENQ\EOT\SO\STX\NUL\ETX\DC2\ETX|\ETB\CAN\n\ - \\SUB\n\ - \\EOT\EOT\SO\STX\SOH\DC2\ETX}\STX\NAK\"\r Block body.\n\ - \\n\ - \\f\n\ - \\ENQ\EOT\SO\STX\SOH\ACK\DC2\ETX}\STX\v\n\ - \\f\n\ - \\ENQ\EOT\SO\STX\SOH\SOH\DC2\ETX}\f\DLE\n\ - \\f\n\ - \\ENQ\EOT\SO\STX\SOH\ETX\DC2\ETX}\DC3\DC4\n\ - \E\n\ - \\STX\EOT\SI\DC2\ACK\129\SOH\NUL\132\SOH\SOH\SUB7 Represents a VKey witness used to sign a transaction.\n\ - \\n\ - \\v\n\ - \\ETX\EOT\SI\SOH\DC2\EOT\129\SOH\b\DC3\n\ - \!\n\ - \\EOT\EOT\SI\STX\NUL\DC2\EOT\130\SOH\STX\DC1\"\DC3 Verification key.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT\SI\STX\NUL\ENQ\DC2\EOT\130\SOH\STX\a\n\ - \\r\n\ - \\ENQ\EOT\SI\STX\NUL\SOH\DC2\EOT\130\SOH\b\f\n\ - \\r\n\ - \\ENQ\EOT\SI\STX\NUL\ETX\DC2\EOT\130\SOH\SI\DLE\n\ - \E\n\ - \\EOT\EOT\SI\STX\SOH\DC2\EOT\131\SOH\STX\SYN\"7 Signature generated using the associated private key.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT\SI\STX\SOH\ENQ\DC2\EOT\131\SOH\STX\a\n\ - \\r\n\ - \\ENQ\EOT\SI\STX\SOH\SOH\DC2\EOT\131\SOH\b\DC1\n\ - \\r\n\ - \\ENQ\EOT\SI\STX\SOH\ETX\DC2\EOT\131\SOH\DC4\NAK\n\ - \6\n\ - \\STX\EOT\DLE\DC2\ACK\135\SOH\NUL\144\SOH\SOH\SUB( Represents a native script in Cardano.\n\ - \\n\ - \\v\n\ - \\ETX\EOT\DLE\SOH\DC2\EOT\135\SOH\b\DC4\n\ - \\SO\n\ - \\EOT\EOT\DLE\b\NUL\DC2\ACK\136\SOH\STX\143\SOH\ETX\n\ - \\r\n\ - \\ENQ\EOT\DLE\b\NUL\SOH\DC2\EOT\136\SOH\b\NAK\n\ - \4\n\ - \\EOT\EOT\DLE\STX\NUL\DC2\EOT\137\SOH\EOT\FS\"& Script based on an address key hash.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT\DLE\STX\NUL\ENQ\DC2\EOT\137\SOH\EOT\t\n\ - \\r\n\ - \\ENQ\EOT\DLE\STX\NUL\SOH\DC2\EOT\137\SOH\n\ - \\ETB\n\ - \\r\n\ - \\ENQ\EOT\DLE\STX\NUL\ETX\DC2\EOT\137\SOH\SUB\ESC\n\ - \H\n\ - \\EOT\EOT\DLE\STX\SOH\DC2\EOT\138\SOH\EOT$\": Script that requires all nested scripts to be satisfied.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT\DLE\STX\SOH\ACK\DC2\EOT\138\SOH\EOT\DC4\n\ - \\r\n\ - \\ENQ\EOT\DLE\STX\SOH\SOH\DC2\EOT\138\SOH\NAK\US\n\ - \\r\n\ - \\ENQ\EOT\DLE\STX\SOH\ETX\DC2\EOT\138\SOH\"#\n\ - \O\n\ - \\EOT\EOT\DLE\STX\STX\DC2\EOT\139\SOH\EOT$\"A Script that requires any of the nested scripts to be satisfied.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT\DLE\STX\STX\ACK\DC2\EOT\139\SOH\EOT\DC4\n\ - \\r\n\ - \\ENQ\EOT\DLE\STX\STX\SOH\DC2\EOT\139\SOH\NAK\US\n\ - \\r\n\ - \\ENQ\EOT\DLE\STX\STX\ETX\DC2\EOT\139\SOH\"#\n\ - \O\n\ - \\EOT\EOT\DLE\STX\ETX\DC2\EOT\140\SOH\EOT!\"A Script that requires k out of n nested scripts to be satisfied.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT\DLE\STX\ETX\ACK\DC2\EOT\140\SOH\EOT\SO\n\ - \\r\n\ - \\ENQ\EOT\DLE\STX\ETX\SOH\DC2\EOT\140\SOH\SI\FS\n\ - \\r\n\ - \\ENQ\EOT\DLE\STX\ETX\ETX\DC2\EOT\140\SOH\US \n\ - \?\n\ - \\EOT\EOT\DLE\STX\EOT\DC2\EOT\141\SOH\EOT\RS\"1 Slot number before which the script is invalid.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT\DLE\STX\EOT\ENQ\DC2\EOT\141\SOH\EOT\n\ - \\n\ - \\r\n\ - \\ENQ\EOT\DLE\STX\EOT\SOH\DC2\EOT\141\SOH\v\EM\n\ - \\r\n\ - \\ENQ\EOT\DLE\STX\EOT\ETX\DC2\EOT\141\SOH\FS\GS\n\ - \>\n\ - \\EOT\EOT\DLE\STX\ENQ\DC2\EOT\142\SOH\EOT!\"0 Slot number after which the script is invalid.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT\DLE\STX\ENQ\ENQ\DC2\EOT\142\SOH\EOT\n\ - \\n\ - \\r\n\ - \\ENQ\EOT\DLE\STX\ENQ\SOH\DC2\EOT\142\SOH\v\FS\n\ - \\r\n\ - \\ENQ\EOT\DLE\STX\ENQ\ETX\DC2\EOT\142\SOH\US \n\ - \4\n\ - \\STX\EOT\DC1\DC2\ACK\147\SOH\NUL\149\SOH\SOH\SUB& Represents a list of native scripts.\n\ - \\n\ - \\v\n\ - \\ETX\EOT\DC1\SOH\DC2\EOT\147\SOH\b\CAN\n\ - \'\n\ - \\EOT\EOT\DC1\STX\NUL\DC2\EOT\148\SOH\STX\"\"\EM List of native scripts.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT\DC1\STX\NUL\EOT\DC2\EOT\148\SOH\STX\n\ - \\n\ - \\r\n\ - \\ENQ\EOT\DC1\STX\NUL\ACK\DC2\EOT\148\SOH\v\ETB\n\ - \\r\n\ - \\ENQ\EOT\DC1\STX\NUL\SOH\DC2\EOT\148\SOH\CAN\GS\n\ - \\r\n\ - \\ENQ\EOT\DC1\STX\NUL\ETX\DC2\EOT\148\SOH !\n\ - \8\n\ - \\STX\EOT\DC2\DC2\ACK\152\SOH\NUL\155\SOH\SOH\SUB* Represents a \"k out of n\" native script.\n\ - \\n\ - \\v\n\ - \\ETX\EOT\DC2\SOH\DC2\EOT\152\SOH\b\DC2\n\ - \9\n\ - \\EOT\EOT\DC2\STX\NUL\DC2\EOT\153\SOH\STX\SI\"+ The number of required satisfied scripts.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT\DC2\STX\NUL\ENQ\DC2\EOT\153\SOH\STX\b\n\ - \\r\n\ - \\ENQ\EOT\DC2\STX\NUL\SOH\DC2\EOT\153\SOH\t\n\ - \\n\ - \\r\n\ - \\ENQ\EOT\DC2\STX\NUL\ETX\DC2\EOT\153\SOH\r\SO\n\ - \'\n\ - \\EOT\EOT\DC2\STX\SOH\DC2\EOT\154\SOH\STX$\"\EM List of native scripts.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT\DC2\STX\SOH\EOT\DC2\EOT\154\SOH\STX\n\ - \\n\ - \\r\n\ - \\ENQ\EOT\DC2\STX\SOH\ACK\DC2\EOT\154\SOH\v\ETB\n\ - \\r\n\ - \\ENQ\EOT\DC2\STX\SOH\SOH\DC2\EOT\154\SOH\CAN\US\n\ - \\r\n\ - \\ENQ\EOT\DC2\STX\SOH\ETX\DC2\EOT\154\SOH\"#\n\ - \D\n\ - \\STX\EOT\DC3\DC2\ACK\158\SOH\NUL\162\SOH\SOH\SUB6 Represents a constructor for Plutus data in Cardano.\n\ - \\n\ - \\v\n\ - \\ETX\EOT\DC3\SOH\DC2\EOT\158\SOH\b\SO\n\ - \\f\n\ - \\EOT\EOT\DC3\STX\NUL\DC2\EOT\159\SOH\STX\DC1\n\ - \\r\n\ - \\ENQ\EOT\DC3\STX\NUL\ENQ\DC2\EOT\159\SOH\STX\b\n\ - \\r\n\ - \\ENQ\EOT\DC3\STX\NUL\SOH\DC2\EOT\159\SOH\t\f\n\ - \\r\n\ - \\ENQ\EOT\DC3\STX\NUL\ETX\DC2\EOT\159\SOH\SI\DLE\n\ - \\f\n\ - \\EOT\EOT\DC3\STX\SOH\DC2\EOT\160\SOH\STX\GS\n\ - \\r\n\ - \\ENQ\EOT\DC3\STX\SOH\ENQ\DC2\EOT\160\SOH\STX\b\n\ - \\r\n\ - \\ENQ\EOT\DC3\STX\SOH\SOH\DC2\EOT\160\SOH\t\CAN\n\ - \\r\n\ - \\ENQ\EOT\DC3\STX\SOH\ETX\DC2\EOT\160\SOH\ESC\FS\n\ - \\f\n\ - \\EOT\EOT\DC3\STX\STX\DC2\EOT\161\SOH\STX!\n\ - \\r\n\ - \\ENQ\EOT\DC3\STX\STX\EOT\DC2\EOT\161\SOH\STX\n\ - \\n\ - \\r\n\ - \\ENQ\EOT\DC3\STX\STX\ACK\DC2\EOT\161\SOH\v\NAK\n\ - \\r\n\ - \\ENQ\EOT\DC3\STX\STX\SOH\DC2\EOT\161\SOH\SYN\FS\n\ - \\r\n\ - \\ENQ\EOT\DC3\STX\STX\ETX\DC2\EOT\161\SOH\US \n\ - \D\n\ - \\STX\EOT\DC4\DC2\ACK\165\SOH\NUL\171\SOH\SOH\SUB6 Represents a big integer for Plutus data in Cardano.\n\ - \\n\ - \\v\n\ - \\ETX\EOT\DC4\SOH\DC2\EOT\165\SOH\b\SO\n\ - \\SO\n\ - \\EOT\EOT\DC4\b\NUL\DC2\ACK\166\SOH\STX\170\SOH\ETX\n\ - \\r\n\ - \\ENQ\EOT\DC4\b\NUL\SOH\DC2\EOT\166\SOH\b\SI\n\ - \\f\n\ - \\EOT\EOT\DC4\STX\NUL\DC2\EOT\167\SOH\EOT\DC2\n\ - \\r\n\ - \\ENQ\EOT\DC4\STX\NUL\ENQ\DC2\EOT\167\SOH\EOT\t\n\ - \\r\n\ - \\ENQ\EOT\DC4\STX\NUL\SOH\DC2\EOT\167\SOH\n\ - \\r\n\ - \\r\n\ - \\ENQ\EOT\DC4\STX\NUL\ETX\DC2\EOT\167\SOH\DLE\DC1\n\ - \\f\n\ - \\EOT\EOT\DC4\STX\SOH\DC2\EOT\168\SOH\EOT\CAN\n\ - \\r\n\ - \\ENQ\EOT\DC4\STX\SOH\ENQ\DC2\EOT\168\SOH\EOT\t\n\ - \\r\n\ - \\ENQ\EOT\DC4\STX\SOH\SOH\DC2\EOT\168\SOH\n\ - \\DC3\n\ - \\r\n\ - \\ENQ\EOT\DC4\STX\SOH\ETX\DC2\EOT\168\SOH\SYN\ETB\n\ - \\f\n\ - \\EOT\EOT\DC4\STX\STX\DC2\EOT\169\SOH\EOT\CAN\n\ - \\r\n\ - \\ENQ\EOT\DC4\STX\STX\ENQ\DC2\EOT\169\SOH\EOT\t\n\ - \\r\n\ - \\ENQ\EOT\DC4\STX\STX\SOH\DC2\EOT\169\SOH\n\ - \\DC3\n\ - \\r\n\ - \\ENQ\EOT\DC4\STX\STX\ETX\DC2\EOT\169\SOH\SYN\ETB\n\ - \G\n\ - \\STX\EOT\NAK\DC2\ACK\174\SOH\NUL\177\SOH\SOH\SUB9 Represents a key-value pair for Plutus data in Cardano.\n\ - \\n\ - \\v\n\ - \\ETX\EOT\NAK\SOH\DC2\EOT\174\SOH\b\SYN\n\ - \ \n\ - \\EOT\EOT\NAK\STX\NUL\DC2\EOT\175\SOH\STX\NAK\"\DC2 Key of the pair.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT\NAK\STX\NUL\ACK\DC2\EOT\175\SOH\STX\f\n\ - \\r\n\ - \\ENQ\EOT\NAK\STX\NUL\SOH\DC2\EOT\175\SOH\r\DLE\n\ - \\r\n\ - \\ENQ\EOT\NAK\STX\NUL\ETX\DC2\EOT\175\SOH\DC3\DC4\n\ - \\"\n\ - \\EOT\EOT\NAK\STX\SOH\DC2\EOT\176\SOH\STX\ETB\"\DC4 Value of the pair.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT\NAK\STX\SOH\ACK\DC2\EOT\176\SOH\STX\f\n\ - \\r\n\ - \\ENQ\EOT\NAK\STX\SOH\SOH\DC2\EOT\176\SOH\r\DC2\n\ - \\r\n\ - \\ENQ\EOT\NAK\STX\SOH\ETX\DC2\EOT\176\SOH\NAK\SYN\n\ - \9\n\ - \\STX\EOT\SYN\DC2\ACK\180\SOH\NUL\188\SOH\SOH\SUB+ Represents a Plutus data item in Cardano.\n\ - \\n\ - \\v\n\ - \\ETX\EOT\SYN\SOH\DC2\EOT\180\SOH\b\DC2\n\ - \\SO\n\ - \\EOT\EOT\SYN\b\NUL\DC2\ACK\181\SOH\STX\187\SOH\ETX\n\ - \\r\n\ - \\ENQ\EOT\SYN\b\NUL\SOH\DC2\EOT\181\SOH\b\DC3\n\ - \\FS\n\ - \\EOT\EOT\SYN\STX\NUL\DC2\EOT\182\SOH\EOT\SYN\"\SO Constructor.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT\SYN\STX\NUL\ACK\DC2\EOT\182\SOH\EOT\n\ - \\n\ - \\r\n\ - \\ENQ\EOT\SYN\STX\NUL\SOH\DC2\EOT\182\SOH\v\DC1\n\ - \\r\n\ - \\ENQ\EOT\SYN\STX\NUL\ETX\DC2\EOT\182\SOH\DC4\NAK\n\ - \#\n\ - \\EOT\EOT\SYN\STX\SOH\DC2\EOT\183\SOH\EOT\SUB\"\NAK Map of Plutus data.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT\SYN\STX\SOH\ACK\DC2\EOT\183\SOH\EOT\DC1\n\ - \\r\n\ - \\ENQ\EOT\SYN\STX\SOH\SOH\DC2\EOT\183\SOH\DC2\NAK\n\ - \\r\n\ - \\ENQ\EOT\SYN\STX\SOH\ETX\DC2\EOT\183\SOH\CAN\EM\n\ - \\FS\n\ - \\EOT\EOT\SYN\STX\STX\DC2\EOT\184\SOH\EOT\ETB\"\SO Big integer.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT\SYN\STX\STX\ACK\DC2\EOT\184\SOH\EOT\n\ - \\n\ - \\r\n\ - \\ENQ\EOT\SYN\STX\STX\SOH\DC2\EOT\184\SOH\v\DC2\n\ - \\r\n\ - \\ENQ\EOT\SYN\STX\STX\ETX\DC2\EOT\184\SOH\NAK\SYN\n\ - \\RS\n\ - \\EOT\EOT\SYN\STX\ETX\DC2\EOT\185\SOH\EOT\FS\"\DLE Bounded bytes.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT\SYN\STX\ETX\ENQ\DC2\EOT\185\SOH\EOT\t\n\ - \\r\n\ - \\ENQ\EOT\SYN\STX\ETX\SOH\DC2\EOT\185\SOH\n\ - \\ETB\n\ - \\r\n\ - \\ENQ\EOT\SYN\STX\ETX\ETX\DC2\EOT\185\SOH\SUB\ESC\n\ - \%\n\ - \\EOT\EOT\SYN\STX\EOT\DC2\EOT\186\SOH\EOT\RS\"\ETB Array of Plutus data.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT\SYN\STX\EOT\ACK\DC2\EOT\186\SOH\EOT\DC3\n\ - \\r\n\ - \\ENQ\EOT\SYN\STX\EOT\SOH\DC2\EOT\186\SOH\DC4\EM\n\ - \\r\n\ - \\ENQ\EOT\SYN\STX\EOT\ETX\DC2\EOT\186\SOH\FS\GS\n\ - \;\n\ - \\STX\EOT\ETB\DC2\ACK\191\SOH\NUL\193\SOH\SOH\SUB- Represents a map of Plutus data in Cardano.\n\ - \\n\ - \\v\n\ - \\ETX\EOT\ETB\SOH\DC2\EOT\191\SOH\b\NAK\n\ - \(\n\ - \\EOT\EOT\ETB\STX\NUL\DC2\EOT\192\SOH\STX$\"\SUB List of key-value pairs.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT\ETB\STX\NUL\EOT\DC2\EOT\192\SOH\STX\n\ - \\n\ - \\r\n\ - \\ENQ\EOT\ETB\STX\NUL\ACK\DC2\EOT\192\SOH\v\EM\n\ - \\r\n\ - \\ENQ\EOT\ETB\STX\NUL\SOH\DC2\EOT\192\SOH\SUB\US\n\ - \\r\n\ - \\ENQ\EOT\ETB\STX\NUL\ETX\DC2\EOT\192\SOH\"#\n\ - \>\n\ - \\STX\EOT\CAN\DC2\ACK\196\SOH\NUL\198\SOH\SOH\SUB0 Represents an array of Plutus data in Cardano.\n\ - \\n\ - \\v\n\ - \\ETX\EOT\CAN\SOH\DC2\EOT\196\SOH\b\ETB\n\ - \*\n\ - \\EOT\EOT\CAN\STX\NUL\DC2\EOT\197\SOH\STX \"\FS List of Plutus data items.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT\CAN\STX\NUL\EOT\DC2\EOT\197\SOH\STX\n\ - \\n\ - \\r\n\ - \\ENQ\EOT\CAN\STX\NUL\ACK\DC2\EOT\197\SOH\v\NAK\n\ - \\r\n\ - \\ENQ\EOT\CAN\STX\NUL\SOH\DC2\EOT\197\SOH\SYN\ESC\n\ - \\r\n\ - \\ENQ\EOT\CAN\STX\NUL\ETX\DC2\EOT\197\SOH\RS\US\n\ - \/\n\ - \\STX\EOT\EM\DC2\ACK\201\SOH\NUL\208\SOH\SOH\SUB! Represents a script in Cardano.\n\ - \\n\ - \\v\n\ - \\ETX\EOT\EM\SOH\DC2\EOT\201\SOH\b\SO\n\ - \\SO\n\ - \\EOT\EOT\EM\b\NUL\DC2\ACK\202\SOH\STX\207\SOH\ETX\n\ - \\r\n\ - \\ENQ\EOT\EM\b\NUL\SOH\DC2\EOT\202\SOH\b\SO\n\ - \\RS\n\ - \\EOT\EOT\EM\STX\NUL\DC2\EOT\203\SOH\EOT\FS\"\DLE Native script.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT\EM\STX\NUL\ACK\DC2\EOT\203\SOH\EOT\DLE\n\ - \\r\n\ - \\ENQ\EOT\EM\STX\NUL\SOH\DC2\EOT\203\SOH\DC1\ETB\n\ - \\r\n\ - \\ENQ\EOT\EM\STX\NUL\ETX\DC2\EOT\203\SOH\SUB\ESC\n\ - \!\n\ - \\EOT\EOT\EM\STX\SOH\DC2\EOT\204\SOH\EOT\CAN\"\DC3 Plutus V1 script.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT\EM\STX\SOH\ENQ\DC2\EOT\204\SOH\EOT\t\n\ - \\r\n\ - \\ENQ\EOT\EM\STX\SOH\SOH\DC2\EOT\204\SOH\n\ - \\DC3\n\ - \\r\n\ - \\ENQ\EOT\EM\STX\SOH\ETX\DC2\EOT\204\SOH\SYN\ETB\n\ - \!\n\ - \\EOT\EOT\EM\STX\STX\DC2\EOT\205\SOH\EOT\CAN\"\DC3 Plutus V2 script.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT\EM\STX\STX\ENQ\DC2\EOT\205\SOH\EOT\t\n\ - \\r\n\ - \\ENQ\EOT\EM\STX\STX\SOH\DC2\EOT\205\SOH\n\ - \\DC3\n\ - \\r\n\ - \\ENQ\EOT\EM\STX\STX\ETX\DC2\EOT\205\SOH\SYN\ETB\n\ - \!\n\ - \\EOT\EOT\EM\STX\ETX\DC2\EOT\206\SOH\EOT\CAN\"\DC3 Plutus V3 script.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT\EM\STX\ETX\ENQ\DC2\EOT\206\SOH\EOT\t\n\ - \\r\n\ - \\ENQ\EOT\EM\STX\ETX\SOH\DC2\EOT\206\SOH\n\ - \\DC3\n\ - \\r\n\ - \\ENQ\EOT\EM\STX\ETX\ETX\DC2\EOT\206\SOH\SYN\ETB\n\ - \\f\n\ - \\STX\EOT\SUB\DC2\ACK\210\SOH\NUL\218\SOH\SOH\n\ - \\v\n\ - \\ETX\EOT\SUB\SOH\DC2\EOT\210\SOH\b\DC1\n\ - \\SO\n\ - \\EOT\EOT\SUB\b\NUL\DC2\ACK\211\SOH\STX\217\SOH\ETX\n\ - \\r\n\ - \\ENQ\EOT\SUB\b\NUL\SOH\DC2\EOT\211\SOH\b\DC1\n\ - \\f\n\ - \\EOT\EOT\SUB\STX\NUL\DC2\EOT\212\SOH\EOT\DC2\n\ - \\r\n\ - \\ENQ\EOT\SUB\STX\NUL\ENQ\DC2\EOT\212\SOH\EOT\t\n\ - \\r\n\ - \\ENQ\EOT\SUB\STX\NUL\SOH\DC2\EOT\212\SOH\n\ - \\r\n\ - \\r\n\ - \\ENQ\EOT\SUB\STX\NUL\ETX\DC2\EOT\212\SOH\DLE\DC1\n\ - \\f\n\ - \\EOT\EOT\SUB\STX\SOH\DC2\EOT\213\SOH\EOT\DC4\n\ - \\r\n\ - \\ENQ\EOT\SUB\STX\SOH\ENQ\DC2\EOT\213\SOH\EOT\t\n\ - \\r\n\ - \\ENQ\EOT\SUB\STX\SOH\SOH\DC2\EOT\213\SOH\n\ - \\SI\n\ - \\r\n\ - \\ENQ\EOT\SUB\STX\SOH\ETX\DC2\EOT\213\SOH\DC2\DC3\n\ - \\f\n\ - \\EOT\EOT\SUB\STX\STX\DC2\EOT\214\SOH\EOT\DC4\n\ - \\r\n\ - \\ENQ\EOT\SUB\STX\STX\ENQ\DC2\EOT\214\SOH\EOT\n\ - \\n\ - \\r\n\ - \\ENQ\EOT\SUB\STX\STX\SOH\DC2\EOT\214\SOH\v\SI\n\ - \\r\n\ - \\ENQ\EOT\SUB\STX\STX\ETX\DC2\EOT\214\SOH\DC2\DC3\n\ - \\f\n\ - \\EOT\EOT\SUB\STX\ETX\DC2\EOT\215\SOH\EOT\GS\n\ - \\r\n\ - \\ENQ\EOT\SUB\STX\ETX\ACK\DC2\EOT\215\SOH\EOT\DC2\n\ - \\r\n\ - \\ENQ\EOT\SUB\STX\ETX\SOH\DC2\EOT\215\SOH\DC3\CAN\n\ - \\r\n\ - \\ENQ\EOT\SUB\STX\ETX\ETX\DC2\EOT\215\SOH\ESC\FS\n\ - \\f\n\ - \\EOT\EOT\SUB\STX\EOT\DC2\EOT\216\SOH\EOT\EM\n\ - \\r\n\ - \\ENQ\EOT\SUB\STX\EOT\ACK\DC2\EOT\216\SOH\EOT\DLE\n\ - \\r\n\ - \\ENQ\EOT\SUB\STX\EOT\SOH\DC2\EOT\216\SOH\DC1\DC4\n\ - \\r\n\ - \\ENQ\EOT\SUB\STX\EOT\ETX\DC2\EOT\216\SOH\ETB\CAN\n\ - \\f\n\ - \\STX\EOT\ESC\DC2\ACK\220\SOH\NUL\222\SOH\SOH\n\ - \\v\n\ - \\ETX\EOT\ESC\SOH\DC2\EOT\220\SOH\b\SYN\n\ - \\f\n\ - \\EOT\EOT\ESC\STX\NUL\DC2\EOT\221\SOH\STX\US\n\ - \\r\n\ - \\ENQ\EOT\ESC\STX\NUL\EOT\DC2\EOT\221\SOH\STX\n\ - \\n\ - \\r\n\ - \\ENQ\EOT\ESC\STX\NUL\ACK\DC2\EOT\221\SOH\v\DC4\n\ - \\r\n\ - \\ENQ\EOT\ESC\STX\NUL\SOH\DC2\EOT\221\SOH\NAK\SUB\n\ - \\r\n\ - \\ENQ\EOT\ESC\STX\NUL\ETX\DC2\EOT\221\SOH\GS\RS\n\ - \\f\n\ - \\STX\EOT\FS\DC2\ACK\224\SOH\NUL\226\SOH\SOH\n\ - \\v\n\ - \\ETX\EOT\FS\SOH\DC2\EOT\224\SOH\b\DC4\n\ - \\f\n\ - \\EOT\EOT\FS\STX\NUL\DC2\EOT\225\SOH\STX#\n\ - \\r\n\ - \\ENQ\EOT\FS\STX\NUL\EOT\DC2\EOT\225\SOH\STX\n\ - \\n\ - \\r\n\ - \\ENQ\EOT\FS\STX\NUL\ACK\DC2\EOT\225\SOH\v\CAN\n\ - \\r\n\ - \\ENQ\EOT\FS\STX\NUL\SOH\DC2\EOT\225\SOH\EM\RS\n\ - \\r\n\ - \\ENQ\EOT\FS\STX\NUL\ETX\DC2\EOT\225\SOH!\"\n\ - \\f\n\ - \\STX\EOT\GS\DC2\ACK\228\SOH\NUL\231\SOH\SOH\n\ - \\v\n\ - \\ETX\EOT\GS\SOH\DC2\EOT\228\SOH\b\NAK\n\ - \\f\n\ - \\EOT\EOT\GS\STX\NUL\DC2\EOT\229\SOH\STX\DC4\n\ - \\r\n\ - \\ENQ\EOT\GS\STX\NUL\ACK\DC2\EOT\229\SOH\STX\v\n\ - \\r\n\ - \\ENQ\EOT\GS\STX\NUL\SOH\DC2\EOT\229\SOH\f\SI\n\ - \\r\n\ - \\ENQ\EOT\GS\STX\NUL\ETX\DC2\EOT\229\SOH\DC2\DC3\n\ - \\f\n\ - \\EOT\EOT\GS\STX\SOH\DC2\EOT\230\SOH\STX\SYN\n\ - \\r\n\ - \\ENQ\EOT\GS\STX\SOH\ACK\DC2\EOT\230\SOH\STX\v\n\ - \\r\n\ - \\ENQ\EOT\GS\STX\SOH\SOH\DC2\EOT\230\SOH\f\DC1\n\ - \\r\n\ - \\ENQ\EOT\GS\STX\SOH\ETX\DC2\EOT\230\SOH\DC4\NAK\n\ - \\f\n\ - \\STX\EOT\RS\DC2\ACK\233\SOH\NUL\236\SOH\SOH\n\ - \\v\n\ - \\ETX\EOT\RS\SOH\DC2\EOT\233\SOH\b\DLE\n\ - \\f\n\ - \\EOT\EOT\RS\STX\NUL\DC2\EOT\234\SOH\STX\DC3\n\ - \\r\n\ - \\ENQ\EOT\RS\STX\NUL\ENQ\DC2\EOT\234\SOH\STX\b\n\ - \\r\n\ - \\ENQ\EOT\RS\STX\NUL\SOH\DC2\EOT\234\SOH\t\SO\n\ - \\r\n\ - \\ENQ\EOT\RS\STX\NUL\ETX\DC2\EOT\234\SOH\DC1\DC2\n\ - \\f\n\ - \\EOT\EOT\RS\STX\SOH\DC2\EOT\235\SOH\STX\SYN\n\ - \\r\n\ - \\ENQ\EOT\RS\STX\SOH\ACK\DC2\EOT\235\SOH\STX\v\n\ - \\r\n\ - \\ENQ\EOT\RS\STX\SOH\SOH\DC2\EOT\235\SOH\f\DC1\n\ - \\r\n\ - \\ENQ\EOT\RS\STX\SOH\ETX\DC2\EOT\235\SOH\DC4\NAK\n\ - \9\n\ - \\STX\EOT\US\DC2\ACK\239\SOH\NUL\244\SOH\SOH\SUB+ Represents a stake credential in Cardano.\n\ - \\n\ - \\v\n\ - \\ETX\EOT\US\SOH\DC2\EOT\239\SOH\b\ETB\n\ - \\SO\n\ - \\EOT\EOT\US\b\NUL\DC2\ACK\240\SOH\STX\243\SOH\ETX\n\ - \\r\n\ - \\ENQ\EOT\US\b\NUL\SOH\DC2\EOT\240\SOH\b\CAN\n\ - \!\n\ - \\EOT\EOT\US\STX\NUL\DC2\EOT\241\SOH\EOT\FS\"\DC3 Address key hash.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT\US\STX\NUL\ENQ\DC2\EOT\241\SOH\EOT\t\n\ - \\r\n\ - \\ENQ\EOT\US\STX\NUL\SOH\DC2\EOT\241\SOH\n\ - \\ETB\n\ - \\r\n\ - \\ENQ\EOT\US\STX\NUL\ETX\DC2\EOT\241\SOH\SUB\ESC\n\ - \\FS\n\ - \\EOT\EOT\US\STX\SOH\DC2\EOT\242\SOH\EOT\SUB\"\SO Script hash.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT\US\STX\SOH\ENQ\DC2\EOT\242\SOH\EOT\t\n\ - \\r\n\ - \\ENQ\EOT\US\STX\SOH\SOH\DC2\EOT\242\SOH\n\ - \\NAK\n\ - \\r\n\ - \\ENQ\EOT\US\STX\SOH\ETX\DC2\EOT\242\SOH\CAN\EM\n\ - \;\n\ - \\STX\EOT \DC2\ACK\247\SOH\NUL\250\SOH\SOH\SUB- Represents a rational number as a fraction.\n\ - \\n\ - \\v\n\ - \\ETX\EOT \SOH\DC2\EOT\247\SOH\b\SYN\n\ - \\f\n\ - \\EOT\EOT \STX\NUL\DC2\EOT\248\SOH\STX\SYN\n\ - \\r\n\ - \\ENQ\EOT \STX\NUL\ENQ\DC2\EOT\248\SOH\STX\a\n\ - \\r\n\ - \\ENQ\EOT \STX\NUL\SOH\DC2\EOT\248\SOH\b\DC1\n\ - \\r\n\ - \\ENQ\EOT \STX\NUL\ETX\DC2\EOT\248\SOH\DC4\NAK\n\ - \\f\n\ - \\EOT\EOT \STX\SOH\DC2\EOT\249\SOH\STX\EM\n\ - \\r\n\ - \\ENQ\EOT \STX\SOH\ENQ\DC2\EOT\249\SOH\STX\b\n\ - \\r\n\ - \\ENQ\EOT \STX\SOH\SOH\DC2\EOT\249\SOH\t\DC4\n\ - \\r\n\ - \\ENQ\EOT \STX\SOH\ETX\DC2\EOT\249\SOH\ETB\CAN\n\ - \.\n\ - \\STX\EOT!\DC2\ACK\253\SOH\NUL\130\STX\SOH\SUB Represents a relay in Cardano.\n\ - \\n\ - \\v\n\ - \\ETX\EOT!\SOH\DC2\EOT\253\SOH\b\r\n\ - \\f\n\ - \\EOT\EOT!\STX\NUL\DC2\EOT\254\SOH\STX\DC2\n\ - \\r\n\ - \\ENQ\EOT!\STX\NUL\ENQ\DC2\EOT\254\SOH\STX\a\n\ - \\r\n\ - \\ENQ\EOT!\STX\NUL\SOH\DC2\EOT\254\SOH\b\r\n\ - \\r\n\ - \\ENQ\EOT!\STX\NUL\ETX\DC2\EOT\254\SOH\DLE\DC1\n\ - \\f\n\ - \\EOT\EOT!\STX\SOH\DC2\EOT\255\SOH\STX\DC2\n\ - \\r\n\ - \\ENQ\EOT!\STX\SOH\ENQ\DC2\EOT\255\SOH\STX\a\n\ - \\r\n\ - \\ENQ\EOT!\STX\SOH\SOH\DC2\EOT\255\SOH\b\r\n\ - \\r\n\ - \\ENQ\EOT!\STX\SOH\ETX\DC2\EOT\255\SOH\DLE\DC1\n\ - \\f\n\ - \\EOT\EOT!\STX\STX\DC2\EOT\128\STX\STX\SYN\n\ - \\r\n\ - \\ENQ\EOT!\STX\STX\ENQ\DC2\EOT\128\STX\STX\b\n\ - \\r\n\ - \\ENQ\EOT!\STX\STX\SOH\DC2\EOT\128\STX\t\DC1\n\ - \\r\n\ - \\ENQ\EOT!\STX\STX\ETX\DC2\EOT\128\STX\DC4\NAK\n\ - \\f\n\ - \\EOT\EOT!\STX\ETX\DC2\EOT\129\STX\STX\DC2\n\ - \\r\n\ - \\ENQ\EOT!\STX\ETX\ENQ\DC2\EOT\129\STX\STX\b\n\ - \\r\n\ - \\ENQ\EOT!\STX\ETX\SOH\DC2\EOT\129\STX\t\r\n\ - \\r\n\ - \\ENQ\EOT!\STX\ETX\ETX\DC2\EOT\129\STX\DLE\DC1\n\ - \4\n\ - \\STX\EOT\"\DC2\ACK\133\STX\NUL\136\STX\SOH\SUB& Represents pool metadata in Cardano.\n\ - \\n\ - \\v\n\ - \\ETX\EOT\"\SOH\DC2\EOT\133\STX\b\DC4\n\ - \\f\n\ - \\EOT\EOT\"\STX\NUL\DC2\EOT\134\STX\STX\DC1\n\ - \\r\n\ - \\ENQ\EOT\"\STX\NUL\ENQ\DC2\EOT\134\STX\STX\b\n\ - \\r\n\ - \\ENQ\EOT\"\STX\NUL\SOH\DC2\EOT\134\STX\t\f\n\ - \\r\n\ - \\ENQ\EOT\"\STX\NUL\ETX\DC2\EOT\134\STX\SI\DLE\n\ - \\f\n\ - \\EOT\EOT\"\STX\SOH\DC2\EOT\135\STX\STX\DC1\n\ - \\r\n\ - \\ENQ\EOT\"\STX\SOH\ENQ\DC2\EOT\135\STX\STX\a\n\ - \\r\n\ - \\ENQ\EOT\"\STX\SOH\SOH\DC2\EOT\135\STX\b\f\n\ - \\r\n\ - \\ENQ\EOT\"\STX\SOH\ETX\DC2\EOT\135\STX\SI\DLE\n\ - \4\n\ - \\STX\EOT#\DC2\ACK\139\STX\NUL\162\STX\SOH\SUB& Represents a certificate in Cardano.\n\ - \\n\ - \\v\n\ - \\ETX\EOT#\SOH\DC2\EOT\139\STX\b\DC3\n\ - \\SO\n\ - \\EOT\EOT#\b\NUL\DC2\ACK\140\STX\STX\160\STX\ETX\n\ - \\r\n\ - \\ENQ\EOT#\b\NUL\SOH\DC2\EOT\140\STX\b\DC3\n\ - \/\n\ - \\EOT\EOT#\STX\NUL\DC2\EOT\141\STX\EOT+\"! Stake registration certificate.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT#\STX\NUL\ACK\DC2\EOT\141\STX\EOT\DC3\n\ - \\r\n\ - \\ENQ\EOT#\STX\NUL\SOH\DC2\EOT\141\STX\DC4&\n\ - \\r\n\ - \\ENQ\EOT#\STX\NUL\ETX\DC2\EOT\141\STX)*\n\ - \1\n\ - \\EOT\EOT#\STX\SOH\DC2\EOT\142\STX\EOT-\"# Stake deregistration certificate.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT#\STX\SOH\ACK\DC2\EOT\142\STX\EOT\DC3\n\ - \\r\n\ - \\ENQ\EOT#\STX\SOH\SOH\DC2\EOT\142\STX\DC4(\n\ - \\r\n\ - \\ENQ\EOT#\STX\SOH\ETX\DC2\EOT\142\STX+,\n\ - \-\n\ - \\EOT\EOT#\STX\STX\DC2\EOT\143\STX\EOT-\"\US Stake delegation certificate.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT#\STX\STX\ACK\DC2\EOT\143\STX\EOT\ETB\n\ - \\r\n\ - \\ENQ\EOT#\STX\STX\SOH\DC2\EOT\143\STX\CAN(\n\ - \\r\n\ - \\ENQ\EOT#\STX\STX\ETX\DC2\EOT\143\STX+,\n\ - \.\n\ - \\EOT\EOT#\STX\ETX\DC2\EOT\144\STX\EOT/\" Pool registration certificate.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT#\STX\ETX\ACK\DC2\EOT\144\STX\EOT\CAN\n\ - \\r\n\ - \\ENQ\EOT#\STX\ETX\SOH\DC2\EOT\144\STX\EM*\n\ - \\r\n\ - \\ENQ\EOT#\STX\ETX\ETX\DC2\EOT\144\STX-.\n\ - \,\n\ - \\EOT\EOT#\STX\EOT\DC2\EOT\145\STX\EOT+\"\RS Pool retirement certificate.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT#\STX\EOT\ACK\DC2\EOT\145\STX\EOT\SYN\n\ - \\r\n\ - \\ENQ\EOT#\STX\EOT\SOH\DC2\EOT\145\STX\ETB&\n\ - \\r\n\ - \\ENQ\EOT#\STX\EOT\ETX\DC2\EOT\145\STX)*\n\ - \3\n\ - \\EOT\EOT#\STX\ENQ\DC2\EOT\146\STX\EOT8\"% Genesis key delegation certificate.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT#\STX\ENQ\ACK\DC2\EOT\146\STX\EOT\FS\n\ - \\r\n\ - \\ENQ\EOT#\STX\ENQ\SOH\DC2\EOT\146\STX\GS3\n\ - \\r\n\ - \\ENQ\EOT#\STX\ENQ\ETX\DC2\EOT\146\STX67\n\ - \7\n\ - \\EOT\EOT#\STX\ACK\DC2\EOT\147\STX\EOT\EM\") Move instantaneous rewards certificate.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT#\STX\ACK\ACK\DC2\EOT\147\STX\EOT\v\n\ - \\r\n\ - \\ENQ\EOT#\STX\ACK\SOH\DC2\EOT\147\STX\f\DC4\n\ - \\r\n\ - \\ENQ\EOT#\STX\ACK\ETX\DC2\EOT\147\STX\ETB\CAN\n\ - \)\n\ - \\EOT\EOT#\STX\a\DC2\EOT\148\STX\EOT\EM\"\ESC Registration certificate.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT#\STX\a\ACK\DC2\EOT\148\STX\EOT\v\n\ - \\r\n\ - \\ENQ\EOT#\STX\a\SOH\DC2\EOT\148\STX\f\DC4\n\ - \\r\n\ - \\ENQ\EOT#\STX\a\ETX\DC2\EOT\148\STX\ETB\CAN\n\ - \+\n\ - \\EOT\EOT#\STX\b\DC2\EOT\149\STX\EOT\GS\"\GS Unregistration certificate.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT#\STX\b\ACK\DC2\EOT\149\STX\EOT\r\n\ - \\r\n\ - \\ENQ\EOT#\STX\b\SOH\DC2\EOT\149\STX\SO\CAN\n\ - \\r\n\ - \\ENQ\EOT#\STX\b\ETX\DC2\EOT\149\STX\ESC\FS\n\ - \,\n\ - \\EOT\EOT#\STX\t\DC2\EOT\150\STX\EOT'\"\RS Vote delegation certificate.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT#\STX\t\ACK\DC2\EOT\150\STX\EOT\DC1\n\ - \\r\n\ - \\ENQ\EOT#\STX\t\SOH\DC2\EOT\150\STX\DC2!\n\ - \\r\n\ - \\ENQ\EOT#\STX\t\ETX\DC2\EOT\150\STX$&\n\ - \6\n\ - \\EOT\EOT#\STX\n\ - \\DC2\EOT\151\STX\EOT2\"( Stake and vote delegation certificate.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT#\STX\n\ - \\ACK\DC2\EOT\151\STX\EOT\SYN\n\ - \\r\n\ - \\ENQ\EOT#\STX\n\ - \\SOH\DC2\EOT\151\STX\ETB,\n\ - \\r\n\ - \\ENQ\EOT#\STX\n\ - \\ETX\DC2\EOT\151\STX/1\n\ - \>\n\ - \\EOT\EOT#\STX\v\DC2\EOT\152\STX\EOT0\"0 Stake registration and delegation certificate.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT#\STX\v\ACK\DC2\EOT\152\STX\EOT\NAK\n\ - \\r\n\ - \\ENQ\EOT#\STX\v\SOH\DC2\EOT\152\STX\SYN*\n\ - \\r\n\ - \\ENQ\EOT#\STX\v\ETX\DC2\EOT\152\STX-/\n\ - \=\n\ - \\EOT\EOT#\STX\f\DC2\EOT\153\STX\EOT.\"/ Vote registration and delegation certificate.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT#\STX\f\ACK\DC2\EOT\153\STX\EOT\DC4\n\ - \\r\n\ - \\ENQ\EOT#\STX\f\SOH\DC2\EOT\153\STX\NAK(\n\ - \\r\n\ - \\ENQ\EOT#\STX\f\ETX\DC2\EOT\153\STX+-\n\ - \G\n\ - \\EOT\EOT#\STX\r\DC2\EOT\154\STX\EOT9\"9 Stake and vote registration and delegation certificate.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT#\STX\r\ACK\DC2\EOT\154\STX\EOT\EM\n\ - \\r\n\ - \\ENQ\EOT#\STX\r\SOH\DC2\EOT\154\STX\SUB3\n\ - \\r\n\ - \\ENQ\EOT#\STX\r\ETX\DC2\EOT\154\STX68\n\ - \8\n\ - \\EOT\EOT#\STX\SO\DC2\EOT\155\STX\EOT6\"* Authorize committee hot key certificate.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT#\STX\SO\ACK\DC2\EOT\155\STX\EOT\CAN\n\ - \\r\n\ - \\ENQ\EOT#\STX\SO\SOH\DC2\EOT\155\STX\EM0\n\ - \\r\n\ - \\ENQ\EOT#\STX\SO\ETX\DC2\EOT\155\STX35\n\ - \6\n\ - \\EOT\EOT#\STX\SI\DC2\EOT\156\STX\EOT<\"( Resign committee cold key certificate.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT#\STX\SI\ACK\DC2\EOT\156\STX\EOT\ESC\n\ - \\r\n\ - \\ENQ\EOT#\STX\SI\SOH\DC2\EOT\156\STX\FS6\n\ - \\r\n\ - \\ENQ\EOT#\STX\SI\ETX\DC2\EOT\156\STX9;\n\ - \*\n\ - \\EOT\EOT#\STX\DLE\DC2\EOT\157\STX\EOT#\"\FS Register DRep certificate.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT#\STX\DLE\ACK\DC2\EOT\157\STX\EOT\SI\n\ - \\r\n\ - \\ENQ\EOT#\STX\DLE\SOH\DC2\EOT\157\STX\DLE\GS\n\ - \\r\n\ - \\ENQ\EOT#\STX\DLE\ETX\DC2\EOT\157\STX \"\n\ - \,\n\ - \\EOT\EOT#\STX\DC1\DC2\EOT\158\STX\EOT'\"\RS Unregister DRep certificate.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT#\STX\DC1\ACK\DC2\EOT\158\STX\EOT\DC1\n\ - \\r\n\ - \\ENQ\EOT#\STX\DC1\SOH\DC2\EOT\158\STX\DC2!\n\ - \\r\n\ - \\ENQ\EOT#\STX\DC1\ETX\DC2\EOT\158\STX$&\n\ - \(\n\ - \\EOT\EOT#\STX\DC2\DC2\EOT\159\STX\EOT)\"\SUB Update DRep certificate.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT#\STX\DC2\ACK\DC2\EOT\159\STX\EOT\DC2\n\ - \\r\n\ - \\ENQ\EOT#\STX\DC2\SOH\DC2\EOT\159\STX\DC3#\n\ - \\r\n\ - \\ENQ\EOT#\STX\DC2\ETX\DC2\EOT\159\STX&(\n\ - \/\n\ - \\EOT\EOT#\STX\DC3\DC2\EOT\161\STX\STX\SUB\"! Redeemer for the Plutus script.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT#\STX\DC3\ACK\DC2\EOT\161\STX\STX\n\ - \\n\ - \\r\n\ - \\ENQ\EOT#\STX\DC3\SOH\DC2\EOT\161\STX\v\DC3\n\ - \\r\n\ - \\ENQ\EOT#\STX\DC3\ETX\DC2\EOT\161\STX\SYN\EM\n\ - \E\n\ - \\STX\EOT$\DC2\ACK\165\STX\NUL\168\STX\SOH\SUB7 Represents a stake delegation certificate in Cardano.\n\ - \\n\ - \\v\n\ - \\ETX\EOT$\SOH\DC2\EOT\165\STX\b\ESC\n\ - \!\n\ - \\EOT\EOT$\STX\NUL\DC2\EOT\166\STX\STX'\"\DC3 Stake credential.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT$\STX\NUL\ACK\DC2\EOT\166\STX\STX\DC1\n\ - \\r\n\ - \\ENQ\EOT$\STX\NUL\SOH\DC2\EOT\166\STX\DC2\"\n\ - \\r\n\ - \\ENQ\EOT$\STX\NUL\ETX\DC2\EOT\166\STX%&\n\ - \\RS\n\ - \\EOT\EOT$\STX\SOH\DC2\EOT\167\STX\STX\EM\"\DLE Pool key hash.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT$\STX\SOH\ENQ\DC2\EOT\167\STX\STX\a\n\ - \\r\n\ - \\ENQ\EOT$\STX\SOH\SOH\DC2\EOT\167\STX\b\DC4\n\ - \\r\n\ - \\ENQ\EOT$\STX\SOH\ETX\DC2\EOT\167\STX\ETB\CAN\n\ - \F\n\ - \\STX\EOT%\DC2\ACK\171\STX\NUL\181\STX\SOH\SUB8 Represents a pool registration certificate in Cardano.\n\ - \\n\ - \\v\n\ - \\ETX\EOT%\SOH\DC2\EOT\171\STX\b\FS\n\ - \\"\n\ - \\EOT\EOT%\STX\NUL\DC2\EOT\172\STX\STX\NAK\"\DC4 Operator key hash.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT%\STX\NUL\ENQ\DC2\EOT\172\STX\STX\a\n\ - \\r\n\ - \\ENQ\EOT%\STX\NUL\SOH\DC2\EOT\172\STX\b\DLE\n\ - \\r\n\ - \\ENQ\EOT%\STX\NUL\ETX\DC2\EOT\172\STX\DC3\DC4\n\ - \\GS\n\ - \\EOT\EOT%\STX\SOH\DC2\EOT\173\STX\STX\CAN\"\SI VRF key hash.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT%\STX\SOH\ENQ\DC2\EOT\173\STX\STX\a\n\ - \\r\n\ - \\ENQ\EOT%\STX\SOH\SOH\DC2\EOT\173\STX\b\DC3\n\ - \\r\n\ - \\ENQ\EOT%\STX\SOH\ETX\DC2\EOT\173\STX\SYN\ETB\n\ - \\RS\n\ - \\EOT\EOT%\STX\STX\DC2\EOT\174\STX\STX\DC4\"\DLE Pledge amount.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT%\STX\STX\ENQ\DC2\EOT\174\STX\STX\b\n\ - \\r\n\ - \\ENQ\EOT%\STX\STX\SOH\DC2\EOT\174\STX\t\SI\n\ - \\r\n\ - \\ENQ\EOT%\STX\STX\ETX\DC2\EOT\174\STX\DC2\DC3\n\ - \\SUB\n\ - \\EOT\EOT%\STX\ETX\DC2\EOT\175\STX\STX\DC2\"\f Pool cost.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT%\STX\ETX\ENQ\DC2\EOT\175\STX\STX\b\n\ - \\r\n\ - \\ENQ\EOT%\STX\ETX\SOH\DC2\EOT\175\STX\t\r\n\ - \\r\n\ - \\ENQ\EOT%\STX\ETX\ETX\DC2\EOT\175\STX\DLE\DC1\n\ - \\FS\n\ - \\EOT\EOT%\STX\EOT\DC2\EOT\176\STX\STX\FS\"\SO Pool margin.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT%\STX\EOT\ACK\DC2\EOT\176\STX\STX\DLE\n\ - \\r\n\ - \\ENQ\EOT%\STX\EOT\SOH\DC2\EOT\176\STX\DC1\ETB\n\ - \\r\n\ - \\ENQ\EOT%\STX\EOT\ETX\DC2\EOT\176\STX\SUB\ESC\n\ - \\US\n\ - \\EOT\EOT%\STX\ENQ\DC2\EOT\177\STX\STX\ESC\"\DC1 Reward account.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT%\STX\ENQ\ENQ\DC2\EOT\177\STX\STX\a\n\ - \\r\n\ - \\ENQ\EOT%\STX\ENQ\SOH\DC2\EOT\177\STX\b\SYN\n\ - \\r\n\ - \\ENQ\EOT%\STX\ENQ\ETX\DC2\EOT\177\STX\EM\SUB\n\ - \.\n\ - \\EOT\EOT%\STX\ACK\DC2\EOT\178\STX\STX!\" List of pool owner key hashes.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT%\STX\ACK\EOT\DC2\EOT\178\STX\STX\n\ - \\n\ - \\r\n\ - \\ENQ\EOT%\STX\ACK\ENQ\DC2\EOT\178\STX\v\DLE\n\ - \\r\n\ - \\ENQ\EOT%\STX\ACK\SOH\DC2\EOT\178\STX\DC1\FS\n\ - \\r\n\ - \\ENQ\EOT%\STX\ACK\ETX\DC2\EOT\178\STX\US \n\ - \\US\n\ - \\EOT\EOT%\STX\a\DC2\EOT\179\STX\STX\FS\"\DC1 List of relays.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT%\STX\a\EOT\DC2\EOT\179\STX\STX\n\ - \\n\ - \\r\n\ - \\ENQ\EOT%\STX\a\ACK\DC2\EOT\179\STX\v\DLE\n\ - \\r\n\ - \\ENQ\EOT%\STX\a\SOH\DC2\EOT\179\STX\DC1\ETB\n\ - \\r\n\ - \\ENQ\EOT%\STX\a\ETX\DC2\EOT\179\STX\SUB\ESC\n\ - \\RS\n\ - \\EOT\EOT%\STX\b\DC2\EOT\180\STX\STX!\"\DLE Pool metadata.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT%\STX\b\ACK\DC2\EOT\180\STX\STX\SO\n\ - \\r\n\ - \\ENQ\EOT%\STX\b\SOH\DC2\EOT\180\STX\SI\FS\n\ - \\r\n\ - \\ENQ\EOT%\STX\b\ETX\DC2\EOT\180\STX\US \n\ - \D\n\ - \\STX\EOT&\DC2\ACK\184\STX\NUL\187\STX\SOH\SUB6 Represents a pool retirement certificate in Cardano.\n\ - \\n\ - \\v\n\ - \\ETX\EOT&\SOH\DC2\EOT\184\STX\b\SUB\n\ - \\RS\n\ - \\EOT\EOT&\STX\NUL\DC2\EOT\185\STX\STX\EM\"\DLE Pool key hash.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT&\STX\NUL\ENQ\DC2\EOT\185\STX\STX\a\n\ - \\r\n\ - \\ENQ\EOT&\STX\NUL\SOH\DC2\EOT\185\STX\b\DC4\n\ - \\r\n\ - \\ENQ\EOT&\STX\NUL\ETX\DC2\EOT\185\STX\ETB\CAN\n\ - \!\n\ - \\EOT\EOT&\STX\SOH\DC2\EOT\186\STX\STX\DC3\"\DC3 Retirement epoch.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT&\STX\SOH\ENQ\DC2\EOT\186\STX\STX\b\n\ - \\r\n\ - \\ENQ\EOT&\STX\SOH\SOH\DC2\EOT\186\STX\t\SO\n\ - \\r\n\ - \\ENQ\EOT&\STX\SOH\ETX\DC2\EOT\186\STX\DC1\DC2\n\ - \K\n\ - \\STX\EOT'\DC2\ACK\190\STX\NUL\194\STX\SOH\SUB= Represents a genesis key delegation certificate in Cardano.\n\ - \\n\ - \\v\n\ - \\ETX\EOT'\SOH\DC2\EOT\190\STX\b \n\ - \\GS\n\ - \\EOT\EOT'\STX\NUL\DC2\EOT\191\STX\STX\EM\"\SI Genesis hash.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT'\STX\NUL\ENQ\DC2\EOT\191\STX\STX\a\n\ - \\r\n\ - \\ENQ\EOT'\STX\NUL\SOH\DC2\EOT\191\STX\b\DC4\n\ - \\r\n\ - \\ENQ\EOT'\STX\NUL\ETX\DC2\EOT\191\STX\ETB\CAN\n\ - \&\n\ - \\EOT\EOT'\STX\SOH\DC2\EOT\192\STX\STX\"\"\CAN Genesis delegate hash.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT'\STX\SOH\ENQ\DC2\EOT\192\STX\STX\a\n\ - \\r\n\ - \\ENQ\EOT'\STX\SOH\SOH\DC2\EOT\192\STX\b\GS\n\ - \\r\n\ - \\ENQ\EOT'\STX\SOH\ETX\DC2\EOT\192\STX !\n\ - \\GS\n\ - \\EOT\EOT'\STX\STX\DC2\EOT\193\STX\STX\CAN\"\SI VRF key hash.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT'\STX\STX\ENQ\DC2\EOT\193\STX\STX\a\n\ - \\r\n\ - \\ENQ\EOT'\STX\STX\SOH\DC2\EOT\193\STX\b\DC3\n\ - \\r\n\ - \\ENQ\EOT'\STX\STX\ETX\DC2\EOT\193\STX\SYN\ETB\n\ - \\f\n\ - \\STX\ENQ\SOH\DC2\ACK\196\STX\NUL\200\STX\SOH\n\ - \\v\n\ - \\ETX\ENQ\SOH\SOH\DC2\EOT\196\STX\ENQ\SO\n\ - \\f\n\ - \\EOT\ENQ\SOH\STX\NUL\DC2\EOT\197\STX\STX\GS\n\ - \\r\n\ - \\ENQ\ENQ\SOH\STX\NUL\SOH\DC2\EOT\197\STX\STX\CAN\n\ - \\r\n\ - \\ENQ\ENQ\SOH\STX\NUL\STX\DC2\EOT\197\STX\ESC\FS\n\ - \\f\n\ - \\EOT\ENQ\SOH\STX\SOH\DC2\EOT\198\STX\STX\SUB\n\ - \\r\n\ - \\ENQ\ENQ\SOH\STX\SOH\SOH\DC2\EOT\198\STX\STX\NAK\n\ - \\r\n\ - \\ENQ\ENQ\SOH\STX\SOH\STX\DC2\EOT\198\STX\CAN\EM\n\ - \\f\n\ - \\EOT\ENQ\SOH\STX\STX\DC2\EOT\199\STX\STX\SUB\n\ - \\r\n\ - \\ENQ\ENQ\SOH\STX\STX\SOH\DC2\EOT\199\STX\STX\NAK\n\ - \\r\n\ - \\ENQ\ENQ\SOH\STX\STX\STX\DC2\EOT\199\STX\CAN\EM\n\ - \\f\n\ - \\STX\EOT(\DC2\ACK\202\STX\NUL\205\STX\SOH\n\ - \\v\n\ - \\ETX\EOT(\SOH\DC2\EOT\202\STX\b\DC1\n\ - \\f\n\ - \\EOT\EOT(\STX\NUL\DC2\EOT\203\STX\STX'\n\ - \\r\n\ - \\ENQ\EOT(\STX\NUL\ACK\DC2\EOT\203\STX\STX\DC1\n\ - \\r\n\ - \\ENQ\EOT(\STX\NUL\SOH\DC2\EOT\203\STX\DC2\"\n\ - \\r\n\ - \\ENQ\EOT(\STX\NUL\ETX\DC2\EOT\203\STX%&\n\ - \\f\n\ - \\EOT\EOT(\STX\SOH\DC2\EOT\204\STX\STX\ETB\n\ - \\r\n\ - \\ENQ\EOT(\STX\SOH\ENQ\DC2\EOT\204\STX\STX\a\n\ - \\r\n\ - \\ENQ\EOT(\STX\SOH\SOH\DC2\EOT\204\STX\b\DC2\n\ - \\r\n\ - \\ENQ\EOT(\STX\SOH\ETX\DC2\EOT\204\STX\NAK\SYN\n\ - \N\n\ - \\STX\EOT)\DC2\ACK\208\STX\NUL\212\STX\SOH\SUB@ Represents a move instantaneous reward certificate in Cardano.\n\ - \\n\ - \\v\n\ - \\ETX\EOT)\SOH\DC2\EOT\208\STX\b\SI\n\ - \\f\n\ - \\EOT\EOT)\STX\NUL\DC2\EOT\209\STX\STX\NAK\n\ - \\r\n\ - \\ENQ\EOT)\STX\NUL\ACK\DC2\EOT\209\STX\STX\v\n\ - \\r\n\ - \\ENQ\EOT)\STX\NUL\SOH\DC2\EOT\209\STX\f\DLE\n\ - \\r\n\ - \\ENQ\EOT)\STX\NUL\ETX\DC2\EOT\209\STX\DC3\DC4\n\ - \\f\n\ - \\EOT\EOT)\STX\SOH\DC2\EOT\210\STX\STX\FS\n\ - \\r\n\ - \\ENQ\EOT)\STX\SOH\EOT\DC2\EOT\210\STX\STX\n\ - \\n\ - \\r\n\ - \\ENQ\EOT)\STX\SOH\ACK\DC2\EOT\210\STX\v\DC4\n\ - \\r\n\ - \\ENQ\EOT)\STX\SOH\SOH\DC2\EOT\210\STX\NAK\ETB\n\ - \\r\n\ - \\ENQ\EOT)\STX\SOH\ETX\DC2\EOT\210\STX\SUB\ESC\n\ - \\f\n\ - \\EOT\EOT)\STX\STX\DC2\EOT\211\STX\STX\ETB\n\ - \\r\n\ - \\ENQ\EOT)\STX\STX\ENQ\DC2\EOT\211\STX\STX\b\n\ - \\r\n\ - \\ENQ\EOT)\STX\STX\SOH\DC2\EOT\211\STX\t\DC2\n\ - \\r\n\ - \\ENQ\EOT)\STX\STX\ETX\DC2\EOT\211\STX\NAK\SYN\n\ - \\f\n\ - \\STX\EOT*\DC2\ACK\214\STX\NUL\217\STX\SOH\n\ - \\v\n\ - \\ETX\EOT*\SOH\DC2\EOT\214\STX\b\SI\n\ - \\f\n\ - \\EOT\EOT*\STX\NUL\DC2\EOT\215\STX\STX'\n\ - \\r\n\ - \\ENQ\EOT*\STX\NUL\ACK\DC2\EOT\215\STX\STX\DC1\n\ - \\r\n\ - \\ENQ\EOT*\STX\NUL\SOH\DC2\EOT\215\STX\DC2\"\n\ - \\r\n\ - \\ENQ\EOT*\STX\NUL\ETX\DC2\EOT\215\STX%&\n\ - \\f\n\ - \\EOT\EOT*\STX\SOH\DC2\EOT\216\STX\STX\DC2\n\ - \\r\n\ - \\ENQ\EOT*\STX\SOH\ENQ\DC2\EOT\216\STX\STX\b\n\ - \\r\n\ - \\ENQ\EOT*\STX\SOH\SOH\DC2\EOT\216\STX\t\r\n\ - \\r\n\ - \\ENQ\EOT*\STX\SOH\ETX\DC2\EOT\216\STX\DLE\DC1\n\ - \\f\n\ - \\STX\EOT+\DC2\ACK\219\STX\NUL\222\STX\SOH\n\ - \\v\n\ - \\ETX\EOT+\SOH\DC2\EOT\219\STX\b\DC1\n\ - \\f\n\ - \\EOT\EOT+\STX\NUL\DC2\EOT\220\STX\STX'\n\ - \\r\n\ - \\ENQ\EOT+\STX\NUL\ACK\DC2\EOT\220\STX\STX\DC1\n\ - \\r\n\ - \\ENQ\EOT+\STX\NUL\SOH\DC2\EOT\220\STX\DC2\"\n\ - \\r\n\ - \\ENQ\EOT+\STX\NUL\ETX\DC2\EOT\220\STX%&\n\ - \\f\n\ - \\EOT\EOT+\STX\SOH\DC2\EOT\221\STX\STX\DC2\n\ - \\r\n\ - \\ENQ\EOT+\STX\SOH\ENQ\DC2\EOT\221\STX\STX\b\n\ - \\r\n\ - \\ENQ\EOT+\STX\SOH\SOH\DC2\EOT\221\STX\t\r\n\ - \\r\n\ - \\ENQ\EOT+\STX\SOH\ETX\DC2\EOT\221\STX\DLE\DC1\n\ - \\f\n\ - \\STX\EOT,\DC2\ACK\224\STX\NUL\231\STX\SOH\n\ - \\v\n\ - \\ETX\EOT,\SOH\DC2\EOT\224\STX\b\f\n\ - \\SO\n\ - \\EOT\EOT,\b\NUL\DC2\ACK\225\STX\STX\230\STX\ETX\n\ - \\r\n\ - \\ENQ\EOT,\b\NUL\SOH\DC2\EOT\225\STX\b\f\n\ - \ \n\ - \\EOT\EOT,\STX\NUL\DC2\EOT\226\STX\EOT\FS\"\DC2 Address key hash\n\ - \\n\ - \\r\n\ - \\ENQ\EOT,\STX\NUL\ENQ\DC2\EOT\226\STX\EOT\t\n\ - \\r\n\ - \\ENQ\EOT,\STX\NUL\SOH\DC2\EOT\226\STX\n\ - \\ETB\n\ - \\r\n\ - \\ENQ\EOT,\STX\NUL\ETX\DC2\EOT\226\STX\SUB\ESC\n\ - \\ESC\n\ - \\EOT\EOT,\STX\SOH\DC2\EOT\227\STX\EOT\SUB\"\r Script hash\n\ - \\n\ - \\r\n\ - \\ENQ\EOT,\STX\SOH\ENQ\DC2\EOT\227\STX\EOT\t\n\ - \\r\n\ - \\ENQ\EOT,\STX\SOH\SOH\DC2\EOT\227\STX\n\ - \\NAK\n\ - \\r\n\ - \\ENQ\EOT,\STX\SOH\ETX\DC2\EOT\227\STX\CAN\EM\n\ - \\ETB\n\ - \\EOT\EOT,\STX\STX\DC2\EOT\228\STX\EOT\NAK\"\t Abstain\n\ - \\n\ - \\r\n\ - \\ENQ\EOT,\STX\STX\ENQ\DC2\EOT\228\STX\EOT\b\n\ - \\r\n\ - \\ENQ\EOT,\STX\STX\SOH\DC2\EOT\228\STX\t\DLE\n\ - \\r\n\ - \\ENQ\EOT,\STX\STX\ETX\DC2\EOT\228\STX\DC3\DC4\n\ - \\GS\n\ - \\EOT\EOT,\STX\ETX\DC2\EOT\229\STX\EOT\ESC\"\SI No confidence\n\ - \\n\ - \\r\n\ - \\ENQ\EOT,\STX\ETX\ENQ\DC2\EOT\229\STX\EOT\b\n\ - \\r\n\ - \\ENQ\EOT,\STX\ETX\SOH\DC2\EOT\229\STX\t\SYN\n\ - \\r\n\ - \\ENQ\EOT,\STX\ETX\ETX\DC2\EOT\229\STX\EM\SUB\n\ - \\f\n\ - \\STX\EOT-\DC2\ACK\233\STX\NUL\236\STX\SOH\n\ - \\v\n\ - \\ETX\EOT-\SOH\DC2\EOT\233\STX\b\NAK\n\ - \\f\n\ - \\EOT\EOT-\STX\NUL\DC2\EOT\234\STX\STX'\n\ - \\r\n\ - \\ENQ\EOT-\STX\NUL\ACK\DC2\EOT\234\STX\STX\DC1\n\ - \\r\n\ - \\ENQ\EOT-\STX\NUL\SOH\DC2\EOT\234\STX\DC2\"\n\ - \\r\n\ - \\ENQ\EOT-\STX\NUL\ETX\DC2\EOT\234\STX%&\n\ - \\f\n\ - \\EOT\EOT-\STX\SOH\DC2\EOT\235\STX\STX\DLE\n\ - \\r\n\ - \\ENQ\EOT-\STX\SOH\ACK\DC2\EOT\235\STX\STX\ACK\n\ - \\r\n\ - \\ENQ\EOT-\STX\SOH\SOH\DC2\EOT\235\STX\a\v\n\ - \\r\n\ - \\ENQ\EOT-\STX\SOH\ETX\DC2\EOT\235\STX\SO\SI\n\ - \\f\n\ - \\STX\EOT.\DC2\ACK\238\STX\NUL\242\STX\SOH\n\ - \\v\n\ - \\ETX\EOT.\SOH\DC2\EOT\238\STX\b\SUB\n\ - \\f\n\ - \\EOT\EOT.\STX\NUL\DC2\EOT\239\STX\STX'\n\ - \\r\n\ - \\ENQ\EOT.\STX\NUL\ACK\DC2\EOT\239\STX\STX\DC1\n\ - \\r\n\ - \\ENQ\EOT.\STX\NUL\SOH\DC2\EOT\239\STX\DC2\"\n\ - \\r\n\ - \\ENQ\EOT.\STX\NUL\ETX\DC2\EOT\239\STX%&\n\ - \\f\n\ - \\EOT\EOT.\STX\SOH\DC2\EOT\240\STX\STX\EM\n\ - \\r\n\ - \\ENQ\EOT.\STX\SOH\ENQ\DC2\EOT\240\STX\STX\a\n\ - \\r\n\ - \\ENQ\EOT.\STX\SOH\SOH\DC2\EOT\240\STX\b\DC4\n\ - \\r\n\ - \\ENQ\EOT.\STX\SOH\ETX\DC2\EOT\240\STX\ETB\CAN\n\ - \\f\n\ - \\EOT\EOT.\STX\STX\DC2\EOT\241\STX\STX\DLE\n\ - \\r\n\ - \\ENQ\EOT.\STX\STX\ACK\DC2\EOT\241\STX\STX\ACK\n\ - \\r\n\ - \\ENQ\EOT.\STX\STX\SOH\DC2\EOT\241\STX\a\v\n\ - \\r\n\ - \\ENQ\EOT.\STX\STX\ETX\DC2\EOT\241\STX\SO\SI\n\ - \\f\n\ - \\STX\EOT/\DC2\ACK\244\STX\NUL\248\STX\SOH\n\ - \\v\n\ - \\ETX\EOT/\SOH\DC2\EOT\244\STX\b\EM\n\ - \\f\n\ - \\EOT\EOT/\STX\NUL\DC2\EOT\245\STX\STX'\n\ - \\r\n\ - \\ENQ\EOT/\STX\NUL\ACK\DC2\EOT\245\STX\STX\DC1\n\ - \\r\n\ - \\ENQ\EOT/\STX\NUL\SOH\DC2\EOT\245\STX\DC2\"\n\ - \\r\n\ - \\ENQ\EOT/\STX\NUL\ETX\DC2\EOT\245\STX%&\n\ - \\f\n\ - \\EOT\EOT/\STX\SOH\DC2\EOT\246\STX\STX\EM\n\ - \\r\n\ - \\ENQ\EOT/\STX\SOH\ENQ\DC2\EOT\246\STX\STX\a\n\ - \\r\n\ - \\ENQ\EOT/\STX\SOH\SOH\DC2\EOT\246\STX\b\DC4\n\ - \\r\n\ - \\ENQ\EOT/\STX\SOH\ETX\DC2\EOT\246\STX\ETB\CAN\n\ - \\f\n\ - \\EOT\EOT/\STX\STX\DC2\EOT\247\STX\STX\DC2\n\ - \\r\n\ - \\ENQ\EOT/\STX\STX\ENQ\DC2\EOT\247\STX\STX\b\n\ - \\r\n\ - \\ENQ\EOT/\STX\STX\SOH\DC2\EOT\247\STX\t\r\n\ - \\r\n\ - \\ENQ\EOT/\STX\STX\ETX\DC2\EOT\247\STX\DLE\DC1\n\ - \\f\n\ - \\STX\EOT0\DC2\ACK\250\STX\NUL\254\STX\SOH\n\ - \\v\n\ - \\ETX\EOT0\SOH\DC2\EOT\250\STX\b\CAN\n\ - \\f\n\ - \\EOT\EOT0\STX\NUL\DC2\EOT\251\STX\STX'\n\ - \\r\n\ - \\ENQ\EOT0\STX\NUL\ACK\DC2\EOT\251\STX\STX\DC1\n\ - \\r\n\ - \\ENQ\EOT0\STX\NUL\SOH\DC2\EOT\251\STX\DC2\"\n\ - \\r\n\ - \\ENQ\EOT0\STX\NUL\ETX\DC2\EOT\251\STX%&\n\ - \\f\n\ - \\EOT\EOT0\STX\SOH\DC2\EOT\252\STX\STX\DLE\n\ - \\r\n\ - \\ENQ\EOT0\STX\SOH\ACK\DC2\EOT\252\STX\STX\ACK\n\ - \\r\n\ - \\ENQ\EOT0\STX\SOH\SOH\DC2\EOT\252\STX\a\v\n\ - \\r\n\ - \\ENQ\EOT0\STX\SOH\ETX\DC2\EOT\252\STX\SO\SI\n\ - \\f\n\ - \\EOT\EOT0\STX\STX\DC2\EOT\253\STX\STX\DC2\n\ - \\r\n\ - \\ENQ\EOT0\STX\STX\ENQ\DC2\EOT\253\STX\STX\b\n\ - \\r\n\ - \\ENQ\EOT0\STX\STX\SOH\DC2\EOT\253\STX\t\r\n\ - \\r\n\ - \\ENQ\EOT0\STX\STX\ETX\DC2\EOT\253\STX\DLE\DC1\n\ - \\f\n\ - \\STX\EOT1\DC2\ACK\128\ETX\NUL\133\ETX\SOH\n\ - \\v\n\ - \\ETX\EOT1\SOH\DC2\EOT\128\ETX\b\GS\n\ - \\f\n\ - \\EOT\EOT1\STX\NUL\DC2\EOT\129\ETX\STX'\n\ - \\r\n\ - \\ENQ\EOT1\STX\NUL\ACK\DC2\EOT\129\ETX\STX\DC1\n\ - \\r\n\ - \\ENQ\EOT1\STX\NUL\SOH\DC2\EOT\129\ETX\DC2\"\n\ - \\r\n\ - \\ENQ\EOT1\STX\NUL\ETX\DC2\EOT\129\ETX%&\n\ - \\f\n\ - \\EOT\EOT1\STX\SOH\DC2\EOT\130\ETX\STX\EM\n\ - \\r\n\ - \\ENQ\EOT1\STX\SOH\ENQ\DC2\EOT\130\ETX\STX\a\n\ - \\r\n\ - \\ENQ\EOT1\STX\SOH\SOH\DC2\EOT\130\ETX\b\DC4\n\ - \\r\n\ - \\ENQ\EOT1\STX\SOH\ETX\DC2\EOT\130\ETX\ETB\CAN\n\ - \\f\n\ - \\EOT\EOT1\STX\STX\DC2\EOT\131\ETX\STX\DLE\n\ - \\r\n\ - \\ENQ\EOT1\STX\STX\ACK\DC2\EOT\131\ETX\STX\ACK\n\ - \\r\n\ - \\ENQ\EOT1\STX\STX\SOH\DC2\EOT\131\ETX\a\v\n\ - \\r\n\ - \\ENQ\EOT1\STX\STX\ETX\DC2\EOT\131\ETX\SO\SI\n\ - \\f\n\ - \\EOT\EOT1\STX\ETX\DC2\EOT\132\ETX\STX\DC2\n\ - \\r\n\ - \\ENQ\EOT1\STX\ETX\ENQ\DC2\EOT\132\ETX\STX\b\n\ - \\r\n\ - \\ENQ\EOT1\STX\ETX\SOH\DC2\EOT\132\ETX\t\r\n\ - \\r\n\ - \\ENQ\EOT1\STX\ETX\ETX\DC2\EOT\132\ETX\DLE\DC1\n\ - \\f\n\ - \\STX\EOT2\DC2\ACK\135\ETX\NUL\138\ETX\SOH\n\ - \\v\n\ - \\ETX\EOT2\SOH\DC2\EOT\135\ETX\b\FS\n\ - \\f\n\ - \\EOT\EOT2\STX\NUL\DC2\EOT\136\ETX\STX0\n\ - \\r\n\ - \\ENQ\EOT2\STX\NUL\ACK\DC2\EOT\136\ETX\STX\DC1\n\ - \\r\n\ - \\ENQ\EOT2\STX\NUL\SOH\DC2\EOT\136\ETX\DC2+\n\ - \\r\n\ - \\ENQ\EOT2\STX\NUL\ETX\DC2\EOT\136\ETX./\n\ - \\f\n\ - \\EOT\EOT2\STX\SOH\DC2\EOT\137\ETX\STX/\n\ - \\r\n\ - \\ENQ\EOT2\STX\SOH\ACK\DC2\EOT\137\ETX\STX\DC1\n\ - \\r\n\ - \\ENQ\EOT2\STX\SOH\SOH\DC2\EOT\137\ETX\DC2*\n\ - \\r\n\ - \\ENQ\EOT2\STX\SOH\ETX\DC2\EOT\137\ETX-.\n\ - \\f\n\ - \\STX\EOT3\DC2\ACK\140\ETX\NUL\143\ETX\SOH\n\ - \\v\n\ - \\ETX\EOT3\SOH\DC2\EOT\140\ETX\b\SO\n\ - \\f\n\ - \\EOT\EOT3\STX\NUL\DC2\EOT\141\ETX\STX\DC1\n\ - \\r\n\ - \\ENQ\EOT3\STX\NUL\ENQ\DC2\EOT\141\ETX\STX\b\n\ - \\r\n\ - \\ENQ\EOT3\STX\NUL\SOH\DC2\EOT\141\ETX\t\f\n\ - \\r\n\ - \\ENQ\EOT3\STX\NUL\ETX\DC2\EOT\141\ETX\SI\DLE\n\ - \\f\n\ - \\EOT\EOT3\STX\SOH\DC2\EOT\142\ETX\STX\EM\n\ - \\r\n\ - \\ENQ\EOT3\STX\SOH\ENQ\DC2\EOT\142\ETX\STX\a\n\ - \\r\n\ - \\ENQ\EOT3\STX\SOH\SOH\DC2\EOT\142\ETX\b\DC4\n\ - \\r\n\ - \\ENQ\EOT3\STX\SOH\ETX\DC2\EOT\142\ETX\ETB\CAN\n\ - \\f\n\ - \\STX\EOT4\DC2\ACK\145\ETX\NUL\148\ETX\SOH\n\ - \\v\n\ - \\ETX\EOT4\SOH\DC2\EOT\145\ETX\b\US\n\ - \\f\n\ - \\EOT\EOT4\STX\NUL\DC2\EOT\146\ETX\STX0\n\ - \\r\n\ - \\ENQ\EOT4\STX\NUL\ACK\DC2\EOT\146\ETX\STX\DC1\n\ - \\r\n\ - \\ENQ\EOT4\STX\NUL\SOH\DC2\EOT\146\ETX\DC2+\n\ - \\r\n\ - \\ENQ\EOT4\STX\NUL\ETX\DC2\EOT\146\ETX./\n\ - \\f\n\ - \\EOT\EOT4\STX\SOH\DC2\EOT\147\ETX\STX\DC4\n\ - \\r\n\ - \\ENQ\EOT4\STX\SOH\ACK\DC2\EOT\147\ETX\STX\b\n\ - \\r\n\ - \\ENQ\EOT4\STX\SOH\SOH\DC2\EOT\147\ETX\t\SI\n\ - \\r\n\ - \\ENQ\EOT4\STX\SOH\ETX\DC2\EOT\147\ETX\DC2\DC3\n\ - \\f\n\ - \\STX\EOT5\DC2\ACK\150\ETX\NUL\154\ETX\SOH\n\ - \\v\n\ - \\ETX\EOT5\SOH\DC2\EOT\150\ETX\b\DC3\n\ - \\f\n\ - \\EOT\EOT5\STX\NUL\DC2\EOT\151\ETX\STX&\n\ - \\r\n\ - \\ENQ\EOT5\STX\NUL\ACK\DC2\EOT\151\ETX\STX\DC1\n\ - \\r\n\ - \\ENQ\EOT5\STX\NUL\SOH\DC2\EOT\151\ETX\DC2!\n\ - \\r\n\ - \\ENQ\EOT5\STX\NUL\ETX\DC2\EOT\151\ETX$%\n\ - \\f\n\ - \\EOT\EOT5\STX\SOH\DC2\EOT\152\ETX\STX\DC2\n\ - \\r\n\ - \\ENQ\EOT5\STX\SOH\ENQ\DC2\EOT\152\ETX\STX\b\n\ - \\r\n\ - \\ENQ\EOT5\STX\SOH\SOH\DC2\EOT\152\ETX\t\r\n\ - \\r\n\ - \\ENQ\EOT5\STX\SOH\ETX\DC2\EOT\152\ETX\DLE\DC1\n\ - \\f\n\ - \\EOT\EOT5\STX\STX\DC2\EOT\153\ETX\STX\DC4\n\ - \\r\n\ - \\ENQ\EOT5\STX\STX\ACK\DC2\EOT\153\ETX\STX\b\n\ - \\r\n\ - \\ENQ\EOT5\STX\STX\SOH\DC2\EOT\153\ETX\t\SI\n\ - \\r\n\ - \\ENQ\EOT5\STX\STX\ETX\DC2\EOT\153\ETX\DC2\DC3\n\ - \\f\n\ - \\STX\EOT6\DC2\ACK\156\ETX\NUL\159\ETX\SOH\n\ - \\v\n\ - \\ETX\EOT6\SOH\DC2\EOT\156\ETX\b\NAK\n\ - \\f\n\ - \\EOT\EOT6\STX\NUL\DC2\EOT\157\ETX\STX&\n\ - \\r\n\ - \\ENQ\EOT6\STX\NUL\ACK\DC2\EOT\157\ETX\STX\DC1\n\ - \\r\n\ - \\ENQ\EOT6\STX\NUL\SOH\DC2\EOT\157\ETX\DC2!\n\ - \\r\n\ - \\ENQ\EOT6\STX\NUL\ETX\DC2\EOT\157\ETX$%\n\ - \\f\n\ - \\EOT\EOT6\STX\SOH\DC2\EOT\158\ETX\STX\DC2\n\ - \\r\n\ - \\ENQ\EOT6\STX\SOH\ENQ\DC2\EOT\158\ETX\STX\b\n\ - \\r\n\ - \\ENQ\EOT6\STX\SOH\SOH\DC2\EOT\158\ETX\t\r\n\ - \\r\n\ - \\ENQ\EOT6\STX\SOH\ETX\DC2\EOT\158\ETX\DLE\DC1\n\ - \\f\n\ - \\STX\EOT7\DC2\ACK\161\ETX\NUL\164\ETX\SOH\n\ - \\v\n\ - \\ETX\EOT7\SOH\DC2\EOT\161\ETX\b\SYN\n\ - \\f\n\ - \\EOT\EOT7\STX\NUL\DC2\EOT\162\ETX\STX&\n\ - \\r\n\ - \\ENQ\EOT7\STX\NUL\ACK\DC2\EOT\162\ETX\STX\DC1\n\ - \\r\n\ - \\ENQ\EOT7\STX\NUL\SOH\DC2\EOT\162\ETX\DC2!\n\ - \\r\n\ - \\ENQ\EOT7\STX\NUL\ETX\DC2\EOT\162\ETX$%\n\ - \\f\n\ - \\EOT\EOT7\STX\SOH\DC2\EOT\163\ETX\STX\DC4\n\ - \\r\n\ - \\ENQ\EOT7\STX\SOH\ACK\DC2\EOT\163\ETX\STX\b\n\ - \\r\n\ - \\ENQ\EOT7\STX\SOH\SOH\DC2\EOT\163\ETX\t\SI\n\ - \\r\n\ - \\ENQ\EOT7\STX\SOH\ETX\DC2\EOT\163\ETX\DC2\DC3\n\ - \}\n\ - \\STX\EOT8\DC2\ACK\170\ETX\NUL\174\ETX\SOH\SUBI Pattern of an address that can be used to evaluate matching predicates.\n\ - \2$ PATTERN MATCHING\n\ - \ ================\n\ - \\n\ - \\v\n\ - \\ETX\EOT8\SOH\DC2\EOT\170\ETX\b\SYN\n\ - \B\n\ - \\EOT\EOT8\STX\NUL\DC2\EOT\171\ETX\STX\SUB\"4 The address should match this exact address value.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT8\STX\NUL\ENQ\DC2\EOT\171\ETX\STX\a\n\ - \\r\n\ - \\ENQ\EOT8\STX\NUL\SOH\DC2\EOT\171\ETX\b\NAK\n\ - \\r\n\ - \\ENQ\EOT8\STX\NUL\ETX\DC2\EOT\171\ETX\CAN\EM\n\ - \H\n\ - \\EOT\EOT8\STX\SOH\DC2\EOT\172\ETX\STX\EM\": The payment part of the address should match this value.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT8\STX\SOH\ENQ\DC2\EOT\172\ETX\STX\a\n\ - \\r\n\ - \\ENQ\EOT8\STX\SOH\SOH\DC2\EOT\172\ETX\b\DC4\n\ - \\r\n\ - \\ENQ\EOT8\STX\SOH\ETX\DC2\EOT\172\ETX\ETB\CAN\n\ - \K\n\ - \\EOT\EOT8\STX\STX\DC2\EOT\173\ETX\STX\FS\"= The delegation part of the address should match this value.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT8\STX\STX\ENQ\DC2\EOT\173\ETX\STX\a\n\ - \\r\n\ - \\ENQ\EOT8\STX\STX\SOH\DC2\EOT\173\ETX\b\ETB\n\ - \\r\n\ - \\ENQ\EOT8\STX\STX\ETX\DC2\EOT\173\ETX\SUB\ESC\n\ - \[\n\ - \\STX\EOT9\DC2\ACK\177\ETX\NUL\180\ETX\SOH\SUBM Pattern of a native asset that can be used to evaluate matching predicates.\n\ - \\n\ - \\v\n\ - \\ETX\EOT9\SOH\DC2\EOT\177\ETX\b\DC4\n\ - \9\n\ - \\EOT\EOT9\STX\NUL\DC2\EOT\178\ETX\STX\SYN\"+ The asset should belong to this policy id\n\ - \\n\ - \\r\n\ - \\ENQ\EOT9\STX\NUL\ENQ\DC2\EOT\178\ETX\STX\a\n\ - \\r\n\ - \\ENQ\EOT9\STX\NUL\SOH\DC2\EOT\178\ETX\b\DC1\n\ - \\r\n\ - \\ENQ\EOT9\STX\NUL\ETX\DC2\EOT\178\ETX\DC4\NAK\n\ - \2\n\ - \\EOT\EOT9\STX\SOH\DC2\EOT\179\ETX\STX\ETB\"$ The asset should present this name\n\ - \\n\ - \\r\n\ - \\ENQ\EOT9\STX\SOH\ENQ\DC2\EOT\179\ETX\STX\a\n\ - \\r\n\ - \\ENQ\EOT9\STX\SOH\SOH\DC2\EOT\179\ETX\b\DC2\n\ - \\r\n\ - \\ENQ\EOT9\STX\SOH\ETX\DC2\EOT\179\ETX\NAK\SYN\n\ - \X\n\ - \\STX\EOT:\DC2\ACK\183\ETX\NUL\186\ETX\SOH\SUBJ Pattern of a tx output that can be used to evaluate matching predicates.\n\ - \\n\ - \\v\n\ - \\ETX\EOT:\SOH\DC2\EOT\183\ETX\b\ETB\n\ - \K\n\ - \\EOT\EOT:\STX\NUL\DC2\EOT\184\ETX\STX\GS\"= Match any address in the output that exhibits this pattern.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT:\STX\NUL\ACK\DC2\EOT\184\ETX\STX\DLE\n\ - \\r\n\ - \\ENQ\EOT:\STX\NUL\SOH\DC2\EOT\184\ETX\DC1\CAN\n\ - \\r\n\ - \\ENQ\EOT:\STX\NUL\ETX\DC2\EOT\184\ETX\ESC\FS\n\ - \I\n\ - \\EOT\EOT:\STX\SOH\DC2\EOT\185\ETX\STX\EM\"; Match any asset in the output that exhibits this pattern.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT:\STX\SOH\ACK\DC2\EOT\185\ETX\STX\SO\n\ - \\r\n\ - \\ENQ\EOT:\STX\SOH\SOH\DC2\EOT\185\ETX\SI\DC4\n\ - \\r\n\ - \\ENQ\EOT:\STX\SOH\ETX\DC2\EOT\185\ETX\ETB\CAN\n\ - \Q\n\ - \\STX\EOT;\DC2\ACK\189\ETX\NUL\195\ETX\SOH\SUBC Pattern of a Tx that can be used to evaluate matching predicates.\n\ - \\n\ - \\v\n\ - \\ETX\EOT;\SOH\DC2\EOT\189\ETX\b\DC1\n\ - \;\n\ - \\EOT\EOT;\STX\NUL\DC2\EOT\190\ETX\STX\US\"- Match any input that exhibits this pattern.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT;\STX\NUL\ACK\DC2\EOT\190\ETX\STX\DC1\n\ - \\r\n\ - \\ENQ\EOT;\STX\NUL\SOH\DC2\EOT\190\ETX\DC2\SUB\n\ - \\r\n\ - \\ENQ\EOT;\STX\NUL\ETX\DC2\EOT\190\ETX\GS\RS\n\ - \<\n\ - \\EOT\EOT;\STX\SOH\DC2\EOT\191\ETX\STX\US\". Match any output that exhibits this pattern.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT;\STX\SOH\ACK\DC2\EOT\191\ETX\STX\DC1\n\ - \\r\n\ - \\ENQ\EOT;\STX\SOH\SOH\DC2\EOT\191\ETX\DC2\SUB\n\ - \\r\n\ - \\ENQ\EOT;\STX\SOH\ETX\DC2\EOT\191\ETX\GS\RS\n\ - \`\n\ - \\EOT\EOT;\STX\STX\DC2\EOT\192\ETX\STX!\"R Match any address (inputs, outputs, collateral, etc) that exhibits this pattern.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT;\STX\STX\ACK\DC2\EOT\192\ETX\STX\DLE\n\ - \\r\n\ - \\ENQ\EOT;\STX\STX\SOH\DC2\EOT\192\ETX\DC1\FS\n\ - \\r\n\ - \\ENQ\EOT;\STX\STX\ETX\DC2\EOT\192\ETX\US \n\ - \;\n\ - \\EOT\EOT;\STX\ETX\DC2\EOT\193\ETX\STX\US\"- Match any asset that exhibits this pattern.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT;\STX\ETX\ACK\DC2\EOT\193\ETX\STX\SO\n\ - \\r\n\ - \\ENQ\EOT;\STX\ETX\SOH\DC2\EOT\193\ETX\SI\SUB\n\ - \\r\n\ - \\ENQ\EOT;\STX\ETX\ETX\DC2\EOT\193\ETX\GS\RS\n\ - \L\n\ - \\EOT\EOT;\STX\EOT\DC2\EOT\194\ETX\STX\US\"> Match any tx that either mint or burn the the asset pattern.\n\ - \\n\ - \\r\n\ - \\ENQ\EOT;\STX\EOT\ACK\DC2\EOT\194\ETX\STX\SO\n\ - \\r\n\ - \\ENQ\EOT;\STX\EOT\SOH\DC2\EOT\194\ETX\SI\SUB\n\ - \\r\n\ - \\ENQ\EOT;\STX\EOT\ETX\DC2\EOT\194\ETX\GS\RS\n\ - \\RS\n\ - \\STX\EOT<\DC2\ACK\200\ETX\NUL\203\ETX\SOH2\DLE PARAMS\n\ - \ ======\n\ - \\n\ - \\v\n\ - \\ETX\EOT<\SOH\DC2\EOT\200\ETX\b\SI\n\ - \\f\n\ - \\EOT\EOT<\STX\NUL\DC2\EOT\201\ETX\STX\DC3\n\ - \\r\n\ - \\ENQ\EOT<\STX\NUL\ENQ\DC2\EOT\201\ETX\STX\b\n\ - \\r\n\ - \\ENQ\EOT<\STX\NUL\SOH\DC2\EOT\201\ETX\t\SO\n\ - \\r\n\ - \\ENQ\EOT<\STX\NUL\ETX\DC2\EOT\201\ETX\DC1\DC2\n\ - \\f\n\ - \\EOT\EOT<\STX\SOH\DC2\EOT\202\ETX\STX\DC4\n\ - \\r\n\ - \\ENQ\EOT<\STX\SOH\ENQ\DC2\EOT\202\ETX\STX\b\n\ - \\r\n\ - \\ENQ\EOT<\STX\SOH\SOH\DC2\EOT\202\ETX\t\SI\n\ - \\r\n\ - \\ENQ\EOT<\STX\SOH\ETX\DC2\EOT\202\ETX\DC2\DC3\n\ - \\f\n\ - \\STX\EOT=\DC2\ACK\205\ETX\NUL\208\ETX\SOH\n\ - \\v\n\ - \\ETX\EOT=\SOH\DC2\EOT\205\ETX\b\DLE\n\ - \\f\n\ - \\EOT\EOT=\STX\NUL\DC2\EOT\206\ETX\STX\ESC\n\ - \\r\n\ - \\ENQ\EOT=\STX\NUL\ACK\DC2\EOT\206\ETX\STX\DLE\n\ - \\r\n\ - \\ENQ\EOT=\STX\NUL\SOH\DC2\EOT\206\ETX\DC1\SYN\n\ - \\r\n\ - \\ENQ\EOT=\STX\NUL\ETX\DC2\EOT\206\ETX\EM\SUB\n\ - \\f\n\ - \\EOT\EOT=\STX\SOH\DC2\EOT\207\ETX\STX\FS\n\ - \\r\n\ - \\ENQ\EOT=\STX\SOH\ACK\DC2\EOT\207\ETX\STX\DLE\n\ - \\r\n\ - \\ENQ\EOT=\STX\SOH\SOH\DC2\EOT\207\ETX\DC1\ETB\n\ - \\r\n\ - \\ENQ\EOT=\STX\SOH\ETX\DC2\EOT\207\ETX\SUB\ESC\n\ - \\f\n\ - \\STX\EOT>\DC2\ACK\210\ETX\NUL\213\ETX\SOH\n\ - \\v\n\ - \\ETX\EOT>\SOH\DC2\EOT\210\ETX\b\ETB\n\ - \\f\n\ - \\EOT\EOT>\STX\NUL\DC2\EOT\211\ETX\STX\DC3\n\ - \\r\n\ - \\ENQ\EOT>\STX\NUL\ENQ\DC2\EOT\211\ETX\STX\b\n\ - \\r\n\ - \\ENQ\EOT>\STX\NUL\SOH\DC2\EOT\211\ETX\t\SO\n\ - \\r\n\ - \\ENQ\EOT>\STX\NUL\ETX\DC2\EOT\211\ETX\DC1\DC2\n\ - \\f\n\ - \\EOT\EOT>\STX\SOH\DC2\EOT\212\ETX\STX\DC3\n\ - \\r\n\ - \\ENQ\EOT>\STX\SOH\ENQ\DC2\EOT\212\ETX\STX\b\n\ - \\r\n\ - \\ENQ\EOT>\STX\SOH\SOH\DC2\EOT\212\ETX\t\SO\n\ - \\r\n\ - \\ENQ\EOT>\STX\SOH\ETX\DC2\EOT\212\ETX\DC1\DC2\n\ - \\f\n\ - \\STX\EOT?\DC2\ACK\215\ETX\NUL\217\ETX\SOH\n\ - \\v\n\ - \\ETX\EOT?\SOH\DC2\EOT\215\ETX\b\DC1\n\ - \\f\n\ - \\EOT\EOT?\STX\NUL\DC2\EOT\216\ETX\STX\FS\n\ - \\r\n\ - \\ENQ\EOT?\STX\NUL\EOT\DC2\EOT\216\ETX\STX\n\ - \\n\ - \\r\n\ - \\ENQ\EOT?\STX\NUL\ENQ\DC2\EOT\216\ETX\v\DLE\n\ - \\r\n\ - \\ENQ\EOT?\STX\NUL\SOH\DC2\EOT\216\ETX\DC1\ETB\n\ - \\r\n\ - \\ENQ\EOT?\STX\NUL\ETX\DC2\EOT\216\ETX\SUB\ESC\n\ - \\f\n\ - \\STX\EOT@\DC2\ACK\219\ETX\NUL\223\ETX\SOH\n\ - \\v\n\ - \\ETX\EOT@\SOH\DC2\EOT\219\ETX\b\DC2\n\ - \\f\n\ - \\EOT\EOT@\STX\NUL\DC2\EOT\220\ETX\STX\SUB\n\ - \\r\n\ - \\ENQ\EOT@\STX\NUL\ACK\DC2\EOT\220\ETX\STX\v\n\ - \\r\n\ - \\ENQ\EOT@\STX\NUL\SOH\DC2\EOT\220\ETX\f\NAK\n\ - \\r\n\ - \\ENQ\EOT@\STX\NUL\ETX\DC2\EOT\220\ETX\CAN\EM\n\ - \\f\n\ - \\EOT\EOT@\STX\SOH\DC2\EOT\221\ETX\STX\SUB\n\ - \\r\n\ - \\ENQ\EOT@\STX\SOH\ACK\DC2\EOT\221\ETX\STX\v\n\ - \\r\n\ - \\ENQ\EOT@\STX\SOH\SOH\DC2\EOT\221\ETX\f\NAK\n\ - \\r\n\ - \\ENQ\EOT@\STX\SOH\ETX\DC2\EOT\221\ETX\CAN\EM\n\ - \\f\n\ - \\EOT\EOT@\STX\STX\DC2\EOT\222\ETX\STX\SUB\n\ - \\r\n\ - \\ENQ\EOT@\STX\STX\ACK\DC2\EOT\222\ETX\STX\v\n\ - \\r\n\ - \\ENQ\EOT@\STX\STX\SOH\DC2\EOT\222\ETX\f\NAK\n\ - \\r\n\ - \\ENQ\EOT@\STX\STX\ETX\DC2\EOT\222\ETX\CAN\EM\n\ - \\f\n\ - \\STX\EOTA\DC2\ACK\225\ETX\NUL\248\ETX\SOH\n\ - \\v\n\ - \\ETX\EOTA\SOH\DC2\EOT\225\ETX\b\SI\n\ - \2\n\ - \\EOT\EOTA\STX\NUL\DC2\EOT\226\ETX\STX!\"$ The number of coins per UTXO byte.\n\ - \\n\ - \\r\n\ - \\ENQ\EOTA\STX\NUL\ENQ\DC2\EOT\226\ETX\STX\b\n\ - \\r\n\ - \\ENQ\EOTA\STX\NUL\SOH\DC2\EOT\226\ETX\t\FS\n\ - \\r\n\ - \\ENQ\EOTA\STX\NUL\ETX\DC2\EOT\226\ETX\US \n\ - \-\n\ - \\EOT\EOTA\STX\SOH\DC2\EOT\227\ETX\STX\EM\"\US The maximum transaction size.\n\ - \\n\ - \\r\n\ - \\ENQ\EOTA\STX\SOH\ENQ\DC2\EOT\227\ETX\STX\b\n\ - \\r\n\ - \\ENQ\EOTA\STX\SOH\SOH\DC2\EOT\227\ETX\t\DC4\n\ - \\r\n\ - \\ENQ\EOTA\STX\SOH\ETX\DC2\EOT\227\ETX\ETB\CAN\n\ - \,\n\ - \\EOT\EOTA\STX\STX\DC2\EOT\228\ETX\STX!\"\RS The minimum fee coefficient.\n\ - \\n\ - \\r\n\ - \\ENQ\EOTA\STX\STX\ENQ\DC2\EOT\228\ETX\STX\b\n\ - \\r\n\ - \\ENQ\EOTA\STX\STX\SOH\DC2\EOT\228\ETX\t\FS\n\ - \\r\n\ - \\ENQ\EOTA\STX\STX\ETX\DC2\EOT\228\ETX\US \n\ - \)\n\ - \\EOT\EOTA\STX\ETX\DC2\EOT\229\ETX\STX\RS\"\ESC The minimum fee constant.\n\ - \\n\ - \\r\n\ - \\ENQ\EOTA\STX\ETX\ENQ\DC2\EOT\229\ETX\STX\b\n\ - \\r\n\ - \\ENQ\EOTA\STX\ETX\SOH\DC2\EOT\229\ETX\t\EM\n\ - \\r\n\ - \\ENQ\EOTA\STX\ETX\ETX\DC2\EOT\229\ETX\FS\GS\n\ - \,\n\ - \\EOT\EOTA\STX\EOT\DC2\EOT\230\ETX\STX!\"\RS The maximum block body size.\n\ - \\n\ - \\r\n\ - \\ENQ\EOTA\STX\EOT\ENQ\DC2\EOT\230\ETX\STX\b\n\ - \\r\n\ - \\ENQ\EOTA\STX\EOT\SOH\DC2\EOT\230\ETX\t\FS\n\ - \\r\n\ - \\ENQ\EOTA\STX\EOT\ETX\DC2\EOT\230\ETX\US \n\ - \.\n\ - \\EOT\EOTA\STX\ENQ\DC2\EOT\231\ETX\STX#\" The maximum block header size.\n\ - \\n\ - \\r\n\ - \\ENQ\EOTA\STX\ENQ\ENQ\DC2\EOT\231\ETX\STX\b\n\ - \\r\n\ - \\ENQ\EOTA\STX\ENQ\SOH\DC2\EOT\231\ETX\t\RS\n\ - \\r\n\ - \\ENQ\EOTA\STX\ENQ\ETX\DC2\EOT\231\ETX!\"\n\ - \&\n\ - \\EOT\EOTA\STX\ACK\DC2\EOT\232\ETX\STX\US\"\CAN The stake key deposit.\n\ - \\n\ - \\r\n\ - \\ENQ\EOTA\STX\ACK\ENQ\DC2\EOT\232\ETX\STX\b\n\ - \\r\n\ - \\ENQ\EOTA\STX\ACK\SOH\DC2\EOT\232\ETX\t\SUB\n\ - \\r\n\ - \\ENQ\EOTA\STX\ACK\ETX\DC2\EOT\232\ETX\GS\RS\n\ - \!\n\ - \\EOT\EOTA\STX\a\DC2\EOT\233\ETX\STX\SUB\"\DC3 The pool deposit.\n\ - \\n\ - \\r\n\ - \\ENQ\EOTA\STX\a\ENQ\DC2\EOT\233\ETX\STX\b\n\ - \\r\n\ - \\ENQ\EOTA\STX\a\SOH\DC2\EOT\233\ETX\t\NAK\n\ - \\r\n\ - \\ENQ\EOTA\STX\a\ETX\DC2\EOT\233\ETX\CAN\EM\n\ - \0\n\ - \\EOT\EOTA\STX\b\DC2\EOT\234\ETX\STX)\"\" The pool retirement epoch bound.\n\ - \\n\ - \\r\n\ - \\ENQ\EOTA\STX\b\ENQ\DC2\EOT\234\ETX\STX\b\n\ - \\r\n\ - \\ENQ\EOTA\STX\b\SOH\DC2\EOT\234\ETX\t$\n\ - \\r\n\ - \\ENQ\EOTA\STX\b\ETX\DC2\EOT\234\ETX'(\n\ - \,\n\ - \\EOT\EOTA\STX\t\DC2\EOT\235\ETX\STX&\"\RS The desired number of pools.\n\ - \\n\ - \\r\n\ - \\ENQ\EOTA\STX\t\ENQ\DC2\EOT\235\ETX\STX\b\n\ - \\r\n\ - \\ENQ\EOTA\STX\t\SOH\DC2\EOT\235\ETX\t \n\ - \\r\n\ - \\ENQ\EOTA\STX\t\ETX\DC2\EOT\235\ETX#%\n\ - \#\n\ - \\EOT\EOTA\STX\n\ - \\DC2\EOT\236\ETX\STX%\"\NAK The pool influence.\n\ - \\n\ - \\r\n\ - \\ENQ\EOTA\STX\n\ - \\ACK\DC2\EOT\236\ETX\STX\DLE\n\ - \\r\n\ - \\ENQ\EOTA\STX\n\ - \\SOH\DC2\EOT\236\ETX\DC1\US\n\ - \\r\n\ - \\ENQ\EOTA\STX\n\ - \\ETX\DC2\EOT\236\ETX\"$\n\ - \'\n\ - \\EOT\EOTA\STX\v\DC2\EOT\237\ETX\STX)\"\EM The monetary expansion.\n\ - \\n\ - \\r\n\ - \\ENQ\EOTA\STX\v\ACK\DC2\EOT\237\ETX\STX\DLE\n\ - \\r\n\ - \\ENQ\EOTA\STX\v\SOH\DC2\EOT\237\ETX\DC1#\n\ - \\r\n\ - \\ENQ\EOTA\STX\v\ETX\DC2\EOT\237\ETX&(\n\ - \'\n\ - \\EOT\EOTA\STX\f\DC2\EOT\238\ETX\STX)\"\EM The treasury expansion.\n\ - \\n\ - \\r\n\ - \\ENQ\EOTA\STX\f\ACK\DC2\EOT\238\ETX\STX\DLE\n\ - \\r\n\ - \\ENQ\EOTA\STX\f\SOH\DC2\EOT\238\ETX\DC1#\n\ - \\r\n\ - \\ENQ\EOTA\STX\f\ETX\DC2\EOT\238\ETX&(\n\ - \&\n\ - \\EOT\EOTA\STX\r\DC2\EOT\239\ETX\STX\FS\"\CAN The minimum pool cost.\n\ - \\n\ - \\r\n\ - \\ENQ\EOTA\STX\r\ENQ\DC2\EOT\239\ETX\STX\b\n\ - \\r\n\ - \\ENQ\EOTA\STX\r\SOH\DC2\EOT\239\ETX\t\SYN\n\ - \\r\n\ - \\ENQ\EOTA\STX\r\ETX\DC2\EOT\239\ETX\EM\ESC\n\ - \%\n\ - \\EOT\EOTA\STX\SO\DC2\EOT\240\ETX\STX(\"\ETB The protocol version.\n\ - \\n\ - \\r\n\ - \\ENQ\EOTA\STX\SO\ACK\DC2\EOT\240\ETX\STX\DC1\n\ - \\r\n\ - \\ENQ\EOTA\STX\SO\SOH\DC2\EOT\240\ETX\DC2\"\n\ - \\r\n\ - \\ENQ\EOTA\STX\SO\ETX\DC2\EOT\240\ETX%'\n\ - \'\n\ - \\EOT\EOTA\STX\SI\DC2\EOT\241\ETX\STX\GS\"\EM The maximum value size.\n\ - \\n\ - \\r\n\ - \\ENQ\EOTA\STX\SI\ENQ\DC2\EOT\241\ETX\STX\b\n\ - \\r\n\ - \\ENQ\EOTA\STX\SI\SOH\DC2\EOT\241\ETX\t\ETB\n\ - \\r\n\ - \\ENQ\EOTA\STX\SI\ETX\DC2\EOT\241\ETX\SUB\FS\n\ - \*\n\ - \\EOT\EOTA\STX\DLE\DC2\EOT\242\ETX\STX$\"\FS The collateral percentage.\n\ - \\n\ - \\r\n\ - \\ENQ\EOTA\STX\DLE\ENQ\DC2\EOT\242\ETX\STX\b\n\ - \\r\n\ - \\ENQ\EOTA\STX\DLE\SOH\DC2\EOT\242\ETX\t\RS\n\ - \\r\n\ - \\ENQ\EOTA\STX\DLE\ETX\DC2\EOT\242\ETX!#\n\ - \.\n\ - \\EOT\EOTA\STX\DC1\DC2\EOT\243\ETX\STX$\" The maximum collateral inputs.\n\ - \\n\ - \\r\n\ - \\ENQ\EOTA\STX\DC1\ENQ\DC2\EOT\243\ETX\STX\b\n\ - \\r\n\ - \\ENQ\EOTA\STX\DC1\SOH\DC2\EOT\243\ETX\t\RS\n\ - \\r\n\ - \\ENQ\EOTA\STX\DC1\ETX\DC2\EOT\243\ETX!#\n\ - \ \n\ - \\EOT\EOTA\STX\DC2\DC2\EOT\244\ETX\STX\RS\"\DC2 The cost models.\n\ - \\n\ - \\r\n\ - \\ENQ\EOTA\STX\DC2\ACK\DC2\EOT\244\ETX\STX\f\n\ - \\r\n\ - \\ENQ\EOTA\STX\DC2\SOH\DC2\EOT\244\ETX\r\CAN\n\ - \\r\n\ - \\ENQ\EOTA\STX\DC2\ETX\DC2\EOT\244\ETX\ESC\GS\n\ - \\ESC\n\ - \\EOT\EOTA\STX\DC3\DC2\EOT\245\ETX\STX\ETB\"\r The prices.\n\ - \\n\ - \\r\n\ - \\ENQ\EOTA\STX\DC3\ACK\DC2\EOT\245\ETX\STX\n\ - \\n\ - \\r\n\ - \\ENQ\EOTA\STX\DC3\SOH\DC2\EOT\245\ETX\v\DC1\n\ - \\r\n\ - \\ENQ\EOTA\STX\DC3\ETX\DC2\EOT\245\ETX\DC4\SYN\n\ - \<\n\ - \\EOT\EOTA\STX\DC4\DC2\EOT\246\ETX\STX3\". The maximum execution units per transaction.\n\ - \\n\ - \\r\n\ - \\ENQ\EOTA\STX\DC4\ACK\DC2\EOT\246\ETX\STX\t\n\ - \\r\n\ - \\ENQ\EOTA\STX\DC4\SOH\DC2\EOT\246\ETX\n\ - \-\n\ - \\r\n\ - \\ENQ\EOTA\STX\DC4\ETX\DC2\EOT\246\ETX02\n\ - \6\n\ - \\EOT\EOTA\STX\NAK\DC2\EOT\247\ETX\STX-\"( The maximum execution units per block.\n\ - \\n\ - \\r\n\ - \\ENQ\EOTA\STX\NAK\ACK\DC2\EOT\247\ETX\STX\t\n\ - \\r\n\ - \\ENQ\EOTA\STX\NAK\SOH\DC2\EOT\247\ETX\n\ - \'\n\ - \\r\n\ - \\ENQ\EOTA\STX\NAK\ETX\DC2\EOT\247\ETX*,\n\ - \&\n\ - \\STX\EOTB\DC2\ACK\253\ETX\NUL\255\ETX\SOH2\CAN EVALUATION\n\ - \ ==========\n\ - \\n\ - \\v\n\ - \\ETX\EOTB\SOH\DC2\EOT\253\ETX\b\DC1\n\ - \\f\n\ - \\EOT\EOTB\STX\NUL\DC2\EOT\254\ETX\STX\DC1\n\ - \\r\n\ - \\ENQ\EOTB\STX\NUL\ENQ\DC2\EOT\254\ETX\STX\b\n\ - \\r\n\ - \\ENQ\EOTB\STX\NUL\SOH\DC2\EOT\254\ETX\t\f\n\ - \\r\n\ - \\ENQ\EOTB\STX\NUL\ETX\DC2\EOT\254\ETX\SI\DLE\n\ - \\f\n\ - \\STX\EOTC\DC2\ACK\129\EOT\NUL\131\EOT\SOH\n\ - \\v\n\ - \\ETX\EOTC\SOH\DC2\EOT\129\EOT\b\DC1\n\ - \\f\n\ - \\EOT\EOTC\STX\NUL\DC2\EOT\130\EOT\STX\DC1\n\ - \\r\n\ - \\ENQ\EOTC\STX\NUL\ENQ\DC2\EOT\130\EOT\STX\b\n\ - \\r\n\ - \\ENQ\EOTC\STX\NUL\SOH\DC2\EOT\130\EOT\t\f\n\ - \\r\n\ - \\ENQ\EOTC\STX\NUL\ETX\DC2\EOT\130\EOT\SI\DLE\n\ - \\f\n\ - \\STX\EOTD\DC2\ACK\133\EOT\NUL\139\EOT\SOH\n\ - \\v\n\ - \\ETX\EOTD\SOH\DC2\EOT\133\EOT\b\SO\n\ - \\f\n\ - \\EOT\EOTD\STX\NUL\DC2\EOT\134\EOT\STX\DC1\n\ - \\r\n\ - \\ENQ\EOTD\STX\NUL\ENQ\DC2\EOT\134\EOT\STX\b\n\ - \\r\n\ - \\ENQ\EOTD\STX\NUL\SOH\DC2\EOT\134\EOT\t\f\n\ - \\r\n\ - \\ENQ\EOTD\STX\NUL\ETX\DC2\EOT\134\EOT\SI\DLE\n\ - \\f\n\ - \\EOT\EOTD\STX\SOH\DC2\EOT\135\EOT\STX\ETB\n\ - \\r\n\ - \\ENQ\EOTD\STX\SOH\ACK\DC2\EOT\135\EOT\STX\t\n\ - \\r\n\ - \\ENQ\EOTD\STX\SOH\SOH\DC2\EOT\135\EOT\n\ - \\DC2\n\ - \\r\n\ - \\ENQ\EOTD\STX\SOH\ETX\DC2\EOT\135\EOT\NAK\SYN\n\ - \\f\n\ - \\EOT\EOTD\STX\STX\DC2\EOT\136\EOT\STX \n\ - \\r\n\ - \\ENQ\EOTD\STX\STX\EOT\DC2\EOT\136\EOT\STX\n\ - \\n\ - \\r\n\ - \\ENQ\EOTD\STX\STX\ACK\DC2\EOT\136\EOT\v\DC4\n\ - \\r\n\ - \\ENQ\EOTD\STX\STX\SOH\DC2\EOT\136\EOT\NAK\ESC\n\ - \\r\n\ - \\ENQ\EOTD\STX\STX\ETX\DC2\EOT\136\EOT\RS\US\n\ - \\f\n\ - \\EOT\EOTD\STX\ETX\DC2\EOT\137\EOT\STX \n\ - \\r\n\ - \\ENQ\EOTD\STX\ETX\EOT\DC2\EOT\137\EOT\STX\n\ - \\n\ - \\r\n\ - \\ENQ\EOTD\STX\ETX\ACK\DC2\EOT\137\EOT\v\DC4\n\ - \\r\n\ - \\ENQ\EOTD\STX\ETX\SOH\DC2\EOT\137\EOT\NAK\ESC\n\ - \\r\n\ - \\ENQ\EOTD\STX\ETX\ETX\DC2\EOT\137\EOT\RS\US\n\ - \\f\n\ - \\EOT\EOTD\STX\EOT\DC2\EOT\138\EOT\STX\"\n\ - \\r\n\ - \\ENQ\EOTD\STX\EOT\EOT\DC2\EOT\138\EOT\STX\n\ - \\n\ - \\r\n\ - \\ENQ\EOTD\STX\EOT\ACK\DC2\EOT\138\EOT\v\DC3\n\ - \\r\n\ - \\ENQ\EOTD\STX\EOT\SOH\DC2\EOT\138\EOT\DC4\GS\n\ - \\r\n\ - \\ENQ\EOTD\STX\EOT\ETX\DC2\EOT\138\EOT !b\ACKproto3" + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'exUnits' @:: Lens' Redeemer (Prelude.Maybe ExUnits)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.originalCbor' @:: Lens' Redeemer Data.ByteString.ByteString@ -} +data Redeemer + = Redeemer'_constructor {_Redeemer'purpose :: !RedeemerPurpose, + _Redeemer'payload :: !(Prelude.Maybe PlutusData), + _Redeemer'index :: !Data.Word.Word32, + _Redeemer'exUnits :: !(Prelude.Maybe ExUnits), + _Redeemer'originalCbor :: !Data.ByteString.ByteString, + _Redeemer'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show Redeemer where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField Redeemer "purpose" RedeemerPurpose where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Redeemer'purpose (\ x__ y__ -> x__ {_Redeemer'purpose = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Redeemer "payload" PlutusData where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Redeemer'payload (\ x__ y__ -> x__ {_Redeemer'payload = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField Redeemer "maybe'payload" (Prelude.Maybe PlutusData) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Redeemer'payload (\ x__ y__ -> x__ {_Redeemer'payload = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Redeemer "index" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Redeemer'index (\ x__ y__ -> x__ {_Redeemer'index = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Redeemer "exUnits" ExUnits where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Redeemer'exUnits (\ x__ y__ -> x__ {_Redeemer'exUnits = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField Redeemer "maybe'exUnits" (Prelude.Maybe ExUnits) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Redeemer'exUnits (\ x__ y__ -> x__ {_Redeemer'exUnits = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Redeemer "originalCbor" Data.ByteString.ByteString where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Redeemer'originalCbor + (\ x__ y__ -> x__ {_Redeemer'originalCbor = y__})) + Prelude.id +instance Data.ProtoLens.Message Redeemer where + messageName _ = Data.Text.pack "utxorpc.v1alpha.cardano.Redeemer" + packedMessageDescriptor _ + = "\n\ + \\bRedeemer\DC2B\n\ + \\apurpose\CAN\SOH \SOH(\SO2(.utxorpc.v1alpha.cardano.RedeemerPurposeR\apurpose\DC2=\n\ + \\apayload\CAN\STX \SOH(\v2#.utxorpc.v1alpha.cardano.PlutusDataR\apayload\DC2\DC4\n\ + \\ENQindex\CAN\ETX \SOH(\rR\ENQindex\DC2;\n\ + \\bex_units\CAN\EOT \SOH(\v2 .utxorpc.v1alpha.cardano.ExUnitsR\aexUnits\DC2#\n\ + \\roriginal_cbor\CAN\ENQ \SOH(\fR\foriginalCbor" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + purpose__field_descriptor + = Data.ProtoLens.FieldDescriptor + "purpose" + (Data.ProtoLens.ScalarField Data.ProtoLens.EnumField :: + Data.ProtoLens.FieldTypeDescriptor RedeemerPurpose) + (Data.ProtoLens.PlainField + Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"purpose")) :: + Data.ProtoLens.FieldDescriptor Redeemer + payload__field_descriptor + = Data.ProtoLens.FieldDescriptor + "payload" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor PlutusData) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'payload")) :: + Data.ProtoLens.FieldDescriptor Redeemer + index__field_descriptor + = Data.ProtoLens.FieldDescriptor + "index" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"index")) :: + Data.ProtoLens.FieldDescriptor Redeemer + exUnits__field_descriptor + = Data.ProtoLens.FieldDescriptor + "ex_units" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor ExUnits) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'exUnits")) :: + Data.ProtoLens.FieldDescriptor Redeemer + originalCbor__field_descriptor + = Data.ProtoLens.FieldDescriptor + "original_cbor" + (Data.ProtoLens.ScalarField Data.ProtoLens.BytesField :: + Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString) + (Data.ProtoLens.PlainField + Data.ProtoLens.Optional + (Data.ProtoLens.Field.field @"originalCbor")) :: + Data.ProtoLens.FieldDescriptor Redeemer + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, purpose__field_descriptor), + (Data.ProtoLens.Tag 2, payload__field_descriptor), + (Data.ProtoLens.Tag 3, index__field_descriptor), + (Data.ProtoLens.Tag 4, exUnits__field_descriptor), + (Data.ProtoLens.Tag 5, originalCbor__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _Redeemer'_unknownFields + (\ x__ y__ -> x__ {_Redeemer'_unknownFields = y__}) + defMessage + = Redeemer'_constructor + {_Redeemer'purpose = Data.ProtoLens.fieldDefault, + _Redeemer'payload = Prelude.Nothing, + _Redeemer'index = Data.ProtoLens.fieldDefault, + _Redeemer'exUnits = Prelude.Nothing, + _Redeemer'originalCbor = Data.ProtoLens.fieldDefault, + _Redeemer'_unknownFields = []} + parseMessage + = let + loop :: Redeemer -> Data.ProtoLens.Encoding.Bytes.Parser Redeemer + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.toEnum + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "purpose" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"purpose") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "payload" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"payload") y x) + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "index" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"index") y x) + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "ex_units" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"exUnits") y x) + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getBytes + (Prelude.fromIntegral len)) + "original_cbor" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"originalCbor") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "Redeemer" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (let + _v = Lens.Family2.view (Data.ProtoLens.Field.field @"purpose") _x + in + if (Prelude.==) _v Data.ProtoLens.fieldDefault then + Data.Monoid.mempty + else + (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Prelude.fromEnum _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'payload") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (let + _v = Lens.Family2.view (Data.ProtoLens.Field.field @"index") _x + in + if (Prelude.==) _v Data.ProtoLens.fieldDefault then + Data.Monoid.mempty + else + (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'exUnits") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (let + _v + = Lens.Family2.view (Data.ProtoLens.Field.field @"originalCbor") _x + in + if (Prelude.==) _v Data.ProtoLens.fieldDefault then + Data.Monoid.mempty + else + (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))))) +instance Control.DeepSeq.NFData Redeemer where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_Redeemer'_unknownFields x__) + (Control.DeepSeq.deepseq + (_Redeemer'purpose x__) + (Control.DeepSeq.deepseq + (_Redeemer'payload x__) + (Control.DeepSeq.deepseq + (_Redeemer'index x__) + (Control.DeepSeq.deepseq + (_Redeemer'exUnits x__) + (Control.DeepSeq.deepseq (_Redeemer'originalCbor x__) ()))))) +newtype RedeemerPurpose'UnrecognizedValue + = RedeemerPurpose'UnrecognizedValue Data.Int.Int32 + deriving stock (Prelude.Eq, Prelude.Ord, Prelude.Show) +data RedeemerPurpose + = REDEEMER_PURPOSE_UNSPECIFIED | + REDEEMER_PURPOSE_SPEND | + REDEEMER_PURPOSE_MINT | + REDEEMER_PURPOSE_CERT | + REDEEMER_PURPOSE_REWARD | + REDEEMER_PURPOSE_VOTE | + REDEEMER_PURPOSE_PROPOSE | + RedeemerPurpose'Unrecognized !RedeemerPurpose'UnrecognizedValue + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum RedeemerPurpose where + maybeToEnum 0 = Prelude.Just REDEEMER_PURPOSE_UNSPECIFIED + maybeToEnum 1 = Prelude.Just REDEEMER_PURPOSE_SPEND + maybeToEnum 2 = Prelude.Just REDEEMER_PURPOSE_MINT + maybeToEnum 3 = Prelude.Just REDEEMER_PURPOSE_CERT + maybeToEnum 4 = Prelude.Just REDEEMER_PURPOSE_REWARD + maybeToEnum 5 = Prelude.Just REDEEMER_PURPOSE_VOTE + maybeToEnum 6 = Prelude.Just REDEEMER_PURPOSE_PROPOSE + maybeToEnum k + = Prelude.Just + (RedeemerPurpose'Unrecognized + (RedeemerPurpose'UnrecognizedValue (Prelude.fromIntegral k))) + showEnum REDEEMER_PURPOSE_UNSPECIFIED + = "REDEEMER_PURPOSE_UNSPECIFIED" + showEnum REDEEMER_PURPOSE_SPEND = "REDEEMER_PURPOSE_SPEND" + showEnum REDEEMER_PURPOSE_MINT = "REDEEMER_PURPOSE_MINT" + showEnum REDEEMER_PURPOSE_CERT = "REDEEMER_PURPOSE_CERT" + showEnum REDEEMER_PURPOSE_REWARD = "REDEEMER_PURPOSE_REWARD" + showEnum REDEEMER_PURPOSE_VOTE = "REDEEMER_PURPOSE_VOTE" + showEnum REDEEMER_PURPOSE_PROPOSE = "REDEEMER_PURPOSE_PROPOSE" + showEnum + (RedeemerPurpose'Unrecognized (RedeemerPurpose'UnrecognizedValue k)) + = Prelude.show k + readEnum k + | (Prelude.==) k "REDEEMER_PURPOSE_UNSPECIFIED" + = Prelude.Just REDEEMER_PURPOSE_UNSPECIFIED + | (Prelude.==) k "REDEEMER_PURPOSE_SPEND" + = Prelude.Just REDEEMER_PURPOSE_SPEND + | (Prelude.==) k "REDEEMER_PURPOSE_MINT" + = Prelude.Just REDEEMER_PURPOSE_MINT + | (Prelude.==) k "REDEEMER_PURPOSE_CERT" + = Prelude.Just REDEEMER_PURPOSE_CERT + | (Prelude.==) k "REDEEMER_PURPOSE_REWARD" + = Prelude.Just REDEEMER_PURPOSE_REWARD + | (Prelude.==) k "REDEEMER_PURPOSE_VOTE" + = Prelude.Just REDEEMER_PURPOSE_VOTE + | (Prelude.==) k "REDEEMER_PURPOSE_PROPOSE" + = Prelude.Just REDEEMER_PURPOSE_PROPOSE + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded RedeemerPurpose where + minBound = REDEEMER_PURPOSE_UNSPECIFIED + maxBound = REDEEMER_PURPOSE_PROPOSE +instance Prelude.Enum RedeemerPurpose where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum RedeemerPurpose: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum REDEEMER_PURPOSE_UNSPECIFIED = 0 + fromEnum REDEEMER_PURPOSE_SPEND = 1 + fromEnum REDEEMER_PURPOSE_MINT = 2 + fromEnum REDEEMER_PURPOSE_CERT = 3 + fromEnum REDEEMER_PURPOSE_REWARD = 4 + fromEnum REDEEMER_PURPOSE_VOTE = 5 + fromEnum REDEEMER_PURPOSE_PROPOSE = 6 + fromEnum + (RedeemerPurpose'Unrecognized (RedeemerPurpose'UnrecognizedValue k)) + = Prelude.fromIntegral k + succ REDEEMER_PURPOSE_PROPOSE + = Prelude.error + "RedeemerPurpose.succ: bad argument REDEEMER_PURPOSE_PROPOSE. This value would be out of bounds." + succ REDEEMER_PURPOSE_UNSPECIFIED = REDEEMER_PURPOSE_SPEND + succ REDEEMER_PURPOSE_SPEND = REDEEMER_PURPOSE_MINT + succ REDEEMER_PURPOSE_MINT = REDEEMER_PURPOSE_CERT + succ REDEEMER_PURPOSE_CERT = REDEEMER_PURPOSE_REWARD + succ REDEEMER_PURPOSE_REWARD = REDEEMER_PURPOSE_VOTE + succ REDEEMER_PURPOSE_VOTE = REDEEMER_PURPOSE_PROPOSE + succ (RedeemerPurpose'Unrecognized _) + = Prelude.error + "RedeemerPurpose.succ: bad argument: unrecognized value" + pred REDEEMER_PURPOSE_UNSPECIFIED + = Prelude.error + "RedeemerPurpose.pred: bad argument REDEEMER_PURPOSE_UNSPECIFIED. This value would be out of bounds." + pred REDEEMER_PURPOSE_SPEND = REDEEMER_PURPOSE_UNSPECIFIED + pred REDEEMER_PURPOSE_MINT = REDEEMER_PURPOSE_SPEND + pred REDEEMER_PURPOSE_CERT = REDEEMER_PURPOSE_MINT + pred REDEEMER_PURPOSE_REWARD = REDEEMER_PURPOSE_CERT + pred REDEEMER_PURPOSE_VOTE = REDEEMER_PURPOSE_REWARD + pred REDEEMER_PURPOSE_PROPOSE = REDEEMER_PURPOSE_VOTE + pred (RedeemerPurpose'Unrecognized _) + = Prelude.error + "RedeemerPurpose.pred: bad argument: unrecognized value" + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault RedeemerPurpose where + fieldDefault = REDEEMER_PURPOSE_UNSPECIFIED +instance Control.DeepSeq.NFData RedeemerPurpose where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.stakeCredential' @:: Lens' RegCert StakeCredential@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'stakeCredential' @:: Lens' RegCert (Prelude.Maybe StakeCredential)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.coin' @:: Lens' RegCert Data.Word.Word64@ -} +data RegCert + = RegCert'_constructor {_RegCert'stakeCredential :: !(Prelude.Maybe StakeCredential), + _RegCert'coin :: !Data.Word.Word64, + _RegCert'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show RegCert where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField RegCert "stakeCredential" StakeCredential where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RegCert'stakeCredential + (\ x__ y__ -> x__ {_RegCert'stakeCredential = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField RegCert "maybe'stakeCredential" (Prelude.Maybe StakeCredential) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RegCert'stakeCredential + (\ x__ y__ -> x__ {_RegCert'stakeCredential = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RegCert "coin" Data.Word.Word64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RegCert'coin (\ x__ y__ -> x__ {_RegCert'coin = y__})) + Prelude.id +instance Data.ProtoLens.Message RegCert where + messageName _ = Data.Text.pack "utxorpc.v1alpha.cardano.RegCert" + packedMessageDescriptor _ + = "\n\ + \\aRegCert\DC2S\n\ + \\DLEstake_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SIstakeCredential\DC2\DC2\n\ + \\EOTcoin\CAN\STX \SOH(\EOTR\EOTcoin" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + stakeCredential__field_descriptor + = Data.ProtoLens.FieldDescriptor + "stake_credential" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor StakeCredential) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'stakeCredential")) :: + Data.ProtoLens.FieldDescriptor RegCert + coin__field_descriptor + = Data.ProtoLens.FieldDescriptor + "coin" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64) + (Data.ProtoLens.PlainField + Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"coin")) :: + Data.ProtoLens.FieldDescriptor RegCert + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, stakeCredential__field_descriptor), + (Data.ProtoLens.Tag 2, coin__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _RegCert'_unknownFields + (\ x__ y__ -> x__ {_RegCert'_unknownFields = y__}) + defMessage + = RegCert'_constructor + {_RegCert'stakeCredential = Prelude.Nothing, + _RegCert'coin = Data.ProtoLens.fieldDefault, + _RegCert'_unknownFields = []} + parseMessage + = let + loop :: RegCert -> Data.ProtoLens.Encoding.Bytes.Parser RegCert + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "stake_credential" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"stakeCredential") y x) + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + Data.ProtoLens.Encoding.Bytes.getVarInt "coin" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"coin") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "RegCert" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'stakeCredential") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"coin") _x + in + if (Prelude.==) _v Data.ProtoLens.fieldDefault then + Data.Monoid.mempty + else + (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + (Data.ProtoLens.Encoding.Bytes.putVarInt _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData RegCert where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_RegCert'_unknownFields x__) + (Control.DeepSeq.deepseq + (_RegCert'stakeCredential x__) + (Control.DeepSeq.deepseq (_RegCert'coin x__) ())) +{- | Fields : + + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.drepCredential' @:: Lens' RegDRepCert StakeCredential@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'drepCredential' @:: Lens' RegDRepCert (Prelude.Maybe StakeCredential)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.coin' @:: Lens' RegDRepCert Data.Word.Word64@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.anchor' @:: Lens' RegDRepCert Anchor@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'anchor' @:: Lens' RegDRepCert (Prelude.Maybe Anchor)@ -} +data RegDRepCert + = RegDRepCert'_constructor {_RegDRepCert'drepCredential :: !(Prelude.Maybe StakeCredential), + _RegDRepCert'coin :: !Data.Word.Word64, + _RegDRepCert'anchor :: !(Prelude.Maybe Anchor), + _RegDRepCert'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show RegDRepCert where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField RegDRepCert "drepCredential" StakeCredential where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RegDRepCert'drepCredential + (\ x__ y__ -> x__ {_RegDRepCert'drepCredential = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField RegDRepCert "maybe'drepCredential" (Prelude.Maybe StakeCredential) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RegDRepCert'drepCredential + (\ x__ y__ -> x__ {_RegDRepCert'drepCredential = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RegDRepCert "coin" Data.Word.Word64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RegDRepCert'coin (\ x__ y__ -> x__ {_RegDRepCert'coin = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RegDRepCert "anchor" Anchor where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RegDRepCert'anchor (\ x__ y__ -> x__ {_RegDRepCert'anchor = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField RegDRepCert "maybe'anchor" (Prelude.Maybe Anchor) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RegDRepCert'anchor (\ x__ y__ -> x__ {_RegDRepCert'anchor = y__})) + Prelude.id +instance Data.ProtoLens.Message RegDRepCert where + messageName _ + = Data.Text.pack "utxorpc.v1alpha.cardano.RegDRepCert" + packedMessageDescriptor _ + = "\n\ + \\vRegDRepCert\DC2Q\n\ + \\SIdrep_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SOdrepCredential\DC2\DC2\n\ + \\EOTcoin\CAN\STX \SOH(\EOTR\EOTcoin\DC27\n\ + \\ACKanchor\CAN\ETX \SOH(\v2\US.utxorpc.v1alpha.cardano.AnchorR\ACKanchor" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + drepCredential__field_descriptor + = Data.ProtoLens.FieldDescriptor + "drep_credential" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor StakeCredential) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'drepCredential")) :: + Data.ProtoLens.FieldDescriptor RegDRepCert + coin__field_descriptor + = Data.ProtoLens.FieldDescriptor + "coin" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64) + (Data.ProtoLens.PlainField + Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"coin")) :: + Data.ProtoLens.FieldDescriptor RegDRepCert + anchor__field_descriptor + = Data.ProtoLens.FieldDescriptor + "anchor" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Anchor) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'anchor")) :: + Data.ProtoLens.FieldDescriptor RegDRepCert + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, drepCredential__field_descriptor), + (Data.ProtoLens.Tag 2, coin__field_descriptor), + (Data.ProtoLens.Tag 3, anchor__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _RegDRepCert'_unknownFields + (\ x__ y__ -> x__ {_RegDRepCert'_unknownFields = y__}) + defMessage + = RegDRepCert'_constructor + {_RegDRepCert'drepCredential = Prelude.Nothing, + _RegDRepCert'coin = Data.ProtoLens.fieldDefault, + _RegDRepCert'anchor = Prelude.Nothing, + _RegDRepCert'_unknownFields = []} + parseMessage + = let + loop :: + RegDRepCert -> Data.ProtoLens.Encoding.Bytes.Parser RegDRepCert + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "drep_credential" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"drepCredential") y x) + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + Data.ProtoLens.Encoding.Bytes.getVarInt "coin" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"coin") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "anchor" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"anchor") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "RegDRepCert" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'drepCredential") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"coin") _x + in + if (Prelude.==) _v Data.ProtoLens.fieldDefault then + Data.Monoid.mempty + else + (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + (Data.ProtoLens.Encoding.Bytes.putVarInt _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'anchor") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData RegDRepCert where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_RegDRepCert'_unknownFields x__) + (Control.DeepSeq.deepseq + (_RegDRepCert'drepCredential x__) + (Control.DeepSeq.deepseq + (_RegDRepCert'coin x__) + (Control.DeepSeq.deepseq (_RegDRepCert'anchor x__) ()))) +{- | Fields : + + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.ipV4' @:: Lens' Relay Data.ByteString.ByteString@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.ipV6' @:: Lens' Relay Data.ByteString.ByteString@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.dnsName' @:: Lens' Relay Data.Text.Text@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.port' @:: Lens' Relay Data.Word.Word32@ -} +data Relay + = Relay'_constructor {_Relay'ipV4 :: !Data.ByteString.ByteString, + _Relay'ipV6 :: !Data.ByteString.ByteString, + _Relay'dnsName :: !Data.Text.Text, + _Relay'port :: !Data.Word.Word32, + _Relay'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show Relay where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField Relay "ipV4" Data.ByteString.ByteString where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Relay'ipV4 (\ x__ y__ -> x__ {_Relay'ipV4 = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Relay "ipV6" Data.ByteString.ByteString where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Relay'ipV6 (\ x__ y__ -> x__ {_Relay'ipV6 = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Relay "dnsName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Relay'dnsName (\ x__ y__ -> x__ {_Relay'dnsName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Relay "port" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Relay'port (\ x__ y__ -> x__ {_Relay'port = y__})) + Prelude.id +instance Data.ProtoLens.Message Relay where + messageName _ = Data.Text.pack "utxorpc.v1alpha.cardano.Relay" + packedMessageDescriptor _ + = "\n\ + \\ENQRelay\DC2\DC3\n\ + \\ENQip_v4\CAN\SOH \SOH(\fR\EOTipV4\DC2\DC3\n\ + \\ENQip_v6\CAN\STX \SOH(\fR\EOTipV6\DC2\EM\n\ + \\bdns_name\CAN\ETX \SOH(\tR\adnsName\DC2\DC2\n\ + \\EOTport\CAN\EOT \SOH(\rR\EOTport" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + ipV4__field_descriptor + = Data.ProtoLens.FieldDescriptor + "ip_v4" + (Data.ProtoLens.ScalarField Data.ProtoLens.BytesField :: + Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString) + (Data.ProtoLens.PlainField + Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"ipV4")) :: + Data.ProtoLens.FieldDescriptor Relay + ipV6__field_descriptor + = Data.ProtoLens.FieldDescriptor + "ip_v6" + (Data.ProtoLens.ScalarField Data.ProtoLens.BytesField :: + Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString) + (Data.ProtoLens.PlainField + Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"ipV6")) :: + Data.ProtoLens.FieldDescriptor Relay + dnsName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "dns_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"dnsName")) :: + Data.ProtoLens.FieldDescriptor Relay + port__field_descriptor + = Data.ProtoLens.FieldDescriptor + "port" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"port")) :: + Data.ProtoLens.FieldDescriptor Relay + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, ipV4__field_descriptor), + (Data.ProtoLens.Tag 2, ipV6__field_descriptor), + (Data.ProtoLens.Tag 3, dnsName__field_descriptor), + (Data.ProtoLens.Tag 4, port__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _Relay'_unknownFields + (\ x__ y__ -> x__ {_Relay'_unknownFields = y__}) + defMessage + = Relay'_constructor + {_Relay'ipV4 = Data.ProtoLens.fieldDefault, + _Relay'ipV6 = Data.ProtoLens.fieldDefault, + _Relay'dnsName = Data.ProtoLens.fieldDefault, + _Relay'port = Data.ProtoLens.fieldDefault, + _Relay'_unknownFields = []} + parseMessage + = let + loop :: Relay -> Data.ProtoLens.Encoding.Bytes.Parser Relay + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getBytes + (Prelude.fromIntegral len)) + "ip_v4" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"ipV4") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getBytes + (Prelude.fromIntegral len)) + "ip_v6" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"ipV6") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "dns_name" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"dnsName") y x) + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "port" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"port") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "Relay" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"ipV4") _x + in + if (Prelude.==) _v Data.ProtoLens.fieldDefault then + Data.Monoid.mempty + else + (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + _v)) + ((Data.Monoid.<>) + (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"ipV6") _x + in + if (Prelude.==) _v Data.ProtoLens.fieldDefault then + Data.Monoid.mempty + else + (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + _v)) + ((Data.Monoid.<>) + (let + _v = Lens.Family2.view (Data.ProtoLens.Field.field @"dnsName") _x + in + if (Prelude.==) _v Data.ProtoLens.fieldDefault then + Data.Monoid.mempty + else + (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"port") _x + in + if (Prelude.==) _v Data.ProtoLens.fieldDefault then + Data.Monoid.mempty + else + (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))) +instance Control.DeepSeq.NFData Relay where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_Relay'_unknownFields x__) + (Control.DeepSeq.deepseq + (_Relay'ipV4 x__) + (Control.DeepSeq.deepseq + (_Relay'ipV6 x__) + (Control.DeepSeq.deepseq + (_Relay'dnsName x__) + (Control.DeepSeq.deepseq (_Relay'port x__) ())))) +{- | Fields : + + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.committeeColdCredential' @:: Lens' ResignCommitteeColdCert StakeCredential@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'committeeColdCredential' @:: Lens' ResignCommitteeColdCert (Prelude.Maybe StakeCredential)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.anchor' @:: Lens' ResignCommitteeColdCert Anchor@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'anchor' @:: Lens' ResignCommitteeColdCert (Prelude.Maybe Anchor)@ -} +data ResignCommitteeColdCert + = ResignCommitteeColdCert'_constructor {_ResignCommitteeColdCert'committeeColdCredential :: !(Prelude.Maybe StakeCredential), + _ResignCommitteeColdCert'anchor :: !(Prelude.Maybe Anchor), + _ResignCommitteeColdCert'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show ResignCommitteeColdCert where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField ResignCommitteeColdCert "committeeColdCredential" StakeCredential where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ResignCommitteeColdCert'committeeColdCredential + (\ x__ y__ + -> x__ {_ResignCommitteeColdCert'committeeColdCredential = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField ResignCommitteeColdCert "maybe'committeeColdCredential" (Prelude.Maybe StakeCredential) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ResignCommitteeColdCert'committeeColdCredential + (\ x__ y__ + -> x__ {_ResignCommitteeColdCert'committeeColdCredential = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ResignCommitteeColdCert "anchor" Anchor where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ResignCommitteeColdCert'anchor + (\ x__ y__ -> x__ {_ResignCommitteeColdCert'anchor = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField ResignCommitteeColdCert "maybe'anchor" (Prelude.Maybe Anchor) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ResignCommitteeColdCert'anchor + (\ x__ y__ -> x__ {_ResignCommitteeColdCert'anchor = y__})) + Prelude.id +instance Data.ProtoLens.Message ResignCommitteeColdCert where + messageName _ + = Data.Text.pack "utxorpc.v1alpha.cardano.ResignCommitteeColdCert" + packedMessageDescriptor _ + = "\n\ + \\ETBResignCommitteeColdCert\DC2d\n\ + \\EMcommittee_cold_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\ETBcommitteeColdCredential\DC27\n\ + \\ACKanchor\CAN\STX \SOH(\v2\US.utxorpc.v1alpha.cardano.AnchorR\ACKanchor" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + committeeColdCredential__field_descriptor + = Data.ProtoLens.FieldDescriptor + "committee_cold_credential" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor StakeCredential) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'committeeColdCredential")) :: + Data.ProtoLens.FieldDescriptor ResignCommitteeColdCert + anchor__field_descriptor + = Data.ProtoLens.FieldDescriptor + "anchor" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Anchor) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'anchor")) :: + Data.ProtoLens.FieldDescriptor ResignCommitteeColdCert + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, committeeColdCredential__field_descriptor), + (Data.ProtoLens.Tag 2, anchor__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _ResignCommitteeColdCert'_unknownFields + (\ x__ y__ -> x__ {_ResignCommitteeColdCert'_unknownFields = y__}) + defMessage + = ResignCommitteeColdCert'_constructor + {_ResignCommitteeColdCert'committeeColdCredential = Prelude.Nothing, + _ResignCommitteeColdCert'anchor = Prelude.Nothing, + _ResignCommitteeColdCert'_unknownFields = []} + parseMessage + = let + loop :: + ResignCommitteeColdCert + -> Data.ProtoLens.Encoding.Bytes.Parser ResignCommitteeColdCert + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "committee_cold_credential" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"committeeColdCredential") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "anchor" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"anchor") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "ResignCommitteeColdCert" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'committeeColdCredential") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'anchor") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData ResignCommitteeColdCert where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_ResignCommitteeColdCert'_unknownFields x__) + (Control.DeepSeq.deepseq + (_ResignCommitteeColdCert'committeeColdCredential x__) + (Control.DeepSeq.deepseq (_ResignCommitteeColdCert'anchor x__) ())) +{- | Fields : + + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'script' @:: Lens' Script (Prelude.Maybe Script'Script)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'native' @:: Lens' Script (Prelude.Maybe NativeScript)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.native' @:: Lens' Script NativeScript@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'plutusV1' @:: Lens' Script (Prelude.Maybe Data.ByteString.ByteString)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.plutusV1' @:: Lens' Script Data.ByteString.ByteString@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'plutusV2' @:: Lens' Script (Prelude.Maybe Data.ByteString.ByteString)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.plutusV2' @:: Lens' Script Data.ByteString.ByteString@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'plutusV3' @:: Lens' Script (Prelude.Maybe Data.ByteString.ByteString)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.plutusV3' @:: Lens' Script Data.ByteString.ByteString@ -} +data Script + = Script'_constructor {_Script'script :: !(Prelude.Maybe Script'Script), + _Script'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show Script where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +data Script'Script + = Script'Native !NativeScript | + Script'PlutusV1 !Data.ByteString.ByteString | + Script'PlutusV2 !Data.ByteString.ByteString | + Script'PlutusV3 !Data.ByteString.ByteString + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.Field.HasField Script "maybe'script" (Prelude.Maybe Script'Script) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Script'script (\ x__ y__ -> x__ {_Script'script = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Script "maybe'native" (Prelude.Maybe NativeScript) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Script'script (\ x__ y__ -> x__ {_Script'script = y__})) + (Lens.Family2.Unchecked.lens + (\ x__ + -> case x__ of + (Prelude.Just (Script'Native x__val)) -> Prelude.Just x__val + _otherwise -> Prelude.Nothing) + (\ _ y__ -> Prelude.fmap Script'Native y__)) +instance Data.ProtoLens.Field.HasField Script "native" NativeScript where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Script'script (\ x__ y__ -> x__ {_Script'script = y__})) + ((Prelude..) + (Lens.Family2.Unchecked.lens + (\ x__ + -> case x__ of + (Prelude.Just (Script'Native x__val)) -> Prelude.Just x__val + _otherwise -> Prelude.Nothing) + (\ _ y__ -> Prelude.fmap Script'Native y__)) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage)) +instance Data.ProtoLens.Field.HasField Script "maybe'plutusV1" (Prelude.Maybe Data.ByteString.ByteString) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Script'script (\ x__ y__ -> x__ {_Script'script = y__})) + (Lens.Family2.Unchecked.lens + (\ x__ + -> case x__ of + (Prelude.Just (Script'PlutusV1 x__val)) -> Prelude.Just x__val + _otherwise -> Prelude.Nothing) + (\ _ y__ -> Prelude.fmap Script'PlutusV1 y__)) +instance Data.ProtoLens.Field.HasField Script "plutusV1" Data.ByteString.ByteString where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Script'script (\ x__ y__ -> x__ {_Script'script = y__})) + ((Prelude..) + (Lens.Family2.Unchecked.lens + (\ x__ + -> case x__ of + (Prelude.Just (Script'PlutusV1 x__val)) -> Prelude.Just x__val + _otherwise -> Prelude.Nothing) + (\ _ y__ -> Prelude.fmap Script'PlutusV1 y__)) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)) +instance Data.ProtoLens.Field.HasField Script "maybe'plutusV2" (Prelude.Maybe Data.ByteString.ByteString) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Script'script (\ x__ y__ -> x__ {_Script'script = y__})) + (Lens.Family2.Unchecked.lens + (\ x__ + -> case x__ of + (Prelude.Just (Script'PlutusV2 x__val)) -> Prelude.Just x__val + _otherwise -> Prelude.Nothing) + (\ _ y__ -> Prelude.fmap Script'PlutusV2 y__)) +instance Data.ProtoLens.Field.HasField Script "plutusV2" Data.ByteString.ByteString where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Script'script (\ x__ y__ -> x__ {_Script'script = y__})) + ((Prelude..) + (Lens.Family2.Unchecked.lens + (\ x__ + -> case x__ of + (Prelude.Just (Script'PlutusV2 x__val)) -> Prelude.Just x__val + _otherwise -> Prelude.Nothing) + (\ _ y__ -> Prelude.fmap Script'PlutusV2 y__)) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)) +instance Data.ProtoLens.Field.HasField Script "maybe'plutusV3" (Prelude.Maybe Data.ByteString.ByteString) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Script'script (\ x__ y__ -> x__ {_Script'script = y__})) + (Lens.Family2.Unchecked.lens + (\ x__ + -> case x__ of + (Prelude.Just (Script'PlutusV3 x__val)) -> Prelude.Just x__val + _otherwise -> Prelude.Nothing) + (\ _ y__ -> Prelude.fmap Script'PlutusV3 y__)) +instance Data.ProtoLens.Field.HasField Script "plutusV3" Data.ByteString.ByteString where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Script'script (\ x__ y__ -> x__ {_Script'script = y__})) + ((Prelude..) + (Lens.Family2.Unchecked.lens + (\ x__ + -> case x__ of + (Prelude.Just (Script'PlutusV3 x__val)) -> Prelude.Just x__val + _otherwise -> Prelude.Nothing) + (\ _ y__ -> Prelude.fmap Script'PlutusV3 y__)) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)) +instance Data.ProtoLens.Message Script where + messageName _ = Data.Text.pack "utxorpc.v1alpha.cardano.Script" + packedMessageDescriptor _ + = "\n\ + \\ACKScript\DC2?\n\ + \\ACKnative\CAN\SOH \SOH(\v2%.utxorpc.v1alpha.cardano.NativeScriptH\NULR\ACKnative\DC2\GS\n\ + \\tplutus_v1\CAN\STX \SOH(\fH\NULR\bplutusV1\DC2\GS\n\ + \\tplutus_v2\CAN\ETX \SOH(\fH\NULR\bplutusV2\DC2\GS\n\ + \\tplutus_v3\CAN\EOT \SOH(\fH\NULR\bplutusV3B\b\n\ + \\ACKscript" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + native__field_descriptor + = Data.ProtoLens.FieldDescriptor + "native" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor NativeScript) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'native")) :: + Data.ProtoLens.FieldDescriptor Script + plutusV1__field_descriptor + = Data.ProtoLens.FieldDescriptor + "plutus_v1" + (Data.ProtoLens.ScalarField Data.ProtoLens.BytesField :: + Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'plutusV1")) :: + Data.ProtoLens.FieldDescriptor Script + plutusV2__field_descriptor + = Data.ProtoLens.FieldDescriptor + "plutus_v2" + (Data.ProtoLens.ScalarField Data.ProtoLens.BytesField :: + Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'plutusV2")) :: + Data.ProtoLens.FieldDescriptor Script + plutusV3__field_descriptor + = Data.ProtoLens.FieldDescriptor + "plutus_v3" + (Data.ProtoLens.ScalarField Data.ProtoLens.BytesField :: + Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'plutusV3")) :: + Data.ProtoLens.FieldDescriptor Script + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, native__field_descriptor), + (Data.ProtoLens.Tag 2, plutusV1__field_descriptor), + (Data.ProtoLens.Tag 3, plutusV2__field_descriptor), + (Data.ProtoLens.Tag 4, plutusV3__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _Script'_unknownFields + (\ x__ y__ -> x__ {_Script'_unknownFields = y__}) + defMessage + = Script'_constructor + {_Script'script = Prelude.Nothing, _Script'_unknownFields = []} + parseMessage + = let + loop :: Script -> Data.ProtoLens.Encoding.Bytes.Parser Script + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "native" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"native") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getBytes + (Prelude.fromIntegral len)) + "plutus_v1" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"plutusV1") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getBytes + (Prelude.fromIntegral len)) + "plutus_v2" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"plutusV2") y x) + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getBytes + (Prelude.fromIntegral len)) + "plutus_v3" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"plutusV3") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "Script" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'script") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just (Script'Native v)) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage v) + (Prelude.Just (Script'PlutusV1 v)) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + v) + (Prelude.Just (Script'PlutusV2 v)) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + v) + (Prelude.Just (Script'PlutusV3 v)) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData Script where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_Script'_unknownFields x__) + (Control.DeepSeq.deepseq (_Script'script x__) ()) +instance Control.DeepSeq.NFData Script'Script where + rnf (Script'Native x__) = Control.DeepSeq.rnf x__ + rnf (Script'PlutusV1 x__) = Control.DeepSeq.rnf x__ + rnf (Script'PlutusV2 x__) = Control.DeepSeq.rnf x__ + rnf (Script'PlutusV3 x__) = Control.DeepSeq.rnf x__ +_Script'Native :: + Data.ProtoLens.Prism.Prism' Script'Script NativeScript +_Script'Native + = Data.ProtoLens.Prism.prism' + Script'Native + (\ p__ + -> case p__ of + (Script'Native p__val) -> Prelude.Just p__val + _otherwise -> Prelude.Nothing) +_Script'PlutusV1 :: + Data.ProtoLens.Prism.Prism' Script'Script Data.ByteString.ByteString +_Script'PlutusV1 + = Data.ProtoLens.Prism.prism' + Script'PlutusV1 + (\ p__ + -> case p__ of + (Script'PlutusV1 p__val) -> Prelude.Just p__val + _otherwise -> Prelude.Nothing) +_Script'PlutusV2 :: + Data.ProtoLens.Prism.Prism' Script'Script Data.ByteString.ByteString +_Script'PlutusV2 + = Data.ProtoLens.Prism.prism' + Script'PlutusV2 + (\ p__ + -> case p__ of + (Script'PlutusV2 p__val) -> Prelude.Just p__val + _otherwise -> Prelude.Nothing) +_Script'PlutusV3 :: + Data.ProtoLens.Prism.Prism' Script'Script Data.ByteString.ByteString +_Script'PlutusV3 + = Data.ProtoLens.Prism.prism' + Script'PlutusV3 + (\ p__ + -> case p__ of + (Script'PlutusV3 p__val) -> Prelude.Just p__val + _otherwise -> Prelude.Nothing) +{- | Fields : + + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.k' @:: Lens' ScriptNOfK Data.Word.Word32@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.scripts' @:: Lens' ScriptNOfK [NativeScript]@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.vec'scripts' @:: Lens' ScriptNOfK (Data.Vector.Vector NativeScript)@ -} +data ScriptNOfK + = ScriptNOfK'_constructor {_ScriptNOfK'k :: !Data.Word.Word32, + _ScriptNOfK'scripts :: !(Data.Vector.Vector NativeScript), + _ScriptNOfK'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show ScriptNOfK where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField ScriptNOfK "k" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ScriptNOfK'k (\ x__ y__ -> x__ {_ScriptNOfK'k = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ScriptNOfK "scripts" [NativeScript] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ScriptNOfK'scripts (\ x__ y__ -> x__ {_ScriptNOfK'scripts = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField ScriptNOfK "vec'scripts" (Data.Vector.Vector NativeScript) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ScriptNOfK'scripts (\ x__ y__ -> x__ {_ScriptNOfK'scripts = y__})) + Prelude.id +instance Data.ProtoLens.Message ScriptNOfK where + messageName _ = Data.Text.pack "utxorpc.v1alpha.cardano.ScriptNOfK" + packedMessageDescriptor _ + = "\n\ + \\n\ + \ScriptNOfK\DC2\f\n\ + \\SOHk\CAN\SOH \SOH(\rR\SOHk\DC2?\n\ + \\ascripts\CAN\STX \ETX(\v2%.utxorpc.v1alpha.cardano.NativeScriptR\ascripts" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + k__field_descriptor + = Data.ProtoLens.FieldDescriptor + "k" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"k")) :: + Data.ProtoLens.FieldDescriptor ScriptNOfK + scripts__field_descriptor + = Data.ProtoLens.FieldDescriptor + "scripts" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor NativeScript) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked (Data.ProtoLens.Field.field @"scripts")) :: + Data.ProtoLens.FieldDescriptor ScriptNOfK + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, k__field_descriptor), + (Data.ProtoLens.Tag 2, scripts__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _ScriptNOfK'_unknownFields + (\ x__ y__ -> x__ {_ScriptNOfK'_unknownFields = y__}) + defMessage + = ScriptNOfK'_constructor + {_ScriptNOfK'k = Data.ProtoLens.fieldDefault, + _ScriptNOfK'scripts = Data.Vector.Generic.empty, + _ScriptNOfK'_unknownFields = []} + parseMessage + = let + loop :: + ScriptNOfK + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld NativeScript + -> Data.ProtoLens.Encoding.Bytes.Parser ScriptNOfK + loop x mutable'scripts + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'scripts <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'scripts) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'scripts") frozen'scripts x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "k" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"k") y x) + mutable'scripts + 18 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "scripts" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'scripts y) + loop x v + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'scripts + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'scripts <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'scripts) + "ScriptNOfK" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"k") _x + in + if (Prelude.==) _v Data.ProtoLens.fieldDefault then + Data.Monoid.mempty + else + (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view (Data.ProtoLens.Field.field @"vec'scripts") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData ScriptNOfK where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_ScriptNOfK'_unknownFields x__) + (Control.DeepSeq.deepseq + (_ScriptNOfK'k x__) + (Control.DeepSeq.deepseq (_ScriptNOfK'scripts x__) ())) +{- | Fields : + + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'stakeCredential' @:: Lens' StakeCredential (Prelude.Maybe StakeCredential'StakeCredential)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'addrKeyHash' @:: Lens' StakeCredential (Prelude.Maybe Data.ByteString.ByteString)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.addrKeyHash' @:: Lens' StakeCredential Data.ByteString.ByteString@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'scriptHash' @:: Lens' StakeCredential (Prelude.Maybe Data.ByteString.ByteString)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.scriptHash' @:: Lens' StakeCredential Data.ByteString.ByteString@ -} +data StakeCredential + = StakeCredential'_constructor {_StakeCredential'stakeCredential :: !(Prelude.Maybe StakeCredential'StakeCredential), + _StakeCredential'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show StakeCredential where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +data StakeCredential'StakeCredential + = StakeCredential'AddrKeyHash !Data.ByteString.ByteString | + StakeCredential'ScriptHash !Data.ByteString.ByteString + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.Field.HasField StakeCredential "maybe'stakeCredential" (Prelude.Maybe StakeCredential'StakeCredential) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StakeCredential'stakeCredential + (\ x__ y__ -> x__ {_StakeCredential'stakeCredential = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField StakeCredential "maybe'addrKeyHash" (Prelude.Maybe Data.ByteString.ByteString) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StakeCredential'stakeCredential + (\ x__ y__ -> x__ {_StakeCredential'stakeCredential = y__})) + (Lens.Family2.Unchecked.lens + (\ x__ + -> case x__ of + (Prelude.Just (StakeCredential'AddrKeyHash x__val)) + -> Prelude.Just x__val + _otherwise -> Prelude.Nothing) + (\ _ y__ -> Prelude.fmap StakeCredential'AddrKeyHash y__)) +instance Data.ProtoLens.Field.HasField StakeCredential "addrKeyHash" Data.ByteString.ByteString where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StakeCredential'stakeCredential + (\ x__ y__ -> x__ {_StakeCredential'stakeCredential = y__})) + ((Prelude..) + (Lens.Family2.Unchecked.lens + (\ x__ + -> case x__ of + (Prelude.Just (StakeCredential'AddrKeyHash x__val)) + -> Prelude.Just x__val + _otherwise -> Prelude.Nothing) + (\ _ y__ -> Prelude.fmap StakeCredential'AddrKeyHash y__)) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)) +instance Data.ProtoLens.Field.HasField StakeCredential "maybe'scriptHash" (Prelude.Maybe Data.ByteString.ByteString) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StakeCredential'stakeCredential + (\ x__ y__ -> x__ {_StakeCredential'stakeCredential = y__})) + (Lens.Family2.Unchecked.lens + (\ x__ + -> case x__ of + (Prelude.Just (StakeCredential'ScriptHash x__val)) + -> Prelude.Just x__val + _otherwise -> Prelude.Nothing) + (\ _ y__ -> Prelude.fmap StakeCredential'ScriptHash y__)) +instance Data.ProtoLens.Field.HasField StakeCredential "scriptHash" Data.ByteString.ByteString where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StakeCredential'stakeCredential + (\ x__ y__ -> x__ {_StakeCredential'stakeCredential = y__})) + ((Prelude..) + (Lens.Family2.Unchecked.lens + (\ x__ + -> case x__ of + (Prelude.Just (StakeCredential'ScriptHash x__val)) + -> Prelude.Just x__val + _otherwise -> Prelude.Nothing) + (\ _ y__ -> Prelude.fmap StakeCredential'ScriptHash y__)) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)) +instance Data.ProtoLens.Message StakeCredential where + messageName _ + = Data.Text.pack "utxorpc.v1alpha.cardano.StakeCredential" + packedMessageDescriptor _ + = "\n\ + \\SIStakeCredential\DC2$\n\ + \\raddr_key_hash\CAN\SOH \SOH(\fH\NULR\vaddrKeyHash\DC2!\n\ + \\vscript_hash\CAN\STX \SOH(\fH\NULR\n\ + \scriptHashB\DC2\n\ + \\DLEstake_credential" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + addrKeyHash__field_descriptor + = Data.ProtoLens.FieldDescriptor + "addr_key_hash" + (Data.ProtoLens.ScalarField Data.ProtoLens.BytesField :: + Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'addrKeyHash")) :: + Data.ProtoLens.FieldDescriptor StakeCredential + scriptHash__field_descriptor + = Data.ProtoLens.FieldDescriptor + "script_hash" + (Data.ProtoLens.ScalarField Data.ProtoLens.BytesField :: + Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'scriptHash")) :: + Data.ProtoLens.FieldDescriptor StakeCredential + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, addrKeyHash__field_descriptor), + (Data.ProtoLens.Tag 2, scriptHash__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _StakeCredential'_unknownFields + (\ x__ y__ -> x__ {_StakeCredential'_unknownFields = y__}) + defMessage + = StakeCredential'_constructor + {_StakeCredential'stakeCredential = Prelude.Nothing, + _StakeCredential'_unknownFields = []} + parseMessage + = let + loop :: + StakeCredential + -> Data.ProtoLens.Encoding.Bytes.Parser StakeCredential + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getBytes + (Prelude.fromIntegral len)) + "addr_key_hash" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"addrKeyHash") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getBytes + (Prelude.fromIntegral len)) + "script_hash" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"scriptHash") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "StakeCredential" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'stakeCredential") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just (StakeCredential'AddrKeyHash v)) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + v) + (Prelude.Just (StakeCredential'ScriptHash v)) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData StakeCredential where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_StakeCredential'_unknownFields x__) + (Control.DeepSeq.deepseq (_StakeCredential'stakeCredential x__) ()) +instance Control.DeepSeq.NFData StakeCredential'StakeCredential where + rnf (StakeCredential'AddrKeyHash x__) = Control.DeepSeq.rnf x__ + rnf (StakeCredential'ScriptHash x__) = Control.DeepSeq.rnf x__ +_StakeCredential'AddrKeyHash :: + Data.ProtoLens.Prism.Prism' StakeCredential'StakeCredential Data.ByteString.ByteString +_StakeCredential'AddrKeyHash + = Data.ProtoLens.Prism.prism' + StakeCredential'AddrKeyHash + (\ p__ + -> case p__ of + (StakeCredential'AddrKeyHash p__val) -> Prelude.Just p__val + _otherwise -> Prelude.Nothing) +_StakeCredential'ScriptHash :: + Data.ProtoLens.Prism.Prism' StakeCredential'StakeCredential Data.ByteString.ByteString +_StakeCredential'ScriptHash + = Data.ProtoLens.Prism.prism' + StakeCredential'ScriptHash + (\ p__ + -> case p__ of + (StakeCredential'ScriptHash p__val) -> Prelude.Just p__val + _otherwise -> Prelude.Nothing) +{- | Fields : + + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.stakeCredential' @:: Lens' StakeDelegationCert StakeCredential@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'stakeCredential' @:: Lens' StakeDelegationCert (Prelude.Maybe StakeCredential)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.poolKeyhash' @:: Lens' StakeDelegationCert Data.ByteString.ByteString@ -} +data StakeDelegationCert + = StakeDelegationCert'_constructor {_StakeDelegationCert'stakeCredential :: !(Prelude.Maybe StakeCredential), + _StakeDelegationCert'poolKeyhash :: !Data.ByteString.ByteString, + _StakeDelegationCert'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show StakeDelegationCert where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField StakeDelegationCert "stakeCredential" StakeCredential where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StakeDelegationCert'stakeCredential + (\ x__ y__ -> x__ {_StakeDelegationCert'stakeCredential = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField StakeDelegationCert "maybe'stakeCredential" (Prelude.Maybe StakeCredential) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StakeDelegationCert'stakeCredential + (\ x__ y__ -> x__ {_StakeDelegationCert'stakeCredential = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField StakeDelegationCert "poolKeyhash" Data.ByteString.ByteString where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StakeDelegationCert'poolKeyhash + (\ x__ y__ -> x__ {_StakeDelegationCert'poolKeyhash = y__})) + Prelude.id +instance Data.ProtoLens.Message StakeDelegationCert where + messageName _ + = Data.Text.pack "utxorpc.v1alpha.cardano.StakeDelegationCert" + packedMessageDescriptor _ + = "\n\ + \\DC3StakeDelegationCert\DC2S\n\ + \\DLEstake_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SIstakeCredential\DC2!\n\ + \\fpool_keyhash\CAN\STX \SOH(\fR\vpoolKeyhash" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + stakeCredential__field_descriptor + = Data.ProtoLens.FieldDescriptor + "stake_credential" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor StakeCredential) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'stakeCredential")) :: + Data.ProtoLens.FieldDescriptor StakeDelegationCert + poolKeyhash__field_descriptor + = Data.ProtoLens.FieldDescriptor + "pool_keyhash" + (Data.ProtoLens.ScalarField Data.ProtoLens.BytesField :: + Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString) + (Data.ProtoLens.PlainField + Data.ProtoLens.Optional + (Data.ProtoLens.Field.field @"poolKeyhash")) :: + Data.ProtoLens.FieldDescriptor StakeDelegationCert + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, stakeCredential__field_descriptor), + (Data.ProtoLens.Tag 2, poolKeyhash__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _StakeDelegationCert'_unknownFields + (\ x__ y__ -> x__ {_StakeDelegationCert'_unknownFields = y__}) + defMessage + = StakeDelegationCert'_constructor + {_StakeDelegationCert'stakeCredential = Prelude.Nothing, + _StakeDelegationCert'poolKeyhash = Data.ProtoLens.fieldDefault, + _StakeDelegationCert'_unknownFields = []} + parseMessage + = let + loop :: + StakeDelegationCert + -> Data.ProtoLens.Encoding.Bytes.Parser StakeDelegationCert + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "stake_credential" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"stakeCredential") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getBytes + (Prelude.fromIntegral len)) + "pool_keyhash" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"poolKeyhash") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "StakeDelegationCert" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'stakeCredential") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (let + _v + = Lens.Family2.view (Data.ProtoLens.Field.field @"poolKeyhash") _x + in + if (Prelude.==) _v Data.ProtoLens.fieldDefault then + Data.Monoid.mempty + else + (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData StakeDelegationCert where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_StakeDelegationCert'_unknownFields x__) + (Control.DeepSeq.deepseq + (_StakeDelegationCert'stakeCredential x__) + (Control.DeepSeq.deepseq + (_StakeDelegationCert'poolKeyhash x__) ())) +{- | Fields : + + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.stakeCredential' @:: Lens' StakeRegDelegCert StakeCredential@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'stakeCredential' @:: Lens' StakeRegDelegCert (Prelude.Maybe StakeCredential)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.poolKeyhash' @:: Lens' StakeRegDelegCert Data.ByteString.ByteString@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.coin' @:: Lens' StakeRegDelegCert Data.Word.Word64@ -} +data StakeRegDelegCert + = StakeRegDelegCert'_constructor {_StakeRegDelegCert'stakeCredential :: !(Prelude.Maybe StakeCredential), + _StakeRegDelegCert'poolKeyhash :: !Data.ByteString.ByteString, + _StakeRegDelegCert'coin :: !Data.Word.Word64, + _StakeRegDelegCert'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show StakeRegDelegCert where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField StakeRegDelegCert "stakeCredential" StakeCredential where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StakeRegDelegCert'stakeCredential + (\ x__ y__ -> x__ {_StakeRegDelegCert'stakeCredential = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField StakeRegDelegCert "maybe'stakeCredential" (Prelude.Maybe StakeCredential) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StakeRegDelegCert'stakeCredential + (\ x__ y__ -> x__ {_StakeRegDelegCert'stakeCredential = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField StakeRegDelegCert "poolKeyhash" Data.ByteString.ByteString where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StakeRegDelegCert'poolKeyhash + (\ x__ y__ -> x__ {_StakeRegDelegCert'poolKeyhash = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField StakeRegDelegCert "coin" Data.Word.Word64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StakeRegDelegCert'coin + (\ x__ y__ -> x__ {_StakeRegDelegCert'coin = y__})) + Prelude.id +instance Data.ProtoLens.Message StakeRegDelegCert where + messageName _ + = Data.Text.pack "utxorpc.v1alpha.cardano.StakeRegDelegCert" + packedMessageDescriptor _ + = "\n\ + \\DC1StakeRegDelegCert\DC2S\n\ + \\DLEstake_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SIstakeCredential\DC2!\n\ + \\fpool_keyhash\CAN\STX \SOH(\fR\vpoolKeyhash\DC2\DC2\n\ + \\EOTcoin\CAN\ETX \SOH(\EOTR\EOTcoin" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + stakeCredential__field_descriptor + = Data.ProtoLens.FieldDescriptor + "stake_credential" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor StakeCredential) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'stakeCredential")) :: + Data.ProtoLens.FieldDescriptor StakeRegDelegCert + poolKeyhash__field_descriptor + = Data.ProtoLens.FieldDescriptor + "pool_keyhash" + (Data.ProtoLens.ScalarField Data.ProtoLens.BytesField :: + Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString) + (Data.ProtoLens.PlainField + Data.ProtoLens.Optional + (Data.ProtoLens.Field.field @"poolKeyhash")) :: + Data.ProtoLens.FieldDescriptor StakeRegDelegCert + coin__field_descriptor + = Data.ProtoLens.FieldDescriptor + "coin" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64) + (Data.ProtoLens.PlainField + Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"coin")) :: + Data.ProtoLens.FieldDescriptor StakeRegDelegCert + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, stakeCredential__field_descriptor), + (Data.ProtoLens.Tag 2, poolKeyhash__field_descriptor), + (Data.ProtoLens.Tag 3, coin__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _StakeRegDelegCert'_unknownFields + (\ x__ y__ -> x__ {_StakeRegDelegCert'_unknownFields = y__}) + defMessage + = StakeRegDelegCert'_constructor + {_StakeRegDelegCert'stakeCredential = Prelude.Nothing, + _StakeRegDelegCert'poolKeyhash = Data.ProtoLens.fieldDefault, + _StakeRegDelegCert'coin = Data.ProtoLens.fieldDefault, + _StakeRegDelegCert'_unknownFields = []} + parseMessage + = let + loop :: + StakeRegDelegCert + -> Data.ProtoLens.Encoding.Bytes.Parser StakeRegDelegCert + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "stake_credential" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"stakeCredential") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getBytes + (Prelude.fromIntegral len)) + "pool_keyhash" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"poolKeyhash") y x) + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + Data.ProtoLens.Encoding.Bytes.getVarInt "coin" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"coin") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "StakeRegDelegCert" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'stakeCredential") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (let + _v + = Lens.Family2.view (Data.ProtoLens.Field.field @"poolKeyhash") _x + in + if (Prelude.==) _v Data.ProtoLens.fieldDefault then + Data.Monoid.mempty + else + (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + _v)) + ((Data.Monoid.<>) + (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"coin") _x + in + if (Prelude.==) _v Data.ProtoLens.fieldDefault then + Data.Monoid.mempty + else + (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + (Data.ProtoLens.Encoding.Bytes.putVarInt _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData StakeRegDelegCert where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_StakeRegDelegCert'_unknownFields x__) + (Control.DeepSeq.deepseq + (_StakeRegDelegCert'stakeCredential x__) + (Control.DeepSeq.deepseq + (_StakeRegDelegCert'poolKeyhash x__) + (Control.DeepSeq.deepseq (_StakeRegDelegCert'coin x__) ()))) +{- | Fields : + + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.stakeCredential' @:: Lens' StakeVoteDelegCert StakeCredential@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'stakeCredential' @:: Lens' StakeVoteDelegCert (Prelude.Maybe StakeCredential)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.poolKeyhash' @:: Lens' StakeVoteDelegCert Data.ByteString.ByteString@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.drep' @:: Lens' StakeVoteDelegCert DRep@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'drep' @:: Lens' StakeVoteDelegCert (Prelude.Maybe DRep)@ -} +data StakeVoteDelegCert + = StakeVoteDelegCert'_constructor {_StakeVoteDelegCert'stakeCredential :: !(Prelude.Maybe StakeCredential), + _StakeVoteDelegCert'poolKeyhash :: !Data.ByteString.ByteString, + _StakeVoteDelegCert'drep :: !(Prelude.Maybe DRep), + _StakeVoteDelegCert'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show StakeVoteDelegCert where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField StakeVoteDelegCert "stakeCredential" StakeCredential where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StakeVoteDelegCert'stakeCredential + (\ x__ y__ -> x__ {_StakeVoteDelegCert'stakeCredential = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField StakeVoteDelegCert "maybe'stakeCredential" (Prelude.Maybe StakeCredential) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StakeVoteDelegCert'stakeCredential + (\ x__ y__ -> x__ {_StakeVoteDelegCert'stakeCredential = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField StakeVoteDelegCert "poolKeyhash" Data.ByteString.ByteString where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StakeVoteDelegCert'poolKeyhash + (\ x__ y__ -> x__ {_StakeVoteDelegCert'poolKeyhash = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField StakeVoteDelegCert "drep" DRep where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StakeVoteDelegCert'drep + (\ x__ y__ -> x__ {_StakeVoteDelegCert'drep = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField StakeVoteDelegCert "maybe'drep" (Prelude.Maybe DRep) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StakeVoteDelegCert'drep + (\ x__ y__ -> x__ {_StakeVoteDelegCert'drep = y__})) + Prelude.id +instance Data.ProtoLens.Message StakeVoteDelegCert where + messageName _ + = Data.Text.pack "utxorpc.v1alpha.cardano.StakeVoteDelegCert" + packedMessageDescriptor _ + = "\n\ + \\DC2StakeVoteDelegCert\DC2S\n\ + \\DLEstake_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SIstakeCredential\DC2!\n\ + \\fpool_keyhash\CAN\STX \SOH(\fR\vpoolKeyhash\DC21\n\ + \\EOTdrep\CAN\ETX \SOH(\v2\GS.utxorpc.v1alpha.cardano.DRepR\EOTdrep" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + stakeCredential__field_descriptor + = Data.ProtoLens.FieldDescriptor + "stake_credential" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor StakeCredential) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'stakeCredential")) :: + Data.ProtoLens.FieldDescriptor StakeVoteDelegCert + poolKeyhash__field_descriptor + = Data.ProtoLens.FieldDescriptor + "pool_keyhash" + (Data.ProtoLens.ScalarField Data.ProtoLens.BytesField :: + Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString) + (Data.ProtoLens.PlainField + Data.ProtoLens.Optional + (Data.ProtoLens.Field.field @"poolKeyhash")) :: + Data.ProtoLens.FieldDescriptor StakeVoteDelegCert + drep__field_descriptor + = Data.ProtoLens.FieldDescriptor + "drep" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor DRep) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'drep")) :: + Data.ProtoLens.FieldDescriptor StakeVoteDelegCert + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, stakeCredential__field_descriptor), + (Data.ProtoLens.Tag 2, poolKeyhash__field_descriptor), + (Data.ProtoLens.Tag 3, drep__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _StakeVoteDelegCert'_unknownFields + (\ x__ y__ -> x__ {_StakeVoteDelegCert'_unknownFields = y__}) + defMessage + = StakeVoteDelegCert'_constructor + {_StakeVoteDelegCert'stakeCredential = Prelude.Nothing, + _StakeVoteDelegCert'poolKeyhash = Data.ProtoLens.fieldDefault, + _StakeVoteDelegCert'drep = Prelude.Nothing, + _StakeVoteDelegCert'_unknownFields = []} + parseMessage + = let + loop :: + StakeVoteDelegCert + -> Data.ProtoLens.Encoding.Bytes.Parser StakeVoteDelegCert + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "stake_credential" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"stakeCredential") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getBytes + (Prelude.fromIntegral len)) + "pool_keyhash" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"poolKeyhash") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "drep" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"drep") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "StakeVoteDelegCert" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'stakeCredential") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (let + _v + = Lens.Family2.view (Data.ProtoLens.Field.field @"poolKeyhash") _x + in + if (Prelude.==) _v Data.ProtoLens.fieldDefault then + Data.Monoid.mempty + else + (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'drep") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData StakeVoteDelegCert where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_StakeVoteDelegCert'_unknownFields x__) + (Control.DeepSeq.deepseq + (_StakeVoteDelegCert'stakeCredential x__) + (Control.DeepSeq.deepseq + (_StakeVoteDelegCert'poolKeyhash x__) + (Control.DeepSeq.deepseq (_StakeVoteDelegCert'drep x__) ()))) +{- | Fields : + + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.stakeCredential' @:: Lens' StakeVoteRegDelegCert StakeCredential@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'stakeCredential' @:: Lens' StakeVoteRegDelegCert (Prelude.Maybe StakeCredential)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.poolKeyhash' @:: Lens' StakeVoteRegDelegCert Data.ByteString.ByteString@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.drep' @:: Lens' StakeVoteRegDelegCert DRep@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'drep' @:: Lens' StakeVoteRegDelegCert (Prelude.Maybe DRep)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.coin' @:: Lens' StakeVoteRegDelegCert Data.Word.Word64@ -} +data StakeVoteRegDelegCert + = StakeVoteRegDelegCert'_constructor {_StakeVoteRegDelegCert'stakeCredential :: !(Prelude.Maybe StakeCredential), + _StakeVoteRegDelegCert'poolKeyhash :: !Data.ByteString.ByteString, + _StakeVoteRegDelegCert'drep :: !(Prelude.Maybe DRep), + _StakeVoteRegDelegCert'coin :: !Data.Word.Word64, + _StakeVoteRegDelegCert'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show StakeVoteRegDelegCert where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField StakeVoteRegDelegCert "stakeCredential" StakeCredential where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StakeVoteRegDelegCert'stakeCredential + (\ x__ y__ -> x__ {_StakeVoteRegDelegCert'stakeCredential = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField StakeVoteRegDelegCert "maybe'stakeCredential" (Prelude.Maybe StakeCredential) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StakeVoteRegDelegCert'stakeCredential + (\ x__ y__ -> x__ {_StakeVoteRegDelegCert'stakeCredential = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField StakeVoteRegDelegCert "poolKeyhash" Data.ByteString.ByteString where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StakeVoteRegDelegCert'poolKeyhash + (\ x__ y__ -> x__ {_StakeVoteRegDelegCert'poolKeyhash = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField StakeVoteRegDelegCert "drep" DRep where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StakeVoteRegDelegCert'drep + (\ x__ y__ -> x__ {_StakeVoteRegDelegCert'drep = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField StakeVoteRegDelegCert "maybe'drep" (Prelude.Maybe DRep) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StakeVoteRegDelegCert'drep + (\ x__ y__ -> x__ {_StakeVoteRegDelegCert'drep = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField StakeVoteRegDelegCert "coin" Data.Word.Word64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StakeVoteRegDelegCert'coin + (\ x__ y__ -> x__ {_StakeVoteRegDelegCert'coin = y__})) + Prelude.id +instance Data.ProtoLens.Message StakeVoteRegDelegCert where + messageName _ + = Data.Text.pack "utxorpc.v1alpha.cardano.StakeVoteRegDelegCert" + packedMessageDescriptor _ + = "\n\ + \\NAKStakeVoteRegDelegCert\DC2S\n\ + \\DLEstake_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SIstakeCredential\DC2!\n\ + \\fpool_keyhash\CAN\STX \SOH(\fR\vpoolKeyhash\DC21\n\ + \\EOTdrep\CAN\ETX \SOH(\v2\GS.utxorpc.v1alpha.cardano.DRepR\EOTdrep\DC2\DC2\n\ + \\EOTcoin\CAN\EOT \SOH(\EOTR\EOTcoin" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + stakeCredential__field_descriptor + = Data.ProtoLens.FieldDescriptor + "stake_credential" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor StakeCredential) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'stakeCredential")) :: + Data.ProtoLens.FieldDescriptor StakeVoteRegDelegCert + poolKeyhash__field_descriptor + = Data.ProtoLens.FieldDescriptor + "pool_keyhash" + (Data.ProtoLens.ScalarField Data.ProtoLens.BytesField :: + Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString) + (Data.ProtoLens.PlainField + Data.ProtoLens.Optional + (Data.ProtoLens.Field.field @"poolKeyhash")) :: + Data.ProtoLens.FieldDescriptor StakeVoteRegDelegCert + drep__field_descriptor + = Data.ProtoLens.FieldDescriptor + "drep" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor DRep) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'drep")) :: + Data.ProtoLens.FieldDescriptor StakeVoteRegDelegCert + coin__field_descriptor + = Data.ProtoLens.FieldDescriptor + "coin" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64) + (Data.ProtoLens.PlainField + Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"coin")) :: + Data.ProtoLens.FieldDescriptor StakeVoteRegDelegCert + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, stakeCredential__field_descriptor), + (Data.ProtoLens.Tag 2, poolKeyhash__field_descriptor), + (Data.ProtoLens.Tag 3, drep__field_descriptor), + (Data.ProtoLens.Tag 4, coin__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _StakeVoteRegDelegCert'_unknownFields + (\ x__ y__ -> x__ {_StakeVoteRegDelegCert'_unknownFields = y__}) + defMessage + = StakeVoteRegDelegCert'_constructor + {_StakeVoteRegDelegCert'stakeCredential = Prelude.Nothing, + _StakeVoteRegDelegCert'poolKeyhash = Data.ProtoLens.fieldDefault, + _StakeVoteRegDelegCert'drep = Prelude.Nothing, + _StakeVoteRegDelegCert'coin = Data.ProtoLens.fieldDefault, + _StakeVoteRegDelegCert'_unknownFields = []} + parseMessage + = let + loop :: + StakeVoteRegDelegCert + -> Data.ProtoLens.Encoding.Bytes.Parser StakeVoteRegDelegCert + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "stake_credential" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"stakeCredential") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getBytes + (Prelude.fromIntegral len)) + "pool_keyhash" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"poolKeyhash") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "drep" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"drep") y x) + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + Data.ProtoLens.Encoding.Bytes.getVarInt "coin" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"coin") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "StakeVoteRegDelegCert" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'stakeCredential") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (let + _v + = Lens.Family2.view (Data.ProtoLens.Field.field @"poolKeyhash") _x + in + if (Prelude.==) _v Data.ProtoLens.fieldDefault then + Data.Monoid.mempty + else + (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'drep") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"coin") _x + in + if (Prelude.==) _v Data.ProtoLens.fieldDefault then + Data.Monoid.mempty + else + (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + (Data.ProtoLens.Encoding.Bytes.putVarInt _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))) +instance Control.DeepSeq.NFData StakeVoteRegDelegCert where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_StakeVoteRegDelegCert'_unknownFields x__) + (Control.DeepSeq.deepseq + (_StakeVoteRegDelegCert'stakeCredential x__) + (Control.DeepSeq.deepseq + (_StakeVoteRegDelegCert'poolKeyhash x__) + (Control.DeepSeq.deepseq + (_StakeVoteRegDelegCert'drep x__) + (Control.DeepSeq.deepseq (_StakeVoteRegDelegCert'coin x__) ())))) +{- | Fields : + + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.inputs' @:: Lens' Tx [TxInput]@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.vec'inputs' @:: Lens' Tx (Data.Vector.Vector TxInput)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.outputs' @:: Lens' Tx [TxOutput]@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.vec'outputs' @:: Lens' Tx (Data.Vector.Vector TxOutput)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.certificates' @:: Lens' Tx [Certificate]@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.vec'certificates' @:: Lens' Tx (Data.Vector.Vector Certificate)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.withdrawals' @:: Lens' Tx [Withdrawal]@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.vec'withdrawals' @:: Lens' Tx (Data.Vector.Vector Withdrawal)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.mint' @:: Lens' Tx [Multiasset]@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.vec'mint' @:: Lens' Tx (Data.Vector.Vector Multiasset)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.referenceInputs' @:: Lens' Tx [TxInput]@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.vec'referenceInputs' @:: Lens' Tx (Data.Vector.Vector TxInput)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.witnesses' @:: Lens' Tx WitnessSet@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'witnesses' @:: Lens' Tx (Prelude.Maybe WitnessSet)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.collateral' @:: Lens' Tx Collateral@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'collateral' @:: Lens' Tx (Prelude.Maybe Collateral)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.fee' @:: Lens' Tx Data.Word.Word64@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.validity' @:: Lens' Tx TxValidity@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'validity' @:: Lens' Tx (Prelude.Maybe TxValidity)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.successful' @:: Lens' Tx Prelude.Bool@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.auxiliary' @:: Lens' Tx AuxData@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'auxiliary' @:: Lens' Tx (Prelude.Maybe AuxData)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.hash' @:: Lens' Tx Data.ByteString.ByteString@ -} +data Tx + = Tx'_constructor {_Tx'inputs :: !(Data.Vector.Vector TxInput), + _Tx'outputs :: !(Data.Vector.Vector TxOutput), + _Tx'certificates :: !(Data.Vector.Vector Certificate), + _Tx'withdrawals :: !(Data.Vector.Vector Withdrawal), + _Tx'mint :: !(Data.Vector.Vector Multiasset), + _Tx'referenceInputs :: !(Data.Vector.Vector TxInput), + _Tx'witnesses :: !(Prelude.Maybe WitnessSet), + _Tx'collateral :: !(Prelude.Maybe Collateral), + _Tx'fee :: !Data.Word.Word64, + _Tx'validity :: !(Prelude.Maybe TxValidity), + _Tx'successful :: !Prelude.Bool, + _Tx'auxiliary :: !(Prelude.Maybe AuxData), + _Tx'hash :: !Data.ByteString.ByteString, + _Tx'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show Tx where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField Tx "inputs" [TxInput] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Tx'inputs (\ x__ y__ -> x__ {_Tx'inputs = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField Tx "vec'inputs" (Data.Vector.Vector TxInput) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Tx'inputs (\ x__ y__ -> x__ {_Tx'inputs = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Tx "outputs" [TxOutput] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Tx'outputs (\ x__ y__ -> x__ {_Tx'outputs = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField Tx "vec'outputs" (Data.Vector.Vector TxOutput) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Tx'outputs (\ x__ y__ -> x__ {_Tx'outputs = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Tx "certificates" [Certificate] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Tx'certificates (\ x__ y__ -> x__ {_Tx'certificates = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField Tx "vec'certificates" (Data.Vector.Vector Certificate) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Tx'certificates (\ x__ y__ -> x__ {_Tx'certificates = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Tx "withdrawals" [Withdrawal] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Tx'withdrawals (\ x__ y__ -> x__ {_Tx'withdrawals = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField Tx "vec'withdrawals" (Data.Vector.Vector Withdrawal) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Tx'withdrawals (\ x__ y__ -> x__ {_Tx'withdrawals = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Tx "mint" [Multiasset] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Tx'mint (\ x__ y__ -> x__ {_Tx'mint = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField Tx "vec'mint" (Data.Vector.Vector Multiasset) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Tx'mint (\ x__ y__ -> x__ {_Tx'mint = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Tx "referenceInputs" [TxInput] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Tx'referenceInputs (\ x__ y__ -> x__ {_Tx'referenceInputs = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField Tx "vec'referenceInputs" (Data.Vector.Vector TxInput) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Tx'referenceInputs (\ x__ y__ -> x__ {_Tx'referenceInputs = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Tx "witnesses" WitnessSet where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Tx'witnesses (\ x__ y__ -> x__ {_Tx'witnesses = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField Tx "maybe'witnesses" (Prelude.Maybe WitnessSet) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Tx'witnesses (\ x__ y__ -> x__ {_Tx'witnesses = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Tx "collateral" Collateral where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Tx'collateral (\ x__ y__ -> x__ {_Tx'collateral = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField Tx "maybe'collateral" (Prelude.Maybe Collateral) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Tx'collateral (\ x__ y__ -> x__ {_Tx'collateral = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Tx "fee" Data.Word.Word64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Tx'fee (\ x__ y__ -> x__ {_Tx'fee = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Tx "validity" TxValidity where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Tx'validity (\ x__ y__ -> x__ {_Tx'validity = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField Tx "maybe'validity" (Prelude.Maybe TxValidity) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Tx'validity (\ x__ y__ -> x__ {_Tx'validity = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Tx "successful" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Tx'successful (\ x__ y__ -> x__ {_Tx'successful = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Tx "auxiliary" AuxData where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Tx'auxiliary (\ x__ y__ -> x__ {_Tx'auxiliary = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField Tx "maybe'auxiliary" (Prelude.Maybe AuxData) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Tx'auxiliary (\ x__ y__ -> x__ {_Tx'auxiliary = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Tx "hash" Data.ByteString.ByteString where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Tx'hash (\ x__ y__ -> x__ {_Tx'hash = y__})) + Prelude.id +instance Data.ProtoLens.Message Tx where + messageName _ = Data.Text.pack "utxorpc.v1alpha.cardano.Tx" + packedMessageDescriptor _ + = "\n\ + \\STXTx\DC28\n\ + \\ACKinputs\CAN\SOH \ETX(\v2 .utxorpc.v1alpha.cardano.TxInputR\ACKinputs\DC2;\n\ + \\aoutputs\CAN\STX \ETX(\v2!.utxorpc.v1alpha.cardano.TxOutputR\aoutputs\DC2H\n\ + \\fcertificates\CAN\ETX \ETX(\v2$.utxorpc.v1alpha.cardano.CertificateR\fcertificates\DC2E\n\ + \\vwithdrawals\CAN\EOT \ETX(\v2#.utxorpc.v1alpha.cardano.WithdrawalR\vwithdrawals\DC27\n\ + \\EOTmint\CAN\ENQ \ETX(\v2#.utxorpc.v1alpha.cardano.MultiassetR\EOTmint\DC2K\n\ + \\DLEreference_inputs\CAN\ACK \ETX(\v2 .utxorpc.v1alpha.cardano.TxInputR\SIreferenceInputs\DC2A\n\ + \\twitnesses\CAN\a \SOH(\v2#.utxorpc.v1alpha.cardano.WitnessSetR\twitnesses\DC2C\n\ + \\n\ + \collateral\CAN\b \SOH(\v2#.utxorpc.v1alpha.cardano.CollateralR\n\ + \collateral\DC2\DLE\n\ + \\ETXfee\CAN\t \SOH(\EOTR\ETXfee\DC2?\n\ + \\bvalidity\CAN\n\ + \ \SOH(\v2#.utxorpc.v1alpha.cardano.TxValidityR\bvalidity\DC2\RS\n\ + \\n\ + \successful\CAN\v \SOH(\bR\n\ + \successful\DC2>\n\ + \\tauxiliary\CAN\f \SOH(\v2 .utxorpc.v1alpha.cardano.AuxDataR\tauxiliary\DC2\DC2\n\ + \\EOThash\CAN\r \SOH(\fR\EOThash" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + inputs__field_descriptor + = Data.ProtoLens.FieldDescriptor + "inputs" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor TxInput) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked (Data.ProtoLens.Field.field @"inputs")) :: + Data.ProtoLens.FieldDescriptor Tx + outputs__field_descriptor + = Data.ProtoLens.FieldDescriptor + "outputs" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor TxOutput) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked (Data.ProtoLens.Field.field @"outputs")) :: + Data.ProtoLens.FieldDescriptor Tx + certificates__field_descriptor + = Data.ProtoLens.FieldDescriptor + "certificates" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Certificate) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"certificates")) :: + Data.ProtoLens.FieldDescriptor Tx + withdrawals__field_descriptor + = Data.ProtoLens.FieldDescriptor + "withdrawals" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Withdrawal) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"withdrawals")) :: + Data.ProtoLens.FieldDescriptor Tx + mint__field_descriptor + = Data.ProtoLens.FieldDescriptor + "mint" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Multiasset) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked (Data.ProtoLens.Field.field @"mint")) :: + Data.ProtoLens.FieldDescriptor Tx + referenceInputs__field_descriptor + = Data.ProtoLens.FieldDescriptor + "reference_inputs" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor TxInput) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"referenceInputs")) :: + Data.ProtoLens.FieldDescriptor Tx + witnesses__field_descriptor + = Data.ProtoLens.FieldDescriptor + "witnesses" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor WitnessSet) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'witnesses")) :: + Data.ProtoLens.FieldDescriptor Tx + collateral__field_descriptor + = Data.ProtoLens.FieldDescriptor + "collateral" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Collateral) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'collateral")) :: + Data.ProtoLens.FieldDescriptor Tx + fee__field_descriptor + = Data.ProtoLens.FieldDescriptor + "fee" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64) + (Data.ProtoLens.PlainField + Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"fee")) :: + Data.ProtoLens.FieldDescriptor Tx + validity__field_descriptor + = Data.ProtoLens.FieldDescriptor + "validity" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor TxValidity) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'validity")) :: + Data.ProtoLens.FieldDescriptor Tx + successful__field_descriptor + = Data.ProtoLens.FieldDescriptor + "successful" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.PlainField + Data.ProtoLens.Optional + (Data.ProtoLens.Field.field @"successful")) :: + Data.ProtoLens.FieldDescriptor Tx + auxiliary__field_descriptor + = Data.ProtoLens.FieldDescriptor + "auxiliary" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AuxData) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'auxiliary")) :: + Data.ProtoLens.FieldDescriptor Tx + hash__field_descriptor + = Data.ProtoLens.FieldDescriptor + "hash" + (Data.ProtoLens.ScalarField Data.ProtoLens.BytesField :: + Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString) + (Data.ProtoLens.PlainField + Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"hash")) :: + Data.ProtoLens.FieldDescriptor Tx + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, inputs__field_descriptor), + (Data.ProtoLens.Tag 2, outputs__field_descriptor), + (Data.ProtoLens.Tag 3, certificates__field_descriptor), + (Data.ProtoLens.Tag 4, withdrawals__field_descriptor), + (Data.ProtoLens.Tag 5, mint__field_descriptor), + (Data.ProtoLens.Tag 6, referenceInputs__field_descriptor), + (Data.ProtoLens.Tag 7, witnesses__field_descriptor), + (Data.ProtoLens.Tag 8, collateral__field_descriptor), + (Data.ProtoLens.Tag 9, fee__field_descriptor), + (Data.ProtoLens.Tag 10, validity__field_descriptor), + (Data.ProtoLens.Tag 11, successful__field_descriptor), + (Data.ProtoLens.Tag 12, auxiliary__field_descriptor), + (Data.ProtoLens.Tag 13, hash__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _Tx'_unknownFields (\ x__ y__ -> x__ {_Tx'_unknownFields = y__}) + defMessage + = Tx'_constructor + {_Tx'inputs = Data.Vector.Generic.empty, + _Tx'outputs = Data.Vector.Generic.empty, + _Tx'certificates = Data.Vector.Generic.empty, + _Tx'withdrawals = Data.Vector.Generic.empty, + _Tx'mint = Data.Vector.Generic.empty, + _Tx'referenceInputs = Data.Vector.Generic.empty, + _Tx'witnesses = Prelude.Nothing, _Tx'collateral = Prelude.Nothing, + _Tx'fee = Data.ProtoLens.fieldDefault, + _Tx'validity = Prelude.Nothing, + _Tx'successful = Data.ProtoLens.fieldDefault, + _Tx'auxiliary = Prelude.Nothing, + _Tx'hash = Data.ProtoLens.fieldDefault, _Tx'_unknownFields = []} + parseMessage + = let + loop :: + Tx + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Certificate + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld TxInput + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Multiasset + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld TxOutput + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld TxInput + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Withdrawal + -> Data.ProtoLens.Encoding.Bytes.Parser Tx + loop + x + mutable'certificates + mutable'inputs + mutable'mint + mutable'outputs + mutable'referenceInputs + mutable'withdrawals + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'certificates <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'certificates) + frozen'inputs <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'inputs) + frozen'mint <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze mutable'mint) + frozen'outputs <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'outputs) + frozen'referenceInputs <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'referenceInputs) + frozen'withdrawals <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'withdrawals) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'certificates") + frozen'certificates + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'inputs") frozen'inputs + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'mint") frozen'mint + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'outputs") frozen'outputs + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'referenceInputs") + frozen'referenceInputs + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'withdrawals") + frozen'withdrawals x))))))) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "inputs" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'inputs y) + loop + x mutable'certificates v mutable'mint mutable'outputs + mutable'referenceInputs mutable'withdrawals + 18 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "outputs" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'outputs y) + loop + x mutable'certificates mutable'inputs mutable'mint v + mutable'referenceInputs mutable'withdrawals + 26 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "certificates" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'certificates y) + loop + x v mutable'inputs mutable'mint mutable'outputs + mutable'referenceInputs mutable'withdrawals + 34 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "withdrawals" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'withdrawals y) + loop + x mutable'certificates mutable'inputs mutable'mint mutable'outputs + mutable'referenceInputs v + 42 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "mint" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'mint y) + loop + x mutable'certificates mutable'inputs v mutable'outputs + mutable'referenceInputs mutable'withdrawals + 50 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "reference_inputs" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'referenceInputs y) + loop + x mutable'certificates mutable'inputs mutable'mint mutable'outputs + v mutable'withdrawals + 58 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "witnesses" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"witnesses") y x) + mutable'certificates mutable'inputs mutable'mint mutable'outputs + mutable'referenceInputs mutable'withdrawals + 66 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "collateral" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"collateral") y x) + mutable'certificates mutable'inputs mutable'mint mutable'outputs + mutable'referenceInputs mutable'withdrawals + 72 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + Data.ProtoLens.Encoding.Bytes.getVarInt "fee" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"fee") y x) + mutable'certificates mutable'inputs mutable'mint mutable'outputs + mutable'referenceInputs mutable'withdrawals + 82 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "validity" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"validity") y x) + mutable'certificates mutable'inputs mutable'mint mutable'outputs + mutable'referenceInputs mutable'withdrawals + 88 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "successful" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"successful") y x) + mutable'certificates mutable'inputs mutable'mint mutable'outputs + mutable'referenceInputs mutable'withdrawals + 98 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "auxiliary" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"auxiliary") y x) + mutable'certificates mutable'inputs mutable'mint mutable'outputs + mutable'referenceInputs mutable'withdrawals + 106 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getBytes + (Prelude.fromIntegral len)) + "hash" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"hash") y x) + mutable'certificates mutable'inputs mutable'mint mutable'outputs + mutable'referenceInputs mutable'withdrawals + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'certificates mutable'inputs mutable'mint mutable'outputs + mutable'referenceInputs mutable'withdrawals + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'certificates <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'inputs <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'mint <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'outputs <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'referenceInputs <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'withdrawals <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage mutable'certificates mutable'inputs + mutable'mint mutable'outputs mutable'referenceInputs + mutable'withdrawals) + "Tx" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view (Data.ProtoLens.Field.field @"vec'inputs") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view (Data.ProtoLens.Field.field @"vec'outputs") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'certificates") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'withdrawals") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view (Data.ProtoLens.Field.field @"vec'mint") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 50) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'referenceInputs") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'witnesses") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 58) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'collateral") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 66) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (let + _v + = Lens.Family2.view (Data.ProtoLens.Field.field @"fee") _x + in + if (Prelude.==) _v Data.ProtoLens.fieldDefault then + Data.Monoid.mempty + else + (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 72) + (Data.ProtoLens.Encoding.Bytes.putVarInt _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'validity") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 82) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (let + _v + = Lens.Family2.view + (Data.ProtoLens.Field.field @"successful") _x + in + if (Prelude.==) _v Data.ProtoLens.fieldDefault then + Data.Monoid.mempty + else + (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 88) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'auxiliary") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 98) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (let + _v + = Lens.Family2.view + (Data.ProtoLens.Field.field @"hash") _x + in + if (Prelude.==) + _v Data.ProtoLens.fieldDefault then + Data.Monoid.mempty + else + (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 106) + ((\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view + Data.ProtoLens.unknownFields _x)))))))))))))) +instance Control.DeepSeq.NFData Tx where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_Tx'_unknownFields x__) + (Control.DeepSeq.deepseq + (_Tx'inputs x__) + (Control.DeepSeq.deepseq + (_Tx'outputs x__) + (Control.DeepSeq.deepseq + (_Tx'certificates x__) + (Control.DeepSeq.deepseq + (_Tx'withdrawals x__) + (Control.DeepSeq.deepseq + (_Tx'mint x__) + (Control.DeepSeq.deepseq + (_Tx'referenceInputs x__) + (Control.DeepSeq.deepseq + (_Tx'witnesses x__) + (Control.DeepSeq.deepseq + (_Tx'collateral x__) + (Control.DeepSeq.deepseq + (_Tx'fee x__) + (Control.DeepSeq.deepseq + (_Tx'validity x__) + (Control.DeepSeq.deepseq + (_Tx'successful x__) + (Control.DeepSeq.deepseq + (_Tx'auxiliary x__) + (Control.DeepSeq.deepseq + (_Tx'hash x__) ()))))))))))))) +{- | Fields : + + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.fee' @:: Lens' TxEval Data.Word.Word64@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.exUnits' @:: Lens' TxEval ExUnits@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'exUnits' @:: Lens' TxEval (Prelude.Maybe ExUnits)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.errors' @:: Lens' TxEval [EvalError]@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.vec'errors' @:: Lens' TxEval (Data.Vector.Vector EvalError)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.traces' @:: Lens' TxEval [EvalTrace]@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.vec'traces' @:: Lens' TxEval (Data.Vector.Vector EvalTrace)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.redeemers' @:: Lens' TxEval [Redeemer]@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.vec'redeemers' @:: Lens' TxEval (Data.Vector.Vector Redeemer)@ -} +data TxEval + = TxEval'_constructor {_TxEval'fee :: !Data.Word.Word64, + _TxEval'exUnits :: !(Prelude.Maybe ExUnits), + _TxEval'errors :: !(Data.Vector.Vector EvalError), + _TxEval'traces :: !(Data.Vector.Vector EvalTrace), + _TxEval'redeemers :: !(Data.Vector.Vector Redeemer), + _TxEval'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show TxEval where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField TxEval "fee" Data.Word.Word64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TxEval'fee (\ x__ y__ -> x__ {_TxEval'fee = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField TxEval "exUnits" ExUnits where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TxEval'exUnits (\ x__ y__ -> x__ {_TxEval'exUnits = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField TxEval "maybe'exUnits" (Prelude.Maybe ExUnits) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TxEval'exUnits (\ x__ y__ -> x__ {_TxEval'exUnits = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField TxEval "errors" [EvalError] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TxEval'errors (\ x__ y__ -> x__ {_TxEval'errors = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField TxEval "vec'errors" (Data.Vector.Vector EvalError) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TxEval'errors (\ x__ y__ -> x__ {_TxEval'errors = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField TxEval "traces" [EvalTrace] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TxEval'traces (\ x__ y__ -> x__ {_TxEval'traces = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField TxEval "vec'traces" (Data.Vector.Vector EvalTrace) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TxEval'traces (\ x__ y__ -> x__ {_TxEval'traces = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField TxEval "redeemers" [Redeemer] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TxEval'redeemers (\ x__ y__ -> x__ {_TxEval'redeemers = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField TxEval "vec'redeemers" (Data.Vector.Vector Redeemer) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TxEval'redeemers (\ x__ y__ -> x__ {_TxEval'redeemers = y__})) + Prelude.id +instance Data.ProtoLens.Message TxEval where + messageName _ = Data.Text.pack "utxorpc.v1alpha.cardano.TxEval" + packedMessageDescriptor _ + = "\n\ + \\ACKTxEval\DC2\DLE\n\ + \\ETXfee\CAN\SOH \SOH(\EOTR\ETXfee\DC2;\n\ + \\bex_units\CAN\STX \SOH(\v2 .utxorpc.v1alpha.cardano.ExUnitsR\aexUnits\DC2:\n\ + \\ACKerrors\CAN\ETX \ETX(\v2\".utxorpc.v1alpha.cardano.EvalErrorR\ACKerrors\DC2:\n\ + \\ACKtraces\CAN\EOT \ETX(\v2\".utxorpc.v1alpha.cardano.EvalTraceR\ACKtraces\DC2?\n\ + \\tredeemers\CAN\ENQ \ETX(\v2!.utxorpc.v1alpha.cardano.RedeemerR\tredeemers" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + fee__field_descriptor + = Data.ProtoLens.FieldDescriptor + "fee" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64) + (Data.ProtoLens.PlainField + Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"fee")) :: + Data.ProtoLens.FieldDescriptor TxEval + exUnits__field_descriptor + = Data.ProtoLens.FieldDescriptor + "ex_units" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor ExUnits) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'exUnits")) :: + Data.ProtoLens.FieldDescriptor TxEval + errors__field_descriptor + = Data.ProtoLens.FieldDescriptor + "errors" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor EvalError) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked (Data.ProtoLens.Field.field @"errors")) :: + Data.ProtoLens.FieldDescriptor TxEval + traces__field_descriptor + = Data.ProtoLens.FieldDescriptor + "traces" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor EvalTrace) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked (Data.ProtoLens.Field.field @"traces")) :: + Data.ProtoLens.FieldDescriptor TxEval + redeemers__field_descriptor + = Data.ProtoLens.FieldDescriptor + "redeemers" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Redeemer) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"redeemers")) :: + Data.ProtoLens.FieldDescriptor TxEval + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, fee__field_descriptor), + (Data.ProtoLens.Tag 2, exUnits__field_descriptor), + (Data.ProtoLens.Tag 3, errors__field_descriptor), + (Data.ProtoLens.Tag 4, traces__field_descriptor), + (Data.ProtoLens.Tag 5, redeemers__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _TxEval'_unknownFields + (\ x__ y__ -> x__ {_TxEval'_unknownFields = y__}) + defMessage + = TxEval'_constructor + {_TxEval'fee = Data.ProtoLens.fieldDefault, + _TxEval'exUnits = Prelude.Nothing, + _TxEval'errors = Data.Vector.Generic.empty, + _TxEval'traces = Data.Vector.Generic.empty, + _TxEval'redeemers = Data.Vector.Generic.empty, + _TxEval'_unknownFields = []} + parseMessage + = let + loop :: + TxEval + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld EvalError + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Redeemer + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld EvalTrace + -> Data.ProtoLens.Encoding.Bytes.Parser TxEval + loop x mutable'errors mutable'redeemers mutable'traces + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'errors <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'errors) + frozen'redeemers <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'redeemers) + frozen'traces <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'traces) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'errors") frozen'errors + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'redeemers") frozen'redeemers + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'traces") frozen'traces x)))) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + Data.ProtoLens.Encoding.Bytes.getVarInt "fee" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"fee") y x) + mutable'errors mutable'redeemers mutable'traces + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "ex_units" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"exUnits") y x) + mutable'errors mutable'redeemers mutable'traces + 26 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "errors" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'errors y) + loop x v mutable'redeemers mutable'traces + 34 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "traces" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'traces y) + loop x mutable'errors mutable'redeemers v + 42 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "redeemers" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'redeemers y) + loop x mutable'errors v mutable'traces + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'errors mutable'redeemers mutable'traces + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'errors <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'redeemers <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'traces <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage mutable'errors mutable'redeemers + mutable'traces) + "TxEval" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"fee") _x + in + if (Prelude.==) _v Data.ProtoLens.fieldDefault then + Data.Monoid.mempty + else + (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + (Data.ProtoLens.Encoding.Bytes.putVarInt _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'exUnits") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view (Data.ProtoLens.Field.field @"vec'errors") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view (Data.ProtoLens.Field.field @"vec'traces") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'redeemers") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))))) +instance Control.DeepSeq.NFData TxEval where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_TxEval'_unknownFields x__) + (Control.DeepSeq.deepseq + (_TxEval'fee x__) + (Control.DeepSeq.deepseq + (_TxEval'exUnits x__) + (Control.DeepSeq.deepseq + (_TxEval'errors x__) + (Control.DeepSeq.deepseq + (_TxEval'traces x__) + (Control.DeepSeq.deepseq (_TxEval'redeemers x__) ()))))) +{- | Fields : + + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.txHash' @:: Lens' TxInput Data.ByteString.ByteString@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.outputIndex' @:: Lens' TxInput Data.Word.Word32@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.asOutput' @:: Lens' TxInput TxOutput@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'asOutput' @:: Lens' TxInput (Prelude.Maybe TxOutput)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.redeemer' @:: Lens' TxInput Redeemer@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'redeemer' @:: Lens' TxInput (Prelude.Maybe Redeemer)@ -} +data TxInput + = TxInput'_constructor {_TxInput'txHash :: !Data.ByteString.ByteString, + _TxInput'outputIndex :: !Data.Word.Word32, + _TxInput'asOutput :: !(Prelude.Maybe TxOutput), + _TxInput'redeemer :: !(Prelude.Maybe Redeemer), + _TxInput'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show TxInput where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField TxInput "txHash" Data.ByteString.ByteString where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TxInput'txHash (\ x__ y__ -> x__ {_TxInput'txHash = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField TxInput "outputIndex" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TxInput'outputIndex + (\ x__ y__ -> x__ {_TxInput'outputIndex = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField TxInput "asOutput" TxOutput where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TxInput'asOutput (\ x__ y__ -> x__ {_TxInput'asOutput = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField TxInput "maybe'asOutput" (Prelude.Maybe TxOutput) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TxInput'asOutput (\ x__ y__ -> x__ {_TxInput'asOutput = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField TxInput "redeemer" Redeemer where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TxInput'redeemer (\ x__ y__ -> x__ {_TxInput'redeemer = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField TxInput "maybe'redeemer" (Prelude.Maybe Redeemer) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TxInput'redeemer (\ x__ y__ -> x__ {_TxInput'redeemer = y__})) + Prelude.id +instance Data.ProtoLens.Message TxInput where + messageName _ = Data.Text.pack "utxorpc.v1alpha.cardano.TxInput" + packedMessageDescriptor _ + = "\n\ + \\aTxInput\DC2\ETB\n\ + \\atx_hash\CAN\SOH \SOH(\fR\ACKtxHash\DC2!\n\ + \\foutput_index\CAN\STX \SOH(\rR\voutputIndex\DC2>\n\ + \\tas_output\CAN\ETX \SOH(\v2!.utxorpc.v1alpha.cardano.TxOutputR\basOutput\DC2=\n\ + \\bredeemer\CAN\EOT \SOH(\v2!.utxorpc.v1alpha.cardano.RedeemerR\bredeemer" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + txHash__field_descriptor + = Data.ProtoLens.FieldDescriptor + "tx_hash" + (Data.ProtoLens.ScalarField Data.ProtoLens.BytesField :: + Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString) + (Data.ProtoLens.PlainField + Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"txHash")) :: + Data.ProtoLens.FieldDescriptor TxInput + outputIndex__field_descriptor + = Data.ProtoLens.FieldDescriptor + "output_index" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Optional + (Data.ProtoLens.Field.field @"outputIndex")) :: + Data.ProtoLens.FieldDescriptor TxInput + asOutput__field_descriptor + = Data.ProtoLens.FieldDescriptor + "as_output" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor TxOutput) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'asOutput")) :: + Data.ProtoLens.FieldDescriptor TxInput + redeemer__field_descriptor + = Data.ProtoLens.FieldDescriptor + "redeemer" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Redeemer) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'redeemer")) :: + Data.ProtoLens.FieldDescriptor TxInput + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, txHash__field_descriptor), + (Data.ProtoLens.Tag 2, outputIndex__field_descriptor), + (Data.ProtoLens.Tag 3, asOutput__field_descriptor), + (Data.ProtoLens.Tag 4, redeemer__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _TxInput'_unknownFields + (\ x__ y__ -> x__ {_TxInput'_unknownFields = y__}) + defMessage + = TxInput'_constructor + {_TxInput'txHash = Data.ProtoLens.fieldDefault, + _TxInput'outputIndex = Data.ProtoLens.fieldDefault, + _TxInput'asOutput = Prelude.Nothing, + _TxInput'redeemer = Prelude.Nothing, _TxInput'_unknownFields = []} + parseMessage + = let + loop :: TxInput -> Data.ProtoLens.Encoding.Bytes.Parser TxInput + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getBytes + (Prelude.fromIntegral len)) + "tx_hash" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"txHash") y x) + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "output_index" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"outputIndex") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "as_output" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"asOutput") y x) + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "redeemer" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"redeemer") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "TxInput" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (let + _v = Lens.Family2.view (Data.ProtoLens.Field.field @"txHash") _x + in + if (Prelude.==) _v Data.ProtoLens.fieldDefault then + Data.Monoid.mempty + else + (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + _v)) + ((Data.Monoid.<>) + (let + _v + = Lens.Family2.view (Data.ProtoLens.Field.field @"outputIndex") _x + in + if (Prelude.==) _v Data.ProtoLens.fieldDefault then + Data.Monoid.mempty + else + (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'asOutput") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'redeemer") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))) +instance Control.DeepSeq.NFData TxInput where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_TxInput'_unknownFields x__) + (Control.DeepSeq.deepseq + (_TxInput'txHash x__) + (Control.DeepSeq.deepseq + (_TxInput'outputIndex x__) + (Control.DeepSeq.deepseq + (_TxInput'asOutput x__) + (Control.DeepSeq.deepseq (_TxInput'redeemer x__) ())))) +{- | Fields : + + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.address' @:: Lens' TxOutput Data.ByteString.ByteString@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.coin' @:: Lens' TxOutput Data.Word.Word64@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.assets' @:: Lens' TxOutput [Multiasset]@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.vec'assets' @:: Lens' TxOutput (Data.Vector.Vector Multiasset)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.datum' @:: Lens' TxOutput Datum@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'datum' @:: Lens' TxOutput (Prelude.Maybe Datum)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.script' @:: Lens' TxOutput Script@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'script' @:: Lens' TxOutput (Prelude.Maybe Script)@ -} +data TxOutput + = TxOutput'_constructor {_TxOutput'address :: !Data.ByteString.ByteString, + _TxOutput'coin :: !Data.Word.Word64, + _TxOutput'assets :: !(Data.Vector.Vector Multiasset), + _TxOutput'datum :: !(Prelude.Maybe Datum), + _TxOutput'script :: !(Prelude.Maybe Script), + _TxOutput'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show TxOutput where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField TxOutput "address" Data.ByteString.ByteString where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TxOutput'address (\ x__ y__ -> x__ {_TxOutput'address = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField TxOutput "coin" Data.Word.Word64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TxOutput'coin (\ x__ y__ -> x__ {_TxOutput'coin = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField TxOutput "assets" [Multiasset] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TxOutput'assets (\ x__ y__ -> x__ {_TxOutput'assets = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField TxOutput "vec'assets" (Data.Vector.Vector Multiasset) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TxOutput'assets (\ x__ y__ -> x__ {_TxOutput'assets = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField TxOutput "datum" Datum where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TxOutput'datum (\ x__ y__ -> x__ {_TxOutput'datum = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField TxOutput "maybe'datum" (Prelude.Maybe Datum) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TxOutput'datum (\ x__ y__ -> x__ {_TxOutput'datum = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField TxOutput "script" Script where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TxOutput'script (\ x__ y__ -> x__ {_TxOutput'script = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField TxOutput "maybe'script" (Prelude.Maybe Script) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TxOutput'script (\ x__ y__ -> x__ {_TxOutput'script = y__})) + Prelude.id +instance Data.ProtoLens.Message TxOutput where + messageName _ = Data.Text.pack "utxorpc.v1alpha.cardano.TxOutput" + packedMessageDescriptor _ + = "\n\ + \\bTxOutput\DC2\CAN\n\ + \\aaddress\CAN\SOH \SOH(\fR\aaddress\DC2\DC2\n\ + \\EOTcoin\CAN\STX \SOH(\EOTR\EOTcoin\DC2;\n\ + \\ACKassets\CAN\ETX \ETX(\v2#.utxorpc.v1alpha.cardano.MultiassetR\ACKassets\DC24\n\ + \\ENQdatum\CAN\EOT \SOH(\v2\RS.utxorpc.v1alpha.cardano.DatumR\ENQdatum\DC27\n\ + \\ACKscript\CAN\ENQ \SOH(\v2\US.utxorpc.v1alpha.cardano.ScriptR\ACKscript" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + address__field_descriptor + = Data.ProtoLens.FieldDescriptor + "address" + (Data.ProtoLens.ScalarField Data.ProtoLens.BytesField :: + Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString) + (Data.ProtoLens.PlainField + Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"address")) :: + Data.ProtoLens.FieldDescriptor TxOutput + coin__field_descriptor + = Data.ProtoLens.FieldDescriptor + "coin" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64) + (Data.ProtoLens.PlainField + Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"coin")) :: + Data.ProtoLens.FieldDescriptor TxOutput + assets__field_descriptor + = Data.ProtoLens.FieldDescriptor + "assets" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Multiasset) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked (Data.ProtoLens.Field.field @"assets")) :: + Data.ProtoLens.FieldDescriptor TxOutput + datum__field_descriptor + = Data.ProtoLens.FieldDescriptor + "datum" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Datum) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'datum")) :: + Data.ProtoLens.FieldDescriptor TxOutput + script__field_descriptor + = Data.ProtoLens.FieldDescriptor + "script" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Script) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'script")) :: + Data.ProtoLens.FieldDescriptor TxOutput + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, address__field_descriptor), + (Data.ProtoLens.Tag 2, coin__field_descriptor), + (Data.ProtoLens.Tag 3, assets__field_descriptor), + (Data.ProtoLens.Tag 4, datum__field_descriptor), + (Data.ProtoLens.Tag 5, script__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _TxOutput'_unknownFields + (\ x__ y__ -> x__ {_TxOutput'_unknownFields = y__}) + defMessage + = TxOutput'_constructor + {_TxOutput'address = Data.ProtoLens.fieldDefault, + _TxOutput'coin = Data.ProtoLens.fieldDefault, + _TxOutput'assets = Data.Vector.Generic.empty, + _TxOutput'datum = Prelude.Nothing, + _TxOutput'script = Prelude.Nothing, _TxOutput'_unknownFields = []} + parseMessage + = let + loop :: + TxOutput + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Multiasset + -> Data.ProtoLens.Encoding.Bytes.Parser TxOutput + loop x mutable'assets + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'assets <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'assets) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'assets") frozen'assets x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getBytes + (Prelude.fromIntegral len)) + "address" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"address") y x) + mutable'assets + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + Data.ProtoLens.Encoding.Bytes.getVarInt "coin" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"coin") y x) + mutable'assets + 26 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "assets" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'assets y) + loop x v + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "datum" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"datum") y x) + mutable'assets + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "script" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"script") y x) + mutable'assets + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'assets + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'assets <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'assets) + "TxOutput" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (let + _v = Lens.Family2.view (Data.ProtoLens.Field.field @"address") _x + in + if (Prelude.==) _v Data.ProtoLens.fieldDefault then + Data.Monoid.mempty + else + (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + _v)) + ((Data.Monoid.<>) + (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"coin") _x + in + if (Prelude.==) _v Data.ProtoLens.fieldDefault then + Data.Monoid.mempty + else + (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + (Data.ProtoLens.Encoding.Bytes.putVarInt _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view (Data.ProtoLens.Field.field @"vec'assets") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'datum") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'script") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))))) +instance Control.DeepSeq.NFData TxOutput where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_TxOutput'_unknownFields x__) + (Control.DeepSeq.deepseq + (_TxOutput'address x__) + (Control.DeepSeq.deepseq + (_TxOutput'coin x__) + (Control.DeepSeq.deepseq + (_TxOutput'assets x__) + (Control.DeepSeq.deepseq + (_TxOutput'datum x__) + (Control.DeepSeq.deepseq (_TxOutput'script x__) ()))))) +{- | Fields : + + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.address' @:: Lens' TxOutputPattern AddressPattern@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'address' @:: Lens' TxOutputPattern (Prelude.Maybe AddressPattern)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.asset' @:: Lens' TxOutputPattern AssetPattern@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'asset' @:: Lens' TxOutputPattern (Prelude.Maybe AssetPattern)@ -} +data TxOutputPattern + = TxOutputPattern'_constructor {_TxOutputPattern'address :: !(Prelude.Maybe AddressPattern), + _TxOutputPattern'asset :: !(Prelude.Maybe AssetPattern), + _TxOutputPattern'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show TxOutputPattern where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField TxOutputPattern "address" AddressPattern where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TxOutputPattern'address + (\ x__ y__ -> x__ {_TxOutputPattern'address = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField TxOutputPattern "maybe'address" (Prelude.Maybe AddressPattern) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TxOutputPattern'address + (\ x__ y__ -> x__ {_TxOutputPattern'address = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField TxOutputPattern "asset" AssetPattern where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TxOutputPattern'asset + (\ x__ y__ -> x__ {_TxOutputPattern'asset = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField TxOutputPattern "maybe'asset" (Prelude.Maybe AssetPattern) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TxOutputPattern'asset + (\ x__ y__ -> x__ {_TxOutputPattern'asset = y__})) + Prelude.id +instance Data.ProtoLens.Message TxOutputPattern where + messageName _ + = Data.Text.pack "utxorpc.v1alpha.cardano.TxOutputPattern" + packedMessageDescriptor _ + = "\n\ + \\SITxOutputPattern\DC2A\n\ + \\aaddress\CAN\SOH \SOH(\v2'.utxorpc.v1alpha.cardano.AddressPatternR\aaddress\DC2;\n\ + \\ENQasset\CAN\STX \SOH(\v2%.utxorpc.v1alpha.cardano.AssetPatternR\ENQasset" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + address__field_descriptor + = Data.ProtoLens.FieldDescriptor + "address" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AddressPattern) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'address")) :: + Data.ProtoLens.FieldDescriptor TxOutputPattern + asset__field_descriptor + = Data.ProtoLens.FieldDescriptor + "asset" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AssetPattern) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'asset")) :: + Data.ProtoLens.FieldDescriptor TxOutputPattern + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, address__field_descriptor), + (Data.ProtoLens.Tag 2, asset__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _TxOutputPattern'_unknownFields + (\ x__ y__ -> x__ {_TxOutputPattern'_unknownFields = y__}) + defMessage + = TxOutputPattern'_constructor + {_TxOutputPattern'address = Prelude.Nothing, + _TxOutputPattern'asset = Prelude.Nothing, + _TxOutputPattern'_unknownFields = []} + parseMessage + = let + loop :: + TxOutputPattern + -> Data.ProtoLens.Encoding.Bytes.Parser TxOutputPattern + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "address" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"address") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "asset" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"asset") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "TxOutputPattern" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'address") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'asset") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData TxOutputPattern where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_TxOutputPattern'_unknownFields x__) + (Control.DeepSeq.deepseq + (_TxOutputPattern'address x__) + (Control.DeepSeq.deepseq (_TxOutputPattern'asset x__) ())) +{- | Fields : + + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.consumes' @:: Lens' TxPattern TxOutputPattern@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'consumes' @:: Lens' TxPattern (Prelude.Maybe TxOutputPattern)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.produces' @:: Lens' TxPattern TxOutputPattern@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'produces' @:: Lens' TxPattern (Prelude.Maybe TxOutputPattern)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.hasAddress' @:: Lens' TxPattern AddressPattern@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'hasAddress' @:: Lens' TxPattern (Prelude.Maybe AddressPattern)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.movesAsset' @:: Lens' TxPattern AssetPattern@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'movesAsset' @:: Lens' TxPattern (Prelude.Maybe AssetPattern)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.mintsAsset' @:: Lens' TxPattern AssetPattern@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'mintsAsset' @:: Lens' TxPattern (Prelude.Maybe AssetPattern)@ -} +data TxPattern + = TxPattern'_constructor {_TxPattern'consumes :: !(Prelude.Maybe TxOutputPattern), + _TxPattern'produces :: !(Prelude.Maybe TxOutputPattern), + _TxPattern'hasAddress :: !(Prelude.Maybe AddressPattern), + _TxPattern'movesAsset :: !(Prelude.Maybe AssetPattern), + _TxPattern'mintsAsset :: !(Prelude.Maybe AssetPattern), + _TxPattern'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show TxPattern where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField TxPattern "consumes" TxOutputPattern where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TxPattern'consumes (\ x__ y__ -> x__ {_TxPattern'consumes = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField TxPattern "maybe'consumes" (Prelude.Maybe TxOutputPattern) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TxPattern'consumes (\ x__ y__ -> x__ {_TxPattern'consumes = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField TxPattern "produces" TxOutputPattern where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TxPattern'produces (\ x__ y__ -> x__ {_TxPattern'produces = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField TxPattern "maybe'produces" (Prelude.Maybe TxOutputPattern) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TxPattern'produces (\ x__ y__ -> x__ {_TxPattern'produces = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField TxPattern "hasAddress" AddressPattern where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TxPattern'hasAddress + (\ x__ y__ -> x__ {_TxPattern'hasAddress = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField TxPattern "maybe'hasAddress" (Prelude.Maybe AddressPattern) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TxPattern'hasAddress + (\ x__ y__ -> x__ {_TxPattern'hasAddress = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField TxPattern "movesAsset" AssetPattern where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TxPattern'movesAsset + (\ x__ y__ -> x__ {_TxPattern'movesAsset = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField TxPattern "maybe'movesAsset" (Prelude.Maybe AssetPattern) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TxPattern'movesAsset + (\ x__ y__ -> x__ {_TxPattern'movesAsset = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField TxPattern "mintsAsset" AssetPattern where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TxPattern'mintsAsset + (\ x__ y__ -> x__ {_TxPattern'mintsAsset = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField TxPattern "maybe'mintsAsset" (Prelude.Maybe AssetPattern) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TxPattern'mintsAsset + (\ x__ y__ -> x__ {_TxPattern'mintsAsset = y__})) + Prelude.id +instance Data.ProtoLens.Message TxPattern where + messageName _ = Data.Text.pack "utxorpc.v1alpha.cardano.TxPattern" + packedMessageDescriptor _ + = "\n\ + \\tTxPattern\DC2D\n\ + \\bconsumes\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.TxOutputPatternR\bconsumes\DC2D\n\ + \\bproduces\CAN\STX \SOH(\v2(.utxorpc.v1alpha.cardano.TxOutputPatternR\bproduces\DC2H\n\ + \\vhas_address\CAN\ETX \SOH(\v2'.utxorpc.v1alpha.cardano.AddressPatternR\n\ + \hasAddress\DC2F\n\ + \\vmoves_asset\CAN\EOT \SOH(\v2%.utxorpc.v1alpha.cardano.AssetPatternR\n\ + \movesAsset\DC2F\n\ + \\vmints_asset\CAN\ENQ \SOH(\v2%.utxorpc.v1alpha.cardano.AssetPatternR\n\ + \mintsAsset" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + consumes__field_descriptor + = Data.ProtoLens.FieldDescriptor + "consumes" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor TxOutputPattern) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'consumes")) :: + Data.ProtoLens.FieldDescriptor TxPattern + produces__field_descriptor + = Data.ProtoLens.FieldDescriptor + "produces" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor TxOutputPattern) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'produces")) :: + Data.ProtoLens.FieldDescriptor TxPattern + hasAddress__field_descriptor + = Data.ProtoLens.FieldDescriptor + "has_address" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AddressPattern) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'hasAddress")) :: + Data.ProtoLens.FieldDescriptor TxPattern + movesAsset__field_descriptor + = Data.ProtoLens.FieldDescriptor + "moves_asset" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AssetPattern) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'movesAsset")) :: + Data.ProtoLens.FieldDescriptor TxPattern + mintsAsset__field_descriptor + = Data.ProtoLens.FieldDescriptor + "mints_asset" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AssetPattern) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'mintsAsset")) :: + Data.ProtoLens.FieldDescriptor TxPattern + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, consumes__field_descriptor), + (Data.ProtoLens.Tag 2, produces__field_descriptor), + (Data.ProtoLens.Tag 3, hasAddress__field_descriptor), + (Data.ProtoLens.Tag 4, movesAsset__field_descriptor), + (Data.ProtoLens.Tag 5, mintsAsset__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _TxPattern'_unknownFields + (\ x__ y__ -> x__ {_TxPattern'_unknownFields = y__}) + defMessage + = TxPattern'_constructor + {_TxPattern'consumes = Prelude.Nothing, + _TxPattern'produces = Prelude.Nothing, + _TxPattern'hasAddress = Prelude.Nothing, + _TxPattern'movesAsset = Prelude.Nothing, + _TxPattern'mintsAsset = Prelude.Nothing, + _TxPattern'_unknownFields = []} + parseMessage + = let + loop :: TxPattern -> Data.ProtoLens.Encoding.Bytes.Parser TxPattern + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "consumes" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"consumes") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "produces" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"produces") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "has_address" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"hasAddress") y x) + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "moves_asset" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"movesAsset") y x) + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "mints_asset" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"mintsAsset") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "TxPattern" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'consumes") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'produces") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'hasAddress") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'movesAsset") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'mintsAsset") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))))) +instance Control.DeepSeq.NFData TxPattern where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_TxPattern'_unknownFields x__) + (Control.DeepSeq.deepseq + (_TxPattern'consumes x__) + (Control.DeepSeq.deepseq + (_TxPattern'produces x__) + (Control.DeepSeq.deepseq + (_TxPattern'hasAddress x__) + (Control.DeepSeq.deepseq + (_TxPattern'movesAsset x__) + (Control.DeepSeq.deepseq (_TxPattern'mintsAsset x__) ()))))) +{- | Fields : + + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.start' @:: Lens' TxValidity Data.Word.Word64@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.ttl' @:: Lens' TxValidity Data.Word.Word64@ -} +data TxValidity + = TxValidity'_constructor {_TxValidity'start :: !Data.Word.Word64, + _TxValidity'ttl :: !Data.Word.Word64, + _TxValidity'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show TxValidity where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField TxValidity "start" Data.Word.Word64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TxValidity'start (\ x__ y__ -> x__ {_TxValidity'start = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField TxValidity "ttl" Data.Word.Word64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TxValidity'ttl (\ x__ y__ -> x__ {_TxValidity'ttl = y__})) + Prelude.id +instance Data.ProtoLens.Message TxValidity where + messageName _ = Data.Text.pack "utxorpc.v1alpha.cardano.TxValidity" + packedMessageDescriptor _ + = "\n\ + \\n\ + \TxValidity\DC2\DC4\n\ + \\ENQstart\CAN\SOH \SOH(\EOTR\ENQstart\DC2\DLE\n\ + \\ETXttl\CAN\STX \SOH(\EOTR\ETXttl" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + start__field_descriptor + = Data.ProtoLens.FieldDescriptor + "start" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64) + (Data.ProtoLens.PlainField + Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"start")) :: + Data.ProtoLens.FieldDescriptor TxValidity + ttl__field_descriptor + = Data.ProtoLens.FieldDescriptor + "ttl" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64) + (Data.ProtoLens.PlainField + Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"ttl")) :: + Data.ProtoLens.FieldDescriptor TxValidity + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, start__field_descriptor), + (Data.ProtoLens.Tag 2, ttl__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _TxValidity'_unknownFields + (\ x__ y__ -> x__ {_TxValidity'_unknownFields = y__}) + defMessage + = TxValidity'_constructor + {_TxValidity'start = Data.ProtoLens.fieldDefault, + _TxValidity'ttl = Data.ProtoLens.fieldDefault, + _TxValidity'_unknownFields = []} + parseMessage + = let + loop :: + TxValidity -> Data.ProtoLens.Encoding.Bytes.Parser TxValidity + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + Data.ProtoLens.Encoding.Bytes.getVarInt "start" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"start") y x) + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + Data.ProtoLens.Encoding.Bytes.getVarInt "ttl" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"ttl") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "TxValidity" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (let + _v = Lens.Family2.view (Data.ProtoLens.Field.field @"start") _x + in + if (Prelude.==) _v Data.ProtoLens.fieldDefault then + Data.Monoid.mempty + else + (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + (Data.ProtoLens.Encoding.Bytes.putVarInt _v)) + ((Data.Monoid.<>) + (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"ttl") _x + in + if (Prelude.==) _v Data.ProtoLens.fieldDefault then + Data.Monoid.mempty + else + (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + (Data.ProtoLens.Encoding.Bytes.putVarInt _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData TxValidity where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_TxValidity'_unknownFields x__) + (Control.DeepSeq.deepseq + (_TxValidity'start x__) + (Control.DeepSeq.deepseq (_TxValidity'ttl x__) ())) +{- | Fields : + + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.stakeCredential' @:: Lens' UnRegCert StakeCredential@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'stakeCredential' @:: Lens' UnRegCert (Prelude.Maybe StakeCredential)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.coin' @:: Lens' UnRegCert Data.Word.Word64@ -} +data UnRegCert + = UnRegCert'_constructor {_UnRegCert'stakeCredential :: !(Prelude.Maybe StakeCredential), + _UnRegCert'coin :: !Data.Word.Word64, + _UnRegCert'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UnRegCert where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField UnRegCert "stakeCredential" StakeCredential where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UnRegCert'stakeCredential + (\ x__ y__ -> x__ {_UnRegCert'stakeCredential = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField UnRegCert "maybe'stakeCredential" (Prelude.Maybe StakeCredential) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UnRegCert'stakeCredential + (\ x__ y__ -> x__ {_UnRegCert'stakeCredential = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UnRegCert "coin" Data.Word.Word64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UnRegCert'coin (\ x__ y__ -> x__ {_UnRegCert'coin = y__})) + Prelude.id +instance Data.ProtoLens.Message UnRegCert where + messageName _ = Data.Text.pack "utxorpc.v1alpha.cardano.UnRegCert" + packedMessageDescriptor _ + = "\n\ + \\tUnRegCert\DC2S\n\ + \\DLEstake_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SIstakeCredential\DC2\DC2\n\ + \\EOTcoin\CAN\STX \SOH(\EOTR\EOTcoin" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + stakeCredential__field_descriptor + = Data.ProtoLens.FieldDescriptor + "stake_credential" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor StakeCredential) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'stakeCredential")) :: + Data.ProtoLens.FieldDescriptor UnRegCert + coin__field_descriptor + = Data.ProtoLens.FieldDescriptor + "coin" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64) + (Data.ProtoLens.PlainField + Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"coin")) :: + Data.ProtoLens.FieldDescriptor UnRegCert + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, stakeCredential__field_descriptor), + (Data.ProtoLens.Tag 2, coin__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _UnRegCert'_unknownFields + (\ x__ y__ -> x__ {_UnRegCert'_unknownFields = y__}) + defMessage + = UnRegCert'_constructor + {_UnRegCert'stakeCredential = Prelude.Nothing, + _UnRegCert'coin = Data.ProtoLens.fieldDefault, + _UnRegCert'_unknownFields = []} + parseMessage + = let + loop :: UnRegCert -> Data.ProtoLens.Encoding.Bytes.Parser UnRegCert + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "stake_credential" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"stakeCredential") y x) + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + Data.ProtoLens.Encoding.Bytes.getVarInt "coin" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"coin") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "UnRegCert" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'stakeCredential") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"coin") _x + in + if (Prelude.==) _v Data.ProtoLens.fieldDefault then + Data.Monoid.mempty + else + (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + (Data.ProtoLens.Encoding.Bytes.putVarInt _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData UnRegCert where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UnRegCert'_unknownFields x__) + (Control.DeepSeq.deepseq + (_UnRegCert'stakeCredential x__) + (Control.DeepSeq.deepseq (_UnRegCert'coin x__) ())) +{- | Fields : + + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.drepCredential' @:: Lens' UnRegDRepCert StakeCredential@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'drepCredential' @:: Lens' UnRegDRepCert (Prelude.Maybe StakeCredential)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.coin' @:: Lens' UnRegDRepCert Data.Word.Word64@ -} +data UnRegDRepCert + = UnRegDRepCert'_constructor {_UnRegDRepCert'drepCredential :: !(Prelude.Maybe StakeCredential), + _UnRegDRepCert'coin :: !Data.Word.Word64, + _UnRegDRepCert'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UnRegDRepCert where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField UnRegDRepCert "drepCredential" StakeCredential where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UnRegDRepCert'drepCredential + (\ x__ y__ -> x__ {_UnRegDRepCert'drepCredential = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField UnRegDRepCert "maybe'drepCredential" (Prelude.Maybe StakeCredential) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UnRegDRepCert'drepCredential + (\ x__ y__ -> x__ {_UnRegDRepCert'drepCredential = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UnRegDRepCert "coin" Data.Word.Word64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UnRegDRepCert'coin (\ x__ y__ -> x__ {_UnRegDRepCert'coin = y__})) + Prelude.id +instance Data.ProtoLens.Message UnRegDRepCert where + messageName _ + = Data.Text.pack "utxorpc.v1alpha.cardano.UnRegDRepCert" + packedMessageDescriptor _ + = "\n\ + \\rUnRegDRepCert\DC2Q\n\ + \\SIdrep_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SOdrepCredential\DC2\DC2\n\ + \\EOTcoin\CAN\STX \SOH(\EOTR\EOTcoin" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + drepCredential__field_descriptor + = Data.ProtoLens.FieldDescriptor + "drep_credential" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor StakeCredential) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'drepCredential")) :: + Data.ProtoLens.FieldDescriptor UnRegDRepCert + coin__field_descriptor + = Data.ProtoLens.FieldDescriptor + "coin" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64) + (Data.ProtoLens.PlainField + Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"coin")) :: + Data.ProtoLens.FieldDescriptor UnRegDRepCert + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, drepCredential__field_descriptor), + (Data.ProtoLens.Tag 2, coin__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _UnRegDRepCert'_unknownFields + (\ x__ y__ -> x__ {_UnRegDRepCert'_unknownFields = y__}) + defMessage + = UnRegDRepCert'_constructor + {_UnRegDRepCert'drepCredential = Prelude.Nothing, + _UnRegDRepCert'coin = Data.ProtoLens.fieldDefault, + _UnRegDRepCert'_unknownFields = []} + parseMessage + = let + loop :: + UnRegDRepCert -> Data.ProtoLens.Encoding.Bytes.Parser UnRegDRepCert + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "drep_credential" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"drepCredential") y x) + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + Data.ProtoLens.Encoding.Bytes.getVarInt "coin" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"coin") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "UnRegDRepCert" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'drepCredential") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"coin") _x + in + if (Prelude.==) _v Data.ProtoLens.fieldDefault then + Data.Monoid.mempty + else + (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + (Data.ProtoLens.Encoding.Bytes.putVarInt _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData UnRegDRepCert where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UnRegDRepCert'_unknownFields x__) + (Control.DeepSeq.deepseq + (_UnRegDRepCert'drepCredential x__) + (Control.DeepSeq.deepseq (_UnRegDRepCert'coin x__) ())) +{- | Fields : + + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.drepCredential' @:: Lens' UpdateDRepCert StakeCredential@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'drepCredential' @:: Lens' UpdateDRepCert (Prelude.Maybe StakeCredential)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.anchor' @:: Lens' UpdateDRepCert Anchor@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'anchor' @:: Lens' UpdateDRepCert (Prelude.Maybe Anchor)@ -} +data UpdateDRepCert + = UpdateDRepCert'_constructor {_UpdateDRepCert'drepCredential :: !(Prelude.Maybe StakeCredential), + _UpdateDRepCert'anchor :: !(Prelude.Maybe Anchor), + _UpdateDRepCert'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UpdateDRepCert where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField UpdateDRepCert "drepCredential" StakeCredential where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateDRepCert'drepCredential + (\ x__ y__ -> x__ {_UpdateDRepCert'drepCredential = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField UpdateDRepCert "maybe'drepCredential" (Prelude.Maybe StakeCredential) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateDRepCert'drepCredential + (\ x__ y__ -> x__ {_UpdateDRepCert'drepCredential = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UpdateDRepCert "anchor" Anchor where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateDRepCert'anchor + (\ x__ y__ -> x__ {_UpdateDRepCert'anchor = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField UpdateDRepCert "maybe'anchor" (Prelude.Maybe Anchor) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateDRepCert'anchor + (\ x__ y__ -> x__ {_UpdateDRepCert'anchor = y__})) + Prelude.id +instance Data.ProtoLens.Message UpdateDRepCert where + messageName _ + = Data.Text.pack "utxorpc.v1alpha.cardano.UpdateDRepCert" + packedMessageDescriptor _ + = "\n\ + \\SOUpdateDRepCert\DC2Q\n\ + \\SIdrep_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SOdrepCredential\DC27\n\ + \\ACKanchor\CAN\STX \SOH(\v2\US.utxorpc.v1alpha.cardano.AnchorR\ACKanchor" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + drepCredential__field_descriptor + = Data.ProtoLens.FieldDescriptor + "drep_credential" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor StakeCredential) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'drepCredential")) :: + Data.ProtoLens.FieldDescriptor UpdateDRepCert + anchor__field_descriptor + = Data.ProtoLens.FieldDescriptor + "anchor" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Anchor) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'anchor")) :: + Data.ProtoLens.FieldDescriptor UpdateDRepCert + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, drepCredential__field_descriptor), + (Data.ProtoLens.Tag 2, anchor__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _UpdateDRepCert'_unknownFields + (\ x__ y__ -> x__ {_UpdateDRepCert'_unknownFields = y__}) + defMessage + = UpdateDRepCert'_constructor + {_UpdateDRepCert'drepCredential = Prelude.Nothing, + _UpdateDRepCert'anchor = Prelude.Nothing, + _UpdateDRepCert'_unknownFields = []} + parseMessage + = let + loop :: + UpdateDRepCert + -> Data.ProtoLens.Encoding.Bytes.Parser UpdateDRepCert + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "drep_credential" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"drepCredential") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "anchor" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"anchor") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "UpdateDRepCert" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'drepCredential") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'anchor") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData UpdateDRepCert where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UpdateDRepCert'_unknownFields x__) + (Control.DeepSeq.deepseq + (_UpdateDRepCert'drepCredential x__) + (Control.DeepSeq.deepseq (_UpdateDRepCert'anchor x__) ())) +{- | Fields : + + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.vkey' @:: Lens' VKeyWitness Data.ByteString.ByteString@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.signature' @:: Lens' VKeyWitness Data.ByteString.ByteString@ -} +data VKeyWitness + = VKeyWitness'_constructor {_VKeyWitness'vkey :: !Data.ByteString.ByteString, + _VKeyWitness'signature :: !Data.ByteString.ByteString, + _VKeyWitness'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show VKeyWitness where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField VKeyWitness "vkey" Data.ByteString.ByteString where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _VKeyWitness'vkey (\ x__ y__ -> x__ {_VKeyWitness'vkey = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField VKeyWitness "signature" Data.ByteString.ByteString where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _VKeyWitness'signature + (\ x__ y__ -> x__ {_VKeyWitness'signature = y__})) + Prelude.id +instance Data.ProtoLens.Message VKeyWitness where + messageName _ + = Data.Text.pack "utxorpc.v1alpha.cardano.VKeyWitness" + packedMessageDescriptor _ + = "\n\ + \\vVKeyWitness\DC2\DC2\n\ + \\EOTvkey\CAN\SOH \SOH(\fR\EOTvkey\DC2\FS\n\ + \\tsignature\CAN\STX \SOH(\fR\tsignature" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + vkey__field_descriptor + = Data.ProtoLens.FieldDescriptor + "vkey" + (Data.ProtoLens.ScalarField Data.ProtoLens.BytesField :: + Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString) + (Data.ProtoLens.PlainField + Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"vkey")) :: + Data.ProtoLens.FieldDescriptor VKeyWitness + signature__field_descriptor + = Data.ProtoLens.FieldDescriptor + "signature" + (Data.ProtoLens.ScalarField Data.ProtoLens.BytesField :: + Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString) + (Data.ProtoLens.PlainField + Data.ProtoLens.Optional + (Data.ProtoLens.Field.field @"signature")) :: + Data.ProtoLens.FieldDescriptor VKeyWitness + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, vkey__field_descriptor), + (Data.ProtoLens.Tag 2, signature__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _VKeyWitness'_unknownFields + (\ x__ y__ -> x__ {_VKeyWitness'_unknownFields = y__}) + defMessage + = VKeyWitness'_constructor + {_VKeyWitness'vkey = Data.ProtoLens.fieldDefault, + _VKeyWitness'signature = Data.ProtoLens.fieldDefault, + _VKeyWitness'_unknownFields = []} + parseMessage + = let + loop :: + VKeyWitness -> Data.ProtoLens.Encoding.Bytes.Parser VKeyWitness + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getBytes + (Prelude.fromIntegral len)) + "vkey" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"vkey") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getBytes + (Prelude.fromIntegral len)) + "signature" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"signature") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "VKeyWitness" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"vkey") _x + in + if (Prelude.==) _v Data.ProtoLens.fieldDefault then + Data.Monoid.mempty + else + (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + _v)) + ((Data.Monoid.<>) + (let + _v = Lens.Family2.view (Data.ProtoLens.Field.field @"signature") _x + in + if (Prelude.==) _v Data.ProtoLens.fieldDefault then + Data.Monoid.mempty + else + (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData VKeyWitness where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_VKeyWitness'_unknownFields x__) + (Control.DeepSeq.deepseq + (_VKeyWitness'vkey x__) + (Control.DeepSeq.deepseq (_VKeyWitness'signature x__) ())) +{- | Fields : + + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.stakeCredential' @:: Lens' VoteDelegCert StakeCredential@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'stakeCredential' @:: Lens' VoteDelegCert (Prelude.Maybe StakeCredential)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.drep' @:: Lens' VoteDelegCert DRep@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'drep' @:: Lens' VoteDelegCert (Prelude.Maybe DRep)@ -} +data VoteDelegCert + = VoteDelegCert'_constructor {_VoteDelegCert'stakeCredential :: !(Prelude.Maybe StakeCredential), + _VoteDelegCert'drep :: !(Prelude.Maybe DRep), + _VoteDelegCert'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show VoteDelegCert where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField VoteDelegCert "stakeCredential" StakeCredential where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _VoteDelegCert'stakeCredential + (\ x__ y__ -> x__ {_VoteDelegCert'stakeCredential = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField VoteDelegCert "maybe'stakeCredential" (Prelude.Maybe StakeCredential) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _VoteDelegCert'stakeCredential + (\ x__ y__ -> x__ {_VoteDelegCert'stakeCredential = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField VoteDelegCert "drep" DRep where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _VoteDelegCert'drep (\ x__ y__ -> x__ {_VoteDelegCert'drep = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField VoteDelegCert "maybe'drep" (Prelude.Maybe DRep) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _VoteDelegCert'drep (\ x__ y__ -> x__ {_VoteDelegCert'drep = y__})) + Prelude.id +instance Data.ProtoLens.Message VoteDelegCert where + messageName _ + = Data.Text.pack "utxorpc.v1alpha.cardano.VoteDelegCert" + packedMessageDescriptor _ + = "\n\ + \\rVoteDelegCert\DC2S\n\ + \\DLEstake_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SIstakeCredential\DC21\n\ + \\EOTdrep\CAN\STX \SOH(\v2\GS.utxorpc.v1alpha.cardano.DRepR\EOTdrep" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + stakeCredential__field_descriptor + = Data.ProtoLens.FieldDescriptor + "stake_credential" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor StakeCredential) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'stakeCredential")) :: + Data.ProtoLens.FieldDescriptor VoteDelegCert + drep__field_descriptor + = Data.ProtoLens.FieldDescriptor + "drep" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor DRep) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'drep")) :: + Data.ProtoLens.FieldDescriptor VoteDelegCert + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, stakeCredential__field_descriptor), + (Data.ProtoLens.Tag 2, drep__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _VoteDelegCert'_unknownFields + (\ x__ y__ -> x__ {_VoteDelegCert'_unknownFields = y__}) + defMessage + = VoteDelegCert'_constructor + {_VoteDelegCert'stakeCredential = Prelude.Nothing, + _VoteDelegCert'drep = Prelude.Nothing, + _VoteDelegCert'_unknownFields = []} + parseMessage + = let + loop :: + VoteDelegCert -> Data.ProtoLens.Encoding.Bytes.Parser VoteDelegCert + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "stake_credential" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"stakeCredential") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "drep" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"drep") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "VoteDelegCert" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'stakeCredential") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'drep") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData VoteDelegCert where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_VoteDelegCert'_unknownFields x__) + (Control.DeepSeq.deepseq + (_VoteDelegCert'stakeCredential x__) + (Control.DeepSeq.deepseq (_VoteDelegCert'drep x__) ())) +{- | Fields : + + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.stakeCredential' @:: Lens' VoteRegDelegCert StakeCredential@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'stakeCredential' @:: Lens' VoteRegDelegCert (Prelude.Maybe StakeCredential)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.drep' @:: Lens' VoteRegDelegCert DRep@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'drep' @:: Lens' VoteRegDelegCert (Prelude.Maybe DRep)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.coin' @:: Lens' VoteRegDelegCert Data.Word.Word64@ -} +data VoteRegDelegCert + = VoteRegDelegCert'_constructor {_VoteRegDelegCert'stakeCredential :: !(Prelude.Maybe StakeCredential), + _VoteRegDelegCert'drep :: !(Prelude.Maybe DRep), + _VoteRegDelegCert'coin :: !Data.Word.Word64, + _VoteRegDelegCert'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show VoteRegDelegCert where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField VoteRegDelegCert "stakeCredential" StakeCredential where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _VoteRegDelegCert'stakeCredential + (\ x__ y__ -> x__ {_VoteRegDelegCert'stakeCredential = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField VoteRegDelegCert "maybe'stakeCredential" (Prelude.Maybe StakeCredential) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _VoteRegDelegCert'stakeCredential + (\ x__ y__ -> x__ {_VoteRegDelegCert'stakeCredential = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField VoteRegDelegCert "drep" DRep where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _VoteRegDelegCert'drep + (\ x__ y__ -> x__ {_VoteRegDelegCert'drep = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField VoteRegDelegCert "maybe'drep" (Prelude.Maybe DRep) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _VoteRegDelegCert'drep + (\ x__ y__ -> x__ {_VoteRegDelegCert'drep = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField VoteRegDelegCert "coin" Data.Word.Word64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _VoteRegDelegCert'coin + (\ x__ y__ -> x__ {_VoteRegDelegCert'coin = y__})) + Prelude.id +instance Data.ProtoLens.Message VoteRegDelegCert where + messageName _ + = Data.Text.pack "utxorpc.v1alpha.cardano.VoteRegDelegCert" + packedMessageDescriptor _ + = "\n\ + \\DLEVoteRegDelegCert\DC2S\n\ + \\DLEstake_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SIstakeCredential\DC21\n\ + \\EOTdrep\CAN\STX \SOH(\v2\GS.utxorpc.v1alpha.cardano.DRepR\EOTdrep\DC2\DC2\n\ + \\EOTcoin\CAN\ETX \SOH(\EOTR\EOTcoin" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + stakeCredential__field_descriptor + = Data.ProtoLens.FieldDescriptor + "stake_credential" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor StakeCredential) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'stakeCredential")) :: + Data.ProtoLens.FieldDescriptor VoteRegDelegCert + drep__field_descriptor + = Data.ProtoLens.FieldDescriptor + "drep" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor DRep) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'drep")) :: + Data.ProtoLens.FieldDescriptor VoteRegDelegCert + coin__field_descriptor + = Data.ProtoLens.FieldDescriptor + "coin" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64) + (Data.ProtoLens.PlainField + Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"coin")) :: + Data.ProtoLens.FieldDescriptor VoteRegDelegCert + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, stakeCredential__field_descriptor), + (Data.ProtoLens.Tag 2, drep__field_descriptor), + (Data.ProtoLens.Tag 3, coin__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _VoteRegDelegCert'_unknownFields + (\ x__ y__ -> x__ {_VoteRegDelegCert'_unknownFields = y__}) + defMessage + = VoteRegDelegCert'_constructor + {_VoteRegDelegCert'stakeCredential = Prelude.Nothing, + _VoteRegDelegCert'drep = Prelude.Nothing, + _VoteRegDelegCert'coin = Data.ProtoLens.fieldDefault, + _VoteRegDelegCert'_unknownFields = []} + parseMessage + = let + loop :: + VoteRegDelegCert + -> Data.ProtoLens.Encoding.Bytes.Parser VoteRegDelegCert + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "stake_credential" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"stakeCredential") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "drep" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"drep") y x) + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + Data.ProtoLens.Encoding.Bytes.getVarInt "coin" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"coin") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "VoteRegDelegCert" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'stakeCredential") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'drep") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"coin") _x + in + if (Prelude.==) _v Data.ProtoLens.fieldDefault then + Data.Monoid.mempty + else + (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + (Data.ProtoLens.Encoding.Bytes.putVarInt _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData VoteRegDelegCert where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_VoteRegDelegCert'_unknownFields x__) + (Control.DeepSeq.deepseq + (_VoteRegDelegCert'stakeCredential x__) + (Control.DeepSeq.deepseq + (_VoteRegDelegCert'drep x__) + (Control.DeepSeq.deepseq (_VoteRegDelegCert'coin x__) ()))) +{- | Fields : + + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.rewardAccount' @:: Lens' Withdrawal Data.ByteString.ByteString@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.coin' @:: Lens' Withdrawal Data.Word.Word64@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.redeemer' @:: Lens' Withdrawal Redeemer@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.maybe'redeemer' @:: Lens' Withdrawal (Prelude.Maybe Redeemer)@ -} +data Withdrawal + = Withdrawal'_constructor {_Withdrawal'rewardAccount :: !Data.ByteString.ByteString, + _Withdrawal'coin :: !Data.Word.Word64, + _Withdrawal'redeemer :: !(Prelude.Maybe Redeemer), + _Withdrawal'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show Withdrawal where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField Withdrawal "rewardAccount" Data.ByteString.ByteString where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Withdrawal'rewardAccount + (\ x__ y__ -> x__ {_Withdrawal'rewardAccount = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Withdrawal "coin" Data.Word.Word64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Withdrawal'coin (\ x__ y__ -> x__ {_Withdrawal'coin = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Withdrawal "redeemer" Redeemer where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Withdrawal'redeemer + (\ x__ y__ -> x__ {_Withdrawal'redeemer = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField Withdrawal "maybe'redeemer" (Prelude.Maybe Redeemer) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Withdrawal'redeemer + (\ x__ y__ -> x__ {_Withdrawal'redeemer = y__})) + Prelude.id +instance Data.ProtoLens.Message Withdrawal where + messageName _ = Data.Text.pack "utxorpc.v1alpha.cardano.Withdrawal" + packedMessageDescriptor _ + = "\n\ + \\n\ + \Withdrawal\DC2%\n\ + \\SOreward_account\CAN\SOH \SOH(\fR\rrewardAccount\DC2\DC2\n\ + \\EOTcoin\CAN\STX \SOH(\EOTR\EOTcoin\DC2=\n\ + \\bredeemer\CAN\ETX \SOH(\v2!.utxorpc.v1alpha.cardano.RedeemerR\bredeemer" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + rewardAccount__field_descriptor + = Data.ProtoLens.FieldDescriptor + "reward_account" + (Data.ProtoLens.ScalarField Data.ProtoLens.BytesField :: + Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString) + (Data.ProtoLens.PlainField + Data.ProtoLens.Optional + (Data.ProtoLens.Field.field @"rewardAccount")) :: + Data.ProtoLens.FieldDescriptor Withdrawal + coin__field_descriptor + = Data.ProtoLens.FieldDescriptor + "coin" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64) + (Data.ProtoLens.PlainField + Data.ProtoLens.Optional (Data.ProtoLens.Field.field @"coin")) :: + Data.ProtoLens.FieldDescriptor Withdrawal + redeemer__field_descriptor + = Data.ProtoLens.FieldDescriptor + "redeemer" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Redeemer) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'redeemer")) :: + Data.ProtoLens.FieldDescriptor Withdrawal + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, rewardAccount__field_descriptor), + (Data.ProtoLens.Tag 2, coin__field_descriptor), + (Data.ProtoLens.Tag 3, redeemer__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _Withdrawal'_unknownFields + (\ x__ y__ -> x__ {_Withdrawal'_unknownFields = y__}) + defMessage + = Withdrawal'_constructor + {_Withdrawal'rewardAccount = Data.ProtoLens.fieldDefault, + _Withdrawal'coin = Data.ProtoLens.fieldDefault, + _Withdrawal'redeemer = Prelude.Nothing, + _Withdrawal'_unknownFields = []} + parseMessage + = let + loop :: + Withdrawal -> Data.ProtoLens.Encoding.Bytes.Parser Withdrawal + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getBytes + (Prelude.fromIntegral len)) + "reward_account" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"rewardAccount") y x) + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + Data.ProtoLens.Encoding.Bytes.getVarInt "coin" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"coin") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "redeemer" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"redeemer") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "Withdrawal" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (let + _v + = Lens.Family2.view + (Data.ProtoLens.Field.field @"rewardAccount") _x + in + if (Prelude.==) _v Data.ProtoLens.fieldDefault then + Data.Monoid.mempty + else + (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + _v)) + ((Data.Monoid.<>) + (let _v = Lens.Family2.view (Data.ProtoLens.Field.field @"coin") _x + in + if (Prelude.==) _v Data.ProtoLens.fieldDefault then + Data.Monoid.mempty + else + (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + (Data.ProtoLens.Encoding.Bytes.putVarInt _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'redeemer") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData Withdrawal where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_Withdrawal'_unknownFields x__) + (Control.DeepSeq.deepseq + (_Withdrawal'rewardAccount x__) + (Control.DeepSeq.deepseq + (_Withdrawal'coin x__) + (Control.DeepSeq.deepseq (_Withdrawal'redeemer x__) ()))) +{- | Fields : + + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.vkeywitness' @:: Lens' WitnessSet [VKeyWitness]@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.vec'vkeywitness' @:: Lens' WitnessSet (Data.Vector.Vector VKeyWitness)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.script' @:: Lens' WitnessSet [Script]@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.vec'script' @:: Lens' WitnessSet (Data.Vector.Vector Script)@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.plutusDatums' @:: Lens' WitnessSet [PlutusData]@ + * 'Proto.Utxorpc.V1alpha.Cardano.Cardano_Fields.vec'plutusDatums' @:: Lens' WitnessSet (Data.Vector.Vector PlutusData)@ -} +data WitnessSet + = WitnessSet'_constructor {_WitnessSet'vkeywitness :: !(Data.Vector.Vector VKeyWitness), + _WitnessSet'script :: !(Data.Vector.Vector Script), + _WitnessSet'plutusDatums :: !(Data.Vector.Vector PlutusData), + _WitnessSet'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show WitnessSet where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField WitnessSet "vkeywitness" [VKeyWitness] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _WitnessSet'vkeywitness + (\ x__ y__ -> x__ {_WitnessSet'vkeywitness = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField WitnessSet "vec'vkeywitness" (Data.Vector.Vector VKeyWitness) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _WitnessSet'vkeywitness + (\ x__ y__ -> x__ {_WitnessSet'vkeywitness = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField WitnessSet "script" [Script] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _WitnessSet'script (\ x__ y__ -> x__ {_WitnessSet'script = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField WitnessSet "vec'script" (Data.Vector.Vector Script) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _WitnessSet'script (\ x__ y__ -> x__ {_WitnessSet'script = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField WitnessSet "plutusDatums" [PlutusData] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _WitnessSet'plutusDatums + (\ x__ y__ -> x__ {_WitnessSet'plutusDatums = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField WitnessSet "vec'plutusDatums" (Data.Vector.Vector PlutusData) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _WitnessSet'plutusDatums + (\ x__ y__ -> x__ {_WitnessSet'plutusDatums = y__})) + Prelude.id +instance Data.ProtoLens.Message WitnessSet where + messageName _ = Data.Text.pack "utxorpc.v1alpha.cardano.WitnessSet" + packedMessageDescriptor _ + = "\n\ + \\n\ + \WitnessSet\DC2F\n\ + \\vvkeywitness\CAN\SOH \ETX(\v2$.utxorpc.v1alpha.cardano.VKeyWitnessR\vvkeywitness\DC27\n\ + \\ACKscript\CAN\STX \ETX(\v2\US.utxorpc.v1alpha.cardano.ScriptR\ACKscript\DC2H\n\ + \\rplutus_datums\CAN\ETX \ETX(\v2#.utxorpc.v1alpha.cardano.PlutusDataR\fplutusDatums" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + vkeywitness__field_descriptor + = Data.ProtoLens.FieldDescriptor + "vkeywitness" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor VKeyWitness) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"vkeywitness")) :: + Data.ProtoLens.FieldDescriptor WitnessSet + script__field_descriptor + = Data.ProtoLens.FieldDescriptor + "script" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Script) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked (Data.ProtoLens.Field.field @"script")) :: + Data.ProtoLens.FieldDescriptor WitnessSet + plutusDatums__field_descriptor + = Data.ProtoLens.FieldDescriptor + "plutus_datums" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor PlutusData) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"plutusDatums")) :: + Data.ProtoLens.FieldDescriptor WitnessSet + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, vkeywitness__field_descriptor), + (Data.ProtoLens.Tag 2, script__field_descriptor), + (Data.ProtoLens.Tag 3, plutusDatums__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _WitnessSet'_unknownFields + (\ x__ y__ -> x__ {_WitnessSet'_unknownFields = y__}) + defMessage + = WitnessSet'_constructor + {_WitnessSet'vkeywitness = Data.Vector.Generic.empty, + _WitnessSet'script = Data.Vector.Generic.empty, + _WitnessSet'plutusDatums = Data.Vector.Generic.empty, + _WitnessSet'_unknownFields = []} + parseMessage + = let + loop :: + WitnessSet + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld PlutusData + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Script + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld VKeyWitness + -> Data.ProtoLens.Encoding.Bytes.Parser WitnessSet + loop x mutable'plutusDatums mutable'script mutable'vkeywitness + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'plutusDatums <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'plutusDatums) + frozen'script <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'script) + frozen'vkeywitness <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'vkeywitness) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'plutusDatums") + frozen'plutusDatums + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'script") frozen'script + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'vkeywitness") + frozen'vkeywitness x)))) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "vkeywitness" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'vkeywitness y) + loop x mutable'plutusDatums mutable'script v + 18 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "script" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'script y) + loop x mutable'plutusDatums v mutable'vkeywitness + 26 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "plutus_datums" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'plutusDatums y) + loop x v mutable'script mutable'vkeywitness + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'plutusDatums mutable'script mutable'vkeywitness + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'plutusDatums <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'script <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'vkeywitness <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage mutable'plutusDatums mutable'script + mutable'vkeywitness) + "WitnessSet" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'vkeywitness") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view (Data.ProtoLens.Field.field @"vec'script") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'plutusDatums") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData WitnessSet where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_WitnessSet'_unknownFields x__) + (Control.DeepSeq.deepseq + (_WitnessSet'vkeywitness x__) + (Control.DeepSeq.deepseq + (_WitnessSet'script x__) + (Control.DeepSeq.deepseq (_WitnessSet'plutusDatums x__) ()))) +packedFileDescriptor :: Data.ByteString.ByteString +packedFileDescriptor + = "\n\ + \%utxorpc/v1alpha/cardano/cardano.proto\DC2\ETButxorpc.v1alpha.cardano\"\133\STX\n\ + \\bRedeemer\DC2B\n\ + \\apurpose\CAN\SOH \SOH(\SO2(.utxorpc.v1alpha.cardano.RedeemerPurposeR\apurpose\DC2=\n\ + \\apayload\CAN\STX \SOH(\v2#.utxorpc.v1alpha.cardano.PlutusDataR\apayload\DC2\DC4\n\ + \\ENQindex\CAN\ETX \SOH(\rR\ENQindex\DC2;\n\ + \\bex_units\CAN\EOT \SOH(\v2 .utxorpc.v1alpha.cardano.ExUnitsR\aexUnits\DC2#\n\ + \\roriginal_cbor\CAN\ENQ \SOH(\fR\foriginalCbor\"\196\SOH\n\ + \\aTxInput\DC2\ETB\n\ + \\atx_hash\CAN\SOH \SOH(\fR\ACKtxHash\DC2!\n\ + \\foutput_index\CAN\STX \SOH(\rR\voutputIndex\DC2>\n\ + \\tas_output\CAN\ETX \SOH(\v2!.utxorpc.v1alpha.cardano.TxOutputR\basOutput\DC2=\n\ + \\bredeemer\CAN\EOT \SOH(\v2!.utxorpc.v1alpha.cardano.RedeemerR\bredeemer\"\228\SOH\n\ + \\bTxOutput\DC2\CAN\n\ + \\aaddress\CAN\SOH \SOH(\fR\aaddress\DC2\DC2\n\ + \\EOTcoin\CAN\STX \SOH(\EOTR\EOTcoin\DC2;\n\ + \\ACKassets\CAN\ETX \ETX(\v2#.utxorpc.v1alpha.cardano.MultiassetR\ACKassets\DC24\n\ + \\ENQdatum\CAN\EOT \SOH(\v2\RS.utxorpc.v1alpha.cardano.DatumR\ENQdatum\DC27\n\ + \\ACKscript\CAN\ENQ \SOH(\v2\US.utxorpc.v1alpha.cardano.ScriptR\ACKscript\"\DEL\n\ + \\ENQDatum\DC2\DC2\n\ + \\EOThash\CAN\SOH \SOH(\fR\EOThash\DC2=\n\ + \\apayload\CAN\STX \SOH(\v2#.utxorpc.v1alpha.cardano.PlutusDataR\apayload\DC2#\n\ + \\roriginal_cbor\CAN\ETX \SOH(\fR\foriginalCbor\"Y\n\ + \\ENQAsset\DC2\DC2\n\ + \\EOTname\CAN\SOH \SOH(\fR\EOTname\DC2\US\n\ + \\voutput_coin\CAN\STX \SOH(\EOTR\n\ + \outputCoin\DC2\ESC\n\ + \\tmint_coin\CAN\ETX \SOH(\ETXR\bmintCoin\"\160\SOH\n\ + \\n\ + \Multiasset\DC2\ESC\n\ + \\tpolicy_id\CAN\SOH \SOH(\fR\bpolicyId\DC26\n\ + \\ACKassets\CAN\STX \ETX(\v2\RS.utxorpc.v1alpha.cardano.AssetR\ACKassets\DC2=\n\ + \\bredeemer\CAN\ETX \SOH(\v2!.utxorpc.v1alpha.cardano.RedeemerR\bredeemer\"4\n\ + \\n\ + \TxValidity\DC2\DC4\n\ + \\ENQstart\CAN\SOH \SOH(\EOTR\ENQstart\DC2\DLE\n\ + \\ETXttl\CAN\STX \SOH(\EOTR\ETXttl\"\201\SOH\n\ + \\n\ + \Collateral\DC2@\n\ + \\n\ + \collateral\CAN\SOH \ETX(\v2 .utxorpc.v1alpha.cardano.TxInputR\n\ + \collateral\DC2N\n\ + \\DC1collateral_return\CAN\STX \SOH(\v2!.utxorpc.v1alpha.cardano.TxOutputR\DLEcollateralReturn\DC2)\n\ + \\DLEtotal_collateral\CAN\ETX \SOH(\EOTR\SItotalCollateral\"\134\SOH\n\ + \\n\ + \Withdrawal\DC2%\n\ + \\SOreward_account\CAN\SOH \SOH(\fR\rrewardAccount\DC2\DC2\n\ + \\EOTcoin\CAN\STX \SOH(\EOTR\EOTcoin\DC2=\n\ + \\bredeemer\CAN\ETX \SOH(\v2!.utxorpc.v1alpha.cardano.RedeemerR\bredeemer\"\215\SOH\n\ + \\n\ + \WitnessSet\DC2F\n\ + \\vvkeywitness\CAN\SOH \ETX(\v2$.utxorpc.v1alpha.cardano.VKeyWitnessR\vvkeywitness\DC27\n\ + \\ACKscript\CAN\STX \ETX(\v2\US.utxorpc.v1alpha.cardano.ScriptR\ACKscript\DC2H\n\ + \\rplutus_datums\CAN\ETX \ETX(\v2#.utxorpc.v1alpha.cardano.PlutusDataR\fplutusDatums\"\131\SOH\n\ + \\aAuxData\DC2=\n\ + \\bmetadata\CAN\SOH \ETX(\v2!.utxorpc.v1alpha.cardano.MetadataR\bmetadata\DC29\n\ + \\ascripts\CAN\STX \ETX(\v2\US.utxorpc.v1alpha.cardano.ScriptR\ascripts\"\225\ENQ\n\ + \\STXTx\DC28\n\ + \\ACKinputs\CAN\SOH \ETX(\v2 .utxorpc.v1alpha.cardano.TxInputR\ACKinputs\DC2;\n\ + \\aoutputs\CAN\STX \ETX(\v2!.utxorpc.v1alpha.cardano.TxOutputR\aoutputs\DC2H\n\ + \\fcertificates\CAN\ETX \ETX(\v2$.utxorpc.v1alpha.cardano.CertificateR\fcertificates\DC2E\n\ + \\vwithdrawals\CAN\EOT \ETX(\v2#.utxorpc.v1alpha.cardano.WithdrawalR\vwithdrawals\DC27\n\ + \\EOTmint\CAN\ENQ \ETX(\v2#.utxorpc.v1alpha.cardano.MultiassetR\EOTmint\DC2K\n\ + \\DLEreference_inputs\CAN\ACK \ETX(\v2 .utxorpc.v1alpha.cardano.TxInputR\SIreferenceInputs\DC2A\n\ + \\twitnesses\CAN\a \SOH(\v2#.utxorpc.v1alpha.cardano.WitnessSetR\twitnesses\DC2C\n\ + \\n\ + \collateral\CAN\b \SOH(\v2#.utxorpc.v1alpha.cardano.CollateralR\n\ + \collateral\DC2\DLE\n\ + \\ETXfee\CAN\t \SOH(\EOTR\ETXfee\DC2?\n\ + \\bvalidity\CAN\n\ + \ \SOH(\v2#.utxorpc.v1alpha.cardano.TxValidityR\bvalidity\DC2\RS\n\ + \\n\ + \successful\CAN\v \SOH(\bR\n\ + \successful\DC2>\n\ + \\tauxiliary\CAN\f \SOH(\v2 .utxorpc.v1alpha.cardano.AuxDataR\tauxiliary\DC2\DC2\n\ + \\EOThash\CAN\r \SOH(\fR\EOThash\"M\n\ + \\vBlockHeader\DC2\DC2\n\ + \\EOTslot\CAN\SOH \SOH(\EOTR\EOTslot\DC2\DC2\n\ + \\EOThash\CAN\STX \SOH(\fR\EOThash\DC2\SYN\n\ + \\ACKheight\CAN\ETX \SOH(\EOTR\ACKheight\"8\n\ + \\tBlockBody\DC2+\n\ + \\STXtx\CAN\SOH \ETX(\v2\ESC.utxorpc.v1alpha.cardano.TxR\STXtx\"}\n\ + \\ENQBlock\DC2<\n\ + \\ACKheader\CAN\SOH \SOH(\v2$.utxorpc.v1alpha.cardano.BlockHeaderR\ACKheader\DC26\n\ + \\EOTbody\CAN\STX \SOH(\v2\".utxorpc.v1alpha.cardano.BlockBodyR\EOTbody\"?\n\ + \\vVKeyWitness\DC2\DC2\n\ + \\EOTvkey\CAN\SOH \SOH(\fR\EOTvkey\DC2\FS\n\ + \\tsignature\CAN\STX \SOH(\fR\tsignature\"\128\ETX\n\ + \\fNativeScript\DC2%\n\ + \\rscript_pubkey\CAN\SOH \SOH(\fH\NULR\fscriptPubkey\DC2J\n\ + \\n\ + \script_all\CAN\STX \SOH(\v2).utxorpc.v1alpha.cardano.NativeScriptListH\NULR\tscriptAll\DC2J\n\ + \\n\ + \script_any\CAN\ETX \SOH(\v2).utxorpc.v1alpha.cardano.NativeScriptListH\NULR\tscriptAny\DC2H\n\ + \\rscript_n_of_k\CAN\EOT \SOH(\v2#.utxorpc.v1alpha.cardano.ScriptNOfKH\NULR\n\ + \scriptNOfK\DC2'\n\ + \\SOinvalid_before\CAN\ENQ \SOH(\EOTH\NULR\rinvalidBefore\DC2-\n\ + \\DC1invalid_hereafter\CAN\ACK \SOH(\EOTH\NULR\DLEinvalidHereafterB\SI\n\ + \\rnative_script\"O\n\ + \\DLENativeScriptList\DC2;\n\ + \\ENQitems\CAN\SOH \ETX(\v2%.utxorpc.v1alpha.cardano.NativeScriptR\ENQitems\"[\n\ + \\n\ + \ScriptNOfK\DC2\f\n\ + \\SOHk\CAN\SOH \SOH(\rR\SOHk\DC2?\n\ + \\ascripts\CAN\STX \ETX(\v2%.utxorpc.v1alpha.cardano.NativeScriptR\ascripts\"\128\SOH\n\ + \\ACKConstr\DC2\DLE\n\ + \\ETXtag\CAN\SOH \SOH(\rR\ETXtag\DC2'\n\ + \\SIany_constructor\CAN\STX \SOH(\EOTR\SOanyConstructor\DC2;\n\ + \\ACKfields\CAN\ETX \ETX(\v2#.utxorpc.v1alpha.cardano.PlutusDataR\ACKfields\"c\n\ + \\ACKBigInt\DC2\DC2\n\ + \\ETXint\CAN\SOH \SOH(\ETXH\NULR\ETXint\DC2\FS\n\ + \\tbig_u_int\CAN\STX \SOH(\fH\NULR\abigUInt\DC2\FS\n\ + \\tbig_n_int\CAN\ETX \SOH(\fH\NULR\abigNIntB\t\n\ + \\abig_int\"\130\SOH\n\ + \\SOPlutusDataPair\DC25\n\ + \\ETXkey\CAN\SOH \SOH(\v2#.utxorpc.v1alpha.cardano.PlutusDataR\ETXkey\DC29\n\ + \\ENQvalue\CAN\STX \SOH(\v2#.utxorpc.v1alpha.cardano.PlutusDataR\ENQvalue\"\183\STX\n\ + \\n\ + \PlutusData\DC29\n\ + \\ACKconstr\CAN\STX \SOH(\v2\US.utxorpc.v1alpha.cardano.ConstrH\NULR\ACKconstr\DC2:\n\ + \\ETXmap\CAN\ETX \SOH(\v2&.utxorpc.v1alpha.cardano.PlutusDataMapH\NULR\ETXmap\DC2:\n\ + \\abig_int\CAN\EOT \SOH(\v2\US.utxorpc.v1alpha.cardano.BigIntH\NULR\ACKbigInt\DC2%\n\ + \\rbounded_bytes\CAN\ENQ \SOH(\fH\NULR\fboundedBytes\DC2@\n\ + \\ENQarray\CAN\ACK \SOH(\v2(.utxorpc.v1alpha.cardano.PlutusDataArrayH\NULR\ENQarrayB\r\n\ + \\vplutus_data\"N\n\ + \\rPlutusDataMap\DC2=\n\ + \\ENQpairs\CAN\SOH \ETX(\v2'.utxorpc.v1alpha.cardano.PlutusDataPairR\ENQpairs\"L\n\ + \\SIPlutusDataArray\DC29\n\ + \\ENQitems\CAN\SOH \ETX(\v2#.utxorpc.v1alpha.cardano.PlutusDataR\ENQitems\"\176\SOH\n\ + \\ACKScript\DC2?\n\ + \\ACKnative\CAN\SOH \SOH(\v2%.utxorpc.v1alpha.cardano.NativeScriptH\NULR\ACKnative\DC2\GS\n\ + \\tplutus_v1\CAN\STX \SOH(\fH\NULR\bplutusV1\DC2\GS\n\ + \\tplutus_v2\CAN\ETX \SOH(\fH\NULR\bplutusV2\DC2\GS\n\ + \\tplutus_v3\CAN\EOT \SOH(\fH\NULR\bplutusV3B\b\n\ + \\ACKscript\"\214\SOH\n\ + \\tMetadatum\DC2\DC2\n\ + \\ETXint\CAN\SOH \SOH(\ETXH\NULR\ETXint\DC2\SYN\n\ + \\ENQbytes\CAN\STX \SOH(\fH\NULR\ENQbytes\DC2\DC4\n\ + \\EOTtext\CAN\ETX \SOH(\tH\NULR\EOTtext\DC2?\n\ + \\ENQarray\CAN\EOT \SOH(\v2'.utxorpc.v1alpha.cardano.MetadatumArrayH\NULR\ENQarray\DC29\n\ + \\ETXmap\CAN\ENQ \SOH(\v2%.utxorpc.v1alpha.cardano.MetadatumMapH\NULR\ETXmapB\v\n\ + \\tmetadatum\"J\n\ + \\SOMetadatumArray\DC28\n\ + \\ENQitems\CAN\SOH \ETX(\v2\".utxorpc.v1alpha.cardano.MetadatumR\ENQitems\"L\n\ + \\fMetadatumMap\DC2<\n\ + \\ENQpairs\CAN\SOH \ETX(\v2&.utxorpc.v1alpha.cardano.MetadatumPairR\ENQpairs\"\DEL\n\ + \\rMetadatumPair\DC24\n\ + \\ETXkey\CAN\SOH \SOH(\v2\".utxorpc.v1alpha.cardano.MetadatumR\ETXkey\DC28\n\ + \\ENQvalue\CAN\STX \SOH(\v2\".utxorpc.v1alpha.cardano.MetadatumR\ENQvalue\"Z\n\ + \\bMetadata\DC2\DC4\n\ + \\ENQlabel\CAN\SOH \SOH(\EOTR\ENQlabel\DC28\n\ + \\ENQvalue\CAN\STX \SOH(\v2\".utxorpc.v1alpha.cardano.MetadatumR\ENQvalue\"n\n\ + \\SIStakeCredential\DC2$\n\ + \\raddr_key_hash\CAN\SOH \SOH(\fH\NULR\vaddrKeyHash\DC2!\n\ + \\vscript_hash\CAN\STX \SOH(\fH\NULR\n\ + \scriptHashB\DC2\n\ + \\DLEstake_credential\"P\n\ + \\SORationalNumber\DC2\FS\n\ + \\tnumerator\CAN\SOH \SOH(\ENQR\tnumerator\DC2 \n\ + \\vdenominator\CAN\STX \SOH(\rR\vdenominator\"`\n\ + \\ENQRelay\DC2\DC3\n\ + \\ENQip_v4\CAN\SOH \SOH(\fR\EOTipV4\DC2\DC3\n\ + \\ENQip_v6\CAN\STX \SOH(\fR\EOTipV6\DC2\EM\n\ + \\bdns_name\CAN\ETX \SOH(\tR\adnsName\DC2\DC2\n\ + \\EOTport\CAN\EOT \SOH(\rR\EOTport\"4\n\ + \\fPoolMetadata\DC2\DLE\n\ + \\ETXurl\CAN\SOH \SOH(\tR\ETXurl\DC2\DC2\n\ + \\EOThash\CAN\STX \SOH(\fR\EOThash\"\251\r\n\ + \\vCertificate\DC2Y\n\ + \\DC2stake_registration\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialH\NULR\DC1stakeRegistration\DC2]\n\ + \\DC4stake_deregistration\CAN\STX \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialH\NULR\DC3stakeDeregistration\DC2Y\n\ + \\DLEstake_delegation\CAN\ETX \SOH(\v2,.utxorpc.v1alpha.cardano.StakeDelegationCertH\NULR\SIstakeDelegation\DC2\\\n\ + \\DC1pool_registration\CAN\EOT \SOH(\v2-.utxorpc.v1alpha.cardano.PoolRegistrationCertH\NULR\DLEpoolRegistration\DC2V\n\ + \\SIpool_retirement\CAN\ENQ \SOH(\v2+.utxorpc.v1alpha.cardano.PoolRetirementCertH\NULR\SOpoolRetirement\DC2i\n\ + \\SYNgenesis_key_delegation\CAN\ACK \SOH(\v21.utxorpc.v1alpha.cardano.GenesisKeyDelegationCertH\NULR\DC4genesisKeyDelegation\DC2=\n\ + \\bmir_cert\CAN\a \SOH(\v2 .utxorpc.v1alpha.cardano.MirCertH\NULR\amirCert\DC2=\n\ + \\breg_cert\CAN\b \SOH(\v2 .utxorpc.v1alpha.cardano.RegCertH\NULR\aregCert\DC2C\n\ + \\n\ + \unreg_cert\CAN\t \SOH(\v2\".utxorpc.v1alpha.cardano.UnRegCertH\NULR\tunregCert\DC2P\n\ + \\SIvote_deleg_cert\CAN\n\ + \ \SOH(\v2&.utxorpc.v1alpha.cardano.VoteDelegCertH\NULR\rvoteDelegCert\DC2`\n\ + \\NAKstake_vote_deleg_cert\CAN\v \SOH(\v2+.utxorpc.v1alpha.cardano.StakeVoteDelegCertH\NULR\DC2stakeVoteDelegCert\DC2]\n\ + \\DC4stake_reg_deleg_cert\CAN\f \SOH(\v2*.utxorpc.v1alpha.cardano.StakeRegDelegCertH\NULR\DC1stakeRegDelegCert\DC2Z\n\ + \\DC3vote_reg_deleg_cert\CAN\r \SOH(\v2).utxorpc.v1alpha.cardano.VoteRegDelegCertH\NULR\DLEvoteRegDelegCert\DC2j\n\ + \\EMstake_vote_reg_deleg_cert\CAN\SO \SOH(\v2..utxorpc.v1alpha.cardano.StakeVoteRegDelegCertH\NULR\NAKstakeVoteRegDelegCert\DC2f\n\ + \\ETBauth_committee_hot_cert\CAN\SI \SOH(\v2-.utxorpc.v1alpha.cardano.AuthCommitteeHotCertH\NULR\DC4authCommitteeHotCert\DC2o\n\ + \\SUBresign_committee_cold_cert\CAN\DLE \SOH(\v20.utxorpc.v1alpha.cardano.ResignCommitteeColdCertH\NULR\ETBresignCommitteeColdCert\DC2J\n\ + \\rreg_drep_cert\CAN\DC1 \SOH(\v2$.utxorpc.v1alpha.cardano.RegDRepCertH\NULR\vregDrepCert\DC2P\n\ + \\SIunreg_drep_cert\CAN\DC2 \SOH(\v2&.utxorpc.v1alpha.cardano.UnRegDRepCertH\NULR\runregDrepCert\DC2S\n\ + \\DLEupdate_drep_cert\CAN\DC3 \SOH(\v2'.utxorpc.v1alpha.cardano.UpdateDRepCertH\NULR\SOupdateDrepCert\DC2=\n\ + \\bredeemer\CANd \SOH(\v2!.utxorpc.v1alpha.cardano.RedeemerR\bredeemerB\r\n\ + \\vcertificate\"\141\SOH\n\ + \\DC3StakeDelegationCert\DC2S\n\ + \\DLEstake_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SIstakeCredential\DC2!\n\ + \\fpool_keyhash\CAN\STX \SOH(\fR\vpoolKeyhash\"\140\ETX\n\ + \\DC4PoolRegistrationCert\DC2\SUB\n\ + \\boperator\CAN\SOH \SOH(\fR\boperator\DC2\US\n\ + \\vvrf_keyhash\CAN\STX \SOH(\fR\n\ + \vrfKeyhash\DC2\SYN\n\ + \\ACKpledge\CAN\ETX \SOH(\EOTR\ACKpledge\DC2\DC2\n\ + \\EOTcost\CAN\EOT \SOH(\EOTR\EOTcost\DC2?\n\ + \\ACKmargin\CAN\ENQ \SOH(\v2'.utxorpc.v1alpha.cardano.RationalNumberR\ACKmargin\DC2%\n\ + \\SOreward_account\CAN\ACK \SOH(\fR\rrewardAccount\DC2\US\n\ + \\vpool_owners\CAN\a \ETX(\fR\n\ + \poolOwners\DC26\n\ + \\ACKrelays\CAN\b \ETX(\v2\RS.utxorpc.v1alpha.cardano.RelayR\ACKrelays\DC2J\n\ + \\rpool_metadata\CAN\t \SOH(\v2%.utxorpc.v1alpha.cardano.PoolMetadataR\fpoolMetadata\"M\n\ + \\DC2PoolRetirementCert\DC2!\n\ + \\fpool_keyhash\CAN\SOH \SOH(\fR\vpoolKeyhash\DC2\DC4\n\ + \\ENQepoch\CAN\STX \SOH(\EOTR\ENQepoch\"\146\SOH\n\ + \\CANGenesisKeyDelegationCert\DC2!\n\ + \\fgenesis_hash\CAN\SOH \SOH(\fR\vgenesisHash\DC22\n\ + \\NAKgenesis_delegate_hash\CAN\STX \SOH(\fR\DC3genesisDelegateHash\DC2\US\n\ + \\vvrf_keyhash\CAN\ETX \SOH(\fR\n\ + \vrfKeyhash\"\DEL\n\ + \\tMirTarget\DC2S\n\ + \\DLEstake_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SIstakeCredential\DC2\GS\n\ + \\n\ + \delta_coin\CAN\STX \SOH(\ETXR\tdeltaCoin\"\146\SOH\n\ + \\aMirCert\DC26\n\ + \\EOTfrom\CAN\SOH \SOH(\SO2\".utxorpc.v1alpha.cardano.MirSourceR\EOTfrom\DC22\n\ + \\STXto\CAN\STX \ETX(\v2\".utxorpc.v1alpha.cardano.MirTargetR\STXto\DC2\ESC\n\ + \\tother_pot\CAN\ETX \SOH(\EOTR\botherPot\"r\n\ + \\aRegCert\DC2S\n\ + \\DLEstake_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SIstakeCredential\DC2\DC2\n\ + \\EOTcoin\CAN\STX \SOH(\EOTR\EOTcoin\"t\n\ + \\tUnRegCert\DC2S\n\ + \\DLEstake_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SIstakeCredential\DC2\DC2\n\ + \\EOTcoin\CAN\STX \SOH(\EOTR\EOTcoin\"\154\SOH\n\ + \\EOTDRep\DC2$\n\ + \\raddr_key_hash\CAN\SOH \SOH(\fH\NULR\vaddrKeyHash\DC2!\n\ + \\vscript_hash\CAN\STX \SOH(\fH\NULR\n\ + \scriptHash\DC2\SUB\n\ + \\aabstain\CAN\ETX \SOH(\bH\NULR\aabstain\DC2%\n\ + \\rno_confidence\CAN\EOT \SOH(\bH\NULR\fnoConfidenceB\ACK\n\ + \\EOTdrep\"\151\SOH\n\ + \\rVoteDelegCert\DC2S\n\ + \\DLEstake_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SIstakeCredential\DC21\n\ + \\EOTdrep\CAN\STX \SOH(\v2\GS.utxorpc.v1alpha.cardano.DRepR\EOTdrep\"\191\SOH\n\ + \\DC2StakeVoteDelegCert\DC2S\n\ + \\DLEstake_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SIstakeCredential\DC2!\n\ + \\fpool_keyhash\CAN\STX \SOH(\fR\vpoolKeyhash\DC21\n\ + \\EOTdrep\CAN\ETX \SOH(\v2\GS.utxorpc.v1alpha.cardano.DRepR\EOTdrep\"\159\SOH\n\ + \\DC1StakeRegDelegCert\DC2S\n\ + \\DLEstake_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SIstakeCredential\DC2!\n\ + \\fpool_keyhash\CAN\STX \SOH(\fR\vpoolKeyhash\DC2\DC2\n\ + \\EOTcoin\CAN\ETX \SOH(\EOTR\EOTcoin\"\174\SOH\n\ + \\DLEVoteRegDelegCert\DC2S\n\ + \\DLEstake_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SIstakeCredential\DC21\n\ + \\EOTdrep\CAN\STX \SOH(\v2\GS.utxorpc.v1alpha.cardano.DRepR\EOTdrep\DC2\DC2\n\ + \\EOTcoin\CAN\ETX \SOH(\EOTR\EOTcoin\"\214\SOH\n\ + \\NAKStakeVoteRegDelegCert\DC2S\n\ + \\DLEstake_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SIstakeCredential\DC2!\n\ + \\fpool_keyhash\CAN\STX \SOH(\fR\vpoolKeyhash\DC21\n\ + \\EOTdrep\CAN\ETX \SOH(\v2\GS.utxorpc.v1alpha.cardano.DRepR\EOTdrep\DC2\DC2\n\ + \\EOTcoin\CAN\EOT \SOH(\EOTR\EOTcoin\"\224\SOH\n\ + \\DC4AuthCommitteeHotCert\DC2d\n\ + \\EMcommittee_cold_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\ETBcommitteeColdCredential\DC2b\n\ + \\CANcommittee_hot_credential\CAN\STX \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SYNcommitteeHotCredential\"=\n\ + \\ACKAnchor\DC2\DLE\n\ + \\ETXurl\CAN\SOH \SOH(\tR\ETXurl\DC2!\n\ + \\fcontent_hash\CAN\STX \SOH(\fR\vcontentHash\"\184\SOH\n\ + \\ETBResignCommitteeColdCert\DC2d\n\ + \\EMcommittee_cold_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\ETBcommitteeColdCredential\DC27\n\ + \\ACKanchor\CAN\STX \SOH(\v2\US.utxorpc.v1alpha.cardano.AnchorR\ACKanchor\"\173\SOH\n\ + \\vRegDRepCert\DC2Q\n\ + \\SIdrep_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SOdrepCredential\DC2\DC2\n\ + \\EOTcoin\CAN\STX \SOH(\EOTR\EOTcoin\DC27\n\ + \\ACKanchor\CAN\ETX \SOH(\v2\US.utxorpc.v1alpha.cardano.AnchorR\ACKanchor\"v\n\ + \\rUnRegDRepCert\DC2Q\n\ + \\SIdrep_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SOdrepCredential\DC2\DC2\n\ + \\EOTcoin\CAN\STX \SOH(\EOTR\EOTcoin\"\156\SOH\n\ + \\SOUpdateDRepCert\DC2Q\n\ + \\SIdrep_credential\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.StakeCredentialR\SOdrepCredential\DC27\n\ + \\ACKanchor\CAN\STX \SOH(\v2\US.utxorpc.v1alpha.cardano.AnchorR\ACKanchor\"\129\SOH\n\ + \\SOAddressPattern\DC2#\n\ + \\rexact_address\CAN\SOH \SOH(\fR\fexactAddress\DC2!\n\ + \\fpayment_part\CAN\STX \SOH(\fR\vpaymentPart\DC2'\n\ + \\SIdelegation_part\CAN\ETX \SOH(\fR\SOdelegationPart\"J\n\ + \\fAssetPattern\DC2\ESC\n\ + \\tpolicy_id\CAN\SOH \SOH(\fR\bpolicyId\DC2\GS\n\ + \\n\ + \asset_name\CAN\STX \SOH(\fR\tassetName\"\145\SOH\n\ + \\SITxOutputPattern\DC2A\n\ + \\aaddress\CAN\SOH \SOH(\v2'.utxorpc.v1alpha.cardano.AddressPatternR\aaddress\DC2;\n\ + \\ENQasset\CAN\STX \SOH(\v2%.utxorpc.v1alpha.cardano.AssetPatternR\ENQasset\"\241\STX\n\ + \\tTxPattern\DC2D\n\ + \\bconsumes\CAN\SOH \SOH(\v2(.utxorpc.v1alpha.cardano.TxOutputPatternR\bconsumes\DC2D\n\ + \\bproduces\CAN\STX \SOH(\v2(.utxorpc.v1alpha.cardano.TxOutputPatternR\bproduces\DC2H\n\ + \\vhas_address\CAN\ETX \SOH(\v2'.utxorpc.v1alpha.cardano.AddressPatternR\n\ + \hasAddress\DC2F\n\ + \\vmoves_asset\CAN\EOT \SOH(\v2%.utxorpc.v1alpha.cardano.AssetPatternR\n\ + \movesAsset\DC2F\n\ + \\vmints_asset\CAN\ENQ \SOH(\v2%.utxorpc.v1alpha.cardano.AssetPatternR\n\ + \mintsAsset\"7\n\ + \\aExUnits\DC2\DC4\n\ + \\ENQsteps\CAN\SOH \SOH(\EOTR\ENQsteps\DC2\SYN\n\ + \\ACKmemory\CAN\STX \SOH(\EOTR\ACKmemory\"\138\SOH\n\ + \\bExPrices\DC2=\n\ + \\ENQsteps\CAN\SOH \SOH(\v2'.utxorpc.v1alpha.cardano.RationalNumberR\ENQsteps\DC2?\n\ + \\ACKmemory\CAN\STX \SOH(\v2'.utxorpc.v1alpha.cardano.RationalNumberR\ACKmemory\"=\n\ + \\SIProtocolVersion\DC2\DC4\n\ + \\ENQmajor\CAN\SOH \SOH(\rR\ENQmajor\DC2\DC4\n\ + \\ENQminor\CAN\STX \SOH(\rR\ENQminor\"#\n\ + \\tCostModel\DC2\SYN\n\ + \\ACKvalues\CAN\SOH \ETX(\ETXR\ACKvalues\"\207\SOH\n\ + \\n\ + \CostModels\DC2?\n\ + \\tplutus_v1\CAN\SOH \SOH(\v2\".utxorpc.v1alpha.cardano.CostModelR\bplutusV1\DC2?\n\ + \\tplutus_v2\CAN\STX \SOH(\v2\".utxorpc.v1alpha.cardano.CostModelR\bplutusV2\DC2?\n\ + \\tplutus_v3\CAN\ETX \SOH(\v2\".utxorpc.v1alpha.cardano.CostModelR\bplutusV3\"\182\n\ + \\n\ + \\aPParams\DC2-\n\ + \\DC3coins_per_utxo_byte\CAN\SOH \SOH(\EOTR\DLEcoinsPerUtxoByte\DC2\RS\n\ + \\vmax_tx_size\CAN\STX \SOH(\EOTR\tmaxTxSize\DC2.\n\ + \\DC3min_fee_coefficient\CAN\ETX \SOH(\EOTR\DC1minFeeCoefficient\DC2(\n\ + \\DLEmin_fee_constant\CAN\EOT \SOH(\EOTR\SOminFeeConstant\DC2-\n\ + \\DC3max_block_body_size\CAN\ENQ \SOH(\EOTR\DLEmaxBlockBodySize\DC21\n\ + \\NAKmax_block_header_size\CAN\ACK \SOH(\EOTR\DC2maxBlockHeaderSize\DC2*\n\ + \\DC1stake_key_deposit\CAN\a \SOH(\EOTR\SIstakeKeyDeposit\DC2!\n\ + \\fpool_deposit\CAN\b \SOH(\EOTR\vpoolDeposit\DC2=\n\ + \\ESCpool_retirement_epoch_bound\CAN\t \SOH(\EOTR\CANpoolRetirementEpochBound\DC25\n\ + \\ETBdesired_number_of_pools\CAN\n\ + \ \SOH(\EOTR\DC4desiredNumberOfPools\DC2N\n\ + \\SOpool_influence\CAN\v \SOH(\v2'.utxorpc.v1alpha.cardano.RationalNumberR\rpoolInfluence\DC2V\n\ + \\DC2monetary_expansion\CAN\f \SOH(\v2'.utxorpc.v1alpha.cardano.RationalNumberR\DC1monetaryExpansion\DC2V\n\ + \\DC2treasury_expansion\CAN\r \SOH(\v2'.utxorpc.v1alpha.cardano.RationalNumberR\DC1treasuryExpansion\DC2\"\n\ + \\rmin_pool_cost\CAN\SO \SOH(\EOTR\vminPoolCost\DC2S\n\ + \\DLEprotocol_version\CAN\SI \SOH(\v2(.utxorpc.v1alpha.cardano.ProtocolVersionR\SIprotocolVersion\DC2$\n\ + \\SOmax_value_size\CAN\DLE \SOH(\EOTR\fmaxValueSize\DC23\n\ + \\NAKcollateral_percentage\CAN\DC1 \SOH(\EOTR\DC4collateralPercentage\DC22\n\ + \\NAKmax_collateral_inputs\CAN\DC2 \SOH(\EOTR\DC3maxCollateralInputs\DC2D\n\ + \\vcost_models\CAN\DC3 \SOH(\v2#.utxorpc.v1alpha.cardano.CostModelsR\n\ + \costModels\DC29\n\ + \\ACKprices\CAN\DC4 \SOH(\v2!.utxorpc.v1alpha.cardano.ExPricesR\ACKprices\DC2n\n\ + \#max_execution_units_per_transaction\CAN\NAK \SOH(\v2 .utxorpc.v1alpha.cardano.ExUnitsR\USmaxExecutionUnitsPerTransaction\DC2b\n\ + \\GSmax_execution_units_per_block\CAN\SYN \SOH(\v2 .utxorpc.v1alpha.cardano.ExUnitsR\EMmaxExecutionUnitsPerBlock\"\GS\n\ + \\tEvalError\DC2\DLE\n\ + \\ETXmsg\CAN\SOH \SOH(\tR\ETXmsg\"\GS\n\ + \\tEvalTrace\DC2\DLE\n\ + \\ETXmsg\CAN\SOH \SOH(\tR\ETXmsg\"\144\STX\n\ + \\ACKTxEval\DC2\DLE\n\ + \\ETXfee\CAN\SOH \SOH(\EOTR\ETXfee\DC2;\n\ + \\bex_units\CAN\STX \SOH(\v2 .utxorpc.v1alpha.cardano.ExUnitsR\aexUnits\DC2:\n\ + \\ACKerrors\CAN\ETX \ETX(\v2\".utxorpc.v1alpha.cardano.EvalErrorR\ACKerrors\DC2:\n\ + \\ACKtraces\CAN\EOT \ETX(\v2\".utxorpc.v1alpha.cardano.EvalTraceR\ACKtraces\DC2?\n\ + \\tredeemers\CAN\ENQ \ETX(\v2!.utxorpc.v1alpha.cardano.RedeemerR\tredeemers*\219\SOH\n\ + \\SIRedeemerPurpose\DC2 \n\ + \\FSREDEEMER_PURPOSE_UNSPECIFIED\DLE\NUL\DC2\SUB\n\ + \\SYNREDEEMER_PURPOSE_SPEND\DLE\SOH\DC2\EM\n\ + \\NAKREDEEMER_PURPOSE_MINT\DLE\STX\DC2\EM\n\ + \\NAKREDEEMER_PURPOSE_CERT\DLE\ETX\DC2\ESC\n\ + \\ETBREDEEMER_PURPOSE_REWARD\DLE\EOT\DC2\EM\n\ + \\NAKREDEEMER_PURPOSE_VOTE\DLE\ENQ\DC2\FS\n\ + \\CANREDEEMER_PURPOSE_PROPOSE\DLE\ACK*Y\n\ + \\tMirSource\DC2\SUB\n\ + \\SYNMIR_SOURCE_UNSPECIFIED\DLE\NUL\DC2\ETB\n\ + \\DC3MIR_SOURCE_RESERVES\DLE\SOH\DC2\ETB\n\ + \\DC3MIR_SOURCE_TREASURY\DLE\STXB\224\SOH\n\ + \\ESCcom.utxorpc.v1alpha.cardanoB\fCardanoProtoP\SOHZ5github.com/utxorpc/go-codegen/utxorpc/v1alpha/cardano\162\STX\ETXUVC\170\STX\ETBUtxorpc.V1alpha.Cardano\202\STX\ETBUtxorpc\\V1alpha\\Cardano\226\STX#Utxorpc\\V1alpha\\Cardano\\GPBMetadata\234\STX\EMUtxorpc::V1alpha::CardanoJ\211\188\SOH\n\ + \\a\DC2\ENQ\NUL\NUL\140\EOT\SOH\n\ + \\b\n\ + \\SOH\f\DC2\ETX\NUL\NUL\DC2\n\ + \\b\n\ + \\SOH\STX\DC2\ETX\STX\NUL \n\ + \7\n\ + \\STX\ENQ\NUL\DC2\EOT\ENQ\NUL\r\SOH\SUB+ Purpose of the redeemer in a transaction.\n\ + \\n\ + \\n\ + \\n\ + \\ETX\ENQ\NUL\SOH\DC2\ETX\ENQ\ENQ\DC4\n\ + \\v\n\ + \\EOT\ENQ\NUL\STX\NUL\DC2\ETX\ACK\STX#\n\ + \\f\n\ + \\ENQ\ENQ\NUL\STX\NUL\SOH\DC2\ETX\ACK\STX\RS\n\ + \\f\n\ + \\ENQ\ENQ\NUL\STX\NUL\STX\DC2\ETX\ACK!\"\n\ + \\v\n\ + \\EOT\ENQ\NUL\STX\SOH\DC2\ETX\a\STX\GS\n\ + \\f\n\ + \\ENQ\ENQ\NUL\STX\SOH\SOH\DC2\ETX\a\STX\CAN\n\ + \\f\n\ + \\ENQ\ENQ\NUL\STX\SOH\STX\DC2\ETX\a\ESC\FS\n\ + \\v\n\ + \\EOT\ENQ\NUL\STX\STX\DC2\ETX\b\STX\FS\n\ + \\f\n\ + \\ENQ\ENQ\NUL\STX\STX\SOH\DC2\ETX\b\STX\ETB\n\ + \\f\n\ + \\ENQ\ENQ\NUL\STX\STX\STX\DC2\ETX\b\SUB\ESC\n\ + \\v\n\ + \\EOT\ENQ\NUL\STX\ETX\DC2\ETX\t\STX\FS\n\ + \\f\n\ + \\ENQ\ENQ\NUL\STX\ETX\SOH\DC2\ETX\t\STX\ETB\n\ + \\f\n\ + \\ENQ\ENQ\NUL\STX\ETX\STX\DC2\ETX\t\SUB\ESC\n\ + \\v\n\ + \\EOT\ENQ\NUL\STX\EOT\DC2\ETX\n\ + \\STX\RS\n\ + \\f\n\ + \\ENQ\ENQ\NUL\STX\EOT\SOH\DC2\ETX\n\ + \\STX\EM\n\ + \\f\n\ + \\ENQ\ENQ\NUL\STX\EOT\STX\DC2\ETX\n\ + \\FS\GS\n\ + \\v\n\ + \\EOT\ENQ\NUL\STX\ENQ\DC2\ETX\v\STX\FS\n\ + \\f\n\ + \\ENQ\ENQ\NUL\STX\ENQ\SOH\DC2\ETX\v\STX\ETB\n\ + \\f\n\ + \\ENQ\ENQ\NUL\STX\ENQ\STX\DC2\ETX\v\SUB\ESC\n\ + \\v\n\ + \\EOT\ENQ\NUL\STX\ACK\DC2\ETX\f\STX\US\n\ + \\f\n\ + \\ENQ\ENQ\NUL\STX\ACK\SOH\DC2\ETX\f\STX\SUB\n\ + \\f\n\ + \\ENQ\ENQ\NUL\STX\ACK\STX\DC2\ETX\f\GS\RS\n\ + \7\n\ + \\STX\EOT\NUL\DC2\EOT\DLE\NUL\SYN\SOH\SUB+ Redeemer information for a Plutus script.\n\ + \\n\ + \\n\ + \\n\ + \\ETX\EOT\NUL\SOH\DC2\ETX\DLE\b\DLE\n\ + \'\n\ + \\EOT\EOT\NUL\STX\NUL\DC2\ETX\DC1\STX\RS\"\SUB Purpose of the redeemer.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\ACK\DC2\ETX\DC1\STX\DC1\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\SOH\DC2\ETX\DC1\DC2\EM\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\ETX\DC2\ETX\DC1\FS\GS\n\ + \8\n\ + \\EOT\EOT\NUL\STX\SOH\DC2\ETX\DC2\STX\EM\"+ Plutus data associated with the redeemer.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\ACK\DC2\ETX\DC2\STX\f\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\SOH\DC2\ETX\DC2\r\DC4\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\ETX\DC2\ETX\DC2\ETB\CAN\n\ + \&\n\ + \\EOT\EOT\NUL\STX\STX\DC2\ETX\DC3\STX\DC3\"\EM Index of the redee mer.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\STX\ENQ\DC2\ETX\DC3\STX\b\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\STX\SOH\DC2\ETX\DC3\t\SO\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\STX\ETX\DC2\ETX\DC3\DC1\DC2\n\ + \8\n\ + \\EOT\EOT\NUL\STX\ETX\DC2\ETX\DC4\STX\ETB\"+ Execution units consumed by the redeemer.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\ETX\ACK\DC2\ETX\DC4\STX\t\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\ETX\SOH\DC2\ETX\DC4\n\ + \\DC2\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\ETX\ETX\DC2\ETX\DC4\NAK\SYN\n\ + \:\n\ + \\EOT\EOT\NUL\STX\EOT\DC2\ETX\NAK\STX\SUB\"- Original cbor-encoded data as seen on-chain\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\EOT\ENQ\DC2\ETX\NAK\STX\a\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\EOT\SOH\DC2\ETX\NAK\b\NAK\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\EOT\ETX\DC2\ETX\NAK\CAN\EM\n\ + \G\n\ + \\STX\EOT\SOH\DC2\EOT\EM\NUL\RS\SOH\SUB; Represents a transaction input in the Cardano blockchain.\n\ + \\n\ + \\n\ + \\n\ + \\ETX\EOT\SOH\SOH\DC2\ETX\EM\b\SI\n\ + \0\n\ + \\EOT\EOT\SOH\STX\NUL\DC2\ETX\SUB\STX\DC4\"# Hash of the previous transaction.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NUL\ENQ\DC2\ETX\SUB\STX\a\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NUL\SOH\DC2\ETX\SUB\b\SI\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NUL\ETX\DC2\ETX\SUB\DC2\DC3\n\ + \?\n\ + \\EOT\EOT\SOH\STX\SOH\DC2\ETX\ESC\STX\SUB\"2 Index of the output in the previous transaction.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SOH\ENQ\DC2\ETX\ESC\STX\b\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SOH\SOH\DC2\ETX\ESC\t\NAK\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SOH\ETX\DC2\ETX\ESC\CAN\EM\n\ + \T\n\ + \\EOT\EOT\SOH\STX\STX\DC2\ETX\FS\STX\EM\"G Content of the input represented as output of the related transaction\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\STX\ACK\DC2\ETX\FS\STX\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\STX\SOH\DC2\ETX\FS\v\DC4\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\STX\ETX\DC2\ETX\FS\ETB\CAN\n\ + \.\n\ + \\EOT\EOT\SOH\STX\ETX\DC2\ETX\GS\STX\CAN\"! Redeemer for the Plutus script.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ETX\ACK\DC2\ETX\GS\STX\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ETX\SOH\DC2\ETX\GS\v\DC3\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ETX\ETX\DC2\ETX\GS\SYN\ETB\n\ + \H\n\ + \\STX\EOT\STX\DC2\EOT!\NUL'\SOH\SUB< Represents a transaction output in the Cardano blockchain.\n\ + \\n\ + \\n\ + \\n\ + \\ETX\EOT\STX\SOH\DC2\ETX!\b\DLE\n\ + \,\n\ + \\EOT\EOT\STX\STX\NUL\DC2\ETX\"\STX\DC4\"\US Address receiving the output.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\NUL\ENQ\DC2\ETX\"\STX\a\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\NUL\SOH\DC2\ETX\"\b\SI\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\NUL\ETX\DC2\ETX\"\DC2\DC3\n\ + \+\n\ + \\EOT\EOT\STX\STX\SOH\DC2\ETX#\STX\DC2\"\RS Amount of ADA in the output.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\SOH\ENQ\DC2\ETX#\STX\b\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\SOH\SOH\DC2\ETX#\t\r\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\SOH\ETX\DC2\ETX#\DLE\DC1\n\ + \@\n\ + \\EOT\EOT\STX\STX\STX\DC2\ETX$\STX!\"3 Additional native (non-ADA) assets in the output.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\STX\EOT\DC2\ETX$\STX\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\STX\ACK\DC2\ETX$\v\NAK\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\STX\SOH\DC2\ETX$\SYN\FS\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\STX\ETX\DC2\ETX$\US \n\ + \6\n\ + \\EOT\EOT\STX\STX\ETX\DC2\ETX%\STX\DC2\") Plutus data associated with the output.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\ETX\ACK\DC2\ETX%\STX\a\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\ETX\SOH\DC2\ETX%\b\r\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\ETX\ETX\DC2\ETX%\DLE\DC1\n\ + \1\n\ + \\EOT\EOT\STX\STX\EOT\DC2\ETX&\STX\DC4\"$ Script associated with the output.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\EOT\ACK\DC2\ETX&\STX\b\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\EOT\SOH\DC2\ETX&\t\SI\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\EOT\ETX\DC2\ETX&\DC2\DC3\n\ + \\n\ + \\n\ + \\STX\EOT\ETX\DC2\EOT)\NUL-\SOH\n\ + \\n\ + \\n\ + \\ETX\EOT\ETX\SOH\DC2\ETX)\b\r\n\ + \2\n\ + \\EOT\EOT\ETX\STX\NUL\DC2\ETX*\STX\DC1\"% Hash of this datum as seen on-chain\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\NUL\ENQ\DC2\ETX*\STX\a\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\NUL\SOH\DC2\ETX*\b\f\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\NUL\ETX\DC2\ETX*\SI\DLE\n\ + \)\n\ + \\EOT\EOT\ETX\STX\SOH\DC2\ETX+\STX\EM\"\FS Parsed Plutus data payload\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\SOH\ACK\DC2\ETX+\STX\f\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\SOH\SOH\DC2\ETX+\r\DC4\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\SOH\ETX\DC2\ETX+\ETB\CAN\n\ + \:\n\ + \\EOT\EOT\ETX\STX\STX\DC2\ETX,\STX\SUB\"- Original cbor-encoded data as seen on-chain\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\STX\ENQ\DC2\ETX,\STX\a\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\STX\SOH\DC2\ETX,\b\NAK\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\STX\ETX\DC2\ETX,\CAN\EM\n\ + \B\n\ + \\STX\EOT\EOT\DC2\EOT0\NUL4\SOH\SUB6 Represents a custom asset in the Cardano blockchain.\n\ + \\n\ + \\n\ + \\n\ + \\ETX\EOT\EOT\SOH\DC2\ETX0\b\r\n\ + \(\n\ + \\EOT\EOT\EOT\STX\NUL\DC2\ETX1\STX\DC1\"\ESC Name of the custom asset.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\NUL\ENQ\DC2\ETX1\STX\a\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\NUL\SOH\DC2\ETX1\b\f\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\NUL\ETX\DC2\ETX1\SI\DLE\n\ + \A\n\ + \\EOT\EOT\EOT\STX\SOH\DC2\ETX2\STX\EM\"4 Quantity of the custom asset in case of an output.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\SOH\ENQ\DC2\ETX2\STX\b\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\SOH\SOH\DC2\ETX2\t\DC4\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\SOH\ETX\DC2\ETX2\ETB\CAN\n\ + \>\n\ + \\EOT\EOT\EOT\STX\STX\DC2\ETX3\STX\SYN\"1 Quantity of the custom asset in case of a mint.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\STX\ENQ\DC2\ETX3\STX\a\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\STX\SOH\DC2\ETX3\b\DC1\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\STX\ETX\DC2\ETX3\DC4\NAK\n\ + \G\n\ + \\STX\EOT\ENQ\DC2\EOT7\NUL;\SOH\SUB; Represents a multi-asset group in the Cardano blockchain.\n\ + \\n\ + \\n\ + \\n\ + \\ETX\EOT\ENQ\SOH\DC2\ETX7\b\DC2\n\ + \5\n\ + \\EOT\EOT\ENQ\STX\NUL\DC2\ETX8\STX\SYN\"( Policy ID governing the custom assets.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\ENQ\STX\NUL\ENQ\DC2\ETX8\STX\a\n\ + \\f\n\ + \\ENQ\EOT\ENQ\STX\NUL\SOH\DC2\ETX8\b\DC1\n\ + \\f\n\ + \\ENQ\EOT\ENQ\STX\NUL\ETX\DC2\ETX8\DC4\NAK\n\ + \%\n\ + \\EOT\EOT\ENQ\STX\SOH\DC2\ETX9\STX\FS\"\CAN List of custom assets.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\ENQ\STX\SOH\EOT\DC2\ETX9\STX\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\ENQ\STX\SOH\ACK\DC2\ETX9\v\DLE\n\ + \\f\n\ + \\ENQ\EOT\ENQ\STX\SOH\SOH\DC2\ETX9\DC1\ETB\n\ + \\f\n\ + \\ENQ\EOT\ENQ\STX\SOH\ETX\DC2\ETX9\SUB\ESC\n\ + \.\n\ + \\EOT\EOT\ENQ\STX\STX\DC2\ETX:\STX\CAN\"! Redeemer for the Plutus script.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\ENQ\STX\STX\ACK\DC2\ETX:\STX\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\ENQ\STX\STX\SOH\DC2\ETX:\v\DC3\n\ + \\f\n\ + \\ENQ\EOT\ENQ\STX\STX\ETX\DC2\ETX:\SYN\ETB\n\ + \@\n\ + \\STX\EOT\ACK\DC2\EOT>\NULA\SOH\SUB4 Represents the validity interval of a transaction.\n\ + \\n\ + \\n\ + \\n\ + \\ETX\EOT\ACK\SOH\DC2\ETX>\b\DC2\n\ + \.\n\ + \\EOT\EOT\ACK\STX\NUL\DC2\ETX?\STX\DC3\"! Start of the validity interval.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\ACK\STX\NUL\ENQ\DC2\ETX?\STX\b\n\ + \\f\n\ + \\ENQ\EOT\ACK\STX\NUL\SOH\DC2\ETX?\t\SO\n\ + \\f\n\ + \\ENQ\EOT\ACK\STX\NUL\ETX\DC2\ETX?\DC1\DC2\n\ + \@\n\ + \\EOT\EOT\ACK\STX\SOH\DC2\ETX@\STX\DC1\"3 End of the validity interval (TTL: Time to Live).\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\ACK\STX\SOH\ENQ\DC2\ETX@\STX\b\n\ + \\f\n\ + \\ENQ\EOT\ACK\STX\SOH\SOH\DC2\ETX@\t\f\n\ + \\f\n\ + \\ENQ\EOT\ACK\STX\SOH\ETX\DC2\ETX@\SI\DLE\n\ + \F\n\ + \\STX\EOT\a\DC2\EOTD\NULH\SOH\SUB: Represents the collateral information for a transaction.\n\ + \\n\ + \\n\ + \\n\ + \\ETX\EOT\a\SOH\DC2\ETXD\b\DC2\n\ + \5\n\ + \\EOT\EOT\a\STX\NUL\DC2\ETXE\STX\"\"( Collateral inputs for the transaction.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\a\STX\NUL\EOT\DC2\ETXE\STX\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\a\STX\NUL\ACK\DC2\ETXE\v\DC2\n\ + \\f\n\ + \\ENQ\EOT\a\STX\NUL\SOH\DC2\ETXE\DC3\GS\n\ + \\f\n\ + \\ENQ\EOT\a\STX\NUL\ETX\DC2\ETXE !\n\ + \;\n\ + \\EOT\EOT\a\STX\SOH\DC2\ETXF\STX!\". Collateral return in case of script failure.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\a\STX\SOH\ACK\DC2\ETXF\STX\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\a\STX\SOH\SOH\DC2\ETXF\v\FS\n\ + \\f\n\ + \\ENQ\EOT\a\STX\SOH\ETX\DC2\ETXF\US \n\ + \*\n\ + \\EOT\EOT\a\STX\STX\DC2\ETXG\STX\RS\"\GS Total amount of collateral.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\a\STX\STX\ENQ\DC2\ETXG\STX\b\n\ + \\f\n\ + \\ENQ\EOT\a\STX\STX\SOH\DC2\ETXG\t\EM\n\ + \\f\n\ + \\ENQ\EOT\a\STX\STX\ETX\DC2\ETXG\FS\GS\n\ + \<\n\ + \\STX\EOT\b\DC2\EOTK\NULO\SOH\SUB0 Represents a withdrawal from a reward account.\n\ + \\n\ + \\n\ + \\n\ + \\ETX\EOT\b\SOH\DC2\ETXK\b\DC2\n\ + \-\n\ + \\EOT\EOT\b\STX\NUL\DC2\ETXL\STX\ESC\" Address of the reward account.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\b\STX\NUL\ENQ\DC2\ETXL\STX\a\n\ + \\f\n\ + \\ENQ\EOT\b\STX\NUL\SOH\DC2\ETXL\b\SYN\n\ + \\f\n\ + \\ENQ\EOT\b\STX\NUL\ETX\DC2\ETXL\EM\SUB\n\ + \'\n\ + \\EOT\EOT\b\STX\SOH\DC2\ETXM\STX\DC2\"\SUB Amount of ADA withdrawn.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\b\STX\SOH\ENQ\DC2\ETXM\STX\b\n\ + \\f\n\ + \\ENQ\EOT\b\STX\SOH\SOH\DC2\ETXM\t\r\n\ + \\f\n\ + \\ENQ\EOT\b\STX\SOH\ETX\DC2\ETXM\DLE\DC1\n\ + \.\n\ + \\EOT\EOT\b\STX\STX\DC2\ETXN\STX\CAN\"! Redeemer for the Plutus script.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\b\STX\STX\ACK\DC2\ETXN\STX\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\b\STX\STX\SOH\DC2\ETXN\v\DC3\n\ + \\f\n\ + \\ENQ\EOT\b\STX\STX\ETX\DC2\ETXN\SYN\ETB\n\ + \G\n\ + \\STX\EOT\t\DC2\EOTR\NULV\SOH\SUB; Represents a set of witnesses that validate a transaction\n\ + \\n\ + \\n\ + \\n\ + \\ETX\EOT\t\SOH\DC2\ETXR\b\DC2\n\ + \&\n\ + \\EOT\EOT\t\STX\NUL\DC2\ETXS\STX'\"\EM List of VKey witnesses.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\t\STX\NUL\EOT\DC2\ETXS\STX\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\t\STX\NUL\ACK\DC2\ETXS\v\SYN\n\ + \\f\n\ + \\ENQ\EOT\t\STX\NUL\SOH\DC2\ETXS\ETB\"\n\ + \\f\n\ + \\ENQ\EOT\t\STX\NUL\ETX\DC2\ETXS%&\n\ + \\US\n\ + \\EOT\EOT\t\STX\SOH\DC2\ETXT\STX\GS\"\DC2 List of scripts.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\t\STX\SOH\EOT\DC2\ETXT\STX\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\t\STX\SOH\ACK\DC2\ETXT\v\DC1\n\ + \\f\n\ + \\ENQ\EOT\t\STX\SOH\SOH\DC2\ETXT\DC2\CAN\n\ + \\f\n\ + \\ENQ\EOT\t\STX\SOH\ETX\DC2\ETXT\ESC\FS\n\ + \L\n\ + \\EOT\EOT\t\STX\STX\DC2\ETXU\STX(\"? List of Plutus data elements associated with the transaction.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\t\STX\STX\EOT\DC2\ETXU\STX\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\t\STX\STX\ACK\DC2\ETXU\v\NAK\n\ + \\f\n\ + \\ENQ\EOT\t\STX\STX\SOH\DC2\ETXU\SYN#\n\ + \\f\n\ + \\ENQ\EOT\t\STX\STX\ETX\DC2\ETXU&'\n\ + \H\n\ + \\STX\EOT\n\ + \\DC2\EOTY\NUL\\\SOH\SUB< Auxiliary data not directly tied to the validation process\n\ + \\n\ + \\n\ + \\n\ + \\ETX\EOT\n\ + \\SOH\DC2\ETXY\b\SI\n\ + \3\n\ + \\EOT\EOT\n\ + \\STX\NUL\DC2\ETXZ\STX!\"& List of auxiliary metadata elements.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\n\ + \\STX\NUL\EOT\DC2\ETXZ\STX\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\n\ + \\STX\NUL\ACK\DC2\ETXZ\v\DC3\n\ + \\f\n\ + \\ENQ\EOT\n\ + \\STX\NUL\SOH\DC2\ETXZ\DC4\FS\n\ + \\f\n\ + \\ENQ\EOT\n\ + \\STX\NUL\ETX\DC2\ETXZ\US \n\ + \)\n\ + \\EOT\EOT\n\ + \\STX\SOH\DC2\ETX[\STX\RS\"\FS List of auxiliary scripts.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\n\ + \\STX\SOH\EOT\DC2\ETX[\STX\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\n\ + \\STX\SOH\ACK\DC2\ETX[\v\DC1\n\ + \\f\n\ + \\ENQ\EOT\n\ + \\STX\SOH\SOH\DC2\ETX[\DC2\EM\n\ + \\f\n\ + \\ENQ\EOT\n\ + \\STX\SOH\ETX\DC2\ETX[\FS\GS\n\ + \A\n\ + \\STX\EOT\v\DC2\EOT_\NULm\SOH\SUB5 Represents a transaction in the Cardano blockchain.\n\ + \\n\ + \\n\ + \\n\ + \\ETX\EOT\v\SOH\DC2\ETX_\b\n\ + \\n\ + \)\n\ + \\EOT\EOT\v\STX\NUL\DC2\ETX`\STX\RS\"\FS List of transaction inputs\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\v\STX\NUL\EOT\DC2\ETX`\STX\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\v\STX\NUL\ACK\DC2\ETX`\v\DC2\n\ + \\f\n\ + \\ENQ\EOT\v\STX\NUL\SOH\DC2\ETX`\DC3\EM\n\ + \\f\n\ + \\ENQ\EOT\v\STX\NUL\ETX\DC2\ETX`\FS\GS\n\ + \*\n\ + \\EOT\EOT\v\STX\SOH\DC2\ETXa\STX \"\GS List of transaction outputs\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\v\STX\SOH\EOT\DC2\ETXa\STX\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\v\STX\SOH\ACK\DC2\ETXa\v\DC3\n\ + \\f\n\ + \\ENQ\EOT\v\STX\SOH\SOH\DC2\ETXa\DC4\ESC\n\ + \\f\n\ + \\ENQ\EOT\v\STX\SOH\ETX\DC2\ETXa\RS\US\n\ + \#\n\ + \\EOT\EOT\v\STX\STX\DC2\ETXb\STX(\"\SYN List of certificates\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\v\STX\STX\EOT\DC2\ETXb\STX\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\v\STX\STX\ACK\DC2\ETXb\v\SYN\n\ + \\f\n\ + \\ENQ\EOT\v\STX\STX\SOH\DC2\ETXb\ETB#\n\ + \\f\n\ + \\ENQ\EOT\v\STX\STX\ETX\DC2\ETXb&'\n\ + \\"\n\ + \\EOT\EOT\v\STX\ETX\DC2\ETXc\STX&\"\NAK List of withdrawals\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\v\STX\ETX\EOT\DC2\ETXc\STX\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\v\STX\ETX\ACK\DC2\ETXc\v\NAK\n\ + \\f\n\ + \\ENQ\EOT\v\STX\ETX\SOH\DC2\ETXc\SYN!\n\ + \\f\n\ + \\ENQ\EOT\v\STX\ETX\ETX\DC2\ETXc$%\n\ + \+\n\ + \\EOT\EOT\v\STX\EOT\DC2\ETXd\STX\US\"\RS List of minted custom assets\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\v\STX\EOT\EOT\DC2\ETXd\STX\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\v\STX\EOT\ACK\DC2\ETXd\v\NAK\n\ + \\f\n\ + \\ENQ\EOT\v\STX\EOT\SOH\DC2\ETXd\SYN\SUB\n\ + \\f\n\ + \\ENQ\EOT\v\STX\EOT\ETX\DC2\ETXd\GS\RS\n\ + \'\n\ + \\EOT\EOT\v\STX\ENQ\DC2\ETXe\STX(\"\SUB List of reference inputs\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\v\STX\ENQ\EOT\DC2\ETXe\STX\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\v\STX\ENQ\ACK\DC2\ETXe\v\DC2\n\ + \\f\n\ + \\ENQ\EOT\v\STX\ENQ\SOH\DC2\ETXe\DC3#\n\ + \\f\n\ + \\ENQ\EOT\v\STX\ENQ\ETX\DC2\ETXe&'\n\ + \5\n\ + \\EOT\EOT\v\STX\ACK\DC2\ETXf\STX\ESC\"( Witnesses that validte the transaction\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\v\STX\ACK\ACK\DC2\ETXf\STX\f\n\ + \\f\n\ + \\ENQ\EOT\v\STX\ACK\SOH\DC2\ETXf\r\SYN\n\ + \\f\n\ + \\ENQ\EOT\v\STX\ACK\ETX\DC2\ETXf\EM\SUB\n\ + \?\n\ + \\EOT\EOT\v\STX\a\DC2\ETXg\STX\FS\"2 Collateral details in case of failed transaction\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\v\STX\a\ACK\DC2\ETXg\STX\f\n\ + \\f\n\ + \\ENQ\EOT\v\STX\a\SOH\DC2\ETXg\r\ETB\n\ + \\f\n\ + \\ENQ\EOT\v\STX\a\ETX\DC2\ETXg\SUB\ESC\n\ + \%\n\ + \\EOT\EOT\v\STX\b\DC2\ETXh\STX\DC1\"\CAN Transaction fee in ADA\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\v\STX\b\ENQ\DC2\ETXh\STX\b\n\ + \\f\n\ + \\ENQ\EOT\v\STX\b\SOH\DC2\ETXh\t\f\n\ + \\f\n\ + \\ENQ\EOT\v\STX\b\ETX\DC2\ETXh\SI\DLE\n\ + \3\n\ + \\EOT\EOT\v\STX\t\DC2\ETXi\STX\ESC\"& Validity interval of the transaction\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\v\STX\t\ACK\DC2\ETXi\STX\f\n\ + \\f\n\ + \\ENQ\EOT\v\STX\t\SOH\DC2\ETXi\r\NAK\n\ + \\f\n\ + \\ENQ\EOT\v\STX\t\ETX\DC2\ETXi\CAN\SUB\n\ + \E\n\ + \\EOT\EOT\v\STX\n\ + \\DC2\ETXj\STX\ETB\"8 Flag indicating whether the transaction was successful\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\v\STX\n\ + \\ENQ\DC2\ETXj\STX\ACK\n\ + \\f\n\ + \\ENQ\EOT\v\STX\n\ + \\SOH\DC2\ETXj\a\DC1\n\ + \\f\n\ + \\ENQ\EOT\v\STX\n\ + \\ETX\DC2\ETXj\DC4\SYN\n\ + \I\n\ + \\EOT\EOT\v\STX\v\DC2\ETXk\STX\EM\"< Auxiliary data not directly tied to the validation process\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\v\STX\v\ACK\DC2\ETXk\STX\t\n\ + \\f\n\ + \\ENQ\EOT\v\STX\v\SOH\DC2\ETXk\n\ + \\DC3\n\ + \\f\n\ + \\ENQ\EOT\v\STX\v\ETX\DC2\ETXk\SYN\CAN\n\ + \E\n\ + \\EOT\EOT\v\STX\f\DC2\ETXl\STX\DC2\"8 Hash of the transaction that serves as main identifier\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\v\STX\f\ENQ\DC2\ETXl\STX\a\n\ + \\f\n\ + \\ENQ\EOT\v\STX\f\SOH\DC2\ETXl\b\f\n\ + \\f\n\ + \\ENQ\EOT\v\STX\f\ETX\DC2\ETXl\SI\DC1\n\ + \:\n\ + \\STX\EOT\f\DC2\EOTp\NULt\SOH\SUB. Contains the header information for a block.\n\ + \\n\ + \\n\ + \\n\ + \\ETX\EOT\f\SOH\DC2\ETXp\b\DC3\n\ + \\ESC\n\ + \\EOT\EOT\f\STX\NUL\DC2\ETXq\STX\DC2\"\SO Slot number.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\f\STX\NUL\ENQ\DC2\ETXq\STX\b\n\ + \\f\n\ + \\ENQ\EOT\f\STX\NUL\SOH\DC2\ETXq\t\r\n\ + \\f\n\ + \\ENQ\EOT\f\STX\NUL\ETX\DC2\ETXq\DLE\DC1\n\ + \\SUB\n\ + \\EOT\EOT\f\STX\SOH\DC2\ETXr\STX\DC1\"\r Block hash.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\f\STX\SOH\ENQ\DC2\ETXr\STX\a\n\ + \\f\n\ + \\ENQ\EOT\f\STX\SOH\SOH\DC2\ETXr\b\f\n\ + \\f\n\ + \\ENQ\EOT\f\STX\SOH\ETX\DC2\ETXr\SI\DLE\n\ + \\FS\n\ + \\EOT\EOT\f\STX\STX\DC2\ETXs\STX\DC4\"\SI Block height.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\f\STX\STX\ENQ\DC2\ETXs\STX\b\n\ + \\f\n\ + \\ENQ\EOT\f\STX\STX\SOH\DC2\ETXs\t\SI\n\ + \\f\n\ + \\ENQ\EOT\f\STX\STX\ETX\DC2\ETXs\DC2\DC3\n\ + \8\n\ + \\STX\EOT\r\DC2\EOTw\NULy\SOH\SUB, Contains the transaction data for a block.\n\ + \\n\ + \\n\ + \\n\ + \\ETX\EOT\r\SOH\DC2\ETXw\b\DC1\n\ + \$\n\ + \\EOT\EOT\r\STX\NUL\DC2\ETXx\STX\NAK\"\ETB List of transactions.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\r\STX\NUL\EOT\DC2\ETXx\STX\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\r\STX\NUL\ACK\DC2\ETXx\v\r\n\ + \\f\n\ + \\ENQ\EOT\r\STX\NUL\SOH\DC2\ETXx\SO\DLE\n\ + \\f\n\ + \\ENQ\EOT\r\STX\NUL\ETX\DC2\ETXx\DC3\DC4\n\ + \E\n\ + \\STX\EOT\SO\DC2\EOT|\NUL\DEL\SOH\SUB9 Represents a complete block, including header and body.\n\ + \\n\ + \\n\ + \\n\ + \\ETX\EOT\SO\SOH\DC2\ETX|\b\r\n\ + \\FS\n\ + \\EOT\EOT\SO\STX\NUL\DC2\ETX}\STX\EM\"\SI Block header.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SO\STX\NUL\ACK\DC2\ETX}\STX\r\n\ + \\f\n\ + \\ENQ\EOT\SO\STX\NUL\SOH\DC2\ETX}\SO\DC4\n\ + \\f\n\ + \\ENQ\EOT\SO\STX\NUL\ETX\DC2\ETX}\ETB\CAN\n\ + \\SUB\n\ + \\EOT\EOT\SO\STX\SOH\DC2\ETX~\STX\NAK\"\r Block body.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SO\STX\SOH\ACK\DC2\ETX~\STX\v\n\ + \\f\n\ + \\ENQ\EOT\SO\STX\SOH\SOH\DC2\ETX~\f\DLE\n\ + \\f\n\ + \\ENQ\EOT\SO\STX\SOH\ETX\DC2\ETX~\DC3\DC4\n\ + \E\n\ + \\STX\EOT\SI\DC2\ACK\130\SOH\NUL\133\SOH\SOH\SUB7 Represents a VKey witness used to sign a transaction.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\SI\SOH\DC2\EOT\130\SOH\b\DC3\n\ + \!\n\ + \\EOT\EOT\SI\STX\NUL\DC2\EOT\131\SOH\STX\DC1\"\DC3 Verification key.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\NUL\ENQ\DC2\EOT\131\SOH\STX\a\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\NUL\SOH\DC2\EOT\131\SOH\b\f\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\NUL\ETX\DC2\EOT\131\SOH\SI\DLE\n\ + \E\n\ + \\EOT\EOT\SI\STX\SOH\DC2\EOT\132\SOH\STX\SYN\"7 Signature generated using the associated private key.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\SOH\ENQ\DC2\EOT\132\SOH\STX\a\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\SOH\SOH\DC2\EOT\132\SOH\b\DC1\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\SOH\ETX\DC2\EOT\132\SOH\DC4\NAK\n\ + \6\n\ + \\STX\EOT\DLE\DC2\ACK\136\SOH\NUL\145\SOH\SOH\SUB( Represents a native script in Cardano.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\DLE\SOH\DC2\EOT\136\SOH\b\DC4\n\ + \\SO\n\ + \\EOT\EOT\DLE\b\NUL\DC2\ACK\137\SOH\STX\144\SOH\ETX\n\ + \\r\n\ + \\ENQ\EOT\DLE\b\NUL\SOH\DC2\EOT\137\SOH\b\NAK\n\ + \4\n\ + \\EOT\EOT\DLE\STX\NUL\DC2\EOT\138\SOH\EOT\FS\"& Script based on an address key hash.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\NUL\ENQ\DC2\EOT\138\SOH\EOT\t\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\NUL\SOH\DC2\EOT\138\SOH\n\ + \\ETB\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\NUL\ETX\DC2\EOT\138\SOH\SUB\ESC\n\ + \H\n\ + \\EOT\EOT\DLE\STX\SOH\DC2\EOT\139\SOH\EOT$\": Script that requires all nested scripts to be satisfied.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\SOH\ACK\DC2\EOT\139\SOH\EOT\DC4\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\SOH\SOH\DC2\EOT\139\SOH\NAK\US\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\SOH\ETX\DC2\EOT\139\SOH\"#\n\ + \O\n\ + \\EOT\EOT\DLE\STX\STX\DC2\EOT\140\SOH\EOT$\"A Script that requires any of the nested scripts to be satisfied.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\STX\ACK\DC2\EOT\140\SOH\EOT\DC4\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\STX\SOH\DC2\EOT\140\SOH\NAK\US\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\STX\ETX\DC2\EOT\140\SOH\"#\n\ + \O\n\ + \\EOT\EOT\DLE\STX\ETX\DC2\EOT\141\SOH\EOT!\"A Script that requires k out of n nested scripts to be satisfied.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\ETX\ACK\DC2\EOT\141\SOH\EOT\SO\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\ETX\SOH\DC2\EOT\141\SOH\SI\FS\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\ETX\ETX\DC2\EOT\141\SOH\US \n\ + \?\n\ + \\EOT\EOT\DLE\STX\EOT\DC2\EOT\142\SOH\EOT\RS\"1 Slot number before which the script is invalid.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\EOT\ENQ\DC2\EOT\142\SOH\EOT\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\EOT\SOH\DC2\EOT\142\SOH\v\EM\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\EOT\ETX\DC2\EOT\142\SOH\FS\GS\n\ + \>\n\ + \\EOT\EOT\DLE\STX\ENQ\DC2\EOT\143\SOH\EOT!\"0 Slot number after which the script is invalid.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\ENQ\ENQ\DC2\EOT\143\SOH\EOT\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\ENQ\SOH\DC2\EOT\143\SOH\v\FS\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\ENQ\ETX\DC2\EOT\143\SOH\US \n\ + \4\n\ + \\STX\EOT\DC1\DC2\ACK\148\SOH\NUL\150\SOH\SOH\SUB& Represents a list of native scripts.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\DC1\SOH\DC2\EOT\148\SOH\b\CAN\n\ + \'\n\ + \\EOT\EOT\DC1\STX\NUL\DC2\EOT\149\SOH\STX\"\"\EM List of native scripts.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC1\STX\NUL\EOT\DC2\EOT\149\SOH\STX\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC1\STX\NUL\ACK\DC2\EOT\149\SOH\v\ETB\n\ + \\r\n\ + \\ENQ\EOT\DC1\STX\NUL\SOH\DC2\EOT\149\SOH\CAN\GS\n\ + \\r\n\ + \\ENQ\EOT\DC1\STX\NUL\ETX\DC2\EOT\149\SOH !\n\ + \8\n\ + \\STX\EOT\DC2\DC2\ACK\153\SOH\NUL\156\SOH\SOH\SUB* Represents a \"k out of n\" native script.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\DC2\SOH\DC2\EOT\153\SOH\b\DC2\n\ + \9\n\ + \\EOT\EOT\DC2\STX\NUL\DC2\EOT\154\SOH\STX\SI\"+ The number of required satisfied scripts.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\NUL\ENQ\DC2\EOT\154\SOH\STX\b\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\NUL\SOH\DC2\EOT\154\SOH\t\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\NUL\ETX\DC2\EOT\154\SOH\r\SO\n\ + \'\n\ + \\EOT\EOT\DC2\STX\SOH\DC2\EOT\155\SOH\STX$\"\EM List of native scripts.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\SOH\EOT\DC2\EOT\155\SOH\STX\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\SOH\ACK\DC2\EOT\155\SOH\v\ETB\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\SOH\SOH\DC2\EOT\155\SOH\CAN\US\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\SOH\ETX\DC2\EOT\155\SOH\"#\n\ + \D\n\ + \\STX\EOT\DC3\DC2\ACK\159\SOH\NUL\163\SOH\SOH\SUB6 Represents a constructor for Plutus data in Cardano.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\DC3\SOH\DC2\EOT\159\SOH\b\SO\n\ + \\f\n\ + \\EOT\EOT\DC3\STX\NUL\DC2\EOT\160\SOH\STX\DC1\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\NUL\ENQ\DC2\EOT\160\SOH\STX\b\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\NUL\SOH\DC2\EOT\160\SOH\t\f\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\NUL\ETX\DC2\EOT\160\SOH\SI\DLE\n\ + \\f\n\ + \\EOT\EOT\DC3\STX\SOH\DC2\EOT\161\SOH\STX\GS\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\SOH\ENQ\DC2\EOT\161\SOH\STX\b\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\SOH\SOH\DC2\EOT\161\SOH\t\CAN\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\SOH\ETX\DC2\EOT\161\SOH\ESC\FS\n\ + \\f\n\ + \\EOT\EOT\DC3\STX\STX\DC2\EOT\162\SOH\STX!\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\STX\EOT\DC2\EOT\162\SOH\STX\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\STX\ACK\DC2\EOT\162\SOH\v\NAK\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\STX\SOH\DC2\EOT\162\SOH\SYN\FS\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\STX\ETX\DC2\EOT\162\SOH\US \n\ + \D\n\ + \\STX\EOT\DC4\DC2\ACK\166\SOH\NUL\172\SOH\SOH\SUB6 Represents a big integer for Plutus data in Cardano.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\DC4\SOH\DC2\EOT\166\SOH\b\SO\n\ + \\SO\n\ + \\EOT\EOT\DC4\b\NUL\DC2\ACK\167\SOH\STX\171\SOH\ETX\n\ + \\r\n\ + \\ENQ\EOT\DC4\b\NUL\SOH\DC2\EOT\167\SOH\b\SI\n\ + \\f\n\ + \\EOT\EOT\DC4\STX\NUL\DC2\EOT\168\SOH\EOT\DC2\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\NUL\ENQ\DC2\EOT\168\SOH\EOT\t\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\NUL\SOH\DC2\EOT\168\SOH\n\ + \\r\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\NUL\ETX\DC2\EOT\168\SOH\DLE\DC1\n\ + \\f\n\ + \\EOT\EOT\DC4\STX\SOH\DC2\EOT\169\SOH\EOT\CAN\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\SOH\ENQ\DC2\EOT\169\SOH\EOT\t\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\SOH\SOH\DC2\EOT\169\SOH\n\ + \\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\SOH\ETX\DC2\EOT\169\SOH\SYN\ETB\n\ + \\f\n\ + \\EOT\EOT\DC4\STX\STX\DC2\EOT\170\SOH\EOT\CAN\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\STX\ENQ\DC2\EOT\170\SOH\EOT\t\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\STX\SOH\DC2\EOT\170\SOH\n\ + \\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\STX\ETX\DC2\EOT\170\SOH\SYN\ETB\n\ + \G\n\ + \\STX\EOT\NAK\DC2\ACK\175\SOH\NUL\178\SOH\SOH\SUB9 Represents a key-value pair for Plutus data in Cardano.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\NAK\SOH\DC2\EOT\175\SOH\b\SYN\n\ + \ \n\ + \\EOT\EOT\NAK\STX\NUL\DC2\EOT\176\SOH\STX\NAK\"\DC2 Key of the pair.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\NUL\ACK\DC2\EOT\176\SOH\STX\f\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\NUL\SOH\DC2\EOT\176\SOH\r\DLE\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\NUL\ETX\DC2\EOT\176\SOH\DC3\DC4\n\ + \\"\n\ + \\EOT\EOT\NAK\STX\SOH\DC2\EOT\177\SOH\STX\ETB\"\DC4 Value of the pair.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\SOH\ACK\DC2\EOT\177\SOH\STX\f\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\SOH\SOH\DC2\EOT\177\SOH\r\DC2\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\SOH\ETX\DC2\EOT\177\SOH\NAK\SYN\n\ + \9\n\ + \\STX\EOT\SYN\DC2\ACK\181\SOH\NUL\189\SOH\SOH\SUB+ Represents a Plutus data item in Cardano.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\SYN\SOH\DC2\EOT\181\SOH\b\DC2\n\ + \\SO\n\ + \\EOT\EOT\SYN\b\NUL\DC2\ACK\182\SOH\STX\188\SOH\ETX\n\ + \\r\n\ + \\ENQ\EOT\SYN\b\NUL\SOH\DC2\EOT\182\SOH\b\DC3\n\ + \\FS\n\ + \\EOT\EOT\SYN\STX\NUL\DC2\EOT\183\SOH\EOT\SYN\"\SO Constructor.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\NUL\ACK\DC2\EOT\183\SOH\EOT\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\NUL\SOH\DC2\EOT\183\SOH\v\DC1\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\NUL\ETX\DC2\EOT\183\SOH\DC4\NAK\n\ + \#\n\ + \\EOT\EOT\SYN\STX\SOH\DC2\EOT\184\SOH\EOT\SUB\"\NAK Map of Plutus data.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\SOH\ACK\DC2\EOT\184\SOH\EOT\DC1\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\SOH\SOH\DC2\EOT\184\SOH\DC2\NAK\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\SOH\ETX\DC2\EOT\184\SOH\CAN\EM\n\ + \\FS\n\ + \\EOT\EOT\SYN\STX\STX\DC2\EOT\185\SOH\EOT\ETB\"\SO Big integer.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\STX\ACK\DC2\EOT\185\SOH\EOT\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\STX\SOH\DC2\EOT\185\SOH\v\DC2\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\STX\ETX\DC2\EOT\185\SOH\NAK\SYN\n\ + \\RS\n\ + \\EOT\EOT\SYN\STX\ETX\DC2\EOT\186\SOH\EOT\FS\"\DLE Bounded bytes.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\ETX\ENQ\DC2\EOT\186\SOH\EOT\t\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\ETX\SOH\DC2\EOT\186\SOH\n\ + \\ETB\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\ETX\ETX\DC2\EOT\186\SOH\SUB\ESC\n\ + \%\n\ + \\EOT\EOT\SYN\STX\EOT\DC2\EOT\187\SOH\EOT\RS\"\ETB Array of Plutus data.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\EOT\ACK\DC2\EOT\187\SOH\EOT\DC3\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\EOT\SOH\DC2\EOT\187\SOH\DC4\EM\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\EOT\ETX\DC2\EOT\187\SOH\FS\GS\n\ + \;\n\ + \\STX\EOT\ETB\DC2\ACK\192\SOH\NUL\194\SOH\SOH\SUB- Represents a map of Plutus data in Cardano.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\ETB\SOH\DC2\EOT\192\SOH\b\NAK\n\ + \(\n\ + \\EOT\EOT\ETB\STX\NUL\DC2\EOT\193\SOH\STX$\"\SUB List of key-value pairs.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ETB\STX\NUL\EOT\DC2\EOT\193\SOH\STX\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ETB\STX\NUL\ACK\DC2\EOT\193\SOH\v\EM\n\ + \\r\n\ + \\ENQ\EOT\ETB\STX\NUL\SOH\DC2\EOT\193\SOH\SUB\US\n\ + \\r\n\ + \\ENQ\EOT\ETB\STX\NUL\ETX\DC2\EOT\193\SOH\"#\n\ + \>\n\ + \\STX\EOT\CAN\DC2\ACK\197\SOH\NUL\199\SOH\SOH\SUB0 Represents an array of Plutus data in Cardano.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\CAN\SOH\DC2\EOT\197\SOH\b\ETB\n\ + \*\n\ + \\EOT\EOT\CAN\STX\NUL\DC2\EOT\198\SOH\STX \"\FS List of Plutus data items.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\NUL\EOT\DC2\EOT\198\SOH\STX\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\NUL\ACK\DC2\EOT\198\SOH\v\NAK\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\NUL\SOH\DC2\EOT\198\SOH\SYN\ESC\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\NUL\ETX\DC2\EOT\198\SOH\RS\US\n\ + \/\n\ + \\STX\EOT\EM\DC2\ACK\202\SOH\NUL\209\SOH\SOH\SUB! Represents a script in Cardano.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\EM\SOH\DC2\EOT\202\SOH\b\SO\n\ + \\SO\n\ + \\EOT\EOT\EM\b\NUL\DC2\ACK\203\SOH\STX\208\SOH\ETX\n\ + \\r\n\ + \\ENQ\EOT\EM\b\NUL\SOH\DC2\EOT\203\SOH\b\SO\n\ + \\RS\n\ + \\EOT\EOT\EM\STX\NUL\DC2\EOT\204\SOH\EOT\FS\"\DLE Native script.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\EM\STX\NUL\ACK\DC2\EOT\204\SOH\EOT\DLE\n\ + \\r\n\ + \\ENQ\EOT\EM\STX\NUL\SOH\DC2\EOT\204\SOH\DC1\ETB\n\ + \\r\n\ + \\ENQ\EOT\EM\STX\NUL\ETX\DC2\EOT\204\SOH\SUB\ESC\n\ + \!\n\ + \\EOT\EOT\EM\STX\SOH\DC2\EOT\205\SOH\EOT\CAN\"\DC3 Plutus V1 script.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\EM\STX\SOH\ENQ\DC2\EOT\205\SOH\EOT\t\n\ + \\r\n\ + \\ENQ\EOT\EM\STX\SOH\SOH\DC2\EOT\205\SOH\n\ + \\DC3\n\ + \\r\n\ + \\ENQ\EOT\EM\STX\SOH\ETX\DC2\EOT\205\SOH\SYN\ETB\n\ + \!\n\ + \\EOT\EOT\EM\STX\STX\DC2\EOT\206\SOH\EOT\CAN\"\DC3 Plutus V2 script.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\EM\STX\STX\ENQ\DC2\EOT\206\SOH\EOT\t\n\ + \\r\n\ + \\ENQ\EOT\EM\STX\STX\SOH\DC2\EOT\206\SOH\n\ + \\DC3\n\ + \\r\n\ + \\ENQ\EOT\EM\STX\STX\ETX\DC2\EOT\206\SOH\SYN\ETB\n\ + \!\n\ + \\EOT\EOT\EM\STX\ETX\DC2\EOT\207\SOH\EOT\CAN\"\DC3 Plutus V3 script.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\EM\STX\ETX\ENQ\DC2\EOT\207\SOH\EOT\t\n\ + \\r\n\ + \\ENQ\EOT\EM\STX\ETX\SOH\DC2\EOT\207\SOH\n\ + \\DC3\n\ + \\r\n\ + \\ENQ\EOT\EM\STX\ETX\ETX\DC2\EOT\207\SOH\SYN\ETB\n\ + \\f\n\ + \\STX\EOT\SUB\DC2\ACK\211\SOH\NUL\219\SOH\SOH\n\ + \\v\n\ + \\ETX\EOT\SUB\SOH\DC2\EOT\211\SOH\b\DC1\n\ + \\SO\n\ + \\EOT\EOT\SUB\b\NUL\DC2\ACK\212\SOH\STX\218\SOH\ETX\n\ + \\r\n\ + \\ENQ\EOT\SUB\b\NUL\SOH\DC2\EOT\212\SOH\b\DC1\n\ + \\f\n\ + \\EOT\EOT\SUB\STX\NUL\DC2\EOT\213\SOH\EOT\DC2\n\ + \\r\n\ + \\ENQ\EOT\SUB\STX\NUL\ENQ\DC2\EOT\213\SOH\EOT\t\n\ + \\r\n\ + \\ENQ\EOT\SUB\STX\NUL\SOH\DC2\EOT\213\SOH\n\ + \\r\n\ + \\r\n\ + \\ENQ\EOT\SUB\STX\NUL\ETX\DC2\EOT\213\SOH\DLE\DC1\n\ + \\f\n\ + \\EOT\EOT\SUB\STX\SOH\DC2\EOT\214\SOH\EOT\DC4\n\ + \\r\n\ + \\ENQ\EOT\SUB\STX\SOH\ENQ\DC2\EOT\214\SOH\EOT\t\n\ + \\r\n\ + \\ENQ\EOT\SUB\STX\SOH\SOH\DC2\EOT\214\SOH\n\ + \\SI\n\ + \\r\n\ + \\ENQ\EOT\SUB\STX\SOH\ETX\DC2\EOT\214\SOH\DC2\DC3\n\ + \\f\n\ + \\EOT\EOT\SUB\STX\STX\DC2\EOT\215\SOH\EOT\DC4\n\ + \\r\n\ + \\ENQ\EOT\SUB\STX\STX\ENQ\DC2\EOT\215\SOH\EOT\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SUB\STX\STX\SOH\DC2\EOT\215\SOH\v\SI\n\ + \\r\n\ + \\ENQ\EOT\SUB\STX\STX\ETX\DC2\EOT\215\SOH\DC2\DC3\n\ + \\f\n\ + \\EOT\EOT\SUB\STX\ETX\DC2\EOT\216\SOH\EOT\GS\n\ + \\r\n\ + \\ENQ\EOT\SUB\STX\ETX\ACK\DC2\EOT\216\SOH\EOT\DC2\n\ + \\r\n\ + \\ENQ\EOT\SUB\STX\ETX\SOH\DC2\EOT\216\SOH\DC3\CAN\n\ + \\r\n\ + \\ENQ\EOT\SUB\STX\ETX\ETX\DC2\EOT\216\SOH\ESC\FS\n\ + \\f\n\ + \\EOT\EOT\SUB\STX\EOT\DC2\EOT\217\SOH\EOT\EM\n\ + \\r\n\ + \\ENQ\EOT\SUB\STX\EOT\ACK\DC2\EOT\217\SOH\EOT\DLE\n\ + \\r\n\ + \\ENQ\EOT\SUB\STX\EOT\SOH\DC2\EOT\217\SOH\DC1\DC4\n\ + \\r\n\ + \\ENQ\EOT\SUB\STX\EOT\ETX\DC2\EOT\217\SOH\ETB\CAN\n\ + \\f\n\ + \\STX\EOT\ESC\DC2\ACK\221\SOH\NUL\223\SOH\SOH\n\ + \\v\n\ + \\ETX\EOT\ESC\SOH\DC2\EOT\221\SOH\b\SYN\n\ + \\f\n\ + \\EOT\EOT\ESC\STX\NUL\DC2\EOT\222\SOH\STX\US\n\ + \\r\n\ + \\ENQ\EOT\ESC\STX\NUL\EOT\DC2\EOT\222\SOH\STX\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ESC\STX\NUL\ACK\DC2\EOT\222\SOH\v\DC4\n\ + \\r\n\ + \\ENQ\EOT\ESC\STX\NUL\SOH\DC2\EOT\222\SOH\NAK\SUB\n\ + \\r\n\ + \\ENQ\EOT\ESC\STX\NUL\ETX\DC2\EOT\222\SOH\GS\RS\n\ + \\f\n\ + \\STX\EOT\FS\DC2\ACK\225\SOH\NUL\227\SOH\SOH\n\ + \\v\n\ + \\ETX\EOT\FS\SOH\DC2\EOT\225\SOH\b\DC4\n\ + \\f\n\ + \\EOT\EOT\FS\STX\NUL\DC2\EOT\226\SOH\STX#\n\ + \\r\n\ + \\ENQ\EOT\FS\STX\NUL\EOT\DC2\EOT\226\SOH\STX\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\FS\STX\NUL\ACK\DC2\EOT\226\SOH\v\CAN\n\ + \\r\n\ + \\ENQ\EOT\FS\STX\NUL\SOH\DC2\EOT\226\SOH\EM\RS\n\ + \\r\n\ + \\ENQ\EOT\FS\STX\NUL\ETX\DC2\EOT\226\SOH!\"\n\ + \\f\n\ + \\STX\EOT\GS\DC2\ACK\229\SOH\NUL\232\SOH\SOH\n\ + \\v\n\ + \\ETX\EOT\GS\SOH\DC2\EOT\229\SOH\b\NAK\n\ + \\f\n\ + \\EOT\EOT\GS\STX\NUL\DC2\EOT\230\SOH\STX\DC4\n\ + \\r\n\ + \\ENQ\EOT\GS\STX\NUL\ACK\DC2\EOT\230\SOH\STX\v\n\ + \\r\n\ + \\ENQ\EOT\GS\STX\NUL\SOH\DC2\EOT\230\SOH\f\SI\n\ + \\r\n\ + \\ENQ\EOT\GS\STX\NUL\ETX\DC2\EOT\230\SOH\DC2\DC3\n\ + \\f\n\ + \\EOT\EOT\GS\STX\SOH\DC2\EOT\231\SOH\STX\SYN\n\ + \\r\n\ + \\ENQ\EOT\GS\STX\SOH\ACK\DC2\EOT\231\SOH\STX\v\n\ + \\r\n\ + \\ENQ\EOT\GS\STX\SOH\SOH\DC2\EOT\231\SOH\f\DC1\n\ + \\r\n\ + \\ENQ\EOT\GS\STX\SOH\ETX\DC2\EOT\231\SOH\DC4\NAK\n\ + \\f\n\ + \\STX\EOT\RS\DC2\ACK\234\SOH\NUL\237\SOH\SOH\n\ + \\v\n\ + \\ETX\EOT\RS\SOH\DC2\EOT\234\SOH\b\DLE\n\ + \\f\n\ + \\EOT\EOT\RS\STX\NUL\DC2\EOT\235\SOH\STX\DC3\n\ + \\r\n\ + \\ENQ\EOT\RS\STX\NUL\ENQ\DC2\EOT\235\SOH\STX\b\n\ + \\r\n\ + \\ENQ\EOT\RS\STX\NUL\SOH\DC2\EOT\235\SOH\t\SO\n\ + \\r\n\ + \\ENQ\EOT\RS\STX\NUL\ETX\DC2\EOT\235\SOH\DC1\DC2\n\ + \\f\n\ + \\EOT\EOT\RS\STX\SOH\DC2\EOT\236\SOH\STX\SYN\n\ + \\r\n\ + \\ENQ\EOT\RS\STX\SOH\ACK\DC2\EOT\236\SOH\STX\v\n\ + \\r\n\ + \\ENQ\EOT\RS\STX\SOH\SOH\DC2\EOT\236\SOH\f\DC1\n\ + \\r\n\ + \\ENQ\EOT\RS\STX\SOH\ETX\DC2\EOT\236\SOH\DC4\NAK\n\ + \9\n\ + \\STX\EOT\US\DC2\ACK\240\SOH\NUL\245\SOH\SOH\SUB+ Represents a stake credential in Cardano.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\US\SOH\DC2\EOT\240\SOH\b\ETB\n\ + \\SO\n\ + \\EOT\EOT\US\b\NUL\DC2\ACK\241\SOH\STX\244\SOH\ETX\n\ + \\r\n\ + \\ENQ\EOT\US\b\NUL\SOH\DC2\EOT\241\SOH\b\CAN\n\ + \!\n\ + \\EOT\EOT\US\STX\NUL\DC2\EOT\242\SOH\EOT\FS\"\DC3 Address key hash.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\US\STX\NUL\ENQ\DC2\EOT\242\SOH\EOT\t\n\ + \\r\n\ + \\ENQ\EOT\US\STX\NUL\SOH\DC2\EOT\242\SOH\n\ + \\ETB\n\ + \\r\n\ + \\ENQ\EOT\US\STX\NUL\ETX\DC2\EOT\242\SOH\SUB\ESC\n\ + \\FS\n\ + \\EOT\EOT\US\STX\SOH\DC2\EOT\243\SOH\EOT\SUB\"\SO Script hash.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\US\STX\SOH\ENQ\DC2\EOT\243\SOH\EOT\t\n\ + \\r\n\ + \\ENQ\EOT\US\STX\SOH\SOH\DC2\EOT\243\SOH\n\ + \\NAK\n\ + \\r\n\ + \\ENQ\EOT\US\STX\SOH\ETX\DC2\EOT\243\SOH\CAN\EM\n\ + \;\n\ + \\STX\EOT \DC2\ACK\248\SOH\NUL\251\SOH\SOH\SUB- Represents a rational number as a fraction.\n\ + \\n\ + \\v\n\ + \\ETX\EOT \SOH\DC2\EOT\248\SOH\b\SYN\n\ + \\f\n\ + \\EOT\EOT \STX\NUL\DC2\EOT\249\SOH\STX\SYN\n\ + \\r\n\ + \\ENQ\EOT \STX\NUL\ENQ\DC2\EOT\249\SOH\STX\a\n\ + \\r\n\ + \\ENQ\EOT \STX\NUL\SOH\DC2\EOT\249\SOH\b\DC1\n\ + \\r\n\ + \\ENQ\EOT \STX\NUL\ETX\DC2\EOT\249\SOH\DC4\NAK\n\ + \\f\n\ + \\EOT\EOT \STX\SOH\DC2\EOT\250\SOH\STX\EM\n\ + \\r\n\ + \\ENQ\EOT \STX\SOH\ENQ\DC2\EOT\250\SOH\STX\b\n\ + \\r\n\ + \\ENQ\EOT \STX\SOH\SOH\DC2\EOT\250\SOH\t\DC4\n\ + \\r\n\ + \\ENQ\EOT \STX\SOH\ETX\DC2\EOT\250\SOH\ETB\CAN\n\ + \.\n\ + \\STX\EOT!\DC2\ACK\254\SOH\NUL\131\STX\SOH\SUB Represents a relay in Cardano.\n\ + \\n\ + \\v\n\ + \\ETX\EOT!\SOH\DC2\EOT\254\SOH\b\r\n\ + \\f\n\ + \\EOT\EOT!\STX\NUL\DC2\EOT\255\SOH\STX\DC2\n\ + \\r\n\ + \\ENQ\EOT!\STX\NUL\ENQ\DC2\EOT\255\SOH\STX\a\n\ + \\r\n\ + \\ENQ\EOT!\STX\NUL\SOH\DC2\EOT\255\SOH\b\r\n\ + \\r\n\ + \\ENQ\EOT!\STX\NUL\ETX\DC2\EOT\255\SOH\DLE\DC1\n\ + \\f\n\ + \\EOT\EOT!\STX\SOH\DC2\EOT\128\STX\STX\DC2\n\ + \\r\n\ + \\ENQ\EOT!\STX\SOH\ENQ\DC2\EOT\128\STX\STX\a\n\ + \\r\n\ + \\ENQ\EOT!\STX\SOH\SOH\DC2\EOT\128\STX\b\r\n\ + \\r\n\ + \\ENQ\EOT!\STX\SOH\ETX\DC2\EOT\128\STX\DLE\DC1\n\ + \\f\n\ + \\EOT\EOT!\STX\STX\DC2\EOT\129\STX\STX\SYN\n\ + \\r\n\ + \\ENQ\EOT!\STX\STX\ENQ\DC2\EOT\129\STX\STX\b\n\ + \\r\n\ + \\ENQ\EOT!\STX\STX\SOH\DC2\EOT\129\STX\t\DC1\n\ + \\r\n\ + \\ENQ\EOT!\STX\STX\ETX\DC2\EOT\129\STX\DC4\NAK\n\ + \\f\n\ + \\EOT\EOT!\STX\ETX\DC2\EOT\130\STX\STX\DC2\n\ + \\r\n\ + \\ENQ\EOT!\STX\ETX\ENQ\DC2\EOT\130\STX\STX\b\n\ + \\r\n\ + \\ENQ\EOT!\STX\ETX\SOH\DC2\EOT\130\STX\t\r\n\ + \\r\n\ + \\ENQ\EOT!\STX\ETX\ETX\DC2\EOT\130\STX\DLE\DC1\n\ + \4\n\ + \\STX\EOT\"\DC2\ACK\134\STX\NUL\137\STX\SOH\SUB& Represents pool metadata in Cardano.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\"\SOH\DC2\EOT\134\STX\b\DC4\n\ + \\f\n\ + \\EOT\EOT\"\STX\NUL\DC2\EOT\135\STX\STX\DC1\n\ + \\r\n\ + \\ENQ\EOT\"\STX\NUL\ENQ\DC2\EOT\135\STX\STX\b\n\ + \\r\n\ + \\ENQ\EOT\"\STX\NUL\SOH\DC2\EOT\135\STX\t\f\n\ + \\r\n\ + \\ENQ\EOT\"\STX\NUL\ETX\DC2\EOT\135\STX\SI\DLE\n\ + \\f\n\ + \\EOT\EOT\"\STX\SOH\DC2\EOT\136\STX\STX\DC1\n\ + \\r\n\ + \\ENQ\EOT\"\STX\SOH\ENQ\DC2\EOT\136\STX\STX\a\n\ + \\r\n\ + \\ENQ\EOT\"\STX\SOH\SOH\DC2\EOT\136\STX\b\f\n\ + \\r\n\ + \\ENQ\EOT\"\STX\SOH\ETX\DC2\EOT\136\STX\SI\DLE\n\ + \4\n\ + \\STX\EOT#\DC2\ACK\140\STX\NUL\163\STX\SOH\SUB& Represents a certificate in Cardano.\n\ + \\n\ + \\v\n\ + \\ETX\EOT#\SOH\DC2\EOT\140\STX\b\DC3\n\ + \\SO\n\ + \\EOT\EOT#\b\NUL\DC2\ACK\141\STX\STX\161\STX\ETX\n\ + \\r\n\ + \\ENQ\EOT#\b\NUL\SOH\DC2\EOT\141\STX\b\DC3\n\ + \/\n\ + \\EOT\EOT#\STX\NUL\DC2\EOT\142\STX\EOT+\"! Stake registration certificate.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT#\STX\NUL\ACK\DC2\EOT\142\STX\EOT\DC3\n\ + \\r\n\ + \\ENQ\EOT#\STX\NUL\SOH\DC2\EOT\142\STX\DC4&\n\ + \\r\n\ + \\ENQ\EOT#\STX\NUL\ETX\DC2\EOT\142\STX)*\n\ + \1\n\ + \\EOT\EOT#\STX\SOH\DC2\EOT\143\STX\EOT-\"# Stake deregistration certificate.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT#\STX\SOH\ACK\DC2\EOT\143\STX\EOT\DC3\n\ + \\r\n\ + \\ENQ\EOT#\STX\SOH\SOH\DC2\EOT\143\STX\DC4(\n\ + \\r\n\ + \\ENQ\EOT#\STX\SOH\ETX\DC2\EOT\143\STX+,\n\ + \-\n\ + \\EOT\EOT#\STX\STX\DC2\EOT\144\STX\EOT-\"\US Stake delegation certificate.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT#\STX\STX\ACK\DC2\EOT\144\STX\EOT\ETB\n\ + \\r\n\ + \\ENQ\EOT#\STX\STX\SOH\DC2\EOT\144\STX\CAN(\n\ + \\r\n\ + \\ENQ\EOT#\STX\STX\ETX\DC2\EOT\144\STX+,\n\ + \.\n\ + \\EOT\EOT#\STX\ETX\DC2\EOT\145\STX\EOT/\" Pool registration certificate.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT#\STX\ETX\ACK\DC2\EOT\145\STX\EOT\CAN\n\ + \\r\n\ + \\ENQ\EOT#\STX\ETX\SOH\DC2\EOT\145\STX\EM*\n\ + \\r\n\ + \\ENQ\EOT#\STX\ETX\ETX\DC2\EOT\145\STX-.\n\ + \,\n\ + \\EOT\EOT#\STX\EOT\DC2\EOT\146\STX\EOT+\"\RS Pool retirement certificate.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT#\STX\EOT\ACK\DC2\EOT\146\STX\EOT\SYN\n\ + \\r\n\ + \\ENQ\EOT#\STX\EOT\SOH\DC2\EOT\146\STX\ETB&\n\ + \\r\n\ + \\ENQ\EOT#\STX\EOT\ETX\DC2\EOT\146\STX)*\n\ + \3\n\ + \\EOT\EOT#\STX\ENQ\DC2\EOT\147\STX\EOT8\"% Genesis key delegation certificate.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT#\STX\ENQ\ACK\DC2\EOT\147\STX\EOT\FS\n\ + \\r\n\ + \\ENQ\EOT#\STX\ENQ\SOH\DC2\EOT\147\STX\GS3\n\ + \\r\n\ + \\ENQ\EOT#\STX\ENQ\ETX\DC2\EOT\147\STX67\n\ + \7\n\ + \\EOT\EOT#\STX\ACK\DC2\EOT\148\STX\EOT\EM\") Move instantaneous rewards certificate.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT#\STX\ACK\ACK\DC2\EOT\148\STX\EOT\v\n\ + \\r\n\ + \\ENQ\EOT#\STX\ACK\SOH\DC2\EOT\148\STX\f\DC4\n\ + \\r\n\ + \\ENQ\EOT#\STX\ACK\ETX\DC2\EOT\148\STX\ETB\CAN\n\ + \)\n\ + \\EOT\EOT#\STX\a\DC2\EOT\149\STX\EOT\EM\"\ESC Registration certificate.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT#\STX\a\ACK\DC2\EOT\149\STX\EOT\v\n\ + \\r\n\ + \\ENQ\EOT#\STX\a\SOH\DC2\EOT\149\STX\f\DC4\n\ + \\r\n\ + \\ENQ\EOT#\STX\a\ETX\DC2\EOT\149\STX\ETB\CAN\n\ + \+\n\ + \\EOT\EOT#\STX\b\DC2\EOT\150\STX\EOT\GS\"\GS Unregistration certificate.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT#\STX\b\ACK\DC2\EOT\150\STX\EOT\r\n\ + \\r\n\ + \\ENQ\EOT#\STX\b\SOH\DC2\EOT\150\STX\SO\CAN\n\ + \\r\n\ + \\ENQ\EOT#\STX\b\ETX\DC2\EOT\150\STX\ESC\FS\n\ + \,\n\ + \\EOT\EOT#\STX\t\DC2\EOT\151\STX\EOT'\"\RS Vote delegation certificate.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT#\STX\t\ACK\DC2\EOT\151\STX\EOT\DC1\n\ + \\r\n\ + \\ENQ\EOT#\STX\t\SOH\DC2\EOT\151\STX\DC2!\n\ + \\r\n\ + \\ENQ\EOT#\STX\t\ETX\DC2\EOT\151\STX$&\n\ + \6\n\ + \\EOT\EOT#\STX\n\ + \\DC2\EOT\152\STX\EOT2\"( Stake and vote delegation certificate.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT#\STX\n\ + \\ACK\DC2\EOT\152\STX\EOT\SYN\n\ + \\r\n\ + \\ENQ\EOT#\STX\n\ + \\SOH\DC2\EOT\152\STX\ETB,\n\ + \\r\n\ + \\ENQ\EOT#\STX\n\ + \\ETX\DC2\EOT\152\STX/1\n\ + \>\n\ + \\EOT\EOT#\STX\v\DC2\EOT\153\STX\EOT0\"0 Stake registration and delegation certificate.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT#\STX\v\ACK\DC2\EOT\153\STX\EOT\NAK\n\ + \\r\n\ + \\ENQ\EOT#\STX\v\SOH\DC2\EOT\153\STX\SYN*\n\ + \\r\n\ + \\ENQ\EOT#\STX\v\ETX\DC2\EOT\153\STX-/\n\ + \=\n\ + \\EOT\EOT#\STX\f\DC2\EOT\154\STX\EOT.\"/ Vote registration and delegation certificate.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT#\STX\f\ACK\DC2\EOT\154\STX\EOT\DC4\n\ + \\r\n\ + \\ENQ\EOT#\STX\f\SOH\DC2\EOT\154\STX\NAK(\n\ + \\r\n\ + \\ENQ\EOT#\STX\f\ETX\DC2\EOT\154\STX+-\n\ + \G\n\ + \\EOT\EOT#\STX\r\DC2\EOT\155\STX\EOT9\"9 Stake and vote registration and delegation certificate.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT#\STX\r\ACK\DC2\EOT\155\STX\EOT\EM\n\ + \\r\n\ + \\ENQ\EOT#\STX\r\SOH\DC2\EOT\155\STX\SUB3\n\ + \\r\n\ + \\ENQ\EOT#\STX\r\ETX\DC2\EOT\155\STX68\n\ + \8\n\ + \\EOT\EOT#\STX\SO\DC2\EOT\156\STX\EOT6\"* Authorize committee hot key certificate.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT#\STX\SO\ACK\DC2\EOT\156\STX\EOT\CAN\n\ + \\r\n\ + \\ENQ\EOT#\STX\SO\SOH\DC2\EOT\156\STX\EM0\n\ + \\r\n\ + \\ENQ\EOT#\STX\SO\ETX\DC2\EOT\156\STX35\n\ + \6\n\ + \\EOT\EOT#\STX\SI\DC2\EOT\157\STX\EOT<\"( Resign committee cold key certificate.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT#\STX\SI\ACK\DC2\EOT\157\STX\EOT\ESC\n\ + \\r\n\ + \\ENQ\EOT#\STX\SI\SOH\DC2\EOT\157\STX\FS6\n\ + \\r\n\ + \\ENQ\EOT#\STX\SI\ETX\DC2\EOT\157\STX9;\n\ + \*\n\ + \\EOT\EOT#\STX\DLE\DC2\EOT\158\STX\EOT#\"\FS Register DRep certificate.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT#\STX\DLE\ACK\DC2\EOT\158\STX\EOT\SI\n\ + \\r\n\ + \\ENQ\EOT#\STX\DLE\SOH\DC2\EOT\158\STX\DLE\GS\n\ + \\r\n\ + \\ENQ\EOT#\STX\DLE\ETX\DC2\EOT\158\STX \"\n\ + \,\n\ + \\EOT\EOT#\STX\DC1\DC2\EOT\159\STX\EOT'\"\RS Unregister DRep certificate.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT#\STX\DC1\ACK\DC2\EOT\159\STX\EOT\DC1\n\ + \\r\n\ + \\ENQ\EOT#\STX\DC1\SOH\DC2\EOT\159\STX\DC2!\n\ + \\r\n\ + \\ENQ\EOT#\STX\DC1\ETX\DC2\EOT\159\STX$&\n\ + \(\n\ + \\EOT\EOT#\STX\DC2\DC2\EOT\160\STX\EOT)\"\SUB Update DRep certificate.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT#\STX\DC2\ACK\DC2\EOT\160\STX\EOT\DC2\n\ + \\r\n\ + \\ENQ\EOT#\STX\DC2\SOH\DC2\EOT\160\STX\DC3#\n\ + \\r\n\ + \\ENQ\EOT#\STX\DC2\ETX\DC2\EOT\160\STX&(\n\ + \/\n\ + \\EOT\EOT#\STX\DC3\DC2\EOT\162\STX\STX\SUB\"! Redeemer for the Plutus script.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT#\STX\DC3\ACK\DC2\EOT\162\STX\STX\n\ + \\n\ + \\r\n\ + \\ENQ\EOT#\STX\DC3\SOH\DC2\EOT\162\STX\v\DC3\n\ + \\r\n\ + \\ENQ\EOT#\STX\DC3\ETX\DC2\EOT\162\STX\SYN\EM\n\ + \E\n\ + \\STX\EOT$\DC2\ACK\166\STX\NUL\169\STX\SOH\SUB7 Represents a stake delegation certificate in Cardano.\n\ + \\n\ + \\v\n\ + \\ETX\EOT$\SOH\DC2\EOT\166\STX\b\ESC\n\ + \!\n\ + \\EOT\EOT$\STX\NUL\DC2\EOT\167\STX\STX'\"\DC3 Stake credential.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT$\STX\NUL\ACK\DC2\EOT\167\STX\STX\DC1\n\ + \\r\n\ + \\ENQ\EOT$\STX\NUL\SOH\DC2\EOT\167\STX\DC2\"\n\ + \\r\n\ + \\ENQ\EOT$\STX\NUL\ETX\DC2\EOT\167\STX%&\n\ + \\RS\n\ + \\EOT\EOT$\STX\SOH\DC2\EOT\168\STX\STX\EM\"\DLE Pool key hash.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT$\STX\SOH\ENQ\DC2\EOT\168\STX\STX\a\n\ + \\r\n\ + \\ENQ\EOT$\STX\SOH\SOH\DC2\EOT\168\STX\b\DC4\n\ + \\r\n\ + \\ENQ\EOT$\STX\SOH\ETX\DC2\EOT\168\STX\ETB\CAN\n\ + \F\n\ + \\STX\EOT%\DC2\ACK\172\STX\NUL\182\STX\SOH\SUB8 Represents a pool registration certificate in Cardano.\n\ + \\n\ + \\v\n\ + \\ETX\EOT%\SOH\DC2\EOT\172\STX\b\FS\n\ + \\"\n\ + \\EOT\EOT%\STX\NUL\DC2\EOT\173\STX\STX\NAK\"\DC4 Operator key hash.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT%\STX\NUL\ENQ\DC2\EOT\173\STX\STX\a\n\ + \\r\n\ + \\ENQ\EOT%\STX\NUL\SOH\DC2\EOT\173\STX\b\DLE\n\ + \\r\n\ + \\ENQ\EOT%\STX\NUL\ETX\DC2\EOT\173\STX\DC3\DC4\n\ + \\GS\n\ + \\EOT\EOT%\STX\SOH\DC2\EOT\174\STX\STX\CAN\"\SI VRF key hash.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT%\STX\SOH\ENQ\DC2\EOT\174\STX\STX\a\n\ + \\r\n\ + \\ENQ\EOT%\STX\SOH\SOH\DC2\EOT\174\STX\b\DC3\n\ + \\r\n\ + \\ENQ\EOT%\STX\SOH\ETX\DC2\EOT\174\STX\SYN\ETB\n\ + \\RS\n\ + \\EOT\EOT%\STX\STX\DC2\EOT\175\STX\STX\DC4\"\DLE Pledge amount.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT%\STX\STX\ENQ\DC2\EOT\175\STX\STX\b\n\ + \\r\n\ + \\ENQ\EOT%\STX\STX\SOH\DC2\EOT\175\STX\t\SI\n\ + \\r\n\ + \\ENQ\EOT%\STX\STX\ETX\DC2\EOT\175\STX\DC2\DC3\n\ + \\SUB\n\ + \\EOT\EOT%\STX\ETX\DC2\EOT\176\STX\STX\DC2\"\f Pool cost.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT%\STX\ETX\ENQ\DC2\EOT\176\STX\STX\b\n\ + \\r\n\ + \\ENQ\EOT%\STX\ETX\SOH\DC2\EOT\176\STX\t\r\n\ + \\r\n\ + \\ENQ\EOT%\STX\ETX\ETX\DC2\EOT\176\STX\DLE\DC1\n\ + \\FS\n\ + \\EOT\EOT%\STX\EOT\DC2\EOT\177\STX\STX\FS\"\SO Pool margin.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT%\STX\EOT\ACK\DC2\EOT\177\STX\STX\DLE\n\ + \\r\n\ + \\ENQ\EOT%\STX\EOT\SOH\DC2\EOT\177\STX\DC1\ETB\n\ + \\r\n\ + \\ENQ\EOT%\STX\EOT\ETX\DC2\EOT\177\STX\SUB\ESC\n\ + \\US\n\ + \\EOT\EOT%\STX\ENQ\DC2\EOT\178\STX\STX\ESC\"\DC1 Reward account.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT%\STX\ENQ\ENQ\DC2\EOT\178\STX\STX\a\n\ + \\r\n\ + \\ENQ\EOT%\STX\ENQ\SOH\DC2\EOT\178\STX\b\SYN\n\ + \\r\n\ + \\ENQ\EOT%\STX\ENQ\ETX\DC2\EOT\178\STX\EM\SUB\n\ + \.\n\ + \\EOT\EOT%\STX\ACK\DC2\EOT\179\STX\STX!\" List of pool owner key hashes.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT%\STX\ACK\EOT\DC2\EOT\179\STX\STX\n\ + \\n\ + \\r\n\ + \\ENQ\EOT%\STX\ACK\ENQ\DC2\EOT\179\STX\v\DLE\n\ + \\r\n\ + \\ENQ\EOT%\STX\ACK\SOH\DC2\EOT\179\STX\DC1\FS\n\ + \\r\n\ + \\ENQ\EOT%\STX\ACK\ETX\DC2\EOT\179\STX\US \n\ + \\US\n\ + \\EOT\EOT%\STX\a\DC2\EOT\180\STX\STX\FS\"\DC1 List of relays.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT%\STX\a\EOT\DC2\EOT\180\STX\STX\n\ + \\n\ + \\r\n\ + \\ENQ\EOT%\STX\a\ACK\DC2\EOT\180\STX\v\DLE\n\ + \\r\n\ + \\ENQ\EOT%\STX\a\SOH\DC2\EOT\180\STX\DC1\ETB\n\ + \\r\n\ + \\ENQ\EOT%\STX\a\ETX\DC2\EOT\180\STX\SUB\ESC\n\ + \\RS\n\ + \\EOT\EOT%\STX\b\DC2\EOT\181\STX\STX!\"\DLE Pool metadata.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT%\STX\b\ACK\DC2\EOT\181\STX\STX\SO\n\ + \\r\n\ + \\ENQ\EOT%\STX\b\SOH\DC2\EOT\181\STX\SI\FS\n\ + \\r\n\ + \\ENQ\EOT%\STX\b\ETX\DC2\EOT\181\STX\US \n\ + \D\n\ + \\STX\EOT&\DC2\ACK\185\STX\NUL\188\STX\SOH\SUB6 Represents a pool retirement certificate in Cardano.\n\ + \\n\ + \\v\n\ + \\ETX\EOT&\SOH\DC2\EOT\185\STX\b\SUB\n\ + \\RS\n\ + \\EOT\EOT&\STX\NUL\DC2\EOT\186\STX\STX\EM\"\DLE Pool key hash.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT&\STX\NUL\ENQ\DC2\EOT\186\STX\STX\a\n\ + \\r\n\ + \\ENQ\EOT&\STX\NUL\SOH\DC2\EOT\186\STX\b\DC4\n\ + \\r\n\ + \\ENQ\EOT&\STX\NUL\ETX\DC2\EOT\186\STX\ETB\CAN\n\ + \!\n\ + \\EOT\EOT&\STX\SOH\DC2\EOT\187\STX\STX\DC3\"\DC3 Retirement epoch.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT&\STX\SOH\ENQ\DC2\EOT\187\STX\STX\b\n\ + \\r\n\ + \\ENQ\EOT&\STX\SOH\SOH\DC2\EOT\187\STX\t\SO\n\ + \\r\n\ + \\ENQ\EOT&\STX\SOH\ETX\DC2\EOT\187\STX\DC1\DC2\n\ + \K\n\ + \\STX\EOT'\DC2\ACK\191\STX\NUL\195\STX\SOH\SUB= Represents a genesis key delegation certificate in Cardano.\n\ + \\n\ + \\v\n\ + \\ETX\EOT'\SOH\DC2\EOT\191\STX\b \n\ + \\GS\n\ + \\EOT\EOT'\STX\NUL\DC2\EOT\192\STX\STX\EM\"\SI Genesis hash.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT'\STX\NUL\ENQ\DC2\EOT\192\STX\STX\a\n\ + \\r\n\ + \\ENQ\EOT'\STX\NUL\SOH\DC2\EOT\192\STX\b\DC4\n\ + \\r\n\ + \\ENQ\EOT'\STX\NUL\ETX\DC2\EOT\192\STX\ETB\CAN\n\ + \&\n\ + \\EOT\EOT'\STX\SOH\DC2\EOT\193\STX\STX\"\"\CAN Genesis delegate hash.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT'\STX\SOH\ENQ\DC2\EOT\193\STX\STX\a\n\ + \\r\n\ + \\ENQ\EOT'\STX\SOH\SOH\DC2\EOT\193\STX\b\GS\n\ + \\r\n\ + \\ENQ\EOT'\STX\SOH\ETX\DC2\EOT\193\STX !\n\ + \\GS\n\ + \\EOT\EOT'\STX\STX\DC2\EOT\194\STX\STX\CAN\"\SI VRF key hash.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT'\STX\STX\ENQ\DC2\EOT\194\STX\STX\a\n\ + \\r\n\ + \\ENQ\EOT'\STX\STX\SOH\DC2\EOT\194\STX\b\DC3\n\ + \\r\n\ + \\ENQ\EOT'\STX\STX\ETX\DC2\EOT\194\STX\SYN\ETB\n\ + \\f\n\ + \\STX\ENQ\SOH\DC2\ACK\197\STX\NUL\201\STX\SOH\n\ + \\v\n\ + \\ETX\ENQ\SOH\SOH\DC2\EOT\197\STX\ENQ\SO\n\ + \\f\n\ + \\EOT\ENQ\SOH\STX\NUL\DC2\EOT\198\STX\STX\GS\n\ + \\r\n\ + \\ENQ\ENQ\SOH\STX\NUL\SOH\DC2\EOT\198\STX\STX\CAN\n\ + \\r\n\ + \\ENQ\ENQ\SOH\STX\NUL\STX\DC2\EOT\198\STX\ESC\FS\n\ + \\f\n\ + \\EOT\ENQ\SOH\STX\SOH\DC2\EOT\199\STX\STX\SUB\n\ + \\r\n\ + \\ENQ\ENQ\SOH\STX\SOH\SOH\DC2\EOT\199\STX\STX\NAK\n\ + \\r\n\ + \\ENQ\ENQ\SOH\STX\SOH\STX\DC2\EOT\199\STX\CAN\EM\n\ + \\f\n\ + \\EOT\ENQ\SOH\STX\STX\DC2\EOT\200\STX\STX\SUB\n\ + \\r\n\ + \\ENQ\ENQ\SOH\STX\STX\SOH\DC2\EOT\200\STX\STX\NAK\n\ + \\r\n\ + \\ENQ\ENQ\SOH\STX\STX\STX\DC2\EOT\200\STX\CAN\EM\n\ + \\f\n\ + \\STX\EOT(\DC2\ACK\203\STX\NUL\206\STX\SOH\n\ + \\v\n\ + \\ETX\EOT(\SOH\DC2\EOT\203\STX\b\DC1\n\ + \\f\n\ + \\EOT\EOT(\STX\NUL\DC2\EOT\204\STX\STX'\n\ + \\r\n\ + \\ENQ\EOT(\STX\NUL\ACK\DC2\EOT\204\STX\STX\DC1\n\ + \\r\n\ + \\ENQ\EOT(\STX\NUL\SOH\DC2\EOT\204\STX\DC2\"\n\ + \\r\n\ + \\ENQ\EOT(\STX\NUL\ETX\DC2\EOT\204\STX%&\n\ + \\f\n\ + \\EOT\EOT(\STX\SOH\DC2\EOT\205\STX\STX\ETB\n\ + \\r\n\ + \\ENQ\EOT(\STX\SOH\ENQ\DC2\EOT\205\STX\STX\a\n\ + \\r\n\ + \\ENQ\EOT(\STX\SOH\SOH\DC2\EOT\205\STX\b\DC2\n\ + \\r\n\ + \\ENQ\EOT(\STX\SOH\ETX\DC2\EOT\205\STX\NAK\SYN\n\ + \N\n\ + \\STX\EOT)\DC2\ACK\209\STX\NUL\213\STX\SOH\SUB@ Represents a move instantaneous reward certificate in Cardano.\n\ + \\n\ + \\v\n\ + \\ETX\EOT)\SOH\DC2\EOT\209\STX\b\SI\n\ + \\f\n\ + \\EOT\EOT)\STX\NUL\DC2\EOT\210\STX\STX\NAK\n\ + \\r\n\ + \\ENQ\EOT)\STX\NUL\ACK\DC2\EOT\210\STX\STX\v\n\ + \\r\n\ + \\ENQ\EOT)\STX\NUL\SOH\DC2\EOT\210\STX\f\DLE\n\ + \\r\n\ + \\ENQ\EOT)\STX\NUL\ETX\DC2\EOT\210\STX\DC3\DC4\n\ + \\f\n\ + \\EOT\EOT)\STX\SOH\DC2\EOT\211\STX\STX\FS\n\ + \\r\n\ + \\ENQ\EOT)\STX\SOH\EOT\DC2\EOT\211\STX\STX\n\ + \\n\ + \\r\n\ + \\ENQ\EOT)\STX\SOH\ACK\DC2\EOT\211\STX\v\DC4\n\ + \\r\n\ + \\ENQ\EOT)\STX\SOH\SOH\DC2\EOT\211\STX\NAK\ETB\n\ + \\r\n\ + \\ENQ\EOT)\STX\SOH\ETX\DC2\EOT\211\STX\SUB\ESC\n\ + \\f\n\ + \\EOT\EOT)\STX\STX\DC2\EOT\212\STX\STX\ETB\n\ + \\r\n\ + \\ENQ\EOT)\STX\STX\ENQ\DC2\EOT\212\STX\STX\b\n\ + \\r\n\ + \\ENQ\EOT)\STX\STX\SOH\DC2\EOT\212\STX\t\DC2\n\ + \\r\n\ + \\ENQ\EOT)\STX\STX\ETX\DC2\EOT\212\STX\NAK\SYN\n\ + \\f\n\ + \\STX\EOT*\DC2\ACK\215\STX\NUL\218\STX\SOH\n\ + \\v\n\ + \\ETX\EOT*\SOH\DC2\EOT\215\STX\b\SI\n\ + \\f\n\ + \\EOT\EOT*\STX\NUL\DC2\EOT\216\STX\STX'\n\ + \\r\n\ + \\ENQ\EOT*\STX\NUL\ACK\DC2\EOT\216\STX\STX\DC1\n\ + \\r\n\ + \\ENQ\EOT*\STX\NUL\SOH\DC2\EOT\216\STX\DC2\"\n\ + \\r\n\ + \\ENQ\EOT*\STX\NUL\ETX\DC2\EOT\216\STX%&\n\ + \\f\n\ + \\EOT\EOT*\STX\SOH\DC2\EOT\217\STX\STX\DC2\n\ + \\r\n\ + \\ENQ\EOT*\STX\SOH\ENQ\DC2\EOT\217\STX\STX\b\n\ + \\r\n\ + \\ENQ\EOT*\STX\SOH\SOH\DC2\EOT\217\STX\t\r\n\ + \\r\n\ + \\ENQ\EOT*\STX\SOH\ETX\DC2\EOT\217\STX\DLE\DC1\n\ + \\f\n\ + \\STX\EOT+\DC2\ACK\220\STX\NUL\223\STX\SOH\n\ + \\v\n\ + \\ETX\EOT+\SOH\DC2\EOT\220\STX\b\DC1\n\ + \\f\n\ + \\EOT\EOT+\STX\NUL\DC2\EOT\221\STX\STX'\n\ + \\r\n\ + \\ENQ\EOT+\STX\NUL\ACK\DC2\EOT\221\STX\STX\DC1\n\ + \\r\n\ + \\ENQ\EOT+\STX\NUL\SOH\DC2\EOT\221\STX\DC2\"\n\ + \\r\n\ + \\ENQ\EOT+\STX\NUL\ETX\DC2\EOT\221\STX%&\n\ + \\f\n\ + \\EOT\EOT+\STX\SOH\DC2\EOT\222\STX\STX\DC2\n\ + \\r\n\ + \\ENQ\EOT+\STX\SOH\ENQ\DC2\EOT\222\STX\STX\b\n\ + \\r\n\ + \\ENQ\EOT+\STX\SOH\SOH\DC2\EOT\222\STX\t\r\n\ + \\r\n\ + \\ENQ\EOT+\STX\SOH\ETX\DC2\EOT\222\STX\DLE\DC1\n\ + \\f\n\ + \\STX\EOT,\DC2\ACK\225\STX\NUL\232\STX\SOH\n\ + \\v\n\ + \\ETX\EOT,\SOH\DC2\EOT\225\STX\b\f\n\ + \\SO\n\ + \\EOT\EOT,\b\NUL\DC2\ACK\226\STX\STX\231\STX\ETX\n\ + \\r\n\ + \\ENQ\EOT,\b\NUL\SOH\DC2\EOT\226\STX\b\f\n\ + \ \n\ + \\EOT\EOT,\STX\NUL\DC2\EOT\227\STX\EOT\FS\"\DC2 Address key hash\n\ + \\n\ + \\r\n\ + \\ENQ\EOT,\STX\NUL\ENQ\DC2\EOT\227\STX\EOT\t\n\ + \\r\n\ + \\ENQ\EOT,\STX\NUL\SOH\DC2\EOT\227\STX\n\ + \\ETB\n\ + \\r\n\ + \\ENQ\EOT,\STX\NUL\ETX\DC2\EOT\227\STX\SUB\ESC\n\ + \\ESC\n\ + \\EOT\EOT,\STX\SOH\DC2\EOT\228\STX\EOT\SUB\"\r Script hash\n\ + \\n\ + \\r\n\ + \\ENQ\EOT,\STX\SOH\ENQ\DC2\EOT\228\STX\EOT\t\n\ + \\r\n\ + \\ENQ\EOT,\STX\SOH\SOH\DC2\EOT\228\STX\n\ + \\NAK\n\ + \\r\n\ + \\ENQ\EOT,\STX\SOH\ETX\DC2\EOT\228\STX\CAN\EM\n\ + \\ETB\n\ + \\EOT\EOT,\STX\STX\DC2\EOT\229\STX\EOT\NAK\"\t Abstain\n\ + \\n\ + \\r\n\ + \\ENQ\EOT,\STX\STX\ENQ\DC2\EOT\229\STX\EOT\b\n\ + \\r\n\ + \\ENQ\EOT,\STX\STX\SOH\DC2\EOT\229\STX\t\DLE\n\ + \\r\n\ + \\ENQ\EOT,\STX\STX\ETX\DC2\EOT\229\STX\DC3\DC4\n\ + \\GS\n\ + \\EOT\EOT,\STX\ETX\DC2\EOT\230\STX\EOT\ESC\"\SI No confidence\n\ + \\n\ + \\r\n\ + \\ENQ\EOT,\STX\ETX\ENQ\DC2\EOT\230\STX\EOT\b\n\ + \\r\n\ + \\ENQ\EOT,\STX\ETX\SOH\DC2\EOT\230\STX\t\SYN\n\ + \\r\n\ + \\ENQ\EOT,\STX\ETX\ETX\DC2\EOT\230\STX\EM\SUB\n\ + \\f\n\ + \\STX\EOT-\DC2\ACK\234\STX\NUL\237\STX\SOH\n\ + \\v\n\ + \\ETX\EOT-\SOH\DC2\EOT\234\STX\b\NAK\n\ + \\f\n\ + \\EOT\EOT-\STX\NUL\DC2\EOT\235\STX\STX'\n\ + \\r\n\ + \\ENQ\EOT-\STX\NUL\ACK\DC2\EOT\235\STX\STX\DC1\n\ + \\r\n\ + \\ENQ\EOT-\STX\NUL\SOH\DC2\EOT\235\STX\DC2\"\n\ + \\r\n\ + \\ENQ\EOT-\STX\NUL\ETX\DC2\EOT\235\STX%&\n\ + \\f\n\ + \\EOT\EOT-\STX\SOH\DC2\EOT\236\STX\STX\DLE\n\ + \\r\n\ + \\ENQ\EOT-\STX\SOH\ACK\DC2\EOT\236\STX\STX\ACK\n\ + \\r\n\ + \\ENQ\EOT-\STX\SOH\SOH\DC2\EOT\236\STX\a\v\n\ + \\r\n\ + \\ENQ\EOT-\STX\SOH\ETX\DC2\EOT\236\STX\SO\SI\n\ + \\f\n\ + \\STX\EOT.\DC2\ACK\239\STX\NUL\243\STX\SOH\n\ + \\v\n\ + \\ETX\EOT.\SOH\DC2\EOT\239\STX\b\SUB\n\ + \\f\n\ + \\EOT\EOT.\STX\NUL\DC2\EOT\240\STX\STX'\n\ + \\r\n\ + \\ENQ\EOT.\STX\NUL\ACK\DC2\EOT\240\STX\STX\DC1\n\ + \\r\n\ + \\ENQ\EOT.\STX\NUL\SOH\DC2\EOT\240\STX\DC2\"\n\ + \\r\n\ + \\ENQ\EOT.\STX\NUL\ETX\DC2\EOT\240\STX%&\n\ + \\f\n\ + \\EOT\EOT.\STX\SOH\DC2\EOT\241\STX\STX\EM\n\ + \\r\n\ + \\ENQ\EOT.\STX\SOH\ENQ\DC2\EOT\241\STX\STX\a\n\ + \\r\n\ + \\ENQ\EOT.\STX\SOH\SOH\DC2\EOT\241\STX\b\DC4\n\ + \\r\n\ + \\ENQ\EOT.\STX\SOH\ETX\DC2\EOT\241\STX\ETB\CAN\n\ + \\f\n\ + \\EOT\EOT.\STX\STX\DC2\EOT\242\STX\STX\DLE\n\ + \\r\n\ + \\ENQ\EOT.\STX\STX\ACK\DC2\EOT\242\STX\STX\ACK\n\ + \\r\n\ + \\ENQ\EOT.\STX\STX\SOH\DC2\EOT\242\STX\a\v\n\ + \\r\n\ + \\ENQ\EOT.\STX\STX\ETX\DC2\EOT\242\STX\SO\SI\n\ + \\f\n\ + \\STX\EOT/\DC2\ACK\245\STX\NUL\249\STX\SOH\n\ + \\v\n\ + \\ETX\EOT/\SOH\DC2\EOT\245\STX\b\EM\n\ + \\f\n\ + \\EOT\EOT/\STX\NUL\DC2\EOT\246\STX\STX'\n\ + \\r\n\ + \\ENQ\EOT/\STX\NUL\ACK\DC2\EOT\246\STX\STX\DC1\n\ + \\r\n\ + \\ENQ\EOT/\STX\NUL\SOH\DC2\EOT\246\STX\DC2\"\n\ + \\r\n\ + \\ENQ\EOT/\STX\NUL\ETX\DC2\EOT\246\STX%&\n\ + \\f\n\ + \\EOT\EOT/\STX\SOH\DC2\EOT\247\STX\STX\EM\n\ + \\r\n\ + \\ENQ\EOT/\STX\SOH\ENQ\DC2\EOT\247\STX\STX\a\n\ + \\r\n\ + \\ENQ\EOT/\STX\SOH\SOH\DC2\EOT\247\STX\b\DC4\n\ + \\r\n\ + \\ENQ\EOT/\STX\SOH\ETX\DC2\EOT\247\STX\ETB\CAN\n\ + \\f\n\ + \\EOT\EOT/\STX\STX\DC2\EOT\248\STX\STX\DC2\n\ + \\r\n\ + \\ENQ\EOT/\STX\STX\ENQ\DC2\EOT\248\STX\STX\b\n\ + \\r\n\ + \\ENQ\EOT/\STX\STX\SOH\DC2\EOT\248\STX\t\r\n\ + \\r\n\ + \\ENQ\EOT/\STX\STX\ETX\DC2\EOT\248\STX\DLE\DC1\n\ + \\f\n\ + \\STX\EOT0\DC2\ACK\251\STX\NUL\255\STX\SOH\n\ + \\v\n\ + \\ETX\EOT0\SOH\DC2\EOT\251\STX\b\CAN\n\ + \\f\n\ + \\EOT\EOT0\STX\NUL\DC2\EOT\252\STX\STX'\n\ + \\r\n\ + \\ENQ\EOT0\STX\NUL\ACK\DC2\EOT\252\STX\STX\DC1\n\ + \\r\n\ + \\ENQ\EOT0\STX\NUL\SOH\DC2\EOT\252\STX\DC2\"\n\ + \\r\n\ + \\ENQ\EOT0\STX\NUL\ETX\DC2\EOT\252\STX%&\n\ + \\f\n\ + \\EOT\EOT0\STX\SOH\DC2\EOT\253\STX\STX\DLE\n\ + \\r\n\ + \\ENQ\EOT0\STX\SOH\ACK\DC2\EOT\253\STX\STX\ACK\n\ + \\r\n\ + \\ENQ\EOT0\STX\SOH\SOH\DC2\EOT\253\STX\a\v\n\ + \\r\n\ + \\ENQ\EOT0\STX\SOH\ETX\DC2\EOT\253\STX\SO\SI\n\ + \\f\n\ + \\EOT\EOT0\STX\STX\DC2\EOT\254\STX\STX\DC2\n\ + \\r\n\ + \\ENQ\EOT0\STX\STX\ENQ\DC2\EOT\254\STX\STX\b\n\ + \\r\n\ + \\ENQ\EOT0\STX\STX\SOH\DC2\EOT\254\STX\t\r\n\ + \\r\n\ + \\ENQ\EOT0\STX\STX\ETX\DC2\EOT\254\STX\DLE\DC1\n\ + \\f\n\ + \\STX\EOT1\DC2\ACK\129\ETX\NUL\134\ETX\SOH\n\ + \\v\n\ + \\ETX\EOT1\SOH\DC2\EOT\129\ETX\b\GS\n\ + \\f\n\ + \\EOT\EOT1\STX\NUL\DC2\EOT\130\ETX\STX'\n\ + \\r\n\ + \\ENQ\EOT1\STX\NUL\ACK\DC2\EOT\130\ETX\STX\DC1\n\ + \\r\n\ + \\ENQ\EOT1\STX\NUL\SOH\DC2\EOT\130\ETX\DC2\"\n\ + \\r\n\ + \\ENQ\EOT1\STX\NUL\ETX\DC2\EOT\130\ETX%&\n\ + \\f\n\ + \\EOT\EOT1\STX\SOH\DC2\EOT\131\ETX\STX\EM\n\ + \\r\n\ + \\ENQ\EOT1\STX\SOH\ENQ\DC2\EOT\131\ETX\STX\a\n\ + \\r\n\ + \\ENQ\EOT1\STX\SOH\SOH\DC2\EOT\131\ETX\b\DC4\n\ + \\r\n\ + \\ENQ\EOT1\STX\SOH\ETX\DC2\EOT\131\ETX\ETB\CAN\n\ + \\f\n\ + \\EOT\EOT1\STX\STX\DC2\EOT\132\ETX\STX\DLE\n\ + \\r\n\ + \\ENQ\EOT1\STX\STX\ACK\DC2\EOT\132\ETX\STX\ACK\n\ + \\r\n\ + \\ENQ\EOT1\STX\STX\SOH\DC2\EOT\132\ETX\a\v\n\ + \\r\n\ + \\ENQ\EOT1\STX\STX\ETX\DC2\EOT\132\ETX\SO\SI\n\ + \\f\n\ + \\EOT\EOT1\STX\ETX\DC2\EOT\133\ETX\STX\DC2\n\ + \\r\n\ + \\ENQ\EOT1\STX\ETX\ENQ\DC2\EOT\133\ETX\STX\b\n\ + \\r\n\ + \\ENQ\EOT1\STX\ETX\SOH\DC2\EOT\133\ETX\t\r\n\ + \\r\n\ + \\ENQ\EOT1\STX\ETX\ETX\DC2\EOT\133\ETX\DLE\DC1\n\ + \\f\n\ + \\STX\EOT2\DC2\ACK\136\ETX\NUL\139\ETX\SOH\n\ + \\v\n\ + \\ETX\EOT2\SOH\DC2\EOT\136\ETX\b\FS\n\ + \\f\n\ + \\EOT\EOT2\STX\NUL\DC2\EOT\137\ETX\STX0\n\ + \\r\n\ + \\ENQ\EOT2\STX\NUL\ACK\DC2\EOT\137\ETX\STX\DC1\n\ + \\r\n\ + \\ENQ\EOT2\STX\NUL\SOH\DC2\EOT\137\ETX\DC2+\n\ + \\r\n\ + \\ENQ\EOT2\STX\NUL\ETX\DC2\EOT\137\ETX./\n\ + \\f\n\ + \\EOT\EOT2\STX\SOH\DC2\EOT\138\ETX\STX/\n\ + \\r\n\ + \\ENQ\EOT2\STX\SOH\ACK\DC2\EOT\138\ETX\STX\DC1\n\ + \\r\n\ + \\ENQ\EOT2\STX\SOH\SOH\DC2\EOT\138\ETX\DC2*\n\ + \\r\n\ + \\ENQ\EOT2\STX\SOH\ETX\DC2\EOT\138\ETX-.\n\ + \\f\n\ + \\STX\EOT3\DC2\ACK\141\ETX\NUL\144\ETX\SOH\n\ + \\v\n\ + \\ETX\EOT3\SOH\DC2\EOT\141\ETX\b\SO\n\ + \\f\n\ + \\EOT\EOT3\STX\NUL\DC2\EOT\142\ETX\STX\DC1\n\ + \\r\n\ + \\ENQ\EOT3\STX\NUL\ENQ\DC2\EOT\142\ETX\STX\b\n\ + \\r\n\ + \\ENQ\EOT3\STX\NUL\SOH\DC2\EOT\142\ETX\t\f\n\ + \\r\n\ + \\ENQ\EOT3\STX\NUL\ETX\DC2\EOT\142\ETX\SI\DLE\n\ + \\f\n\ + \\EOT\EOT3\STX\SOH\DC2\EOT\143\ETX\STX\EM\n\ + \\r\n\ + \\ENQ\EOT3\STX\SOH\ENQ\DC2\EOT\143\ETX\STX\a\n\ + \\r\n\ + \\ENQ\EOT3\STX\SOH\SOH\DC2\EOT\143\ETX\b\DC4\n\ + \\r\n\ + \\ENQ\EOT3\STX\SOH\ETX\DC2\EOT\143\ETX\ETB\CAN\n\ + \\f\n\ + \\STX\EOT4\DC2\ACK\146\ETX\NUL\149\ETX\SOH\n\ + \\v\n\ + \\ETX\EOT4\SOH\DC2\EOT\146\ETX\b\US\n\ + \\f\n\ + \\EOT\EOT4\STX\NUL\DC2\EOT\147\ETX\STX0\n\ + \\r\n\ + \\ENQ\EOT4\STX\NUL\ACK\DC2\EOT\147\ETX\STX\DC1\n\ + \\r\n\ + \\ENQ\EOT4\STX\NUL\SOH\DC2\EOT\147\ETX\DC2+\n\ + \\r\n\ + \\ENQ\EOT4\STX\NUL\ETX\DC2\EOT\147\ETX./\n\ + \\f\n\ + \\EOT\EOT4\STX\SOH\DC2\EOT\148\ETX\STX\DC4\n\ + \\r\n\ + \\ENQ\EOT4\STX\SOH\ACK\DC2\EOT\148\ETX\STX\b\n\ + \\r\n\ + \\ENQ\EOT4\STX\SOH\SOH\DC2\EOT\148\ETX\t\SI\n\ + \\r\n\ + \\ENQ\EOT4\STX\SOH\ETX\DC2\EOT\148\ETX\DC2\DC3\n\ + \\f\n\ + \\STX\EOT5\DC2\ACK\151\ETX\NUL\155\ETX\SOH\n\ + \\v\n\ + \\ETX\EOT5\SOH\DC2\EOT\151\ETX\b\DC3\n\ + \\f\n\ + \\EOT\EOT5\STX\NUL\DC2\EOT\152\ETX\STX&\n\ + \\r\n\ + \\ENQ\EOT5\STX\NUL\ACK\DC2\EOT\152\ETX\STX\DC1\n\ + \\r\n\ + \\ENQ\EOT5\STX\NUL\SOH\DC2\EOT\152\ETX\DC2!\n\ + \\r\n\ + \\ENQ\EOT5\STX\NUL\ETX\DC2\EOT\152\ETX$%\n\ + \\f\n\ + \\EOT\EOT5\STX\SOH\DC2\EOT\153\ETX\STX\DC2\n\ + \\r\n\ + \\ENQ\EOT5\STX\SOH\ENQ\DC2\EOT\153\ETX\STX\b\n\ + \\r\n\ + \\ENQ\EOT5\STX\SOH\SOH\DC2\EOT\153\ETX\t\r\n\ + \\r\n\ + \\ENQ\EOT5\STX\SOH\ETX\DC2\EOT\153\ETX\DLE\DC1\n\ + \\f\n\ + \\EOT\EOT5\STX\STX\DC2\EOT\154\ETX\STX\DC4\n\ + \\r\n\ + \\ENQ\EOT5\STX\STX\ACK\DC2\EOT\154\ETX\STX\b\n\ + \\r\n\ + \\ENQ\EOT5\STX\STX\SOH\DC2\EOT\154\ETX\t\SI\n\ + \\r\n\ + \\ENQ\EOT5\STX\STX\ETX\DC2\EOT\154\ETX\DC2\DC3\n\ + \\f\n\ + \\STX\EOT6\DC2\ACK\157\ETX\NUL\160\ETX\SOH\n\ + \\v\n\ + \\ETX\EOT6\SOH\DC2\EOT\157\ETX\b\NAK\n\ + \\f\n\ + \\EOT\EOT6\STX\NUL\DC2\EOT\158\ETX\STX&\n\ + \\r\n\ + \\ENQ\EOT6\STX\NUL\ACK\DC2\EOT\158\ETX\STX\DC1\n\ + \\r\n\ + \\ENQ\EOT6\STX\NUL\SOH\DC2\EOT\158\ETX\DC2!\n\ + \\r\n\ + \\ENQ\EOT6\STX\NUL\ETX\DC2\EOT\158\ETX$%\n\ + \\f\n\ + \\EOT\EOT6\STX\SOH\DC2\EOT\159\ETX\STX\DC2\n\ + \\r\n\ + \\ENQ\EOT6\STX\SOH\ENQ\DC2\EOT\159\ETX\STX\b\n\ + \\r\n\ + \\ENQ\EOT6\STX\SOH\SOH\DC2\EOT\159\ETX\t\r\n\ + \\r\n\ + \\ENQ\EOT6\STX\SOH\ETX\DC2\EOT\159\ETX\DLE\DC1\n\ + \\f\n\ + \\STX\EOT7\DC2\ACK\162\ETX\NUL\165\ETX\SOH\n\ + \\v\n\ + \\ETX\EOT7\SOH\DC2\EOT\162\ETX\b\SYN\n\ + \\f\n\ + \\EOT\EOT7\STX\NUL\DC2\EOT\163\ETX\STX&\n\ + \\r\n\ + \\ENQ\EOT7\STX\NUL\ACK\DC2\EOT\163\ETX\STX\DC1\n\ + \\r\n\ + \\ENQ\EOT7\STX\NUL\SOH\DC2\EOT\163\ETX\DC2!\n\ + \\r\n\ + \\ENQ\EOT7\STX\NUL\ETX\DC2\EOT\163\ETX$%\n\ + \\f\n\ + \\EOT\EOT7\STX\SOH\DC2\EOT\164\ETX\STX\DC4\n\ + \\r\n\ + \\ENQ\EOT7\STX\SOH\ACK\DC2\EOT\164\ETX\STX\b\n\ + \\r\n\ + \\ENQ\EOT7\STX\SOH\SOH\DC2\EOT\164\ETX\t\SI\n\ + \\r\n\ + \\ENQ\EOT7\STX\SOH\ETX\DC2\EOT\164\ETX\DC2\DC3\n\ + \}\n\ + \\STX\EOT8\DC2\ACK\171\ETX\NUL\175\ETX\SOH\SUBI Pattern of an address that can be used to evaluate matching predicates.\n\ + \2$ PATTERN MATCHING\n\ + \ ================\n\ + \\n\ + \\v\n\ + \\ETX\EOT8\SOH\DC2\EOT\171\ETX\b\SYN\n\ + \B\n\ + \\EOT\EOT8\STX\NUL\DC2\EOT\172\ETX\STX\SUB\"4 The address should match this exact address value.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT8\STX\NUL\ENQ\DC2\EOT\172\ETX\STX\a\n\ + \\r\n\ + \\ENQ\EOT8\STX\NUL\SOH\DC2\EOT\172\ETX\b\NAK\n\ + \\r\n\ + \\ENQ\EOT8\STX\NUL\ETX\DC2\EOT\172\ETX\CAN\EM\n\ + \H\n\ + \\EOT\EOT8\STX\SOH\DC2\EOT\173\ETX\STX\EM\": The payment part of the address should match this value.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT8\STX\SOH\ENQ\DC2\EOT\173\ETX\STX\a\n\ + \\r\n\ + \\ENQ\EOT8\STX\SOH\SOH\DC2\EOT\173\ETX\b\DC4\n\ + \\r\n\ + \\ENQ\EOT8\STX\SOH\ETX\DC2\EOT\173\ETX\ETB\CAN\n\ + \K\n\ + \\EOT\EOT8\STX\STX\DC2\EOT\174\ETX\STX\FS\"= The delegation part of the address should match this value.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT8\STX\STX\ENQ\DC2\EOT\174\ETX\STX\a\n\ + \\r\n\ + \\ENQ\EOT8\STX\STX\SOH\DC2\EOT\174\ETX\b\ETB\n\ + \\r\n\ + \\ENQ\EOT8\STX\STX\ETX\DC2\EOT\174\ETX\SUB\ESC\n\ + \[\n\ + \\STX\EOT9\DC2\ACK\178\ETX\NUL\181\ETX\SOH\SUBM Pattern of a native asset that can be used to evaluate matching predicates.\n\ + \\n\ + \\v\n\ + \\ETX\EOT9\SOH\DC2\EOT\178\ETX\b\DC4\n\ + \9\n\ + \\EOT\EOT9\STX\NUL\DC2\EOT\179\ETX\STX\SYN\"+ The asset should belong to this policy id\n\ + \\n\ + \\r\n\ + \\ENQ\EOT9\STX\NUL\ENQ\DC2\EOT\179\ETX\STX\a\n\ + \\r\n\ + \\ENQ\EOT9\STX\NUL\SOH\DC2\EOT\179\ETX\b\DC1\n\ + \\r\n\ + \\ENQ\EOT9\STX\NUL\ETX\DC2\EOT\179\ETX\DC4\NAK\n\ + \2\n\ + \\EOT\EOT9\STX\SOH\DC2\EOT\180\ETX\STX\ETB\"$ The asset should present this name\n\ + \\n\ + \\r\n\ + \\ENQ\EOT9\STX\SOH\ENQ\DC2\EOT\180\ETX\STX\a\n\ + \\r\n\ + \\ENQ\EOT9\STX\SOH\SOH\DC2\EOT\180\ETX\b\DC2\n\ + \\r\n\ + \\ENQ\EOT9\STX\SOH\ETX\DC2\EOT\180\ETX\NAK\SYN\n\ + \X\n\ + \\STX\EOT:\DC2\ACK\184\ETX\NUL\187\ETX\SOH\SUBJ Pattern of a tx output that can be used to evaluate matching predicates.\n\ + \\n\ + \\v\n\ + \\ETX\EOT:\SOH\DC2\EOT\184\ETX\b\ETB\n\ + \K\n\ + \\EOT\EOT:\STX\NUL\DC2\EOT\185\ETX\STX\GS\"= Match any address in the output that exhibits this pattern.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT:\STX\NUL\ACK\DC2\EOT\185\ETX\STX\DLE\n\ + \\r\n\ + \\ENQ\EOT:\STX\NUL\SOH\DC2\EOT\185\ETX\DC1\CAN\n\ + \\r\n\ + \\ENQ\EOT:\STX\NUL\ETX\DC2\EOT\185\ETX\ESC\FS\n\ + \I\n\ + \\EOT\EOT:\STX\SOH\DC2\EOT\186\ETX\STX\EM\"; Match any asset in the output that exhibits this pattern.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT:\STX\SOH\ACK\DC2\EOT\186\ETX\STX\SO\n\ + \\r\n\ + \\ENQ\EOT:\STX\SOH\SOH\DC2\EOT\186\ETX\SI\DC4\n\ + \\r\n\ + \\ENQ\EOT:\STX\SOH\ETX\DC2\EOT\186\ETX\ETB\CAN\n\ + \Q\n\ + \\STX\EOT;\DC2\ACK\190\ETX\NUL\196\ETX\SOH\SUBC Pattern of a Tx that can be used to evaluate matching predicates.\n\ + \\n\ + \\v\n\ + \\ETX\EOT;\SOH\DC2\EOT\190\ETX\b\DC1\n\ + \;\n\ + \\EOT\EOT;\STX\NUL\DC2\EOT\191\ETX\STX\US\"- Match any input that exhibits this pattern.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT;\STX\NUL\ACK\DC2\EOT\191\ETX\STX\DC1\n\ + \\r\n\ + \\ENQ\EOT;\STX\NUL\SOH\DC2\EOT\191\ETX\DC2\SUB\n\ + \\r\n\ + \\ENQ\EOT;\STX\NUL\ETX\DC2\EOT\191\ETX\GS\RS\n\ + \<\n\ + \\EOT\EOT;\STX\SOH\DC2\EOT\192\ETX\STX\US\". Match any output that exhibits this pattern.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT;\STX\SOH\ACK\DC2\EOT\192\ETX\STX\DC1\n\ + \\r\n\ + \\ENQ\EOT;\STX\SOH\SOH\DC2\EOT\192\ETX\DC2\SUB\n\ + \\r\n\ + \\ENQ\EOT;\STX\SOH\ETX\DC2\EOT\192\ETX\GS\RS\n\ + \`\n\ + \\EOT\EOT;\STX\STX\DC2\EOT\193\ETX\STX!\"R Match any address (inputs, outputs, collateral, etc) that exhibits this pattern.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT;\STX\STX\ACK\DC2\EOT\193\ETX\STX\DLE\n\ + \\r\n\ + \\ENQ\EOT;\STX\STX\SOH\DC2\EOT\193\ETX\DC1\FS\n\ + \\r\n\ + \\ENQ\EOT;\STX\STX\ETX\DC2\EOT\193\ETX\US \n\ + \;\n\ + \\EOT\EOT;\STX\ETX\DC2\EOT\194\ETX\STX\US\"- Match any asset that exhibits this pattern.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT;\STX\ETX\ACK\DC2\EOT\194\ETX\STX\SO\n\ + \\r\n\ + \\ENQ\EOT;\STX\ETX\SOH\DC2\EOT\194\ETX\SI\SUB\n\ + \\r\n\ + \\ENQ\EOT;\STX\ETX\ETX\DC2\EOT\194\ETX\GS\RS\n\ + \L\n\ + \\EOT\EOT;\STX\EOT\DC2\EOT\195\ETX\STX\US\"> Match any tx that either mint or burn the the asset pattern.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT;\STX\EOT\ACK\DC2\EOT\195\ETX\STX\SO\n\ + \\r\n\ + \\ENQ\EOT;\STX\EOT\SOH\DC2\EOT\195\ETX\SI\SUB\n\ + \\r\n\ + \\ENQ\EOT;\STX\EOT\ETX\DC2\EOT\195\ETX\GS\RS\n\ + \\RS\n\ + \\STX\EOT<\DC2\ACK\201\ETX\NUL\204\ETX\SOH2\DLE PARAMS\n\ + \ ======\n\ + \\n\ + \\v\n\ + \\ETX\EOT<\SOH\DC2\EOT\201\ETX\b\SI\n\ + \\f\n\ + \\EOT\EOT<\STX\NUL\DC2\EOT\202\ETX\STX\DC3\n\ + \\r\n\ + \\ENQ\EOT<\STX\NUL\ENQ\DC2\EOT\202\ETX\STX\b\n\ + \\r\n\ + \\ENQ\EOT<\STX\NUL\SOH\DC2\EOT\202\ETX\t\SO\n\ + \\r\n\ + \\ENQ\EOT<\STX\NUL\ETX\DC2\EOT\202\ETX\DC1\DC2\n\ + \\f\n\ + \\EOT\EOT<\STX\SOH\DC2\EOT\203\ETX\STX\DC4\n\ + \\r\n\ + \\ENQ\EOT<\STX\SOH\ENQ\DC2\EOT\203\ETX\STX\b\n\ + \\r\n\ + \\ENQ\EOT<\STX\SOH\SOH\DC2\EOT\203\ETX\t\SI\n\ + \\r\n\ + \\ENQ\EOT<\STX\SOH\ETX\DC2\EOT\203\ETX\DC2\DC3\n\ + \\f\n\ + \\STX\EOT=\DC2\ACK\206\ETX\NUL\209\ETX\SOH\n\ + \\v\n\ + \\ETX\EOT=\SOH\DC2\EOT\206\ETX\b\DLE\n\ + \\f\n\ + \\EOT\EOT=\STX\NUL\DC2\EOT\207\ETX\STX\ESC\n\ + \\r\n\ + \\ENQ\EOT=\STX\NUL\ACK\DC2\EOT\207\ETX\STX\DLE\n\ + \\r\n\ + \\ENQ\EOT=\STX\NUL\SOH\DC2\EOT\207\ETX\DC1\SYN\n\ + \\r\n\ + \\ENQ\EOT=\STX\NUL\ETX\DC2\EOT\207\ETX\EM\SUB\n\ + \\f\n\ + \\EOT\EOT=\STX\SOH\DC2\EOT\208\ETX\STX\FS\n\ + \\r\n\ + \\ENQ\EOT=\STX\SOH\ACK\DC2\EOT\208\ETX\STX\DLE\n\ + \\r\n\ + \\ENQ\EOT=\STX\SOH\SOH\DC2\EOT\208\ETX\DC1\ETB\n\ + \\r\n\ + \\ENQ\EOT=\STX\SOH\ETX\DC2\EOT\208\ETX\SUB\ESC\n\ + \\f\n\ + \\STX\EOT>\DC2\ACK\211\ETX\NUL\214\ETX\SOH\n\ + \\v\n\ + \\ETX\EOT>\SOH\DC2\EOT\211\ETX\b\ETB\n\ + \\f\n\ + \\EOT\EOT>\STX\NUL\DC2\EOT\212\ETX\STX\DC3\n\ + \\r\n\ + \\ENQ\EOT>\STX\NUL\ENQ\DC2\EOT\212\ETX\STX\b\n\ + \\r\n\ + \\ENQ\EOT>\STX\NUL\SOH\DC2\EOT\212\ETX\t\SO\n\ + \\r\n\ + \\ENQ\EOT>\STX\NUL\ETX\DC2\EOT\212\ETX\DC1\DC2\n\ + \\f\n\ + \\EOT\EOT>\STX\SOH\DC2\EOT\213\ETX\STX\DC3\n\ + \\r\n\ + \\ENQ\EOT>\STX\SOH\ENQ\DC2\EOT\213\ETX\STX\b\n\ + \\r\n\ + \\ENQ\EOT>\STX\SOH\SOH\DC2\EOT\213\ETX\t\SO\n\ + \\r\n\ + \\ENQ\EOT>\STX\SOH\ETX\DC2\EOT\213\ETX\DC1\DC2\n\ + \\f\n\ + \\STX\EOT?\DC2\ACK\216\ETX\NUL\218\ETX\SOH\n\ + \\v\n\ + \\ETX\EOT?\SOH\DC2\EOT\216\ETX\b\DC1\n\ + \\f\n\ + \\EOT\EOT?\STX\NUL\DC2\EOT\217\ETX\STX\FS\n\ + \\r\n\ + \\ENQ\EOT?\STX\NUL\EOT\DC2\EOT\217\ETX\STX\n\ + \\n\ + \\r\n\ + \\ENQ\EOT?\STX\NUL\ENQ\DC2\EOT\217\ETX\v\DLE\n\ + \\r\n\ + \\ENQ\EOT?\STX\NUL\SOH\DC2\EOT\217\ETX\DC1\ETB\n\ + \\r\n\ + \\ENQ\EOT?\STX\NUL\ETX\DC2\EOT\217\ETX\SUB\ESC\n\ + \\f\n\ + \\STX\EOT@\DC2\ACK\220\ETX\NUL\224\ETX\SOH\n\ + \\v\n\ + \\ETX\EOT@\SOH\DC2\EOT\220\ETX\b\DC2\n\ + \\f\n\ + \\EOT\EOT@\STX\NUL\DC2\EOT\221\ETX\STX\SUB\n\ + \\r\n\ + \\ENQ\EOT@\STX\NUL\ACK\DC2\EOT\221\ETX\STX\v\n\ + \\r\n\ + \\ENQ\EOT@\STX\NUL\SOH\DC2\EOT\221\ETX\f\NAK\n\ + \\r\n\ + \\ENQ\EOT@\STX\NUL\ETX\DC2\EOT\221\ETX\CAN\EM\n\ + \\f\n\ + \\EOT\EOT@\STX\SOH\DC2\EOT\222\ETX\STX\SUB\n\ + \\r\n\ + \\ENQ\EOT@\STX\SOH\ACK\DC2\EOT\222\ETX\STX\v\n\ + \\r\n\ + \\ENQ\EOT@\STX\SOH\SOH\DC2\EOT\222\ETX\f\NAK\n\ + \\r\n\ + \\ENQ\EOT@\STX\SOH\ETX\DC2\EOT\222\ETX\CAN\EM\n\ + \\f\n\ + \\EOT\EOT@\STX\STX\DC2\EOT\223\ETX\STX\SUB\n\ + \\r\n\ + \\ENQ\EOT@\STX\STX\ACK\DC2\EOT\223\ETX\STX\v\n\ + \\r\n\ + \\ENQ\EOT@\STX\STX\SOH\DC2\EOT\223\ETX\f\NAK\n\ + \\r\n\ + \\ENQ\EOT@\STX\STX\ETX\DC2\EOT\223\ETX\CAN\EM\n\ + \\f\n\ + \\STX\EOTA\DC2\ACK\226\ETX\NUL\249\ETX\SOH\n\ + \\v\n\ + \\ETX\EOTA\SOH\DC2\EOT\226\ETX\b\SI\n\ + \2\n\ + \\EOT\EOTA\STX\NUL\DC2\EOT\227\ETX\STX!\"$ The number of coins per UTXO byte.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTA\STX\NUL\ENQ\DC2\EOT\227\ETX\STX\b\n\ + \\r\n\ + \\ENQ\EOTA\STX\NUL\SOH\DC2\EOT\227\ETX\t\FS\n\ + \\r\n\ + \\ENQ\EOTA\STX\NUL\ETX\DC2\EOT\227\ETX\US \n\ + \-\n\ + \\EOT\EOTA\STX\SOH\DC2\EOT\228\ETX\STX\EM\"\US The maximum transaction size.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTA\STX\SOH\ENQ\DC2\EOT\228\ETX\STX\b\n\ + \\r\n\ + \\ENQ\EOTA\STX\SOH\SOH\DC2\EOT\228\ETX\t\DC4\n\ + \\r\n\ + \\ENQ\EOTA\STX\SOH\ETX\DC2\EOT\228\ETX\ETB\CAN\n\ + \,\n\ + \\EOT\EOTA\STX\STX\DC2\EOT\229\ETX\STX!\"\RS The minimum fee coefficient.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTA\STX\STX\ENQ\DC2\EOT\229\ETX\STX\b\n\ + \\r\n\ + \\ENQ\EOTA\STX\STX\SOH\DC2\EOT\229\ETX\t\FS\n\ + \\r\n\ + \\ENQ\EOTA\STX\STX\ETX\DC2\EOT\229\ETX\US \n\ + \)\n\ + \\EOT\EOTA\STX\ETX\DC2\EOT\230\ETX\STX\RS\"\ESC The minimum fee constant.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTA\STX\ETX\ENQ\DC2\EOT\230\ETX\STX\b\n\ + \\r\n\ + \\ENQ\EOTA\STX\ETX\SOH\DC2\EOT\230\ETX\t\EM\n\ + \\r\n\ + \\ENQ\EOTA\STX\ETX\ETX\DC2\EOT\230\ETX\FS\GS\n\ + \,\n\ + \\EOT\EOTA\STX\EOT\DC2\EOT\231\ETX\STX!\"\RS The maximum block body size.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTA\STX\EOT\ENQ\DC2\EOT\231\ETX\STX\b\n\ + \\r\n\ + \\ENQ\EOTA\STX\EOT\SOH\DC2\EOT\231\ETX\t\FS\n\ + \\r\n\ + \\ENQ\EOTA\STX\EOT\ETX\DC2\EOT\231\ETX\US \n\ + \.\n\ + \\EOT\EOTA\STX\ENQ\DC2\EOT\232\ETX\STX#\" The maximum block header size.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTA\STX\ENQ\ENQ\DC2\EOT\232\ETX\STX\b\n\ + \\r\n\ + \\ENQ\EOTA\STX\ENQ\SOH\DC2\EOT\232\ETX\t\RS\n\ + \\r\n\ + \\ENQ\EOTA\STX\ENQ\ETX\DC2\EOT\232\ETX!\"\n\ + \&\n\ + \\EOT\EOTA\STX\ACK\DC2\EOT\233\ETX\STX\US\"\CAN The stake key deposit.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTA\STX\ACK\ENQ\DC2\EOT\233\ETX\STX\b\n\ + \\r\n\ + \\ENQ\EOTA\STX\ACK\SOH\DC2\EOT\233\ETX\t\SUB\n\ + \\r\n\ + \\ENQ\EOTA\STX\ACK\ETX\DC2\EOT\233\ETX\GS\RS\n\ + \!\n\ + \\EOT\EOTA\STX\a\DC2\EOT\234\ETX\STX\SUB\"\DC3 The pool deposit.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTA\STX\a\ENQ\DC2\EOT\234\ETX\STX\b\n\ + \\r\n\ + \\ENQ\EOTA\STX\a\SOH\DC2\EOT\234\ETX\t\NAK\n\ + \\r\n\ + \\ENQ\EOTA\STX\a\ETX\DC2\EOT\234\ETX\CAN\EM\n\ + \0\n\ + \\EOT\EOTA\STX\b\DC2\EOT\235\ETX\STX)\"\" The pool retirement epoch bound.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTA\STX\b\ENQ\DC2\EOT\235\ETX\STX\b\n\ + \\r\n\ + \\ENQ\EOTA\STX\b\SOH\DC2\EOT\235\ETX\t$\n\ + \\r\n\ + \\ENQ\EOTA\STX\b\ETX\DC2\EOT\235\ETX'(\n\ + \,\n\ + \\EOT\EOTA\STX\t\DC2\EOT\236\ETX\STX&\"\RS The desired number of pools.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTA\STX\t\ENQ\DC2\EOT\236\ETX\STX\b\n\ + \\r\n\ + \\ENQ\EOTA\STX\t\SOH\DC2\EOT\236\ETX\t \n\ + \\r\n\ + \\ENQ\EOTA\STX\t\ETX\DC2\EOT\236\ETX#%\n\ + \#\n\ + \\EOT\EOTA\STX\n\ + \\DC2\EOT\237\ETX\STX%\"\NAK The pool influence.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTA\STX\n\ + \\ACK\DC2\EOT\237\ETX\STX\DLE\n\ + \\r\n\ + \\ENQ\EOTA\STX\n\ + \\SOH\DC2\EOT\237\ETX\DC1\US\n\ + \\r\n\ + \\ENQ\EOTA\STX\n\ + \\ETX\DC2\EOT\237\ETX\"$\n\ + \'\n\ + \\EOT\EOTA\STX\v\DC2\EOT\238\ETX\STX)\"\EM The monetary expansion.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTA\STX\v\ACK\DC2\EOT\238\ETX\STX\DLE\n\ + \\r\n\ + \\ENQ\EOTA\STX\v\SOH\DC2\EOT\238\ETX\DC1#\n\ + \\r\n\ + \\ENQ\EOTA\STX\v\ETX\DC2\EOT\238\ETX&(\n\ + \'\n\ + \\EOT\EOTA\STX\f\DC2\EOT\239\ETX\STX)\"\EM The treasury expansion.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTA\STX\f\ACK\DC2\EOT\239\ETX\STX\DLE\n\ + \\r\n\ + \\ENQ\EOTA\STX\f\SOH\DC2\EOT\239\ETX\DC1#\n\ + \\r\n\ + \\ENQ\EOTA\STX\f\ETX\DC2\EOT\239\ETX&(\n\ + \&\n\ + \\EOT\EOTA\STX\r\DC2\EOT\240\ETX\STX\FS\"\CAN The minimum pool cost.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTA\STX\r\ENQ\DC2\EOT\240\ETX\STX\b\n\ + \\r\n\ + \\ENQ\EOTA\STX\r\SOH\DC2\EOT\240\ETX\t\SYN\n\ + \\r\n\ + \\ENQ\EOTA\STX\r\ETX\DC2\EOT\240\ETX\EM\ESC\n\ + \%\n\ + \\EOT\EOTA\STX\SO\DC2\EOT\241\ETX\STX(\"\ETB The protocol version.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTA\STX\SO\ACK\DC2\EOT\241\ETX\STX\DC1\n\ + \\r\n\ + \\ENQ\EOTA\STX\SO\SOH\DC2\EOT\241\ETX\DC2\"\n\ + \\r\n\ + \\ENQ\EOTA\STX\SO\ETX\DC2\EOT\241\ETX%'\n\ + \'\n\ + \\EOT\EOTA\STX\SI\DC2\EOT\242\ETX\STX\GS\"\EM The maximum value size.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTA\STX\SI\ENQ\DC2\EOT\242\ETX\STX\b\n\ + \\r\n\ + \\ENQ\EOTA\STX\SI\SOH\DC2\EOT\242\ETX\t\ETB\n\ + \\r\n\ + \\ENQ\EOTA\STX\SI\ETX\DC2\EOT\242\ETX\SUB\FS\n\ + \*\n\ + \\EOT\EOTA\STX\DLE\DC2\EOT\243\ETX\STX$\"\FS The collateral percentage.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTA\STX\DLE\ENQ\DC2\EOT\243\ETX\STX\b\n\ + \\r\n\ + \\ENQ\EOTA\STX\DLE\SOH\DC2\EOT\243\ETX\t\RS\n\ + \\r\n\ + \\ENQ\EOTA\STX\DLE\ETX\DC2\EOT\243\ETX!#\n\ + \.\n\ + \\EOT\EOTA\STX\DC1\DC2\EOT\244\ETX\STX$\" The maximum collateral inputs.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTA\STX\DC1\ENQ\DC2\EOT\244\ETX\STX\b\n\ + \\r\n\ + \\ENQ\EOTA\STX\DC1\SOH\DC2\EOT\244\ETX\t\RS\n\ + \\r\n\ + \\ENQ\EOTA\STX\DC1\ETX\DC2\EOT\244\ETX!#\n\ + \ \n\ + \\EOT\EOTA\STX\DC2\DC2\EOT\245\ETX\STX\RS\"\DC2 The cost models.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTA\STX\DC2\ACK\DC2\EOT\245\ETX\STX\f\n\ + \\r\n\ + \\ENQ\EOTA\STX\DC2\SOH\DC2\EOT\245\ETX\r\CAN\n\ + \\r\n\ + \\ENQ\EOTA\STX\DC2\ETX\DC2\EOT\245\ETX\ESC\GS\n\ + \\ESC\n\ + \\EOT\EOTA\STX\DC3\DC2\EOT\246\ETX\STX\ETB\"\r The prices.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTA\STX\DC3\ACK\DC2\EOT\246\ETX\STX\n\ + \\n\ + \\r\n\ + \\ENQ\EOTA\STX\DC3\SOH\DC2\EOT\246\ETX\v\DC1\n\ + \\r\n\ + \\ENQ\EOTA\STX\DC3\ETX\DC2\EOT\246\ETX\DC4\SYN\n\ + \<\n\ + \\EOT\EOTA\STX\DC4\DC2\EOT\247\ETX\STX3\". The maximum execution units per transaction.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTA\STX\DC4\ACK\DC2\EOT\247\ETX\STX\t\n\ + \\r\n\ + \\ENQ\EOTA\STX\DC4\SOH\DC2\EOT\247\ETX\n\ + \-\n\ + \\r\n\ + \\ENQ\EOTA\STX\DC4\ETX\DC2\EOT\247\ETX02\n\ + \6\n\ + \\EOT\EOTA\STX\NAK\DC2\EOT\248\ETX\STX-\"( The maximum execution units per block.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTA\STX\NAK\ACK\DC2\EOT\248\ETX\STX\t\n\ + \\r\n\ + \\ENQ\EOTA\STX\NAK\SOH\DC2\EOT\248\ETX\n\ + \'\n\ + \\r\n\ + \\ENQ\EOTA\STX\NAK\ETX\DC2\EOT\248\ETX*,\n\ + \&\n\ + \\STX\EOTB\DC2\ACK\254\ETX\NUL\128\EOT\SOH2\CAN EVALUATION\n\ + \ ==========\n\ + \\n\ + \\v\n\ + \\ETX\EOTB\SOH\DC2\EOT\254\ETX\b\DC1\n\ + \\f\n\ + \\EOT\EOTB\STX\NUL\DC2\EOT\255\ETX\STX\DC1\n\ + \\r\n\ + \\ENQ\EOTB\STX\NUL\ENQ\DC2\EOT\255\ETX\STX\b\n\ + \\r\n\ + \\ENQ\EOTB\STX\NUL\SOH\DC2\EOT\255\ETX\t\f\n\ + \\r\n\ + \\ENQ\EOTB\STX\NUL\ETX\DC2\EOT\255\ETX\SI\DLE\n\ + \\f\n\ + \\STX\EOTC\DC2\ACK\130\EOT\NUL\132\EOT\SOH\n\ + \\v\n\ + \\ETX\EOTC\SOH\DC2\EOT\130\EOT\b\DC1\n\ + \\f\n\ + \\EOT\EOTC\STX\NUL\DC2\EOT\131\EOT\STX\DC1\n\ + \\r\n\ + \\ENQ\EOTC\STX\NUL\ENQ\DC2\EOT\131\EOT\STX\b\n\ + \\r\n\ + \\ENQ\EOTC\STX\NUL\SOH\DC2\EOT\131\EOT\t\f\n\ + \\r\n\ + \\ENQ\EOTC\STX\NUL\ETX\DC2\EOT\131\EOT\SI\DLE\n\ + \\f\n\ + \\STX\EOTD\DC2\ACK\134\EOT\NUL\140\EOT\SOH\n\ + \\v\n\ + \\ETX\EOTD\SOH\DC2\EOT\134\EOT\b\SO\n\ + \\f\n\ + \\EOT\EOTD\STX\NUL\DC2\EOT\135\EOT\STX\DC1\n\ + \\r\n\ + \\ENQ\EOTD\STX\NUL\ENQ\DC2\EOT\135\EOT\STX\b\n\ + \\r\n\ + \\ENQ\EOTD\STX\NUL\SOH\DC2\EOT\135\EOT\t\f\n\ + \\r\n\ + \\ENQ\EOTD\STX\NUL\ETX\DC2\EOT\135\EOT\SI\DLE\n\ + \\f\n\ + \\EOT\EOTD\STX\SOH\DC2\EOT\136\EOT\STX\ETB\n\ + \\r\n\ + \\ENQ\EOTD\STX\SOH\ACK\DC2\EOT\136\EOT\STX\t\n\ + \\r\n\ + \\ENQ\EOTD\STX\SOH\SOH\DC2\EOT\136\EOT\n\ + \\DC2\n\ + \\r\n\ + \\ENQ\EOTD\STX\SOH\ETX\DC2\EOT\136\EOT\NAK\SYN\n\ + \\f\n\ + \\EOT\EOTD\STX\STX\DC2\EOT\137\EOT\STX \n\ + \\r\n\ + \\ENQ\EOTD\STX\STX\EOT\DC2\EOT\137\EOT\STX\n\ + \\n\ + \\r\n\ + \\ENQ\EOTD\STX\STX\ACK\DC2\EOT\137\EOT\v\DC4\n\ + \\r\n\ + \\ENQ\EOTD\STX\STX\SOH\DC2\EOT\137\EOT\NAK\ESC\n\ + \\r\n\ + \\ENQ\EOTD\STX\STX\ETX\DC2\EOT\137\EOT\RS\US\n\ + \\f\n\ + \\EOT\EOTD\STX\ETX\DC2\EOT\138\EOT\STX \n\ + \\r\n\ + \\ENQ\EOTD\STX\ETX\EOT\DC2\EOT\138\EOT\STX\n\ + \\n\ + \\r\n\ + \\ENQ\EOTD\STX\ETX\ACK\DC2\EOT\138\EOT\v\DC4\n\ + \\r\n\ + \\ENQ\EOTD\STX\ETX\SOH\DC2\EOT\138\EOT\NAK\ESC\n\ + \\r\n\ + \\ENQ\EOTD\STX\ETX\ETX\DC2\EOT\138\EOT\RS\US\n\ + \\f\n\ + \\EOT\EOTD\STX\EOT\DC2\EOT\139\EOT\STX\"\n\ + \\r\n\ + \\ENQ\EOTD\STX\EOT\EOT\DC2\EOT\139\EOT\STX\n\ + \\n\ + \\r\n\ + \\ENQ\EOTD\STX\EOT\ACK\DC2\EOT\139\EOT\v\DC3\n\ + \\r\n\ + \\ENQ\EOTD\STX\EOT\SOH\DC2\EOT\139\EOT\DC4\GS\n\ + \\r\n\ + \\ENQ\EOTD\STX\EOT\ETX\DC2\EOT\139\EOT !b\ACKproto3" diff --git a/utxorpc.cabal b/utxorpc.cabal --- a/utxorpc.cabal +++ b/utxorpc.cabal @@ -1,7 +1,7 @@ cabal-version: 3.0 name: utxorpc -version: 0.0.13.0 +version: 0.0.14.0 synopsis: Generated code for a gRPC interface for UTxO Blockchains description: [UTxO RPC](https://utxorpc.org/) (u5c for short) is an interface tailored for interactions with UTxO-based blockchains, prioritizing performance and developer experience. By providing a common contract, a range of SDKs, and thorough documentation, UTxO RPC aims to facilitate: