negate package:lapack

forVector number_ $ \xs -> xs == Vector.negate (Vector.negate xs)