102 static inline PetscErrorCode PCHPDDMSplittingMatNormal_Private(Mat A, IS *is, Mat *splitting[])  in PCHPDDMSplittingMatNormal_Private()  argument
109   PetscCall(MatCreateSubMatrices(A, 1, is + 2, is, MAT_INITIAL_MATRIX, splitting));  in PCHPDDMSplittingMatNormal_Private()
110   PetscCall(MatCreateSubMatrices(**splitting, 1, is + 2, is + 1, MAT_INITIAL_MATRIX, &sub));  in PCHPDDMSplittingMatNormal_Private()
113   PetscCall(MatSetOption(**splitting, MAT_KEEP_NONZERO_PATTERN, PETSC_TRUE));  in PCHPDDMSplittingMatNormal_Private()
114   PetscCall(MatZeroRowsIS(**splitting, zero, 0.0, nullptr, nullptr));  in PCHPDDMSplittingMatNormal_Private()
122   Mat      *splitting[2] = {}, aux;  in PCHPDDMSetAuxiliaryMatNormal_Private()  local
139   PetscCall(PCHPDDMSplittingMatNormal_Private(A, is, &splitting[0]));  in PCHPDDMSetAuxiliaryMatNormal_Private()
141     PetscCall(PCHPDDMSplittingMatNormal_Private(B01, is, &splitting[1]));  in PCHPDDMSetAuxiliaryMatNormal_Private()
149     Mat conjugate = *splitting[splitting[1] ? 1 : 0];  in PCHPDDMSetAuxiliaryMatNormal_Private()
151     if (PetscDefined(USE_COMPLEX) && !splitting[1]) {  in PCHPDDMSetAuxiliaryMatNormal_Private()
152       PetscCall(MatDuplicate(*splitting[0], MAT_COPY_VALUES, &conjugate));  in PCHPDDMSetAuxiliaryMatNormal_Private()
155 …PetscCall(MatTransposeMatMult(conjugate, *splitting[0], MAT_INITIAL_MATRIX, PETSC_DETERMINE, &aux)…  in PCHPDDMSetAuxiliaryMatNormal_Private()
156     if (PetscDefined(USE_COMPLEX) && !splitting[1]) PetscCall(MatDestroy(&conjugate));  in PCHPDDMSetAuxiliaryMatNormal_Private()
157     else if (splitting[1]) PetscCall(MatDestroySubMatrices(1, &splitting[1]));  in PCHPDDMSetAuxiliaryMatNormal_Private()
184 …PetscCheck(!splitting[1], PetscObjectComm((PetscObject)pc), PETSC_ERR_SUP, "Cannot use PCQR when A…  in PCHPDDMSetAuxiliaryMatNormal_Private()
191     if (flg) PetscCall(MatCreateNormal(*splitting[0], &aux));  in PCHPDDMSetAuxiliaryMatNormal_Private()
192     else PetscCall(MatCreateNormalHermitian(*splitting[0], &aux));  in PCHPDDMSetAuxiliaryMatNormal_Private()
194   PetscCall(MatDestroySubMatrices(1, &splitting[0]));  in PCHPDDMSetAuxiliaryMatNormal_Private()