Lines Matching refs:clperm
6479 …ion section, PetscInt numPoints, const PetscInt points[], const PetscInt clperm[], const PetscScal… in DMPlexVecGetClosure_Static() argument
6498 if (clperm) { in DMPlexVecGetClosure_Static()
6500 for (d = 0; d < dof; d++) array[clperm[offset + perm[d]]] = varr[d]; in DMPlexVecGetClosure_Static()
6502 for (d = 0; d < dof; d++) array[clperm[offset + d]] = varr[d]; in DMPlexVecGetClosure_Static()
6505 for (d = 0; d < dof; d++) array[clperm[offset + d]] *= flip[d]; in DMPlexVecGetClosure_Static()
6524 …t numPoints, const PetscInt points[], PetscInt numFields, const PetscInt clperm[], const PetscScal… in DMPlexVecGetClosure_Fields_Static() argument
6546 if (clperm) { in DMPlexVecGetClosure_Fields_Static()
6548 for (b = 0; b < fdof; b++) array[clperm[offset + perm[b]]] = varr[b]; in DMPlexVecGetClosure_Fields_Static()
6550 for (b = 0; b < fdof; b++) array[clperm[offset + b]] = varr[b]; in DMPlexVecGetClosure_Fields_Static()
6553 for (b = 0; b < fdof; b++) array[clperm[offset + b]] *= flip[b]; in DMPlexVecGetClosure_Fields_Static()
6908 …l setBC, const PetscInt perm[], const PetscScalar flip[], const PetscInt clperm[], const PetscScal… in updatePoint_private() argument
6920 if (clperm) { in updatePoint_private()
6922 …for (k = 0; k < dof; ++k) fuse(&a[k], values[clperm[offset + perm[k]]] * (flip ? flip[perm[k]] : 1… in updatePoint_private()
6924 for (k = 0; k < dof; ++k) fuse(&a[k], values[clperm[offset + k]] * (flip ? flip[k] : 1.)); in updatePoint_private()
6935 if (clperm) { in updatePoint_private()
6942 fuse(&a[k], values[clperm[offset + perm[k]]] * (flip ? flip[perm[k]] : 1.)); in updatePoint_private()
6950 fuse(&a[k], values[clperm[offset + k]] * (flip ? flip[k] : 1.)); in updatePoint_private()
6976 …Scalar), const PetscInt perm[], const PetscScalar flip[], const PetscInt clperm[], const PetscScal… in updatePointBC_private() argument
6989 if (clperm) { in updatePointBC_private()
6993 fuse(&a[k], values[clperm[offset + perm[k]]] * (flip ? flip[perm[k]] : 1.)); in updatePointBC_private()
7000 fuse(&a[k], values[clperm[offset + k]] * (flip ? flip[k] : 1.)); in updatePointBC_private()
7026 …oid (*fuse)(PetscScalar *, PetscScalar), PetscBool setBC, const PetscInt clperm[], const PetscScal… in updatePointFields_private() argument
7039 if (clperm) { in updatePointFields_private()
7041 …for (b = 0; b < fdof; b++) fuse(&a[b], values[clperm[foffset + perm[b]]] * (flip ? flip[perm[b]] :… in updatePointFields_private()
7043 for (b = 0; b < fdof; b++) fuse(&a[b], values[clperm[foffset + b]] * (flip ? flip[b] : 1.)); in updatePointFields_private()
7054 if (clperm) { in updatePointFields_private()
7061 fuse(&a[b], values[clperm[foffset + perm[b]]] * (flip ? flip[perm[b]] : 1.)); in updatePointFields_private()
7069 fuse(&a[b], values[clperm[foffset + b]] * (flip ? flip[b] : 1.)); in updatePointFields_private()
7096 …tscInt comps[], void (*fuse)(PetscScalar *, PetscScalar), const PetscInt clperm[], const PetscScal… in updatePointFieldsBC_private() argument
7113 if (clperm) { in updatePointFieldsBC_private()
7126 … if (ncSet && fcSet) fuse(&a[b], values[clperm[foffset + perm[b]]] * (flip ? flip[perm[b]] : 1.)); in updatePointFieldsBC_private()
7131 fuse(&a[b], values[clperm[foffset + perm[b]]] * (flip ? flip[perm[b]] : 1.)); in updatePointFieldsBC_private()
7148 if (ncSet && fcSet) fuse(&a[b], values[clperm[foffset + b]] * (flip ? flip[b] : 1.)); in updatePointFieldsBC_private()
7153 fuse(&a[b], values[clperm[foffset + b]] * (flip ? flip[b] : 1.)); in updatePointFieldsBC_private()
7300 const PetscInt *clp, *clperm = NULL; in DMPlexVecSetClosure() local
7321 …tscSectionGetClosureInversePermutation_Internal(section, (PetscObject)dm, depth, clsize, &clperm)); in DMPlexVecSetClosure()
7338 …ePointFields_private(section, point, perm, flip, f, insert, PETSC_FALSE, clperm, values, &offset, … in DMPlexVecSetClosure()
7346 …tePointFields_private(section, point, perm, flip, f, insert, PETSC_TRUE, clperm, values, &offset, … in DMPlexVecSetClosure()
7354 …tePointFieldsBC_private(section, point, perm, flip, f, -1, NULL, insert, clperm, values, &offset, … in DMPlexVecSetClosure()
7362 …datePointFields_private(section, point, perm, flip, f, add, PETSC_FALSE, clperm, values, &offset, … in DMPlexVecSetClosure()
7370 …pdatePointFields_private(section, point, perm, flip, f, add, PETSC_TRUE, clperm, values, &offset, … in DMPlexVecSetClosure()
7378 …pdatePointFieldsBC_private(section, point, perm, flip, f, -1, NULL, add, clperm, values, &offset, … in DMPlexVecSetClosure()
7399 …PetscCall(updatePoint_private(section, point, dof, insert, PETSC_FALSE, perm, flip, clperm, values… in DMPlexVecSetClosure()
7408 …PetscCall(updatePoint_private(section, point, dof, insert, PETSC_TRUE, perm, flip, clperm, values,… in DMPlexVecSetClosure()
7417 …PetscCall(updatePointBC_private(section, point, dof, insert, perm, flip, clperm, values, off, arra… in DMPlexVecSetClosure()
7426 …PetscCall(updatePoint_private(section, point, dof, add, PETSC_FALSE, perm, flip, clperm, values, o… in DMPlexVecSetClosure()
7435 …PetscCall(updatePoint_private(section, point, dof, add, PETSC_TRUE, perm, flip, clperm, values, of… in DMPlexVecSetClosure()
7444 …PetscCall(updatePointBC_private(section, point, dof, add, perm, flip, clperm, values, off, array)); in DMPlexVecSetClosure()
8156 const PetscInt *clperm = NULL; in DMPlexGetClosureIndices_Internal() local
8194 …tscSectionGetClosureInversePermutation_Internal(section, (PetscObject)dm, depth, clsize, &clperm)); in DMPlexGetClosureIndices_Internal()
8287 …PlexGetIndicesPointFieldsSplit_Internal(section, idxSection, pnt, offsets, perms, p, clperm, idx)); in DMPlexGetClosureIndices_Internal()
8298 …, isLocal, pnt, idxOff < 0 ? -(idxOff + 1) : idxOff, offsets, PETSC_FALSE, perms, p, clperm, idx)); in DMPlexGetClosureIndices_Internal()
8312 …section, isLocal, pnt, idxOff < 0 ? -(idxOff + 1) : idxOff, &off, PETSC_FALSE, perm, clperm, idx)); in DMPlexGetClosureIndices_Internal()