| /petsc/src/sys/tests/ |
| H A D | ex37.c | 10 size_t sz, fullLength; in main() local 19 PetscCall(PetscFormatConvertGetSize(formatstr, &sz)); in main() 21 PetscCheck(sz == 29, PETSC_COMM_WORLD, PETSC_ERR_PLIB, "Format size %zu should be 29", sz); in main() 23 PetscCheck(sz == 27, PETSC_COMM_WORLD, PETSC_ERR_PLIB, "Format size %zu should be 27", sz); in main() 25 PetscCall(PetscMalloc1(sz, &newformatstr)); in main() 31 PetscCall(PetscSNPrintfCount(buffer, sizeof(buffer), "Test %g %g\n", &sz, 3.33, 2.7)); in main() 33 …tscCheck(sz == fullLength + 1, PETSC_COMM_SELF, PETSC_ERR_PLIB, "PetscSNPrintfCount() count should… in main()
|
| /petsc/src/sys/utils/ |
| H A D | server.c | 20 size_t sz; member 27 size_t sz[3]; member 111 bcastinfo.sz[i] = allocation->sz; in PetscShmgetMapAddresses() 127 size_t sz = 0; in PetscShmgetMapAddresses() local 134 sz = bcastinfo.sz[i]; in PetscShmgetMapAddresses() 144 allocation->sz = sz; in PetscShmgetMapAddresses() 145 allocation->shmid = shmget(allocation->shmkey, allocation->sz, 0666); in PetscShmgetMapAddresses() 146 …shared memory key %d of size %d, see PCMPIServerBegin()", allocation->shmkey, (int)allocation->sz); in PetscShmgetMapAddresses() 273 PetscErrorCode PetscShmgetAllocateArray(size_t sz, size_t asz, void *addr[]) in PetscShmgetAllocateArray() argument 276 …if (!PCMPIServerUseShmget || !PCMPIServerActive || PCMPIServerInSolve) PetscCall(PetscMalloc(sz * … in PetscShmgetAllocateArray() [all …]
|
| /petsc/src/snes/tutorials/ |
| H A D | ex70.c | 254 PetscInt row, start, end, sz, i, j; in StokesSetupMatBlock00() local 270 PetscCall(StokesStencilLaplacian(s, i, j, &sz, cols, vals)); in StokesSetupMatBlock00() 273 for (i = 0; i < sz; i++) cols[i] += s->nx * s->ny; in StokesSetupMatBlock00() 275 for (i = 0; i < sz; i++) vals[i] = -1.0 * vals[i]; /* dynamic viscosity coef mu=-1 */ in StokesSetupMatBlock00() 276 PetscCall(MatSetValues(s->subA[0], 1, &row, sz, cols, vals, INSERT_VALUES)); in StokesSetupMatBlock00() 285 PetscInt row, start, end, sz, i, j; in StokesSetupMatBlock01() local 304 PetscCall(StokesStencilGradientX(s, i, j, &sz, cols, vals)); in StokesSetupMatBlock01() 306 PetscCall(StokesStencilGradientY(s, i, j, &sz, cols, vals)); in StokesSetupMatBlock01() 308 PetscCall(MatSetValues(s->subA[1], 1, &row, sz, cols, vals, INSERT_VALUES)); in StokesSetupMatBlock01() 380 PetscErrorCode StokesStencilLaplacian(Stokes *s, PetscInt i, PetscInt j, PetscInt *sz, PetscInt *co… in StokesStencilLaplacian() argument [all …]
|
| /petsc/src/vec/vec/tutorials/ |
| H A D | ex6.c | 17 PetscInt i, m = 10, sz; in main() local 64 PetscCall(PetscBinaryRead(fd, &sz, 1, NULL, PETSC_INT)); in main() 65 …PetscCheck(sz > 0, PETSC_COMM_SELF, PETSC_ERR_FILE_UNEXPECTED, "Error: Must have array length > 0"… in main() 67 …Printf(PETSC_COMM_SELF, "reading data in binary from input.dat, sz =%" PetscInt_FMT " ...\n", sz)); in main() 68 PetscCall(PetscBinaryRead(fd, avec, sz, NULL, PETSC_SCALAR)); in main()
|
| H A D | ex6f.F90 | 10 PetscInt :: i, sz 71 sz = t(1) 73 PetscCheckA(sz >= 0, PETSC_COMM_SELF, PETSC_ERR_USER, 'Error: Must have array length > 0') 75 write (outstring, '(a,i2.2,a)') 'reading data in binary from input.dat, sz =', sz, ' ...\n' 78 PetscCallA(PetscBinaryRead(fd, avec, sz, PETSC_NULL_INTEGER, PETSC_SCALAR, ierr))
|
| /petsc/src/mat/tests/ |
| H A D | ex92.c | 11 …PetscInt bs = 1, mbs = 10, ov = 1, i, j, k, *rows, *cols, nd = 2, *idx, rstart, rend, sz, M, … in main() local 114 sz = (PetscInt)((0.5 + 0.2 * PetscRealPart(rval)) * mbs); /* 0.5*mbs < sz < 0.7*mbs */ in main() 116 for (j = 0; j < sz; j++) { in main() 121 PetscCall(ISCreateGeneral(PETSC_COMM_SELF, sz * bs, idx, PETSC_COPY_VALUES, is1 + i)); in main() 122 PetscCall(ISCreateGeneral(PETSC_COMM_SELF, sz * bs, idx, PETSC_COPY_VALUES, is2 + i)); in main() 124 …(PetscPrintf(PETSC_COMM_SELF, " [%d] IS sz[%" PetscInt_FMT "]: %" PetscInt_FMT "\n", rank, i, sz)); in main() 128 sz = M; in main() 129 PetscCall(ISCreateStride(PETSC_COMM_SELF, sz, 0, 1, is1 + i)); in main() 130 PetscCall(ISCreateStride(PETSC_COMM_SELF, sz, 0, 1, is2 + i)); in main()
|
| H A D | ex54.c | 8 …PetscInt bs = 1, m = 11, ov = 1, i, j, k, *rows, *cols, nd = 5, *idx, rstart, rend, sz, mm, nn… in main() local 106 sz = (int)(PetscRealPart(rval) * m); in main() 107 for (j = 0; j < sz; j++) { in main() 112 …PetscCall(ISCreateGeneral(PETSC_COMM_SELF, emptynd ? 0 : sz * bs, idx, PETSC_COPY_VALUES, is1 + i)… in main() 113 …PetscCall(ISCreateGeneral(PETSC_COMM_SELF, emptynd ? 0 : sz * bs, idx, PETSC_COPY_VALUES, is2 + i)… in main()
|
| H A D | cJSON.h | 124 void *(CJSON_CDECL *malloc_fn)(size_t sz);
|
| /petsc/src/mat/tutorials/ |
| H A D | ex11f.F90 | 13 PetscMPIInt :: sz, rnk 18 PetscCallMPIA(MPI_Comm_size(PETSC_COMM_WORLD, sz, ierr)) 19 …PetscCheckA(sz == 2, PETSC_COMM_WORLD, PETSC_ERR_WRONG_MPI_SIZE, 'This example is for exactly two …
|
| /petsc/src/mat/impls/aij/seq/ |
| H A D | inode.c | 373 PetscInt i1, i2, nsz, n, sz; in MatMult_SeqAIJ_Inode() local 390 …sz = n; /* No of non zeros in this … in MatMult_SeqAIJ_Inode() 396 for (n = 0; n < sz - 1; n += 2) { in MatMult_SeqAIJ_Inode() 406 if (n == sz - 1) { /* Take care of the last nonzero */ in MatMult_SeqAIJ_Inode() 417 for (n = 0; n < sz - 1; n += 2) { in MatMult_SeqAIJ_Inode() 428 if (n == sz - 1) { in MatMult_SeqAIJ_Inode() 436 idx += sz; in MatMult_SeqAIJ_Inode() 445 for (n = 0; n < sz - 1; n += 2) { in MatMult_SeqAIJ_Inode() 458 if (n == sz - 1) { in MatMult_SeqAIJ_Inode() 468 idx += 2 * sz; in MatMult_SeqAIJ_Inode() [all …]
|
| /petsc/src/sys/fileio/ |
| H A D | mprint.c | 41 size_t sz = 0; in PetscFormatConvertGetSize() local 51 sz += 2; in PetscFormatConvertGetSize() 57 ++sz; in PetscFormatConvertGetSize() 62 sz += 2; in PetscFormatConvertGetSize() 66 sz += 4; in PetscFormatConvertGetSize() 72 ++sz; in PetscFormatConvertGetSize() 74 *size = sz + 1; /* space for NULL character */ in PetscFormatConvertGetSize()
|
| /petsc/src/ts/impls/implicit/glle/ |
| H A D | glleadapt.c | 256 TSGLLEAdapt_Size *sz = (TSGLLEAdapt_Size *)adapt->data; in TSGLLEAdaptChoose_Size() local 264 last_desired_h = sz->desired_h; in TSGLLEAdaptChoose_Size() 265 sz->desired_h = h * PetscMax(dec, PetscMin(inc, optimal)); /* Trim to [dec,inc] */ in TSGLLEAdaptChoose_Size() 268 if (last_desired_h > 1e-14) *next_h = PetscSqrtReal(last_desired_h * sz->desired_h); in TSGLLEAdaptChoose_Size() 269 else *next_h = sz->desired_h; in TSGLLEAdaptChoose_Size()
|
| /petsc/src/dm/impls/da/ |
| H A D | grglvis.c | 38 PetscInt sx, sy, sz, ien, jen, ken; in DMDAGetNumElementsGhosted() local 45 PetscCall(DMDAGetCorners(da, &sx, &sy, &sz, &ien, &jen, &ken)); in DMDAGetNumElementsGhosted() 53 if (!sz && dim > 2) ken--; in DMDAGetNumElementsGhosted() 60 if (sz + ken == P) ken--; in DMDAGetNumElementsGhosted() 97 PetscInt sx, sy, sz, gsx, gsy, gsz, ist, jst, kst, gm, gn, gp; in DMDASampleGLVisFields_Private() local 108 PetscCall(DMDAGetCorners(da, &sx, &sy, &sz, NULL, NULL, NULL)); in DMDASampleGLVisFields_Private() 112 kst = gsz != sz ? 1 : 0; in DMDASampleGLVisFields_Private() 343 PetscInt sx, sy, sz, ie, je, ke, ien, jen, ken, nel; in DMDAView_GLVis_ASCII() local 479 PetscCall(DMDAGetCorners(da, &sx, &sy, &sz, NULL, NULL, NULL)); in DMDAView_GLVis_ASCII() 484 kst = gsz != sz ? 1 : 0; in DMDAView_GLVis_ASCII()
|
| /petsc/src/vec/vec/tutorials/output/ |
| H A D | ex6_1.out | 1 reading data in binary from input.dat, sz =10 ...
|
| /petsc/src/dm/tests/ |
| H A D | ex36.c | 58 PetscInt sx, nx, sy, ny, sz, nz, dim; in DAApplyConformalMapping() local 79 PetscCall(DMDAGetCorners(da, &sx, &sy, &sz, &nx, &ny, &nz)); in DAApplyConformalMapping() 198 PetscInt sx, nx, sy, ny, sz, nz; in DAApplyTrilinearMapping() local 210 PetscCall(DMDAGetCorners(da, &sx, &sy, &sz, &nx, &ny, &nz)); in DAApplyTrilinearMapping() 214 for (k = sz; k < sz + nz; k++) { in DAApplyTrilinearMapping() 280 PetscInt sx, nx, sy, ny, sz, nz; in DADefineXLinearField3D() local 293 PetscCall(DMDAGetCorners(da, &sx, &sy, &sz, &nx, &ny, &nz)); in DADefineXLinearField3D() 295 for (k = sz; k < sz + nz; k++) { in DADefineXLinearField3D()
|
| /petsc/include/petsc/private/ |
| H A D | sfimpl.h | 201 #define PetscSFMalloc(sf, mtype, sz, ptr) ((*(sf)->ops->Malloc)(mtype, sz, ptr)) argument 206 #define PetscSFMalloc(sf, mtype, sz, ptr) PetscMalloc(sz, ptr) argument
|
| H A D | cupmobject.hpp | 78 … PetscTrMalloc = [](std::size_t sz, PetscBool clear, int, const char *, const char *, void **ptr) { in UseCUPMHostAllocGuard() argument 80 PetscCallCUPM(cupmMallocHost(ptr, sz)); in UseCUPMHostAllocGuard() 81 if (clear) std::memset(*ptr, 0, sz); in UseCUPMHostAllocGuard()
|
| /petsc/src/mat/graphops/coarsen/impls/hem/ |
| H A D | hem.c | 268 PetscInt sz = 0; in PetscCDCountAt() local 275 sz++; in PetscCDCountAt() 277 *a_sz = sz; in PetscCDCountAt() 285 PetscInt sz = 0; in PetscCDCount() local 293 sz++; in PetscCDCount() 296 *a_sz = sz; in PetscCDCount() 1148 PetscInt sz, globalsz, MM; in MatCoarsenApply_HEM_private() local 1151 PetscCall(PetscCDCount(agg_llists, &sz)); in MatCoarsenApply_HEM_private() 1152 PetscCallMPI(MPIU_Allreduce(&sz, &globalsz, 1, MPIU_INT, MPI_SUM, comm)); in MatCoarsenApply_HEM_private()
|
| /petsc/src/binding/petsc4py/test/ |
| H A D | test_vec.py | 110 sz = self.vec.getSize() 111 self.assertEqual(self.vec.sum(), (sz - 1) / 2.0 * sz)
|
| /petsc/src/ts/tutorials/ |
| H A D | ex31.c | 52 PetscErrorCode GetSize(const char *p, PetscInt *sz) in GetSize() argument 55 …2a2") || !strcmp(p, "hull1972a3") || !strcmp(p, "hull1972a4") || !strcmp(p, "hull1972a5")) *sz = 1; in GetSize() 56 else if (!strcmp(p, "hull1972b1")) *sz = 2; in GetSize() 57 …2b2") || !strcmp(p, "hull1972b3") || !strcmp(p, "hull1972b4") || !strcmp(p, "hull1972b5")) *sz = 3; in GetSize() 58 else if (!strcmp(p, "kulik2013i")) *sz = 4; in GetSize() 59 …else if (!strcmp(p, "hull1972c1") || !strcmp(p, "hull1972c2") || !strcmp(p, "hull1972c3")) *sz = 1… in GetSize() 60 else if (!strcmp(p, "hull1972c4")) *sz = 52; in GetSize()
|
| /petsc/src/sys/ftn-mod/ |
| H A D | petscsysmod.F90 | 545 PetscInt :: j, sz 546 PetscReal, target :: array(1:sz)
|
| /petsc/src/sys/mpiuni/ |
| H A D | mpi.c | 445 int MPI_Win_allocate_shared(size_t sz, size_t asz, MPI_Info info, MPI_Comm comm, void **addr, MPI_W… in MPI_Win_allocate_shared() argument 447 *win = *addr = malloc(sz); in MPI_Win_allocate_shared()
|
| /petsc/src/vec/is/sf/impls/basic/kokkos/ |
| H A D | sfkok.kokkos.cxx | 368 size_t sz = count * link->unitbytes; in ScatterAndInsert() local 369 deviceBuffer_t dbuf(reinterpret_cast<char *>(dst + dstStart * link->bs), sz); in ScatterAndInsert() 370 deviceConstBuffer_t sbuf(reinterpret_cast<const char *>(src + srcStart * link->bs), sz); in ScatterAndInsert()
|
| /petsc/src/ksp/pc/impls/gamg/ |
| H A D | gamg.c | 860 PetscInt sz; in PCSetUp_GAMG() local 863 sz = nASMBlocksArr[level]; in PCSetUp_GAMG() 868 if (!sz) { in PCSetUp_GAMG() 875 PetscCall(PCASMSetLocalSubdomains(subpc, sz, iss, NULL)); in PCSetUp_GAMG() 876 for (kk = 0; kk < sz; kk++) PetscCall(ISDestroy(&iss[kk])); in PCSetUp_GAMG()
|
| /petsc/src/dm/impls/plex/ |
| H A D | plexfem.c | 4634 …umCells, cStart, cEnd, numChunks, chunkSize, chunk, totDim, totDimAux = 0, sz, wsz, off = 0, offCe… in DMPlexComputeJacobian_Patch_Internal() local 4695 u = X ? (sz = chunkSize * totDim, off += sz, work + off - sz) : NULL; in DMPlexComputeJacobian_Patch_Internal() 4696 u_t = X_t ? (sz = chunkSize * totDim, off += sz, work + off - sz) : NULL; in DMPlexComputeJacobian_Patch_Internal() 4697 a = dmAux ? (sz = chunkSize * totDimAux, off += sz, work + off - sz) : NULL; in DMPlexComputeJacobian_Patch_Internal() 4698 elemMat = hasJac ? (sz = chunkSize * totDim * totDim, off += sz, work + off - sz) : NULL; in DMPlexComputeJacobian_Patch_Internal() 4699 elemMatP = hasPrec ? (sz = chunkSize * totDim * totDim, off += sz, work + off - sz) : NULL; in DMPlexComputeJacobian_Patch_Internal() 4700 elemMatD = hasDyn ? (sz = chunkSize * totDim * totDim, off += sz, work + off - sz) : NULL; in DMPlexComputeJacobian_Patch_Internal()
|