/external/eigen/Eigen/src/SparseLU/ |
D | SparseLU_column_dfs.h | 43 …column_dfs_traits(Index jcol, Index& jsuper, typename SparseLUImpl<Scalar, Index>::GlobalLU_t& glu… in column_dfs_traits() 44 : m_jcol(jcol), m_jsuper_ref(jsuper), m_glu(glu), m_luImpl(luImpl) in column_dfs_traits() 93 Index SparseLUImpl<Scalar,Index>::column_dfs(const Index m, const Index jcol, IndexVector& perm_r, … in column_dfs() argument 96 Index jsuper = glu.supno(jcol); in column_dfs() 97 Index nextl = glu.xlsub(jcol); in column_dfs() 101 column_dfs_traits<IndexVector, ScalarVector> traits(jcol, jsuper, glu, *this); in column_dfs() 111 if (kmark == jcol) continue; in column_dfs() 113 dfs_kernel(jcol, perm_r, nseg, glu.lsub, segrep, repfnz, xprune, marker2, parent, in column_dfs() 118 Index nsuper = glu.supno(jcol); in column_dfs() 119 Index jcolp1 = jcol + 1; in column_dfs() [all …]
|
D | SparseLU_pivotL.h | 60 Index SparseLUImpl<Scalar,Index>::pivotL(const Index jcol, const RealScalar& diagpivotthresh, Index… in pivotL() argument 63 …Index fsupc = (glu.xsup)((glu.supno)(jcol)); // First column in the supernode containing the colum… in pivotL() 64 …Index nsupc = jcol - fsupc; // Number of columns in the supernode portion, excluding jcol; nsupc >… in pivotL() 69 Scalar* lu_col_ptr = &(glu.lusup.data()[glu.xlusup(jcol)]); // Start of jcol in the supernode in pivotL() 73 Index diagind = iperm_c(jcol); // diagonal index in pivotL() 92 perm_r(pivrow) = jcol; in pivotL() 93 return (jcol+1); in pivotL() 113 perm_r(pivrow) = jcol; in pivotL()
|
D | SparseLU_panel_bmod.h | 56 void SparseLUImpl<Scalar,Index>::panel_bmod(const Index m, const Index w, const Index jcol, in panel_bmod() argument 88 for (jj = jcol; jj < jcol + w; jj++) in panel_bmod() 90 nextl_col = (jj-jcol) * m; in panel_bmod() 109 for (jj = jcol; jj < jcol + w; jj++) in panel_bmod() 111 nextl_col = (jj-jcol) * m; in panel_bmod() 156 for (jj = jcol; jj < jcol + w; jj++) in panel_bmod() 158 nextl_col = (jj-jcol) * m; in panel_bmod() 191 for (jj = jcol; jj < jcol + w; jj++) in panel_bmod() 193 nextl_col = (jj-jcol) * m; in panel_bmod()
|
D | SparseLUImpl.h | 39 …Index snode_dfs(const Index jcol, const Index kcol,const MatrixType& mat, IndexVector& xprune, In… 40 Index snode_bmod (const Index jcol, const Index fsupc, ScalarVector& dense, GlobalLU_t& glu); 41 …Index pivotL(const Index jcol, const RealScalar& diagpivotthresh, IndexVector& perm_r, IndexVector… 47 …void panel_dfs(const Index m, const Index w, const Index jcol, MatrixType& A, IndexVector& perm_r,… 49 …void panel_bmod(const Index m, const Index w, const Index jcol, const Index nseg, ScalarVector& de… 50 …Index column_dfs(const Index m, const Index jcol, IndexVector& perm_r, Index maxsuper, Index& nseg… 51 …Index column_bmod(const Index jcol, const Index nseg, BlockScalarVector dense, ScalarVector& tempv… 52 …Index copy_to_ucol(const Index jcol, const Index nseg, IndexVector& segrep, BlockIndexVector repfn… 53 …void pruneL(const Index jcol, const IndexVector& perm_r, const Index pivrow, const Index nseg, con…
|
D | SparseLU_column_bmod.h | 53 Index SparseLUImpl<Scalar,Index>::column_bmod(const Index jcol, const Index nseg, BlockScalarVector… in column_bmod() argument 67 jsupno = glu.supno(jcol); in column_bmod() 112 nextlu = glu.xlusup(jcol); in column_bmod() 140 glu.xlusup(jcol + 1) = nextlu; // close L\U(*,jcol); in column_bmod() 150 if (fst_col < jcol) in column_bmod() 159 nsupc = jcol - fst_col; // excluding jcol in column_bmod() 163 ufirst = glu.xlusup(jcol) + d_fsupc; in column_bmod() 164 Index lda = glu.xlusup(jcol+1) - glu.xlusup(jcol); in column_bmod()
|
D | SparseLU.h | 589 Index jcol; in factorize() local 596 for (jcol = 0; jcol < n; ) in factorize() 600 for (k = jcol + 1; k < (std::min)(jcol+panel_size, n); k++) in factorize() 604 panel_size = k - jcol; in factorize() 609 panel_size = n - jcol; in factorize() 612 …Base::panel_dfs(m, panel_size, jcol, m_mat, m_perm_r.indices(), nseg1, dense, panel_lsub, segrep, … in factorize() 615 Base::panel_bmod(m, panel_size, jcol, nseg1, dense, tempv, segrep, repfnz, m_glu); in factorize() 618 for ( jj = jcol; jj< jcol + panel_size; jj++) in factorize() 620 k = (jj - jcol) * m; // Column index for w-wide arrays in factorize() 637 … info = Base::column_bmod(jj, (nseg - nseg1), dense_k, tempv, segrep_k, repfnz_k, jcol, m_glu); in factorize() [all …]
|
D | SparseLU_panel_dfs.h | 41 panel_dfs_traits(Index jcol, Index* marker) in panel_dfs_traits() 42 : m_jcol(jcol), m_marker(marker) in panel_dfs_traits() 219 void SparseLUImpl<Scalar,Index>::panel_dfs(const Index m, const Index w, const Index jcol, MatrixTy… in panel_dfs() argument 227 panel_dfs_traits<IndexVector> traits(jcol, marker1.data()); in panel_dfs() 230 for (Index jj = jcol; jj < jcol + w; jj++) in panel_dfs() 232 nextl_col = (jj - jcol) * m; in panel_dfs()
|
D | SparseLU_copy_to_ucol.h | 50 Index SparseLUImpl<Scalar,Index>::copy_to_ucol(const Index jcol, const Index nseg, IndexVector& seg… in copy_to_ucol() argument 54 Index jsupno = glu.supno(jcol); in copy_to_ucol() 58 Index nextu = glu.xusub(jcol); in copy_to_ucol() 99 glu.xusub(jcol + 1) = nextu; // close U(*,jcol) in copy_to_ucol()
|
D | SparseLU_pruneL.h | 53 void SparseLUImpl<Scalar,Index>::pruneL(const Index jcol, const IndexVector& perm_r, const Index pi… in pruneL() argument 56 Index jsupno = glu.supno(jcol); in pruneL()
|
/external/cblas/testing/ |
D | c_dblas2.c | 192 int i,irow,j,jcol,LDA; in F77_dgbmv() local 202 jcol=(*ku)-i; in F77_dgbmv() 203 for( j=jcol; j<*n; j++ ) in F77_dgbmv() 204 A[ LDA*(j-jcol)+irow ]=a[ (*lda)*j+i ]; in F77_dgbmv() 212 jcol=i-(*ku); in F77_dgbmv() 213 for( j=jcol; j<(*n+*kl); j++ ) in F77_dgbmv() 214 A[ LDA*j+irow ]=a[ (*lda)*(j-jcol)+i ]; in F77_dgbmv() 228 int irow, jcol, i, j, LDA; in F77_dtbmv() local 243 jcol=(*k)-i; in F77_dtbmv() 244 for( j=jcol; j<*n; j++ ) in F77_dtbmv() [all …]
|
D | c_sblas2.c | 192 int i,irow,j,jcol,LDA; in F77_sgbmv() local 202 jcol=(*ku)-i; in F77_sgbmv() 203 for( j=jcol; j<*n; j++ ) in F77_sgbmv() 204 A[ LDA*(j-jcol)+irow ]=a[ (*lda)*j+i ]; in F77_sgbmv() 212 jcol=i-(*ku); in F77_sgbmv() 213 for( j=jcol; j<(*n+*kl); j++ ) in F77_sgbmv() 214 A[ LDA*j+irow ]=a[ (*lda)*(j-jcol)+i ]; in F77_sgbmv() 228 int irow, jcol, i, j, LDA; in F77_stbmv() local 243 jcol=(*k)-i; in F77_stbmv() 244 for( j=jcol; j<*n; j++ ) in F77_stbmv() [all …]
|
D | c_zblas2.c | 47 int i,j,irow,jcol,LDA; in F77_zgbmv() local 56 jcol=(*ku)-i; in F77_zgbmv() 57 for( j=jcol; j<*n; j++ ){ in F77_zgbmv() 58 A[ LDA*(j-jcol)+irow ].real=a[ (*lda)*j+i ].real; in F77_zgbmv() 59 A[ LDA*(j-jcol)+irow ].imag=a[ (*lda)*j+i ].imag; in F77_zgbmv() 70 jcol=i-(*ku); in F77_zgbmv() 71 for( j=jcol; j<(*n+*kl); j++ ){ in F77_zgbmv() 72 A[ LDA*j+irow ].real=a[ (*lda)*(j-jcol)+i ].real; in F77_zgbmv() 73 A[ LDA*j+irow ].imag=a[ (*lda)*(j-jcol)+i ].imag; in F77_zgbmv() 181 int i,irow,j,jcol,LDA; in F77_zhbmv() local [all …]
|
D | c_cblas2.c | 47 int i,j,irow,jcol,LDA; in F77_cgbmv() local 56 jcol=(*ku)-i; in F77_cgbmv() 57 for( j=jcol; j<*n; j++ ){ in F77_cgbmv() 58 A[ LDA*(j-jcol)+irow ].real=a[ (*lda)*j+i ].real; in F77_cgbmv() 59 A[ LDA*(j-jcol)+irow ].imag=a[ (*lda)*j+i ].imag; in F77_cgbmv() 70 jcol=i-(*ku); in F77_cgbmv() 71 for( j=jcol; j<(*n+*kl); j++ ){ in F77_cgbmv() 72 A[ LDA*j+irow ].real=a[ (*lda)*(j-jcol)+i ].real; in F77_cgbmv() 73 A[ LDA*j+irow ].imag=a[ (*lda)*(j-jcol)+i ].imag; in F77_cgbmv() 181 int i,irow,j,jcol,LDA; in F77_chbmv() local [all …]
|