Added GraphTest.hs - testing stuff