Haskell programming: BlackJack, Sudoko, Drawing Functions