Turn Card into a sum type

The company stages didn't work well with the Card type, as much
information was useless.