Right 1 Right (TagReadData {trTag = TagData {tdEpc = "\226\NULQ\134\SOH\a\SOH\135\ap\196\193", tdProtocol = TAG_PROTOCOL_GEN2, tdCrc = 47646, tdGen2 = Just (GEN2_TagData {g2Pc = "0\NUL"})}, trMetadataFlags = [METADATA_FLAG_READCOUNT,METADATA_FLAG_RSSI,METADATA_FLAG_ANTENNAID,METADATA_FLAG_FREQUENCY,METADATA_FLAG_TIMESTAMP,METADATA_FLAG_PHASE,METADATA_FLAG_PROTOCOL,METADATA_FLAG_DATA,METADATA_FLAG_GPIO_STATUS], trPhase = 174, trAntenna = 1, trGpio = [GpioPin {gpId = 1, gpHigh = False, gpOutput = False},GpioPin {gpId = 2, gpHigh = False, gpOutput = False},GpioPin {gpId = 3, gpHigh = False, gpOutput = False},GpioPin {gpId = 4, gpHigh = False, gpOutput = False}], trReadCount = 21, trRssi = -41, trFrequency = 922600, trTimestamp = 0, trData = "", trEpcMemData = "", trTidMemData = "", trUserMemData = "", trReservedMemData = ""}) Right "" Right "" Left (MercuryException {meStatusType = ERROR_TYPE_CODE, meStatus = ERROR_PROTOCOL_WRITE_FAILED, meMessage = "Tag write operation failed", meLocation = "executeTagOp", meParam = "TagOp_GEN2_WriteData", meUri = ""}) Right "" Right ""