Home
last modified time | relevance | path

Searched refs:schur_size (Results 1 – 2 of 2) sorted by relevance

/petsc/src/mat/impls/aij/seq/mkl_pardiso/
H A Dmkl_pardiso.c92 PetscInt schur_size; member
244 PetscCall(MatCreateSeqDense(PETSC_COMM_SELF, mpardiso->schur_size, mpardiso->nrhs, B, &Bmat)); in MatMKLPardisoSolveSchur_Private()
245 PetscCall(MatCreateSeqDense(PETSC_COMM_SELF, mpardiso->schur_size, mpardiso->nrhs, X, &Xmat)); in MatMKLPardisoSolveSchur_Private()
309 mpardiso->schur_size = size; in MatFactorSetSchurIS_MKL_PARDISO()
360 for (j = 0; j < mpardiso->schur_size; j++) schur[p + j] = whole[m + mpardiso->schur_idxs[j]]; in MatMKLPardisoScatterSchur_Private()
362 p += mpardiso->schur_size; in MatMKLPardisoScatterSchur_Private()
368 for (j = 0; j < mpardiso->schur_size; j++) whole[m + mpardiso->schur_idxs[j]] = schur[p + j]; in MatMKLPardisoScatterSchur_Private()
370 p += mpardiso->schur_size; in MatMKLPardisoScatterSchur_Private()
412 PetscInt shift = mat_mkl_pardiso->schur_size; in MatSolve_MKL_PARDISO()
424 for (i = 0; i < mat_mkl_pardiso->schur_size; i++) xarray[mat_mkl_pardiso->schur_idxs[i]] = 0.; in MatSolve_MKL_PARDISO()
[all …]
/petsc/src/ksp/pc/impls/bddc/
H A Dbddcprivate.c5854 PetscInt schur_size; in PCBDDCSetUpLocalScatters() local
5856 PetscCall(ISGetLocalSize(reuse_solver->is_B, &schur_size)); in PCBDDCSetUpLocalScatters()
5857 PetscCall(ISCreateStride(PETSC_COMM_SELF, schur_size, n_D, 1, &tis)); in PCBDDCSetUpLocalScatters()