Updated 99.hs for later coding :p