Update cube.hs