pub fn make_positive<T: Numeric + Copy>(poly: &Seq<T>, q: T) -> Seq<T>
makes coefficients positiv, e.g. -3 mod 4 = 1