Lines Matching refs:marks

169   PetscInt              *extrow, *extrowcum, *marks, *vmarks, *gidxs;  in PCBDDCNedelecSupport()  local
515 PetscCall(PetscMalloc1(ne, &marks)); in PCBDDCNedelecSupport()
526 marks[cum++] = i; in PCBDDCNedelecSupport()
532 marks[cum++] = i; in PCBDDCNedelecSupport()
553 marks[cum++] = i; in PCBDDCNedelecSupport()
572 PetscCall(MatZeroRows(lGe, cum, marks, 0., NULL, NULL)); in PCBDDCNedelecSupport()
825 if (PetscUnlikely(PetscBTLookup(bte, i))) marks[cum++] = i; in PCBDDCNedelecSupport()
827 if (fl2g) PetscCall(ISLocalToGlobalMappingApply(fl2g, cum, marks, marks)); in PCBDDCNedelecSupport()
828 PetscCall(ISCreateGeneral(comm, cum, marks, PETSC_COPY_VALUES, &primals)); in PCBDDCNedelecSupport()
933 PetscCall(PetscArrayzero(marks, ne)); in PCBDDCNedelecSupport()
936 for (i = 0; i < cum; i++) marks[idxs[i]] = nee + 1; in PCBDDCNedelecSupport()
949 for (j = 0; j < size; j++) marks[idxs[j]] = mark; in PCBDDCNedelecSupport()
979 … %" PetscInt_FMT " (ref mark %" PetscInt_FMT "), boundary %d\n", jjt[k2], marks[jjt[k2]], mark, (i… in PCBDDCNedelecSupport()
982 …if ((marks[jjt[k2]] && marks[jjt[k2]] != mark) || (!marks[jjt[k2]] && PetscBTLookup(btb, jjt[k2]))… in PCBDDCNedelecSupport()
1005 for (i = 0; i < cum; i++) marks[idxs[i]] = 0; in PCBDDCNedelecSupport()
1090 if (marks[jjt[k2]] == mark) { in PCBDDCNedelecSupport()
1157 PetscCall(PetscArrayzero(marks, ne)); in PCBDDCNedelecSupport()
1163 for (j = 0; j < size; j++) marks[idxs[j]] = mark; in PCBDDCNedelecSupport()
1267 for (j = ii[i]; j < ii[i + 1]; j++) emarks[marks[jj[j]]]++; in PCBDDCNedelecSupport()
1278marks[jj[j]] || marks[jj[j]] == eemax, PETSC_COMM_SELF, PETSC_ERR_SUP, "Found 2 coarse edges (id %… in PCBDDCNedelecSupport()
1297 if (marks[jj[j]] && !mark) mark = marks[jj[j]]; in PCBDDCNedelecSupport()
1312 PetscCall(PetscFree(marks)); in PCBDDCNedelecSupport()