Filled in most of Coinflip.hs