106 #ifdef TNT_BOUNDS_CHECK
107 BIASASSERT( 1 <= i );
108 BIASASSERT( i <= 2 );
111 else if (i==2)
return m_;
144 ostream& operator<<(ostream &s, const Fortran_Sparse_Col_Matrix<T> &A)
149 s << M <<
" " << N <<
" " << A.num_nonzeros() << endl;
159 s << A.row_ind(i) <<
" " << k <<
" " << A.val(i) << endl;
Fortran_Sparse_Col_Matrix(Subscript M, Subscript N, Subscript nz, const T *val, Subscript *r, Subscript *c)
Vector< Subscript > rowind_
Fortran_Sparse_Col_Matrix(Subscript M, Subscript N, Subscript nz, char *val, char *r, char *c)
Fortran_Sparse_Col_Matrix & newsize(Subscript M, Subscript N, Subscript nz)
Fortran_Sparse_Col_Matrix(const Fortran_Sparse_Col_Matrix< T > &S)
Fortran_Sparse_Col_Matrix(void)
Subscript & row_ind(Subscript i)
TNT_SUBSCRIPT_TYPE Subscript
const T & val(Subscript i) const
Subscript num_rows() const
Vector< T > & newsize(Subscript N)
Subscript col_ptr(Subscript i)
Subscript num_cols() const
Fortran_Sparse_Col_Matrix & operator=(const Fortran_Sparse_Col_Matrix &C)
Vector< Subscript > colptr_
Fortran_Sparse_Col_Matrix(Subscript M, Subscript N, Subscript nz, const T *val, const Subscript *r, const Subscript *c)
~Fortran_Sparse_Col_Matrix()
Subscript dim(Subscript i) const
const Subscript & row_ind(Subscript i) const
const Subscript col_ptr(Subscript i) const
Subscript num_nonzeros() const