| /petsc/src/vec/is/utils/ftn-custom/ |
| H A D | zvsectionisf.c | 18 …ection, PetscInt *numPoints, PetscInt *points, PetscInt ***perms, PetscScalar ***rots, int *__ierr) in petscsectiongetpointsyms_() argument
20 …nGetPointSyms(section, *numPoints, points, (const PetscInt ***)perms, (const PetscScalar ***)rots); in petscsectiongetpointsyms_()
22 …ection, PetscInt *numPoints, PetscInt *points, PetscInt ***perms, PetscScalar ***rots, int *__ierr) in petscsectionrestorepointsyms_() argument
24 …torePointSyms(section, *numPoints, points, (const PetscInt ***)perms, (const PetscScalar ***)rots); in petscsectionrestorepointsyms_()
26 …*field, PetscInt *numPoints, PetscInt *points, PetscInt ***perms, PetscScalar ***rots, int *__ierr) in petscsectiongetfieldpointsyms_() argument
28 …tSyms(section, *field, *numPoints, points, (const PetscInt ***)perms, (const PetscScalar ***)rots); in petscsectiongetfieldpointsyms_()
30 …*field, PetscInt *numPoints, PetscInt *points, PetscInt ***perms, PetscScalar ***rots, int *__ierr) in petscsectionrestorefieldpointsyms_() argument
32 …tSyms(section, *field, *numPoints, points, (const PetscInt ***)perms, (const PetscScalar ***)rots); in petscsectionrestorefieldpointsyms_()
|
| /petsc/src/dm/label/ftn-custom/ |
| H A D | zdmlabel.c | 11 …rient, PetscInt *maxOrient, PetscCopyMode *mode, PetscInt **perms, PetscScalar **rots, int *__ierr) in petscsectionsymlabelsetstratum_() argument
13 …ratum, *size, *minOrient, *maxOrient, *mode, (const PetscInt **)perms, (const PetscScalar **)rots); in petscsectionsymlabelsetstratum_()
|
| /petsc/src/dm/label/ |
| H A D | dmlabel.c | 2668 const PetscScalar ***rots; member
2683 if (sl->rots[i]) PetscCall(PetscFree(sl->rots[i][j])); in PetscSectionSymLabelReset()
2690 if (sl->rots[i]) { in PetscSectionSymLabelReset()
2691 const PetscScalar **rots = &sl->rots[i][sl->minMaxOrients[i][0]]; in PetscSectionSymLabelReset() local
2693 PetscCall(PetscFree(rots)); in PetscSectionSymLabelReset()
2697 PetscCall(PetscFree5(sl->modes, sl->sizes, sl->perms, sl->rots, sl->minMaxOrients)); in PetscSectionSymLabelReset()
2742 if (!(sl->perms[i] || sl->rots[i])) { in PetscSectionSymView_Label()
2751 if (!((sl->perms[i] && sl->perms[i][j]) || (sl->rots[i] && sl->rots[i][j]))) { in PetscSectionSymView_Label()
2766 if (sl->rots[i] && sl->rots[i][j]) { in PetscSectionSymView_Label()
2770 …tf(viewer, " %+g+i*%+g", (double)PetscRealPart(sl->rots[i][j][k]), (double)PetscImaginaryPart(sl->… in PetscSectionSymView_Label()
[all …]
|
| /petsc/src/vec/is/section/interface/ |
| H A D | section.c | 3551 PetscScalar **rots = (PetscScalar **)link->rots; in PetscSectionSymDestroy() local
3552 PetscCall(PetscFree2(perms, rots)); in PetscSectionSymDestroy()
3755 …on, PetscInt numPoints, const PetscInt *points, const PetscInt ***perms, const PetscScalar ***rots) in PetscSectionGetPointSyms() argument
3763 if (rots) *rots = NULL; in PetscSectionGetPointSyms()
3765 if (sym && (perms || rots)) { in PetscSectionGetPointSyms()
3776 PetscScalar **rots = (PetscScalar **)link->rots; in PetscSectionGetPointSyms() local
3777 PetscCall(PetscFree2(perms, rots)); in PetscSectionGetPointSyms()
3778 …Call(PetscMalloc2(numPoints, (PetscInt ***)&link->perms, numPoints, (PetscScalar ***)&link->rots)); in PetscSectionGetPointSyms()
3784 PetscCall(PetscArrayzero((PetscInt **)link->rots, numPoints)); in PetscSectionGetPointSyms()
3785 PetscUseTypeMethod(sym, getpoints, section, numPoints, points, link->perms, link->rots); in PetscSectionGetPointSyms()
[all …]
|
| /petsc/include/petsc/private/ |
| H A D | sectionimpl.h | 69 const PetscScalar **rots; member
|
| /petsc/src/dm/impls/plex/ |
| H A D | plexsfc.c | 382 const PetscScalar **rots; in DMPlexOrientFieldPointVec() local
385 PetscCall(PetscSectionGetFieldPointSyms(section, field, 1, point_ornt, &perms, &rots)); in DMPlexOrientFieldPointVec()
395 if (rots[0]) V_arr[off + perms[0][i]] *= rots[0][i]; in DMPlexOrientFieldPointVec()
398 PetscCall(PetscSectionRestoreFieldPointSyms(section, field, 1, point_ornt, &perms, &rots)); in DMPlexOrientFieldPointVec()
|