Update barneshut.hs