Home
last modified time | relevance | path

Searched refs:deluxe_ctx (Results 1 – 3 of 3) sorted by relevance

/petsc/src/ksp/pc/impls/bddc/
H A Dbddcscalingbasic.c63 PCBDDCDeluxeScaling deluxe_ctx = pcbddc->deluxe_ctx; in PCBDDCScalingExtension_Deluxe() local
68 if (deluxe_ctx->n_simple) { /* scale deluxe vertices using diagonal scaling */ in PCBDDCScalingExtension_Deluxe()
75 …for (i = 0; i < deluxe_ctx->n_simple; i++) array[deluxe_ctx->idx_simple_B[i]] = array_x[deluxe_ctx… in PCBDDCScalingExtension_Deluxe()
81 if (deluxe_ctx->seq_mat) { in PCBDDCScalingExtension_Deluxe()
83 for (i = 0; i < deluxe_ctx->seq_n; i++) { in PCBDDCScalingExtension_Deluxe()
84 if (deluxe_ctx->change) { in PCBDDCScalingExtension_Deluxe()
85 …PetscCall(VecScatterBegin(deluxe_ctx->seq_scctx[i], x, deluxe_ctx->seq_work2[i], INSERT_VALUES, SC… in PCBDDCScalingExtension_Deluxe()
86 …PetscCall(VecScatterEnd(deluxe_ctx->seq_scctx[i], x, deluxe_ctx->seq_work2[i], INSERT_VALUES, SCAT… in PCBDDCScalingExtension_Deluxe()
87 if (deluxe_ctx->change_with_qr) { in PCBDDCScalingExtension_Deluxe()
90 PetscCall(KSPGetOperators(deluxe_ctx->change[i], &change, NULL)); in PCBDDCScalingExtension_Deluxe()
[all …]
H A Dbddcfetidp.c492 PCBDDCDeluxeScaling deluxe_ctx = pcbddc->deluxe_ctx; in PCBDDCSetupFETIDPMatContext() local
541 PetscCall(MatDenseGetArrayRead(deluxe_ctx->seq_mat[i], &M)); in PCBDDCSetupFETIDPMatContext()
543 PetscCall(MatDenseRestoreArrayRead(deluxe_ctx->seq_mat[i], &M)); in PCBDDCSetupFETIDPMatContext()
/petsc/include/petsc/private/
H A Dpcbddcimpl.h164 PCBDDCDeluxeScaling deluxe_ctx; member