with ada.text_io;

package usefulStuff is

type Mysuit is (clubs, diamonds, hearts, spades);

type Myrank is (two, three, four, five, six, seven, eight, nine, ten, jack, queen, king, ace);

type Player is (playerOne, playerTwo, tie);

type card is record

suit : Mysuit;

rank: Myrank;

end record;

type deck is array (1..52) of card;

package suit_io is new ada.text_io.enumeration_io (Mysuit);

package rank_io is new ada.text_io.enumeration_io (Myrank);

package player_io is new ada.text_io.enumeration_io (Player);

end usefulStuff;