@indigo-labs/indigo-sdk 0.1.6 → 0.1.7

package/dist/index.d.mts

@@ -1235,6 +1235,11 @@ declare const LRPDatumSchema: _lucid_evolution_lucid.TObject<{
     maxPrice: _lucid_evolution_lucid.TObject<{
         getOnChainInt: _lucid_evolution_lucid.TUnsafe<bigint>;
     }>;
+    /**
+     * The amount of lovelaces that is available to be spent.
+     * This doesn't correspond to the lovelaces in UTXO's value,
+     * since that can contain fees, too.
+     */
     lovelacesToSpend: _lucid_evolution_lucid.TUnsafe<bigint>;
 }>;
 type LRPDatum = Data.Static<typeof LRPDatumSchema>;
@@ -1273,7 +1278,22 @@ type OnChainDecimal = Data.Static<typeof OnChainDecimalSchema>;
 
 declare function openLrp(assetTokenName: string, lovelacesAmt: bigint, maxPrice: OnChainDecimal, lucid: LucidEvolution, lrpScriptHash: ScriptHash, network: Network, lrpStakeCredential?: Credential$1): Promise<TxBuilder>;
 declare function cancelLrp(lrpOutRef: OutRef, lrpRefScriptOutRef: OutRef, lucid: LucidEvolution): Promise<TxBuilder>;
-declare function redeemLrp(redemptionLrpsData: [OutRef, bigint][], lrpRefScriptOutRef: OutRef, priceOracleOutRef: OutRef, iassetOutRef: OutRef, lucid: LucidEvolution, lrpParams: LRPParams, priceOracleParams: PriceOracleParams, network: Network): Promise<TxBuilder>;
+declare function redeemLrp(
+/** The tuple represents the LRP outref and the amount of iAssets to redeem against it. */
+redemptionLrpsData: [OutRef, bigint][], lrpRefScriptOutRef: OutRef, priceOracleOutRef: OutRef, iassetOutRef: OutRef, lucid: LucidEvolution, lrpParams: LRPParams, priceOracleParams: PriceOracleParams, network: Network, currentSlot: number): Promise<TxBuilder>;
+/**
+ * Create Tx adjusting the LRP and claiming the received iAssets
+ */
+declare function adjustLrp(lucid: LucidEvolution, lrpOutRef: OutRef, 
+/**
+ * A positive amount increases the lovelaces in the LRP,
+ * and a negative amount takes lovelaces from the LRP.
+ */
+lovelacesAdjustAmt: bigint, lrpRefScriptOutRef: OutRef, lrpParams: LRPParams): Promise<TxBuilder>;
+/**
+ * Create Tx claiming the received iAssets.
+ */
+declare function claimLrp(lucid: LucidEvolution, lrpOutRef: OutRef, lrpRefScriptOutRef: OutRef, lrpParams: LRPParams): Promise<TxBuilder>;
 
 declare const mkLrpValidator: (params: LRPParams) => SpendingValidator;
 
@@ -1297,4 +1317,4 @@ type OneShotParams = Data.Static<typeof OneShotParamsSchema>;
 declare function oneShotMintTx(lucid: LucidEvolution, params: OneShotParams): Promise<[TxBuilder, PolicyId]>;
 declare function runOneShotMintTx(lucid: LucidEvolution, params: OneShotParams): Promise<PolicyId>;
 
