collapse()

Strided & aff::Strided::collapse	(	const Tdim &	i,
		const Tsubscript &	index
	)

slice

Todo:

This is implementation of slicing is straightforward but rather inefficient. If you do a lot of slicing it might be worth to review and rework the code.

Definition at line 224 of file strided.cc.

References AFF_assert, calculate_base(), first_offset(), Mfirst, Mlast, Mmax_dimen, Mstride, offset(), shrink(), and size().

  {
    AFF_assert((i<Mmax_dimen),
               "ERROR (Strided::collapse): illegal dimension");
    AFF_assert(((Mfirst[i]<=index)&&(index<=Mlast[i])),
               "ERROR (Strided::collapse): index range error");
    this->shrink(i,index,index); 
    Tsubscript offset=this->first_offset();
    Tdim j=i+1;
    while (j<Mmax_dimen)
    {
      Mfirst[j-1]=Mfirst[j];
      Mlast[j-1]=Mlast[j];
      Mstride[j-1]=Mstride[j];
      j++;
    }
    Mfirst[Mmax_dimen-1]=1;
    Mlast[Mmax_dimen-1]=1;
    Mstride[Mmax_dimen-1]=this->size(Mmax_dimen-2)*Mstride[Mmax_dimen-2];
    this->calculate_base(offset);
    return(*this);
  }

Here is the call graph for this function: