vec_divide()

template<typename CoeffRing>

void SMat< CoeffRing >::vec_divide ( sparsevec *& v, const elem & a ) const

private

Definition at line 517 of file smat.hpp.

{
  if (ring().is_zero(a))
    {
      vec_remove(v);
      v = 0;
      return;
    }
  sparsevec head;
  head.next = v;
  for (sparsevec *p = &head; p->next != 0; p = p->next)
    {
      ring().divide(p->next->coeff, p->next->coeff, a);
      if (ring().is_zero(p->next->coeff))
        {
          sparsevec *tmp = p->next;
          p->next = tmp->next;
          vec_remove_node(tmp);
          if (p->next == 0) break;
        }
    }
  v = head.next;
}

References is_zero(), SMat< ACoeffRing >::sparsevec::next, p, ring(), vec_remove(), and vec_remove_node().

Referenced by divide_column().