Lines Matching refs:lG

87 static PetscErrorCode PCBDDCComputeNedelecChangeEdge(Mat lG, IS edge, IS extrow, IS extcol, IS corn…  in PCBDDCComputeNedelecChangeEdge()  argument
101 PetscCall(MatCreateSubMatrix(lG, extrow, extcol, MAT_INITIAL_MATRIX, &GE)); in PCBDDCComputeNedelecChangeEdge()
109 PetscCall(MatCreateSubMatrix(lG, edge, extcol, MAT_INITIAL_MATRIX, &GE)); in PCBDDCComputeNedelecChangeEdge()
120 PetscCall(MatCreateSubMatrix(lG, edge, corners, MAT_INITIAL_MATRIX, &GEc)); in PCBDDCComputeNedelecChangeEdge()
157 Mat G, T, conn, lG, lGt, lGis, lGall, lGe, lGinit; in PCBDDCNedelecSupport() local
359 PetscCall(MatISGetLocalMat(lGis, &lG)); in PCBDDCNedelecSupport()
377 …PetscCall(MatCreateSubMatrix(lG, is_rows[i], NULL, MAT_INITIAL_MATRIX, &lGn[i * (1 + pcbddc->n_loc… in PCBDDCNedelecSupport()
403 …tCreateNest(PETSC_COMM_SELF, pcbddc->n_local_subs, is_rows, pcbddc->n_local_subs, NULL, lGn, &lG)); in PCBDDCNedelecSupport()
409 PetscCall(MatConvert(lG, MATSEQAIJ, MAT_INPLACE_MATRIX, &lG)); in PCBDDCNedelecSupport()
413 PetscCall(MatISSetLocalMat(B, lG)); in PCBDDCNedelecSupport()
414 PetscCall(MatDestroy(&lG)); in PCBDDCNedelecSupport()
447 PetscCall(MatISGetLocalMat(lGis, &lG)); in PCBDDCNedelecSupport()
448 PetscCall(PetscObjectReference((PetscObject)lG)); in PCBDDCNedelecSupport()
453 PetscCall(PetscObjectSetName((PetscObject)lG, "initial_lG")); in PCBDDCNedelecSupport()
454 PetscCall(MatView(lG, NULL)); in PCBDDCNedelecSupport()
458 PetscCall(MatDuplicate(lG, MAT_COPY_VALUES, &lGinit)); in PCBDDCNedelecSupport()
461 PetscCall(MatDuplicate(lG, MAT_COPY_VALUES, &lGe)); in PCBDDCNedelecSupport()
746 PetscCall(MatTranspose(lG, MAT_INITIAL_MATRIX, &lGt)); in PCBDDCNedelecSupport()
813 PetscCall(MatDestroy(&lG)); in PCBDDCNedelecSupport()
814 PetscCall(MatTranspose(lGt, MAT_INITIAL_MATRIX, &lG)); in PCBDDCNedelecSupport()
816 PetscCall(PetscObjectSetName((PetscObject)lG, "used_lG")); in PCBDDCNedelecSupport()
817 PetscCall(MatView(lG, NULL)); in PCBDDCNedelecSupport()
839 PetscCall(PetscObjectSetOptionsPrefix((PetscObject)lG, "econn_")); in PCBDDCNedelecSupport()
843 PetscCall(MatProductCreate(lG, lGt, NULL, &conn)); in PCBDDCNedelecSupport()
955 PetscCall(MatGetRowIJ(lG, 0, PETSC_FALSE, PETSC_FALSE, &i, &ii, &jj, &done)); in PCBDDCNedelecSupport()
999 PetscCall(MatRestoreRowIJ(lG, 0, PETSC_FALSE, PETSC_FALSE, &i, &ii, &jj, &done)); in PCBDDCNedelecSupport()
1009 PetscCall(MatDestroy(&lG)); in PCBDDCNedelecSupport()
1011 lG = lGinit; in PCBDDCNedelecSupport()
1012 PetscCall(MatTranspose(lG, MAT_INITIAL_MATRIX, &lGt)); in PCBDDCNedelecSupport()
1017 PetscCall(MatGetRowIJ(lG, 0, PETSC_FALSE, PETSC_FALSE, &i, &ii, &jj, &done)); in PCBDDCNedelecSupport()
1018 PetscCall(MatSeqAIJGetMaxRowNonzeros(lG, &i)); in PCBDDCNedelecSupport()
1202 PetscCall(MatRestoreRowIJ(lG, 0, PETSC_FALSE, PETSC_FALSE, &i, &ii, &jj, &done)); in PCBDDCNedelecSupport()
1210 PetscCall(MatGetRowIJ(lG, 0, PETSC_FALSE, PETSC_FALSE, &i, &ii, &jj, &done)); in PCBDDCNedelecSupport()
1254 PetscCall(MatRestoreRowIJ(lG, 0, PETSC_FALSE, PETSC_FALSE, &i, &ii, &jj, &done)); in PCBDDCNedelecSupport()
1481 …PetscCall(PCBDDCComputeNedelecChangeEdge(lG, eedges[i], extrows[i], extcols[i], cornersis, &Gins, … in PCBDDCNedelecSupport()
1645 PetscCall(MatDestroy(&lG)); in PCBDDCNedelecSupport()