| /petsc/src/sys/ftn-src/ |
| H A D | f90_fwrap.F90 | 178 PetscInt start2, len2
179 PetscScalar, target :: array(start1:start1 + len1 - 1, start2:start2 + len2 - 1)
189 PetscInt start2, len2
190 PetscReal, target :: array(start1:start1 + len1 - 1, start2:start2 + len2 - 1)
200 PetscInt start2, len2
201 PetscInt, target :: array(start1:start1 + len1 - 1, start2:start2 + len2 - 1)
211 PetscInt start2, len2
212 PetscFortranAddr, target :: array(start1:start1 + len1 - 1, start2:start2 + len2 - 1)
224 PetscInt start1, start2
227 start2 = lbound(ptr, 2)
[all …]
|
| /petsc/src/sys/ftn-custom/ |
| H A D | f90_cwrap.c | 284 …void *array, MPI_Datatype type, PetscInt start1, PetscInt len1, PetscInt start2, PetscInt len2, F9… in F90Array2dCreate() argument
288 f90array2dcreatescalar_(array, &start1, &len1, &start2, &len2, ptr PETSC_F90_2PTR_PARAM(ptrd)); in F90Array2dCreate()
290 f90array2dcreatereal_(array, &start1, &len1, &start2, &len2, ptr PETSC_F90_2PTR_PARAM(ptrd)); in F90Array2dCreate()
292 f90array2dcreateint_(array, &start1, &len1, &start2, &len2, ptr PETSC_F90_2PTR_PARAM(ptrd)); in F90Array2dCreate()
294 …f90array2dcreatefortranaddr_(array, &start1, &len1, &start2, &len2, ptr PETSC_F90_2PTR_PARAM(ptrd)… in F90Array2dCreate()
370 …void *array, MPI_Datatype type, PetscInt start1, PetscInt len1, PetscInt start2, PetscInt len2, Pe… in F90Array3dCreate() argument
374 …f90array3dcreatescalar_(array, &start1, &len1, &start2, &len2, &start3, &len3, ptr PETSC_F90_2PTR_… in F90Array3dCreate()
376 …f90array3dcreatereal_(array, &start1, &len1, &start2, &len2, &start3, &len3, ptr PETSC_F90_2PTR_PA… in F90Array3dCreate()
378 …f90array3dcreateint_(array, &start1, &len1, &start2, &len2, &start3, &len3, ptr PETSC_F90_2PTR_PAR… in F90Array3dCreate()
380 …f90array3dcreatefortranaddr_(array, &start1, &len1, &start2, &len2, &start3, &len3, ptr PETSC_F90_… in F90Array3dCreate()
[all …]
|
| /petsc/src/dm/impls/stag/ |
| H A D | stag3d.c | 1068 const PetscInt start2 = nNeighbors[neighbor][2] - ghostOffsetStart[2]; in DMStagSetUpBuildScatter_3d() local
1078 …st, epFaceRow, globalOffsets[stag->neighbors[neighbor]], start0, start1, start2, startGhost0, star… in DMStagSetUpBuildScatter_3d()
1089 const PetscInt start2 = nNeighbors[neighbor][2] - ghostOffsetStart[2]; in DMStagSetUpBuildScatter_3d() local
1099 …st, epFaceRow, globalOffsets[stag->neighbors[neighbor]], start0, start1, start2, startGhost0, star… in DMStagSetUpBuildScatter_3d()
1110 const PetscInt start2 = nNeighbors[neighbor][2] - ghostOffsetStart[2]; in DMStagSetUpBuildScatter_3d() local
1120 …st, epFaceRow, globalOffsets[stag->neighbors[neighbor]], start0, start1, start2, startGhost0, star… in DMStagSetUpBuildScatter_3d()
1131 const PetscInt start2 = nNeighbors[neighbor][2] - ghostOffsetStart[2]; in DMStagSetUpBuildScatter_3d() local
1141 …st, epFaceRow, globalOffsets[stag->neighbors[neighbor]], start0, start1, start2, startGhost0, star… in DMStagSetUpBuildScatter_3d()
1152 const PetscInt start2 = nNeighbors[neighbor][2] - ghostOffsetStart[2]; in DMStagSetUpBuildScatter_3d() local
1162 …st, epFaceRow, globalOffsets[stag->neighbors[neighbor]], start0, start1, start2, startGhost0, star… in DMStagSetUpBuildScatter_3d()
[all …]
|
| /petsc/src/tao/unconstrained/tutorials/ |
| H A D | minsurf2.c | 807 PetscInt start2 = -1, i, j; in MSA_InitialPoint() local
813 PetscCall(PetscOptionsGetInt(NULL, NULL, "-random", &start2, &flg2)); in MSA_InitialPoint()
817 } else if (flg2 && start2 > 0) { /* Try a random start between -0.5 and 0.5 */ in MSA_InitialPoint()
|