Copyright	(c) 2023 GYELD GMBH
License	Apache 2.0
Maintainer	[email protected]
Stability	develop
Safe Haskell	Safe-Inferred
Language	GHC2021

GeniusYield.Transaction.Common

Description

Synopsis

data GYBalancedTx v = GYBalancedTx {
- gybtxIns ∷ ![GYTxInDetailed v]
- gybtxCollaterals ∷ !GYUTxOs
- gybtxOuts ∷ ![GYTxOut v]
- gybtxMint ∷ !(Maybe (GYValue, [(GYMintScript v, GYRedeemer)]))
- gybtxInvalidBefore ∷ !(Maybe GYSlot)
- gybtxInvalidAfter ∷ !(Maybe GYSlot)
- gybtxSigners ∷ !(Set GYPubKeyHash)
- gybtxRefIns ∷ !GYUTxOs
}
data GYTxInDetailed v = GYTxInDetailed {
- gyTxInDet ∷ !(GYTxIn v)
- gyTxInDetAddress ∷ !GYAddress
- gyTxInDetValue ∷ !GYValue
- gyTxInDetDatum ∷ !GYOutDatum
- gyTxInDetScriptRef ∷ !(Maybe (Some GYScript))
}
data BalancingError
- = BalancingErrorInsufficientFunds !GYValue
- | ∀ v. BalancingErrorNonPositiveTxOut !(GYTxOut v)
- | BalancingErrorChangeShortFall !Natural
- | BalancingErrorEmptyOwnUTxOs
minimumUTxO ∷ BundledProtocolParameters BabbageEra → GYTxOut v → Natural
adjustTxOut ∷ (GYTxOut v → Natural) → GYTxOut v → GYTxOut v

Documentation

data GYBalancedTx v #

An *almost* finalized Tx.

This is fully balanced _except_ potentially missing an ada change output, and missing the exact fee. Both of these will be set by finalizeGYBalancedTx.

Constructors

GYBalancedTx
Fields gybtxIns ∷ ![GYTxInDetailed v] gybtxCollaterals ∷ !GYUTxOs gybtxOuts ∷ ![GYTxOut v] gybtxMint ∷ !(Maybe (GYValue, [(GYMintScript v, GYRedeemer)])) gybtxInvalidBefore ∷ !(Maybe GYSlot) gybtxInvalidAfter ∷ !(Maybe GYSlot) gybtxSigners ∷ !(Set GYPubKeyHash) gybtxRefIns ∷ !GYUTxOs

data GYTxInDetailed v #

A further detailed version of GYTxIn, containing all information about a UTxO.

Constructors

GYTxInDetailed
Fields gyTxInDet ∷ !(GYTxIn v) gyTxInDetAddress ∷ !GYAddress gyTxInDetValue ∷ !GYValue gyTxInDetDatum ∷ !GYOutDatum gyTxInDetScriptRef ∷ !(Maybe (Some GYScript))

Instances

Instances details

Show (GYTxInDetailed v) #
Instance details Defined in GeniusYield.Transaction.Common Methods showsPrec ∷ Int → GYTxInDetailed v → ShowS Source # show ∷ GYTxInDetailed v → String Source # showList ∷ [GYTxInDetailed v] → ShowS Source #
Eq (GYTxInDetailed v) #
Instance details Defined in GeniusYield.Transaction.Common Methods (==) ∷ GYTxInDetailed v → GYTxInDetailed v → Bool Source # (/=) ∷ GYTxInDetailed v → GYTxInDetailed v → Bool Source #

data BalancingError #

Constructors

BalancingErrorInsufficientFunds !GYValue
∀ v. BalancingErrorNonPositiveTxOut !(GYTxOut v)
BalancingErrorChangeShortFall !Natural	Lovelace shortfall in constructing a change output. See: Cardano.CoinSelection.Balance.UnableToConstructChangeError
BalancingErrorEmptyOwnUTxOs	User wallet has no utxos to select.

Instances

Instances details

Show BalancingError #
Instance details Defined in GeniusYield.Transaction.Common Methods showsPrec ∷ Int → BalancingError → ShowS Source # show ∷ BalancingError → String Source # showList ∷ [BalancingError] → ShowS Source #
Eq BalancingError #
Instance details Defined in GeniusYield.Transaction.Common Methods (==) ∷ BalancingError → BalancingError → Bool Source # (/=) ∷ BalancingError → BalancingError → Bool Source #

minimumUTxO ∷ BundledProtocolParameters BabbageEra → GYTxOut v → Natural #

adjustTxOut ∷ (GYTxOut v → Natural) → GYTxOut v → GYTxOut v #