Use liftA2 in stringToCard.