putBlockLockTime :: LockTime -> Put
putBlockLockTime (LockTime locktime') =
  Put.putWord32le locktime'
putBlockLockTime :: LockTime -> Put
putBlockLockTime (LockTime locktime') =
  Put.putWord32le locktime'
putBlockLockTime (LockTime locktime') =
  Put.putWord32le locktime'