Lines Matching refs:inode
18 PetscCheck(a->inode.size_csr, PETSC_COMM_SELF, PETSC_ERR_COR, "Missing Inode Structure"); in MatCreateColInode_Private()
19 ns_row = a->inode.size_csr; in MatCreateColInode_Private()
57 PetscInt *tns, *tvc, *ns_row = a->inode.size_csr, *ns_col, nsz, i1, i2; in MatGetRowIJ_SeqAIJ_Inode_Symmetric()
61 nslim_row = a->inode.node_count; in MatGetRowIJ_SeqAIJ_Inode_Symmetric()
65 PetscCheck(a->inode.size_csr, PETSC_COMM_SELF, PETSC_ERR_COR, "Missing Inode Structure"); in MatGetRowIJ_SeqAIJ_Inode_Symmetric()
145 const PetscInt *j, *ai = a->i, *aj = a->j, *ns_row = a->inode.size_csr; in MatGetRowIJ_SeqAIJ_Inode_Nonsymmetric()
148 PetscCheck(a->inode.size_csr, PETSC_COMM_SELF, PETSC_ERR_COR, "Missing Inode Structure"); in MatGetRowIJ_SeqAIJ_Inode_Nonsymmetric()
149 nslim_row = a->inode.node_count; in MatGetRowIJ_SeqAIJ_Inode_Nonsymmetric()
223 if (n) *n = a->inode.node_count; in MatGetRowIJ_SeqAIJ_Inode()
253 PetscInt *tns, *tvc, *ns_row = a->inode.size_csr, nsz, i1, i2, *ai = a->i, *aj = a->j; in MatGetColumnIJ_SeqAIJ_Inode_Nonsymmetric()
256 PetscCheck(a->inode.size_csr, PETSC_COMM_SELF, PETSC_ERR_COR, "Missing Inode Structure"); in MatGetColumnIJ_SeqAIJ_Inode_Nonsymmetric()
257 nslim_row = a->inode.node_count; in MatGetColumnIJ_SeqAIJ_Inode_Nonsymmetric()
365 PetscCheck(a->inode.size_csr, PETSC_COMM_SELF, PETSC_ERR_COR, "Missing Inode Structure"); in MatMult_SeqAIJ_Inode()
366 node_max = a->inode.node_count; in MatMult_SeqAIJ_Inode()
367 ns = a->inode.size_csr; /* Node Size array */ in MatMult_SeqAIJ_Inode()
574 PetscCheck(a->inode.size_csr, PETSC_COMM_SELF, PETSC_ERR_COR, "Missing Inode Structure"); in MatMultAdd_SeqAIJ_Inode()
575 node_max = a->inode.node_count; in MatMultAdd_SeqAIJ_Inode()
576 ns = a->inode.size_csr; /* Node Size array */ in MatMultAdd_SeqAIJ_Inode()
777 PetscCheck(a->inode.size_csr, PETSC_COMM_SELF, PETSC_ERR_COR, "Missing Inode Structure"); in MatSolve_SeqAIJ_Inode_inplace()
778 node_max = a->inode.node_count; in MatSolve_SeqAIJ_Inode_inplace()
779 ns = a->inode.size_csr; /* Node Size array */ in MatSolve_SeqAIJ_Inode_inplace()
1245 node_max = a->inode.node_count; in MatLUFactorNumeric_SeqAIJ_Inode()
1246 ns = a->inode.size_csr; in MatLUFactorNumeric_SeqAIJ_Inode()
1954 if (b->inode.size_csr) { in MatLUFactorNumeric_SeqAIJ_Inode()
1996 PetscCheck(a->inode.size_csr, PETSC_COMM_SELF, PETSC_ERR_COR, "Missing Inode Structure"); in MatSolve_SeqAIJ_Inode()
1997 node_max = a->inode.node_count; in MatSolve_SeqAIJ_Inode()
1998 ns = a->inode.size_csr; /* Node Size array */ in MatSolve_SeqAIJ_Inode()
2389 PetscInt n = mat->cmap->n, m = a->inode.node_count, j, *ns = a->inode.size_csr, row; in MatColoringPatch_SeqAIJ_Inode()
2394 PetscCheck(a->inode.size_csr, PETSC_COMM_SELF, PETSC_ERR_COR, "Missing Inode Structure"); in MatColoringPatch_SeqAIJ_Inode()
2426 PetscInt m = a->inode.node_count, cnt = 0, i, j, row, nodesz; in MatInvertDiagonalForSOR_SeqAIJ_Inode()
2429 const PetscInt *sizes = a->inode.size_csr, *diag; in MatInvertDiagonalForSOR_SeqAIJ_Inode()
2434 if (!a->inode.ibdiag) { in MatInvertDiagonalForSOR_SeqAIJ_Inode()
2440 a->inode.bdiagsize = cnt; in MatInvertDiagonalForSOR_SeqAIJ_Inode()
2441 …PetscCall(PetscMalloc3(cnt, &a->inode.ibdiag, cnt, &a->inode.bdiag, A->rmap->n, &a->inode.ssor_wor… in MatInvertDiagonalForSOR_SeqAIJ_Inode()
2445 ibdiag = a->inode.ibdiag; in MatInvertDiagonalForSOR_SeqAIJ_Inode()
2446 bdiag = a->inode.bdiag; in MatInvertDiagonalForSOR_SeqAIJ_Inode()
2489 a->inode.ibdiagState = ((PetscObject)A)->state; in MatInvertDiagonalForSOR_SeqAIJ_Inode()
2501 PetscInt n, m = a->inode.node_count, cnt = 0, i, row, i1, i2, nodesz; in MatSOR_SeqAIJ_Inode()
2503 const PetscInt *sizes = a->inode.size_csr, *idx, *diag, *ii = a->i; in MatSOR_SeqAIJ_Inode()
2506 PetscCheck(a->inode.size_csr, PETSC_COMM_SELF, PETSC_ERR_COR, "Missing Inode Structure"); in MatSOR_SeqAIJ_Inode()
2512 ibdiag = a->inode.ibdiag; in MatSOR_SeqAIJ_Inode()
2513 bdiag = a->inode.bdiag; in MatSOR_SeqAIJ_Inode()
2514 t = a->inode.ssor_work; in MatSOR_SeqAIJ_Inode()
2708 ibdiag = a->inode.ibdiag + a->inode.bdiagsize; in MatSOR_SeqAIJ_Inode()
2886 …for (i = 0, row = 0, ibdiag = a->inode.ibdiag; i < m; row += nodesz, ibdiag += nodesz * nodesz, i+… in MatSOR_SeqAIJ_Inode()
3206 ibdiag = a->inode.ibdiag + a->inode.bdiagsize; in MatSOR_SeqAIJ_Inode()
3375 ibdiag = a->inode.ibdiag + a->inode.bdiagsize; in MatSOR_SeqAIJ_Inode()
3812 const MatScalar *bdiag = a->inode.bdiag; in MatMultDiagonalBlock_SeqAIJ_Inode()
3814 PetscInt m = a->inode.node_count, cnt = 0, i, row, nodesz; in MatMultDiagonalBlock_SeqAIJ_Inode()
3815 const PetscInt *sizes = a->inode.size_csr; in MatMultDiagonalBlock_SeqAIJ_Inode()
3818 PetscCheck(a->inode.size_csr, PETSC_COMM_SELF, PETSC_ERR_COR, "Missing Inode Structure"); in MatMultDiagonalBlock_SeqAIJ_Inode()
3898 a->inode.node_count = 0; in MatSeqAIJ_Inode_ResetOps()
3899 a->inode.use = PETSC_FALSE; in MatSeqAIJ_Inode_ResetOps()
3900 a->inode.checked = PETSC_FALSE; in MatSeqAIJ_Inode_ResetOps()
3901 a->inode.mat_nonzerostate = -1; in MatSeqAIJ_Inode_ResetOps()
3924 if (!a->inode.use) { in MatSeqAIJCheckInode()
3926 PetscCall(PetscFree(a->inode.size_csr)); in MatSeqAIJCheckInode()
3929 …if (a->inode.checked && A->nonzerostate == a->inode.mat_nonzerostate) PetscFunctionReturn(PETSC_SU… in MatSeqAIJCheckInode()
3932 if (!a->inode.size_csr) PetscCall(PetscMalloc1(m + 1, &a->inode.size_csr)); in MatSeqAIJCheckInode()
3933 ns = a->inode.size_csr; in MatSeqAIJCheckInode()
3944 … for (j = i + 1, idy = idx, blk_size = 1; j < m && blk_size < a->inode.limit; ++j, ++blk_size) { in MatSeqAIJCheckInode()
3960 PetscCall(PetscFree(a->inode.size_csr)); in MatSeqAIJCheckInode()
3975 a->inode.node_count = node_count; in MatSeqAIJCheckInode()
3976 …Int_FMT ". Limit used: %" PetscInt_FMT ". Using Inode routines\n", node_count, m, a->inode.limit)); in MatSeqAIJCheckInode()
3978 a->inode.checked = PETSC_TRUE; in MatSeqAIJCheckInode()
3979 a->inode.mat_nonzerostate = A->nonzerostate; in MatSeqAIJCheckInode()
3990 c->inode.use = a->inode.use; in MatDuplicate_SeqAIJ_Inode()
3991 c->inode.limit = a->inode.limit; in MatDuplicate_SeqAIJ_Inode()
3992 c->inode.max_limit = a->inode.max_limit; in MatDuplicate_SeqAIJ_Inode()
3993 c->inode.checked = PETSC_FALSE; in MatDuplicate_SeqAIJ_Inode()
3994 c->inode.size_csr = NULL; in MatDuplicate_SeqAIJ_Inode()
3995 c->inode.node_count = 0; in MatDuplicate_SeqAIJ_Inode()
3996 c->inode.ibdiag = NULL; in MatDuplicate_SeqAIJ_Inode()
3997 c->inode.bdiag = NULL; in MatDuplicate_SeqAIJ_Inode()
3998 c->inode.mat_nonzerostate = -1; in MatDuplicate_SeqAIJ_Inode()
3999 if (a->inode.use) { in MatDuplicate_SeqAIJ_Inode()
4000 if (a->inode.checked && a->inode.size_csr) { in MatDuplicate_SeqAIJ_Inode()
4001 PetscCall(PetscMalloc1(m + 1, &c->inode.size_csr)); in MatDuplicate_SeqAIJ_Inode()
4002 PetscCall(PetscArraycpy(c->inode.size_csr, a->inode.size_csr, m + 1)); in MatDuplicate_SeqAIJ_Inode()
4004 c->inode.checked = PETSC_TRUE; in MatDuplicate_SeqAIJ_Inode()
4005 c->inode.node_count = a->inode.node_count; in MatDuplicate_SeqAIJ_Inode()
4006 c->inode.mat_nonzerostate = (*C)->nonzerostate; in MatDuplicate_SeqAIJ_Inode()
4054 if (!a->inode.use) PetscFunctionReturn(PETSC_SUCCESS); in MatSeqAIJCheckInode_FactorLU()
4055 if (a->inode.checked) PetscFunctionReturn(PETSC_SUCCESS); in MatSeqAIJCheckInode_FactorLU()
4058 if (a->inode.size_csr) ns = a->inode.size_csr; in MatSeqAIJCheckInode_FactorLU()
4072 for (j = i + 1, blk_size = 1; j < m && blk_size < a->inode.limit; ++j, ++blk_size) { in MatSeqAIJCheckInode_FactorLU()
4090 a->inode.node_count = 0; in MatSeqAIJCheckInode_FactorLU()
4091 a->inode.size_csr = NULL; in MatSeqAIJCheckInode_FactorLU()
4092 a->inode.use = PETSC_FALSE; in MatSeqAIJCheckInode_FactorLU()
4105 a->inode.node_count = node_count; in MatSeqAIJCheckInode_FactorLU()
4106 a->inode.size_csr = ns; in MatSeqAIJCheckInode_FactorLU()
4107 …Int_FMT ". Limit used: %" PetscInt_FMT ". Using Inode routines\n", node_count, m, a->inode.limit)); in MatSeqAIJCheckInode_FactorLU()
4109 a->inode.checked = PETSC_TRUE; in MatSeqAIJCheckInode_FactorLU()
4128 PetscInt m = A->rmap->n, n = A->cmap->n, i, j, nslim_row = a->inode.node_count; in MatInodeAdjustForInodes_SeqAIJ_Inode()
4130 …PetscInt row, col, *permr, *permc, *ns_row = a->inode.size_csr, *tns, start_val, end_val, i… in MatInodeAdjustForInodes_SeqAIJ_Inode()
4135 if (!a->inode.size_csr) PetscFunctionReturn(PETSC_SUCCESS); /* no inodes so return */ in MatInodeAdjustForInodes_SeqAIJ_Inode()
4136 if (a->inode.node_count == m) PetscFunctionReturn(PETSC_SUCCESS); /* all inodes are of size 1 */ in MatInodeAdjustForInodes_SeqAIJ_Inode()
4221 if (node_count) *node_count = a->inode.node_count; in MatInodeGetInodeSizes_SeqAIJ_Inode()
4222 if (sizes) *sizes = a->inode.size_csr; in MatInodeGetInodeSizes_SeqAIJ_Inode()
4223 if (limit) *limit = a->inode.limit; in MatInodeGetInodeSizes_SeqAIJ_Inode()