-- | Compute transaction hash.
txHash :: Tx -> TxHash
txHash tx = TxHash . doubleSHA256 . runPutS $ serialize tx {txWitness = []}
txHash :: Tx -> TxHash
txHash tx = TxHash . doubleSHA256 . runPutS $ serialize tx {txWitness = []}
txHash tx = TxHash . doubleSHA256 . runPutS $ serialize tx {txWitness = []}