Lines Matching refs:nr
482 …PetscInt fieldA, q, f, g, d, nr, nc, rows0[LANDAU_MAX_Q_FACE] = {0}, cols0[LANDAU_MAX_Q_FACE] =… in LandauFormJacobian_Internal() local
491 nr = 1; in LandauFormJacobian_Internal()
496 for (q = 0, nr = 0; q < maps[grid].num_face; q++, nr++) { in LandauFormJacobian_Internal()
522 …x] + fieldA * fullNb2 + fullNb * coo_elem_point_offsets[glb_elem_idx][f] + nr * coo_elem_point_off… in LandauFormJacobian_Internal()
523 for (PetscInt q = 0, idx2 = idx0; q < nr; q++) { in LandauFormJacobian_Internal()
527 for (q = 0; q < nr; q++) rows[q] = rows0[q] + moffset; in LandauFormJacobian_Internal()
529 for (q = 0; q < nr; q++) { in LandauFormJacobian_Internal()
532 PetscCall(MatSetValues(JacP, nr, rows, nc, cols, vals, ADD_VALUES)); in LandauFormJacobian_Internal()
937 PetscInt rCellIdx[8], nr = 0, nrmax = (dim == 3) ? 8 : 2; in adaptToleranceFEM() local
949 nr = 0; in adaptToleranceFEM()
950 rCellIdx[nr++] = c; in adaptToleranceFEM()
952 } else if ((r - minRad) < PETSC_SQRT_MACHINE_EPSILON * 100. && nr < nrmax) { in adaptToleranceFEM()
953 for (k = 0; k < nr; k++) in adaptToleranceFEM()
955 if (k == nr) { in adaptToleranceFEM()
956 rCellIdx[nr++] = c; in adaptToleranceFEM()
962 for (k = 0; k < nr; k++) PetscCall(DMLabelSetValue(adaptLabel, rCellIdx[k], DM_ADAPT_REFINE)); in adaptToleranceFEM()
963 …cInt_FMT " origin cells %" PetscInt_FMT ",%" PetscInt_FMT " r=%g\n", grid, nr, rCellIdx[0], rCellI… in adaptToleranceFEM()
1660 …const PetscInt nr = coo_elem_point_offsets[glb_elem_idx][f + 1] - coo_elem_point_offsets[glb_elem_… in CreateStaticData() local
1661 if (nr == 1) rows[0] = Idxs[f]; in CreateStaticData()
1664 for (PetscInt q = 0; q < nr; q++) rows[q] = maps[grid].c_maps[idx][q].gid; in CreateStaticData()
1673 …x] + fieldA * fullNb2 + fullNb * coo_elem_point_offsets[glb_elem_idx][f] + nr * coo_elem_point_off… in CreateStaticData()
1674 for (PetscInt q = 0, idx = idx0; q < nr; q++) { in CreateStaticData()