vec_set_entry()

template<typename CoeffRing>

void SMat< CoeffRing >::vec_set_entry ( sparsevec *& v, size_t r, const elem & result ) const

private

Definition at line 347 of file smat.hpp.

{
  sparsevec *p;
  bool iszero = ring().is_zero(a);
  sparsevec head;
  head.next = v;
  for (p = &head; p->next != 0; p = p->next)
    if (p->next->row <= r) break;
 
  if (p->next == 0 || p->next->row < r)
    {
      if (iszero) return;
      sparsevec *w = vec_new();
      w->next = p->next;
      w->row = r;
      ring().init_set(w->coeff, a);
      p->next = w;
    }
  else if (p->next->row == r)
    {
      if (iszero)
        {
          // delete node
          sparsevec *tmp = p->next;
          p->next = tmp->next;
          vec_remove_node(tmp);
        }
      else
        ring().set(p->next->coeff, a);
    }
  v = head.next;
}

References SMat< ACoeffRing >::sparsevec::coeff, SMat< ACoeffRing >::sparsevec::next, p, ring(), SMat< ACoeffRing >::sparsevec::row, vec_new(), and vec_remove_node().

Referenced by set_entry(), and vec_row_op2().