multiplyMonomials :: Monomial -> Monomial -> Monomial
multiplyMonomials (Monomial ca va) (Monomial cb vb) = Monomial (ca `mXm` cb) (va ++ vb)
multiplyMonomials :: Monomial -> Monomial -> Monomial
multiplyMonomials (Monomial ca va) (Monomial cb vb) = Monomial (ca `mXm` cb) (va ++ vb)
multiplyMonomials (Monomial ca va) (Monomial cb vb) = Monomial (ca `mXm` cb) (va ++ vb)