putOutPoint :: UTXO -> Put
putOutPoint utxo' = do
  put (utxo'^.outTxHash)
  let TxIndex i = utxo'^.outIndex
  Put.putWord32le . fromIntegral $ i
putOutPoint :: UTXO -> Put
putOutPoint utxo' = do
  put (utxo'^.outTxHash)
  let TxIndex i = utxo'^.outIndex
  Put.putWord32le . fromIntegral $ i
putOutPoint utxo' = do
  put (utxo'^.outTxHash)
  let TxIndex i = utxo'^.outIndex
  Put.putWord32le . fromIntegral $ i