Searched refs:pJ (Results 1 – 5 of 5) sorted by relevance
| /petsc/src/dm/impls/plex/tutorials/ |
| H A D | ex3f90.F90 | 29 PetscReal, pointer :: pJ(:)
47 pJ => J
67 PetscCallA(DMPlexComputeCellGeometryAffineFEM(dm, i, pv0, pJ, pinvJ, detJ, ierr))
|
| /petsc/src/dm/impls/plex/ |
| H A D | plexdd.c | 312 Mat pJ; in DMCreateNeumannOverlap_Plex() local
358 PetscCall(DMCreateMatrix(odm, &pJ)); in DMCreateNeumannOverlap_Plex()
359 PetscCall(MatISGetLocalMat(pJ, J)); in DMCreateNeumannOverlap_Plex()
363 PetscCall(MatISGetLocalToGlobalMapping(pJ, &l2g, NULL)); in DMCreateNeumannOverlap_Plex()
368 PetscCall(PetscObjectCompose((PetscObject)*ovl, "_DM_Overlap_HPDDM_MATIS", (PetscObject)pJ)); in DMCreateNeumannOverlap_Plex()
370 PetscCall(MatDestroy(&pJ)); in DMCreateNeumannOverlap_Plex()
|
| /petsc/src/snes/utils/ |
| H A D | dmplexsnes.c | 663 Mat pJ; in MatComputeNeumannOverlap_Plex() local
671 PetscCall(PetscObjectQuery((PetscObject)ovl, "_DM_Overlap_HPDDM_MATIS", (PetscObject *)&pJ)); in MatComputeNeumannOverlap_Plex()
672 PetscCheck(pJ, PETSC_COMM_SELF, PETSC_ERR_PLIB, "Missing overlapping Mat"); in MatComputeNeumannOverlap_Plex()
675 PetscCall(MatGetDM(pJ, &ovldm)); in MatComputeNeumannOverlap_Plex()
693 PetscCallBack("SNES callback Jacobian", (*J)(snes, X, pJ, pJ, ctx)); in MatComputeNeumannOverlap_Plex()
700 PetscCall(MatISGetLocalMat(pJ, &locpJ)); in MatComputeNeumannOverlap_Plex()
|
| /petsc/src/mat/impls/aij/seq/ |
| H A D | matptap.c | 193 PetscInt *ai = a->i, *aj = a->j, *apj, *apjdense, *pi = p->i, *pj = p->j, *pJ = p->j, *pjj; in MatPtAPNumeric_SeqAIJ_SeqAIJ_SparseAxpy() local
250 crow = *pJ++; in MatPtAPNumeric_SeqAIJ_SeqAIJ_SparseAxpy()
|
| /petsc/src/mat/impls/maij/ |
| H A D | maij.c | 591 const PetscInt *ai = a->i, *aj = a->j, *pi = p->i, *pj = p->j, *pJ, *pjj; in MatPtAPNumeric_SeqAIJ_SeqMAIJ() local
639 pJ = pj + poffset; in MatPtAPNumeric_SeqAIJ_SeqMAIJ()
642 crow = (*pJ) * ppdof + pshift; in MatPtAPNumeric_SeqAIJ_SeqMAIJ()
645 pJ++; in MatPtAPNumeric_SeqAIJ_SeqMAIJ()
|