-export { AccountAction, AccountActionSchema, AccountContent, AccountContentSchema, ActionReturnDatum, ActionReturnDatumSchema, Address, type AddressCredential, type AddressCredentialOrDatum, type AddressSP, AddressSchema, type Amount, type AssetClass, type AssetClassSP, AssetClassSchema, type AuthTokenPolicies, type CDPContent, CDPContentSchema, CDPContract, type CDPCreatorParamsSP, type CDPDatum, CDPDatumSchema, type CDPFees, CDPFeesSchema, type CdpParams, CollectorContract, type CollectorParams, Credential, CredentialSchema, type CurrencySymbol, type DistributionParams, EpochToScaleToSum, EpochToScaleToSumSchema, ExecuteParams, type ExecuteParamsSP, type FeedInterestOracleRedeemer, FeedInterestOracleRedeemerSchema, GovContract, type GovDatum, GovParams, type GovParamsSP, type IAssetContent, IAssetContentSchema, IAssetHelpers, type IAssetOutput, type Input, InterestOracleContract, type InterestOracleDatum, InterestOracleDatumSchema, type InterestOracleParams, InterestOracleParamsSchema, type LRPDatum, LRPDatumSchema, type LRPParams, LRPParamsSchema, type LRPRedeemer, LRPRedeemerSchema, ONE_SECOND, type OracleAssetNft, OracleAssetNftSchema, type Output, type OutputReference, OutputReferenceSchema, PollManagerParams, type PollManagerParamsSP, PollShardParams, type PollShardParamsSP, type PriceOracleDatum, PriceOracleDatumSchema, type PriceOracleParams, PriceOracleParamsSchema, type PubKeyHash, SPInteger, SPIntegerSchema, type ScriptCredential, type ScriptOutput, type ScriptRef, type ScriptReference, type ScriptReferences, SnapshotEpochToScaleToSumContent, SnapshotEpochToScaleToSumContentSchema, StabilityPoolContent, StabilityPoolContentSchema, StabilityPoolContract, StabilityPoolDatum, StabilityPoolDatumSchema, StabilityPoolParams, type StabilityPoolParamsSP, StabilityPoolRedeemer, StabilityPoolRedeemerSchema, StabilityPoolSnapshot, StakingContract, type StakingParams, type StartTime, type SystemParams, type TokenName, TreasuryContract, type TreasuryParams, type ValidatorHashes, VerificationKeyHashSchema, type VersionRecordParams, _cdpValidator, _collectorValidator, _treasuryValidator, addrDetails, addressFromBech32, addressToBech32, balance, calculateFeeFromPercentage, cancelLrp, castExecuteParams, castGovParams, castInterestOracleParams, castLrpParams, castPollManagerParams, castPollShardParams, castPriceOracleParams, castStabilityPoolParams, cdpCreatorValidator, createScriptAddress, fromSPInteger, fromSystemParamsAsset, getInlineDatumOrThrow, getRandomElement, loadSystemParamsFromFile, loadSystemParamsFromUrl, matchSingle, mkCDPCreatorValidator, mkCDPCreatorValidatorFromSP, mkInterestOracleValidator, mkLrpValidator, mkPollManagerValidator, mkPollManagerValidatorFromSP, mkPollShardValidator, mkPollShardValidatorFromSP, mkSPInteger, oneDay, oneHour, oneShotMintTx, oneYear, openLrp, parseAccountDatum, parseCDPDatum, parseGovDatum, parseIAssetDatum, parseInterestOracleDatum, parseLrpDatum, parsePriceOracleDatum, parseSnapshotEpochToScaleToSumDatum, parseStabilityPoolDatum, redeemLrp, runCreateScriptRefTx, runOneShotMintTx, scriptRef, serialiseCDPDatum, serialiseFeedInterestOracleRedeemer, serialiseGovDatum, serialiseIAssetDatum, serialiseInterestOracleDatum, serialiseLrpDatum, serialiseLrpRedeemer, serialisePriceOracleDatum, serialiseStabilityPoolDatum, serialiseStabilityPoolRedeemer, spAdd, spDiv, spMul, spSub, toSystemParamsAsset };
+export { AccountAction, AccountActionSchema, AccountContent, AccountContentSchema, ActionReturnDatum, ActionReturnDatumSchema, Address, type AddressCredential, type AddressCredentialOrDatum, type AddressSP, AddressSchema, type Amount, type AssetClass, type AssetClassSP, AssetClassSchema, type AuthTokenPolicies, type CDPContent, CDPContentSchema, CDPContract, type CDPCreatorParamsSP, type CDPDatum, CDPDatumSchema, type CDPFees, CDPFeesSchema, type CdpParams, CollectorContract, type CollectorParams, Credential, CredentialSchema, type CurrencySymbol, type DistributionParams, EpochToScaleToSum, EpochToScaleToSumSchema, ExecuteParams, type ExecuteParamsSP, type FeedInterestOracleRedeemer, FeedInterestOracleRedeemerSchema, GovContract, type GovDatum, GovParams, type GovParamsSP, type IAssetContent, IAssetContentSchema, IAssetHelpers, type IAssetOutput, type Input, InterestOracleContract, type InterestOracleDatum, InterestOracleDatumSchema, type InterestOracleParams, InterestOracleParamsSchema, type LRPDatum, LRPDatumSchema, type LRPParams, LRPParamsSchema, type LRPRedeemer, LRPRedeemerSchema, ONE_SECOND, type OracleAssetNft, OracleAssetNftSchema, type Output, type OutputReference, OutputReferenceSchema, PollManagerParams, type PollManagerParamsSP, PollShardParams, type PollShardParamsSP, type PriceOracleDatum, PriceOracleDatumSchema, type PriceOracleParams, PriceOracleParamsSchema, type PubKeyHash, SPInteger, SPIntegerSchema, type ScriptCredential, type ScriptOutput, type ScriptRef, type ScriptReference, type ScriptReferences, SnapshotEpochToScaleToSumContent, SnapshotEpochToScaleToSumContentSchema, StabilityPoolContent, StabilityPoolContentSchema, StabilityPoolContract, StabilityPoolDatum, StabilityPoolDatumSchema, StabilityPoolParams, type StabilityPoolParamsSP, StabilityPoolRedeemer, StabilityPoolRedeemerSchema, StabilityPoolSnapshot, StakingContract, type StakingParams, type StartTime, type SystemParams, type TokenName, TreasuryContract, type TreasuryParams, type ValidatorHashes, VerificationKeyHashSchema, type VersionRecordParams, _cdpValidator, _collectorValidator, _treasuryValidator, addrDetails, addressFromBech32, addressToBech32, adjustLrp, balance, calculateFeeFromPercentage, cancelLrp, castExecuteParams, castGovParams, castInterestOracleParams, castLrpParams, castPollManagerParams, castPollShardParams, castPriceOracleParams, castStabilityPoolParams, cdpCreatorValidator, claimLrp, createScriptAddress, fromSPInteger, fromSystemParamsAsset, getInlineDatumOrThrow, getRandomElement, loadSystemParamsFromFile, loadSystemParamsFromUrl, matchSingle, mkCDPCreatorValidator, mkCDPCreatorValidatorFromSP, mkInterestOracleValidator, mkLrpValidator, mkPollManagerValidator, mkPollManagerValidatorFromSP, mkPollShardValidator, mkPollShardValidatorFromSP, mkSPInteger, oneDay, oneHour, oneShotMintTx, oneYear, openLrp, parseAccountDatum, parseCDPDatum, parseGovDatum, parseIAssetDatum, parseInterestOracleDatum, parseLrpDatum, parsePriceOracleDatum, parseSnapshotEpochToScaleToSumDatum, parseStabilityPoolDatum, redeemLrp, runCreateScriptRefTx, runOneShotMintTx, scriptRef, serialiseCDPDatum, serialiseFeedInterestOracleRedeemer, serialiseGovDatum, serialiseIAssetDatum, serialiseInterestOracleDatum, serialiseLrpDatum, serialiseLrpRedeemer, serialisePriceOracleDatum, serialiseStabilityPoolDatum, serialiseStabilityPoolRedeemer, spAdd, spDiv, spMul, spSub, toSystemParamsAsset };

