Searched refs:shell_ctx (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/ksp/pc/impls/bddc/ |
| H A D | bddcnullspace.c | 71 NullSpaceCorrection_ctx shell_ctx; in PCBDDCNullSpaceAssembleCorrection() local
91 PetscCall(PetscNew(&shell_ctx)); in PCBDDCNullSpaceAssembleCorrection()
92 shell_ctx->scale = 1.0; in PCBDDCNullSpaceAssembleCorrection()
94 shell_ctx->basis_mat = dmat; in PCBDDCNullSpaceAssembleCorrection()
96 shell_ctx->evapply = PC_BDDC_ApproxApply[pcbddc->current_level]; in PCBDDCNullSpaceAssembleCorrection()
98 PetscCall(MatIsSymmetric(local_mat, 0.0, &shell_ctx->symm)); in PCBDDCNullSpaceAssembleCorrection()
102 …if (iscusp) PetscCall(MatConvert(shell_ctx->basis_mat, MATSEQDENSECUDA, MAT_INPLACE_MATRIX, &shell… in PCBDDCNullSpaceAssembleCorrection()
103 …PetscCall(MatMatMult(local_mat, shell_ctx->basis_mat, MAT_INITIAL_MATRIX, PETSC_DETERMINE, &Kbasis… in PCBDDCNullSpaceAssembleCorrection()
104 …PetscCall(MatTransposeMatMult(Kbasis_mat, shell_ctx->basis_mat, MAT_INITIAL_MATRIX, PETSC_DETERMIN… in PCBDDCNullSpaceAssembleCorrection()
106 PetscCall(MatBindToCPU(shell_ctx->inv_smat, PETSC_TRUE)); in PCBDDCNullSpaceAssembleCorrection()
[all …]
|