fixed another but in Vector.hs