package/dist/index.d.ts

@@ -1235,6 +1235,11 @@ declare const LRPDatumSchema: _lucid_evolution_lucid.TObject<{
     maxPrice: _lucid_evolution_lucid.TObject<{
         getOnChainInt: _lucid_evolution_lucid.TUnsafe<bigint>;
     }>;
+    /**
+     * The amount of lovelaces that is available to be spent.
+     * This doesn't correspond to the lovelaces in UTXO's value,
+     * since that can contain fees, too.
+     */
     lovelacesToSpend: _lucid_evolution_lucid.TUnsafe<bigint>;
 }>;
 type LRPDatum = Data.Static<typeof LRPDatumSchema>;
@@ -1273,7 +1278,22 @@ type OnChainDecimal = Data.Static<typeof OnChainDecimalSchema>;
 
 declare function openLrp(assetTokenName: string, lovelacesAmt: bigint, maxPrice: OnChainDecimal, lucid: LucidEvolution, lrpScriptHash: ScriptHash, network: Network, lrpStakeCredential?: Credential$1): Promise<TxBuilder>;
 declare function cancelLrp(lrpOutRef: OutRef, lrpRefScriptOutRef: OutRef, lucid: LucidEvolution): Promise<TxBuilder>;
-declare function redeemLrp(redemptionLrpsData: [OutRef, bigint][], lrpRefScriptOutRef: OutRef, priceOracleOutRef: OutRef, iassetOutRef: OutRef, lucid: LucidEvolution, lrpParams: LRPParams, priceOracleParams: PriceOracleParams, network: Network): Promise<TxBuilder>;
+declare function redeemLrp(
+/** The tuple represents the LRP outref and the amount of iAssets to redeem against it. */
+redemptionLrpsData: [OutRef, bigint][], lrpRefScriptOutRef: OutRef, priceOracleOutRef: OutRef, iassetOutRef: OutRef, lucid: LucidEvolution, lrpParams: LRPParams, priceOracleParams: PriceOracleParams, network: Network, currentSlot: number): Promise<TxBuilder>;
+/**
+ * Create Tx adjusting the LRP and claiming the received iAssets
+ */
+declare function adjustLrp(lucid: LucidEvolution, lrpOutRef: OutRef, 
+/**
+ * A positive amount increases the lovelaces in the LRP,
+ * and a negative amount takes lovelaces from the LRP.
+ */
+lovelacesAdjustAmt: bigint, lrpRefScriptOutRef: OutRef, lrpParams: LRPParams): Promise<TxBuilder>;
+/**
+ * Create Tx claiming the received iAssets.
+ */
+declare function claimLrp(lucid: LucidEvolution, lrpOutRef: OutRef, lrpRefScriptOutRef: OutRef, lrpParams: LRPParams): Promise<TxBuilder>;
 
 declare const mkLrpValidator: (params: LRPParams) => SpendingValidator;
 
