Cardano.Api.Tx.UTxO: add txOutputs function

Author: Daniel Firth

cardano-api/src/Cardano/Api/Internal/Tx/UTxO.hs

@@ -74,6 +74,10 @@ filterWithKey fn = UTxO . Map.filterWithKey fn . unUTxO
 inputSet :: UTxO era -> Set TxIn
 inputSet = Map.keysSet . unUTxO
 
+-- | Get the UTxO output set.
+txOutputs :: UTxO era -> [TxOut CtxUTxO era]
+txOutputs = Map.elems . unUTxO
+
 -- | Remove the right hand side from the left hand side.
 difference :: UTxO era -> UTxO era -> UTxO era
 difference a b = UTxO $ Map.difference (unUTxO a) (unUTxO b)

cardano-api/src/Cardano/Api/Tx/UTxO.hs

@@ -6,6 +6,7 @@ module Cardano.Api.Tx.UTxO
   , UTxO.filter
   , UTxO.filterWithKey
   , UTxO.inputSet
+  , UTxO.txOutputs
   , UTxO.difference
   , UTxO.fromList
   , UTxO.toList