| /petsc/src/sys/classes/bag/ |
| H A D | bag.c | 72 item->msize = 1; in PetscBagRegisterEnum()
97 PetscErrorCode PetscBagRegisterIntArray(PetscBag bag, void *addr, PetscInt msize, const char *name,… in PetscBagRegisterIntArray() argument
102 PetscInt i, tmp = msize; in PetscBagRegisterIntArray()
115 …for (i = 0; i < msize; i++) PetscCall((*PetscHelpPrintf)(bag->bagcomm, "%" PetscInt_FMT " ", *((Pe… in PetscBagRegisterIntArray()
125 item->msize = msize; in PetscBagRegisterIntArray()
148 PetscErrorCode PetscBagRegisterRealArray(PetscBag bag, void *addr, PetscInt msize, const char *name… in PetscBagRegisterRealArray() argument
153 PetscInt i, tmp = msize; in PetscBagRegisterRealArray()
166 …for (i = 0; i < msize; i++) PetscCall((*PetscHelpPrintf)(bag->bagcomm, "%g ", (double)(*((PetscRea… in PetscBagRegisterRealArray()
176 item->msize = msize; in PetscBagRegisterRealArray()
222 item->msize = 1; in PetscBagRegisterInt()
[all …]
|
| /petsc/src/mat/utils/ |
| H A D | isltog.c | 7 PetscInt msize, *pidxs, c = 0; in MatCreateFromISLocalToGlobalMapping() local
20 PetscCall(ISLocalToGlobalMappingGetSize(lgmap, &msize)); in MatCreateFromISLocalToGlobalMapping()
21 PetscCall(PetscMalloc1(msize, &pidxs)); in MatCreateFromISLocalToGlobalMapping()
22 for (PetscInt i = 0; i < msize; i++) in MatCreateFromISLocalToGlobalMapping()
25 msize = c; in MatCreateFromISLocalToGlobalMapping()
37 PetscCall(VecSetSizes(lv, msize, PETSC_DECIDE)); in MatCreateFromISLocalToGlobalMapping()
39 … PetscCall(ISCreateGeneral(PetscObjectComm((PetscObject)A), msize, pidxs, PETSC_USE_POINTER, &is)); in MatCreateFromISLocalToGlobalMapping()
60 PetscCall(MatSetSizes(*P, msize, cols ? lac : lar, PETSC_DECIDE, PETSC_DECIDE)); in MatCreateFromISLocalToGlobalMapping()
67 …for (PetscInt i = 0; i < msize; i++) PetscCall(MatSetValue(*P, i + rst, pidxs[i], 1.0, INSERT_VALU… in MatCreateFromISLocalToGlobalMapping()
|
| /petsc/src/snes/impls/ngmres/ |
| H A D | snesngmres.c | 13 PetscCall(VecDestroyVecs(ngmres->msize, &ngmres->Fdot)); in SNESReset_NGMRES()
14 PetscCall(VecDestroyVecs(ngmres->msize, &ngmres->Xdot)); in SNESReset_NGMRES()
42 PetscInt msize, hsize; in SNESSetUp_NGMRES() local
55 if (!ngmres->Xdot) PetscCall(VecDuplicateVecs(snes->vec_sol, ngmres->msize, &ngmres->Xdot)); in SNESSetUp_NGMRES()
56 if (!ngmres->Fdot) PetscCall(VecDuplicateVecs(snes->vec_sol, ngmres->msize, &ngmres->Fdot)); in SNESSetUp_NGMRES()
58 msize = ngmres->msize; /* restart size */ in SNESSetUp_NGMRES()
59 hsize = msize * msize; in SNESSetUp_NGMRES()
62 …PetscCall(PetscCalloc4(hsize, &ngmres->h, msize, &ngmres->beta, msize, &ngmres->xi, hsize, &ngmres… in SNESSetUp_NGMRES()
63 PetscCall(PetscMalloc3(msize, &ngmres->xnorms, msize, &ngmres->fnorms, msize, &ngmres->s)); in SNESSetUp_NGMRES()
65 PetscCall(PetscBLASIntCast(msize, &ngmres->lda)); in SNESSetUp_NGMRES()
[all …]
|
| H A D | snesngmres.h | 8 PetscInt msize; /* maximum size of krylov space */ member
60 #define H(i, j) ngmres->h[i * ngmres->msize + j]
61 #define Q(i, j) ngmres->q[i * ngmres->msize + j]
|
| H A D | anderson.c | 10 …tionsInt("-snes_anderson_m", "Number of directions", "SNES", ngmres->msize, &ngmres->msize, NULL)); in SNESSetFromOptions_Anderson()
120 ivec = k_restart % ngmres->msize; in SNESSolve_Anderson()
144 if (l < ngmres->msize) l++; in SNESSolve_Anderson()
217 ngmres->msize = 30; in SNESCreate_Anderson()
|
| /petsc/src/vec/is/sf/utils/ |
| H A D | sfcoord.c | 121 PetscMPIInt size, *ranks_needed, num_ranks, msize; in PetscSFSetGraphFromCoordinates() local
138 PetscCall(PetscMPIIntCast(2 * dim, &msize)); in PetscSFSetGraphFromCoordinates()
139 PetscCallMPI(MPI_Allgather(bbox, msize, MPIU_REAL, bboxes, msize, MPIU_REAL, comm)); in PetscSFSetGraphFromCoordinates()
164 PetscCall(PetscMPIIntCast(dim, &msize)); in PetscSFSetGraphFromCoordinates()
165 PetscCallMPI(MPI_Type_contiguous(msize, MPIU_REAL, &unit)); in PetscSFSetGraphFromCoordinates()
|
| /petsc/share/petsc/matlab/ |
| H A D | PetscBagRead.m | 21 msize = read(fd,1,'int32'); variable
24 val = read(fd,msize,'int32');
26 val = read(fd,msize,'double');
28 val = deblank(char(read(fd,msize,'uchar')'));
|
| /petsc/include/petsc/private/ |
| H A D | bagimpl.h | 11 PetscInt msize; member
|
| /petsc/src/sys/tests/ |
| H A D | ex64.cxx | 205 const auto msize = map.size(); in check_size_capacity_coherent() local
209 …p, msize == map.size(), PETSC_COMM_SELF, PETSC_ERR_PLIB, "Map size appears to change each time it … in check_size_capacity_coherent()
211 MapCheck(map, msize >= 0, PETSC_COMM_SELF, PETSC_ERR_PLIB, "Map size %zu unexpected!", msize); in check_size_capacity_coherent()
213 …MapCheck(map, mcap >= msize, PETSC_COMM_SELF, PETSC_ERR_PLIB, "Map capacity %zu < map size %zu!", … in check_size_capacity_coherent()
|