@@ -1297,4 +1317,4 @@ type OneShotParams = Data.Static<typeof OneShotParamsSchema>;
 declare function oneShotMintTx(lucid: LucidEvolution, params: OneShotParams): Promise<[TxBuilder, PolicyId]>;
 declare function runOneShotMintTx(lucid: LucidEvolution, params: OneShotParams): Promise<PolicyId>;
 
-export { AccountAction, AccountActionSchema, AccountContent, AccountContentSchema, ActionReturnDatum, ActionReturnDatumSchema, Address, type AddressCredential, type AddressCredentialOrDatum, type AddressSP, AddressSchema, type Amount, type AssetClass, type AssetClassSP, AssetClassSchema, type AuthTokenPolicies, type CDPContent, CDPContentSchema, CDPContract, type CDPCreatorParamsSP, type CDPDatum, CDPDatumSchema, type CDPFees, CDPFeesSchema, type CdpParams, CollectorContract, type CollectorParams, Credential, CredentialSchema, type CurrencySymbol, type DistributionParams, EpochToScaleToSum, EpochToScaleToSumSchema, ExecuteParams, type ExecuteParamsSP, type FeedInterestOracleRedeemer, FeedInterestOracleRedeemerSchema, GovContract, type GovDatum, GovParams, type GovParamsSP, type IAssetContent, IAssetContentSchema, IAssetHelpers, type IAssetOutput, type Input, InterestOracleContract, type InterestOracleDatum, InterestOracleDatumSchema, type InterestOracleParams, InterestOracleParamsSchema, type LRPDatum, LRPDatumSchema, type LRPParams, LRPParamsSchema, type LRPRedeemer, LRPRedeemerSchema, ONE_SECOND, type OracleAssetNft, OracleAssetNftSchema, type Output, type OutputReference, OutputReferenceSchema, PollManagerParams, type PollManagerParamsSP, PollShardParams, type PollShardParamsSP, type PriceOracleDatum, PriceOracleDatumSchema, type PriceOracleParams, PriceOracleParamsSchema, type PubKeyHash, SPInteger, SPIntegerSchema, type ScriptCredential, type ScriptOutput, type ScriptRef, type ScriptReference, type ScriptReferences, SnapshotEpochToScaleToSumContent, SnapshotEpochToScaleToSumContentSchema, StabilityPoolContent, StabilityPoolContentSchema, StabilityPoolContract, StabilityPoolDatum, StabilityPoolDatumSchema, StabilityPoolParams, type StabilityPoolParamsSP, StabilityPoolRedeemer, StabilityPoolRedeemerSchema, StabilityPoolSnapshot, StakingContract, type StakingParams, type StartTime, type SystemParams, type TokenName, TreasuryContract, type TreasuryParams, type ValidatorHashes, VerificationKeyHashSchema, type VersionRecordParams, _cdpValidator, _collectorValidator, _treasuryValidator, addrDetails, addressFromBech32, addressToBech32, balance, calculateFeeFromPercentage, cancelLrp, castExecuteParams, castGovParams, castInterestOracleParams, castLrpParams, castPollManagerParams, castPollShardParams, castPriceOracleParams, castStabilityPoolParams, cdpCreatorValidator, createScriptAddress, fromSPInteger, fromSystemParamsAsset, getInlineDatumOrThrow, getRandomElement, loadSystemParamsFromFile, loadSystemParamsFromUrl, matchSingle, mkCDPCreatorValidator, mkCDPCreatorValidatorFromSP, mkInterestOracleValidator, mkLrpValidator, mkPollManagerValidator, mkPollManagerValidatorFromSP, mkPollShardValidator, mkPollShardValidatorFromSP, mkSPInteger, oneDay, oneHour, oneShotMintTx, oneYear, openLrp, parseAccountDatum, parseCDPDatum, parseGovDatum, parseIAssetDatum, parseInterestOracleDatum, parseLrpDatum, parsePriceOracleDatum, parseSnapshotEpochToScaleToSumDatum, parseStabilityPoolDatum, redeemLrp, runCreateScriptRefTx, runOneShotMintTx, scriptRef, serialiseCDPDatum, serialiseFeedInterestOracleRedeemer, serialiseGovDatum, serialiseIAssetDatum, serialiseInterestOracleDatum, serialiseLrpDatum, serialiseLrpRedeemer, serialisePriceOracleDatum, serialiseStabilityPoolDatum, serialiseStabilityPoolRedeemer, spAdd, spDiv, spMul, spSub, toSystemParamsAsset };
+export { AccountAction, AccountActionSchema, AccountContent, AccountContentSchema, ActionReturnDatum, ActionReturnDatumSchema, Address, type AddressCredential, type AddressCredentialOrDatum, type AddressSP, AddressSchema, type Amount, type AssetClass, type AssetClassSP, AssetClassSchema, type AuthTokenPolicies, type CDPContent, CDPContentSchema, CDPContract, type CDPCreatorParamsSP, type CDPDatum, CDPDatumSchema, type CDPFees, CDPFeesSchema, type CdpParams, CollectorContract, type CollectorParams, Credential, CredentialSchema, type CurrencySymbol, type DistributionParams, EpochToScaleToSum, EpochToScaleToSumSchema, ExecuteParams, type ExecuteParamsSP, type FeedInterestOracleRedeemer, FeedInterestOracleRedeemerSchema, GovContract, type GovDatum, GovParams, type GovParamsSP, type IAssetContent, IAssetContentSchema, IAssetHelpers, type IAssetOutput, type Input, InterestOracleContract, type InterestOracleDatum, InterestOracleDatumSchema, type InterestOracleParams, InterestOracleParamsSchema, type LRPDatum, LRPDatumSchema, type LRPParams, LRPParamsSchema, type LRPRedeemer, LRPRedeemerSchema, ONE_SECOND, type OracleAssetNft, OracleAssetNftSchema, type Output, type OutputReference, OutputReferenceSchema, PollManagerParams, type PollManagerParamsSP, PollShardParams, type PollShardParamsSP, type PriceOracleDatum, PriceOracleDatumSchema, type PriceOracleParams, PriceOracleParamsSchema, type PubKeyHash, SPInteger, SPIntegerSchema, type ScriptCredential, type ScriptOutput, type ScriptRef, type ScriptReference, type ScriptReferences, SnapshotEpochToScaleToSumContent, SnapshotEpochToScaleToSumContentSchema, StabilityPoolContent, StabilityPoolContentSchema, StabilityPoolContract, StabilityPoolDatum, StabilityPoolDatumSchema, StabilityPoolParams, type StabilityPoolParamsSP, StabilityPoolRedeemer, StabilityPoolRedeemerSchema, StabilityPoolSnapshot, StakingContract, type StakingParams, type StartTime, type SystemParams, type TokenName, TreasuryContract, type TreasuryParams, type ValidatorHashes, VerificationKeyHashSchema, type VersionRecordParams, _cdpValidator, _collectorValidator, _treasuryValidator, addrDetails, addressFromBech32, addressToBech32, adjustLrp, balance, calculateFeeFromPercentage, cancelLrp, castExecuteParams, castGovParams, castInterestOracleParams, castLrpParams, castPollManagerParams, castPollShardParams, castPriceOracleParams, castStabilityPoolParams, cdpCreatorValidator, claimLrp, createScriptAddress, fromSPInteger, fromSystemParamsAsset, getInlineDatumOrThrow, getRandomElement, loadSystemParamsFromFile, loadSystemParamsFromUrl, matchSingle, mkCDPCreatorValidator, mkCDPCreatorValidatorFromSP, mkInterestOracleValidator, mkLrpValidator, mkPollManagerValidator, mkPollManagerValidatorFromSP, mkPollShardValidator, mkPollShardValidatorFromSP, mkSPInteger, oneDay, oneHour, oneShotMintTx, oneYear, openLrp, parseAccountDatum, parseCDPDatum, parseGovDatum, parseIAssetDatum, parseInterestOracleDatum, parseLrpDatum, parsePriceOracleDatum, parseSnapshotEpochToScaleToSumDatum, parseStabilityPoolDatum, redeemLrp, runCreateScriptRefTx, runOneShotMintTx, scriptRef, serialiseCDPDatum, serialiseFeedInterestOracleRedeemer, serialiseGovDatum, serialiseIAssetDatum, serialiseInterestOracleDatum, serialiseLrpDatum, serialiseLrpRedeemer, serialisePriceOracleDatum, serialiseStabilityPoolDatum, serialiseStabilityPoolRedeemer, spAdd, spDiv, spMul, spSub, toSystemParamsAsset };

