Lines Matching refs:sub_schurs
396 PCBDDCSubSchurs sub_schurs = pcbddc->sub_schurs; in PCBDDCScalingSetUp_Deluxe() local
406 if (sub_schurs->is_vertices || sub_schurs->is_dir) { in PCBDDCScalingSetUp_Deluxe()
409 if (sub_schurs->is_vertices) PetscCall(ISGetLocalSize(sub_schurs->is_vertices, &n_com)); in PCBDDCScalingSetUp_Deluxe()
411 if (sub_schurs->is_dir) PetscCall(ISGetLocalSize(sub_schurs->is_dir, &n_dir)); in PCBDDCScalingSetUp_Deluxe()
419 PetscCall(ISGetIndices(sub_schurs->is_vertices, &idxs)); in PCBDDCScalingSetUp_Deluxe()
422 PetscCall(ISRestoreIndices(sub_schurs->is_vertices, &idxs)); in PCBDDCScalingSetUp_Deluxe()
428 PetscCall(ISGetIndices(sub_schurs->is_dir, &idxs)); in PCBDDCScalingSetUp_Deluxe()
431 PetscCall(ISRestoreIndices(sub_schurs->is_dir, &idxs)); in PCBDDCScalingSetUp_Deluxe()
448 PCBDDCSubSchurs sub_schurs = pcbddc->sub_schurs; in PCBDDCScalingSetUp_Deluxe_Private() local
455 …PetscCheck(sub_schurs, PetscObjectComm((PetscObject)pc), PETSC_ERR_PLIB, "Missing PCBDDCSubSchurs"… in PCBDDCScalingSetUp_Deluxe_Private()
456 if (!sub_schurs->n_subs) PetscFunctionReturn(PETSC_SUCCESS); in PCBDDCScalingSetUp_Deluxe_Private()
460 deluxe_ctx->seq_n = sub_schurs->n_subs; in PCBDDCScalingSetUp_Deluxe_Private()
463 …sub_schurs->n_subs, PETSC_COMM_SELF, PETSC_ERR_PLIB, "Number of deluxe subproblems %" PetscInt_FMT… in PCBDDCScalingSetUp_Deluxe_Private()
466 deluxe_ctx->change = sub_schurs->change; in PCBDDCScalingSetUp_Deluxe_Private()
467 deluxe_ctx->change_with_qr = sub_schurs->change_with_qr; in PCBDDCScalingSetUp_Deluxe_Private()
471 for (i = 0; i < sub_schurs->n_subs; i++) { in PCBDDCScalingSetUp_Deluxe_Private()
473 PetscCall(ISGetLocalSize(sub_schurs->is_subs[i], &subset_size)); in PCBDDCScalingSetUp_Deluxe_Private()
478 PetscCall(ISGetIndices(sub_schurs->is_Ej_all, &idxs)); in PCBDDCScalingSetUp_Deluxe_Private()
479 PetscCall(MatSeqAIJGetArray(sub_schurs->S_Ej_all, &matdata)); in PCBDDCScalingSetUp_Deluxe_Private()
480 PetscCall(MatSeqAIJGetArray(sub_schurs->sum_S_Ej_all, &matdata2)); in PCBDDCScalingSetUp_Deluxe_Private()
484 PetscCall(ISGetLocalSize(sub_schurs->is_subs[i], &subset_size)); in PCBDDCScalingSetUp_Deluxe_Private()
504 PetscCall(MatSetOption(deluxe_ctx->seq_mat_inv_sum[i], MAT_SPD, sub_schurs->is_posdef)); in PCBDDCScalingSetUp_Deluxe_Private()
505 … PetscCall(MatSetOption(deluxe_ctx->seq_mat_inv_sum[i], MAT_HERMITIAN, sub_schurs->is_hermitian)); in PCBDDCScalingSetUp_Deluxe_Private()
506 switch (sub_schurs->mat_factor_type) { in PCBDDCScalingSetUp_Deluxe_Private()
514 …COMM_SELF, PETSC_ERR_SUP, "Unsupported factor type %s", MatFactorTypes[sub_schurs->mat_factor_type… in PCBDDCScalingSetUp_Deluxe_Private()
518 if (!sub_schurs->is_hermitian) { in PCBDDCScalingSetUp_Deluxe_Private()
525 if (!sub_schurs->is_hermitian) { in PCBDDCScalingSetUp_Deluxe_Private()
548 PetscCall(ISRestoreIndices(sub_schurs->is_Ej_all, &idxs)); in PCBDDCScalingSetUp_Deluxe_Private()
549 PetscCall(MatSeqAIJRestoreArray(sub_schurs->S_Ej_all, &matdata)); in PCBDDCScalingSetUp_Deluxe_Private()
550 PetscCall(MatSeqAIJRestoreArray(sub_schurs->sum_S_Ej_all, &matdata2)); in PCBDDCScalingSetUp_Deluxe_Private()