package/dist/index.js

@@ -88,6 +88,7 @@ __export(index_exports, {
   addrDetails: () => addrDetails,
   addressFromBech32: () => addressFromBech32,
   addressToBech32: () => addressToBech32,
+  adjustLrp: () => adjustLrp,
   balance: () => balance,
   calculateFeeFromPercentage: () => calculateFeeFromPercentage,
   cancelLrp: () => cancelLrp,
@@ -100,6 +101,7 @@ __export(index_exports, {
   castPriceOracleParams: () => castPriceOracleParams,
   castStabilityPoolParams: () => castStabilityPoolParams,
   cdpCreatorValidator: () => cdpCreatorValidator,
+  claimLrp: () => claimLrp,
   createScriptAddress: () => createScriptAddress,
   fromSPInteger: () => fromSPInteger,
   fromSystemParamsAsset: () => fromSystemParamsAsset,
@@ -2471,6 +2473,9 @@ function mkAssetsOf(assetClass, amount) {
     [assetClassToUnit(assetClass)]: amount
   };
 }
+function assetClassValueOf(assets, assetClass) {
+  return assets[assetClassToUnit(assetClass)] ?? 0n;
+}
 
 // tests/queries/interest-oracle-queries.ts
 async function findInterestOracle(lucid, interestNft) {
@@ -2741,6 +2746,11 @@ var LRPDatumSchema = import_lucid32.Data.Object({
   owner: import_lucid32.Data.Bytes(),
   iasset: import_lucid32.Data.Bytes(),
   maxPrice: OnChainDecimalSchema,
+  /**
+   * The amount of lovelaces that is available to be spent.
+   * This doesn't correspond to the lovelaces in UTXO's value,
+   * since that can contain fees, too.
+   */
   lovelacesToSpend: import_lucid32.Data.Integer()
 });
 var LRPDatum = LRPDatumSchema;
@@ -2825,7 +2835,7 @@ async function cancelLrp(lrpOutRef, lrpRefScriptOutRef, lucid) {
   );
   return lucid.newTx().readFrom([lrpScriptRefUtxo]).collectFrom([lrpUtxo], serialiseLrpRedeemer("Cancel")).addSigner(ownAddr);
 }
-async function redeemLrp(redemptionLrpsData, lrpRefScriptOutRef, priceOracleOutRef, iassetOutRef, lucid, lrpParams, priceOracleParams, network) {
+async function redeemLrp(redemptionLrpsData, lrpRefScriptOutRef, priceOracleOutRef, iassetOutRef, lucid, lrpParams, priceOracleParams, network, currentSlot) {
   const lrpScriptRefUtxo = matchSingle(
     await lucid.utxosByOutRef([lrpRefScriptOutRef]),
     (_2) => new Error("Expected a single LRP Ref Script UTXO")
@@ -2844,9 +2854,12 @@ async function redeemLrp(redemptionLrpsData, lrpRefScriptOutRef, priceOracleOutR
     getInlineDatumOrThrow(priceOracleUtxo)
   );
   const redemptionLrps = await lucid.utxosByOutRef(lrpsToRedeemOutRefs).then((val) => (0, import_Array2.zip)(val, lrpRedemptionIAssetAmt));
-  const [[mainLrpUtxo, mainLrpRedemptionIAssetAmt], _] = (0, import_ts_pattern5.match)(redemptionLrps).with(
+  const [[mainLrpUtxo, _], __] = (0, import_ts_pattern5.match)(redemptionLrps).with(
     [import_ts_pattern5.P._, ...import_ts_pattern5.P.array()],
-    ([[firstLrp, firstLrpIAssetAmt], ...rest]) => [[firstLrp, firstLrpIAssetAmt], rest]
+    ([[firstLrp, _2], ...rest]) => [
+      [firstLrp, _2],
+      rest
+    ]
   ).otherwise(() => {
     throw new Error("Expects at least 1 UTXO to redeem.");
   });
@@ -2856,7 +2869,7 @@ async function redeemLrp(redemptionLrpsData, lrpRefScriptOutRef, priceOracleOutR
     (idx, acc, [lrpUtxo, redeemIAssetAmt]) => {
       const lovelacesForRedemption = ocdMul(
         {
-          getOnChainInt: mainLrpRedemptionIAssetAmt
+          getOnChainInt: redeemIAssetAmt
         },
         priceOracleDatum.price
       ).getOnChainInt;
@@ -2905,12 +2918,57 @@ async function redeemLrp(redemptionLrpsData, lrpRefScriptOutRef, priceOracleOutR
     }
   )(redemptionLrps);
   const txValidity = oracleExpirationAwareValidity(
-    lucid.currentSlot(),
+    currentSlot,
     Number(priceOracleParams.biasTime),
     Number(priceOracleDatum.expiration),
     network
   );
-  return lucid.newTx().validTo(txValidity.validTo).readFrom([lrpScriptRefUtxo]).readFrom([iassetUtxo, priceOracleUtxo]).compose(tx);
+  return lucid.newTx().validFrom(txValidity.validFrom).validTo(txValidity.validTo).readFrom([lrpScriptRefUtxo]).readFrom([iassetUtxo, priceOracleUtxo]).compose(tx);
+}
+async function adjustLrp(lucid, lrpOutRef, lovelacesAdjustAmt, lrpRefScriptOutRef, lrpParams) {
+  const ownAddr = await lucid.wallet().address();
+  const lrpScriptRefUtxo = matchSingle(
+    await lucid.utxosByOutRef([lrpRefScriptOutRef]),
+    (_) => new Error("Expected a single LRP Ref Script UTXO")
+  );
+  const lrpUtxo = matchSingle(
+    await lucid.utxosByOutRef([lrpOutRef]),
+    (_) => new Error("Expected a single LRP UTXO.")
+  );
+  const lrpDatum = parseLrpDatum(getInlineDatumOrThrow(lrpUtxo));
+  const rewardAssetClass = {
+    currencySymbol: lrpParams.iassetPolicyId,
+    tokenName: lrpDatum.iasset
+  };
+  const rewardAssetsAmt = assetClassValueOf(lrpUtxo.assets, rewardAssetClass);
+  if (lovelacesAdjustAmt === 0n && lrpDatum.lovelacesToSpend === 0n) {
+    throw new Error(
+      "When there's no more lovelaces to spend, use close instead of claim."
+    );
+  }
+  if (lovelacesAdjustAmt < 0 && lrpDatum.lovelacesToSpend <= lovelacesAdjustAmt) {
+    throw new Error(
+      "Can't adjust negatively by more than available. Also, for adjusting by exactly the amount deposited, a close action should be used instead."
+    );
+  }
+  return lucid.newTx().readFrom([lrpScriptRefUtxo]).collectFrom([lrpUtxo], serialiseLrpRedeemer("Cancel")).pay.ToContract(
+    lrpUtxo.address,
+    {
+      kind: "inline",
+      value: serialiseLrpDatum({
+        ...lrpDatum,
+        lovelacesToSpend: lrpDatum.lovelacesToSpend + lovelacesAdjustAmt
+      })
+    },
+    (0, import_lucid34.addAssets)(
+      lrpUtxo.assets,
+      mkAssetsOf(rewardAssetClass, -rewardAssetsAmt),
+      mkLovelacesOf(lovelacesAdjustAmt)
+    )
+  ).addSigner(ownAddr);
+}
+async function claimLrp(lucid, lrpOutRef, lrpRefScriptOutRef, lrpParams) {
+  return adjustLrp(lucid, lrpOutRef, 0n, lrpRefScriptOutRef, lrpParams);
 }
 
 // src/scripts/lrp-validator.ts
@@ -3006,6 +3064,7 @@ async function runCreateScriptRefTx(lucid, scriptRefValidator, network) {
   addrDetails,
   addressFromBech32,
   addressToBech32,
+  adjustLrp,
   balance,
   calculateFeeFromPercentage,
   cancelLrp,
@@ -3018,6 +3077,7 @@ async function runCreateScriptRefTx(lucid, scriptRefValidator, network) {
   castPriceOracleParams,
   castStabilityPoolParams,
   cdpCreatorValidator,
+  claimLrp,
   createScriptAddress,
   fromSPInteger,
   fromSystemParamsAsset,

package/dist/index.mjs

@@ -2375,6 +2375,9 @@ function mkAssetsOf(assetClass, amount) {
     [assetClassToUnit(assetClass)]: amount
   };
 }
+function assetClassValueOf(assets, assetClass) {
+  return assets[assetClassToUnit(assetClass)] ?? 0n;
+}
 
 // tests/queries/interest-oracle-queries.ts
 async function findInterestOracle(lucid, interestNft) {
@@ -2651,6 +2654,11 @@ var LRPDatumSchema = Data20.Object({
   owner: Data20.Bytes(),
   iasset: Data20.Bytes(),
   maxPrice: OnChainDecimalSchema,
+  /**
+   * The amount of lovelaces that is available to be spent.
+   * This doesn't correspond to the lovelaces in UTXO's value,
+   * since that can contain fees, too.
+   */
   lovelacesToSpend: Data20.Integer()
 });
 var LRPDatum = LRPDatumSchema;
@@ -2740,7 +2748,7 @@ async function cancelLrp(lrpOutRef, lrpRefScriptOutRef, lucid) {
   );
   return lucid.newTx().readFrom([lrpScriptRefUtxo]).collectFrom([lrpUtxo], serialiseLrpRedeemer("Cancel")).addSigner(ownAddr);
 }
-async function redeemLrp(redemptionLrpsData, lrpRefScriptOutRef, priceOracleOutRef, iassetOutRef, lucid, lrpParams, priceOracleParams, network) {
+async function redeemLrp(redemptionLrpsData, lrpRefScriptOutRef, priceOracleOutRef, iassetOutRef, lucid, lrpParams, priceOracleParams, network, currentSlot) {
   const lrpScriptRefUtxo = matchSingle(
     await lucid.utxosByOutRef([lrpRefScriptOutRef]),
     (_2) => new Error("Expected a single LRP Ref Script UTXO")
@@ -2759,9 +2767,12 @@ async function redeemLrp(redemptionLrpsData, lrpRefScriptOutRef, priceOracleOutR
     getInlineDatumOrThrow(priceOracleUtxo)
   );
   const redemptionLrps = await lucid.utxosByOutRef(lrpsToRedeemOutRefs).then((val) => zip(val, lrpRedemptionIAssetAmt));
-  const [[mainLrpUtxo, mainLrpRedemptionIAssetAmt], _] = match5(redemptionLrps).with(
+  const [[mainLrpUtxo, _], __] = match5(redemptionLrps).with(
     [P5._, ...P5.array()],
-    ([[firstLrp, firstLrpIAssetAmt], ...rest]) => [[firstLrp, firstLrpIAssetAmt], rest]
+    ([[firstLrp, _2], ...rest]) => [
+      [firstLrp, _2],
+      rest
+    ]
   ).otherwise(() => {
     throw new Error("Expects at least 1 UTXO to redeem.");
   });
@@ -2771,7 +2782,7 @@ async function redeemLrp(redemptionLrpsData, lrpRefScriptOutRef, priceOracleOutR
     (idx, acc, [lrpUtxo, redeemIAssetAmt]) => {
       const lovelacesForRedemption = ocdMul(
         {
-          getOnChainInt: mainLrpRedemptionIAssetAmt
+          getOnChainInt: redeemIAssetAmt
         },
         priceOracleDatum.price
       ).getOnChainInt;
@@ -2820,12 +2831,57 @@ async function redeemLrp(redemptionLrpsData, lrpRefScriptOutRef, priceOracleOutR
     }
   )(redemptionLrps);
   const txValidity = oracleExpirationAwareValidity(
-    lucid.currentSlot(),
+    currentSlot,
     Number(priceOracleParams.biasTime),
     Number(priceOracleDatum.expiration),
     network
   );
-  return lucid.newTx().validTo(txValidity.validTo).readFrom([lrpScriptRefUtxo]).readFrom([iassetUtxo, priceOracleUtxo]).compose(tx);
+  return lucid.newTx().validFrom(txValidity.validFrom).validTo(txValidity.validTo).readFrom([lrpScriptRefUtxo]).readFrom([iassetUtxo, priceOracleUtxo]).compose(tx);
+}
+async function adjustLrp(lucid, lrpOutRef, lovelacesAdjustAmt, lrpRefScriptOutRef, lrpParams) {
+  const ownAddr = await lucid.wallet().address();
+  const lrpScriptRefUtxo = matchSingle(
+    await lucid.utxosByOutRef([lrpRefScriptOutRef]),
+    (_) => new Error("Expected a single LRP Ref Script UTXO")
+  );
+  const lrpUtxo = matchSingle(
+    await lucid.utxosByOutRef([lrpOutRef]),
+    (_) => new Error("Expected a single LRP UTXO.")
+  );
+  const lrpDatum = parseLrpDatum(getInlineDatumOrThrow(lrpUtxo));
+  const rewardAssetClass = {
+    currencySymbol: lrpParams.iassetPolicyId,
+    tokenName: lrpDatum.iasset
+  };
+  const rewardAssetsAmt = assetClassValueOf(lrpUtxo.assets, rewardAssetClass);
+  if (lovelacesAdjustAmt === 0n && lrpDatum.lovelacesToSpend === 0n) {
+    throw new Error(
+      "When there's no more lovelaces to spend, use close instead of claim."
+    );
+  }
+  if (lovelacesAdjustAmt < 0 && lrpDatum.lovelacesToSpend <= lovelacesAdjustAmt) {
+    throw new Error(
+      "Can't adjust negatively by more than available. Also, for adjusting by exactly the amount deposited, a close action should be used instead."
+    );
+  }
+  return lucid.newTx().readFrom([lrpScriptRefUtxo]).collectFrom([lrpUtxo], serialiseLrpRedeemer("Cancel")).pay.ToContract(
+    lrpUtxo.address,
+    {
+      kind: "inline",
+      value: serialiseLrpDatum({
+        ...lrpDatum,
+        lovelacesToSpend: lrpDatum.lovelacesToSpend + lovelacesAdjustAmt
+      })
+    },
+    addAssets3(
+      lrpUtxo.assets,
+      mkAssetsOf(rewardAssetClass, -rewardAssetsAmt),
+      mkLovelacesOf(lovelacesAdjustAmt)
+    )
+  ).addSigner(ownAddr);
+}
+async function claimLrp(lucid, lrpOutRef, lrpRefScriptOutRef, lrpParams) {
+  return adjustLrp(lucid, lrpOutRef, 0n, lrpRefScriptOutRef, lrpParams);
 }
 
 // src/scripts/lrp-validator.ts
@@ -2924,6 +2980,7 @@ export {
   addrDetails,
   addressFromBech32,
   addressToBech32,
+  adjustLrp,
   balance,
   calculateFeeFromPercentage,
   cancelLrp,
@@ -2936,6 +2993,7 @@ export {
   castPriceOracleParams,
   castStabilityPoolParams,
   cdpCreatorValidator,
+  claimLrp,
   createScriptAddress,
   fromSPInteger,
   fromSystemParamsAsset,

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "@indigo-labs/indigo-sdk",
-  "version": "0.1.6",
+  "version": "0.1.7",
   "description": "Indigo SDK for interacting with Indigo endpoints via lucid-evolution",
   "main": "dist/index.js",
   "module": "dist/index.mjs",