| /petsc/src/vec/is/ao/impls/mapping/ |
| H A D | aomapping.c | 53 PetscInt low, high, mid = 0; in AOPetscToApplication_Mapping() local 68 high = N - 1; in AOPetscToApplication_Mapping() 69 while (low <= high) { in AOPetscToApplication_Mapping() 70 mid = (low + high) / 2; in AOPetscToApplication_Mapping() 72 else if (idex < petsc[mid]) high = mid - 1; in AOPetscToApplication_Mapping() 75 if (low > high) ia[i] = -1; in AOPetscToApplication_Mapping() 88 PetscInt low, high, mid = 0; in AOApplicationToPetsc_Mapping() local 103 high = N - 1; in AOApplicationToPetsc_Mapping() 104 while (low <= high) { in AOApplicationToPetsc_Mapping() 105 mid = (low + high) / 2; in AOApplicationToPetsc_Mapping() [all …]
|
| /petsc/src/sys/classes/random/interface/ |
| H A D | random.c | 188 PetscErrorCode PetscRandomGetInterval(PetscRandom r, PetscScalar *low, PetscScalar *high) in PetscRandomGetInterval() argument 196 if (high) { in PetscRandomGetInterval() 197 PetscAssertPointer(high, 3); in PetscRandomGetInterval() 198 *high = r->low + r->width; in PetscRandomGetInterval() 223 PetscErrorCode PetscRandomSetInterval(PetscRandom r, PetscScalar low, PetscScalar high) in PetscRandomSetInterval() argument 228 …PetscCheck(PetscRealPart(low) <= PetscRealPart(high), PETSC_COMM_SELF, PETSC_ERR_ARG_OUTOFRANGE, "… in PetscRandomSetInterval() 229 …PetscCheck(PetscImaginaryPart(low) <= PetscImaginaryPart(high), PETSC_COMM_SELF, PETSC_ERR_ARG_OUT… in PetscRandomSetInterval() 231 …PetscCheck(low < high, PETSC_COMM_SELF, PETSC_ERR_ARG_OUTOFRANGE, "only low <= high: Instead %g %g… in PetscRandomSetInterval() 234 r->width = high - low; in PetscRandomSetInterval()
|
| H A D | randomc.c | 183 PetscScalar low, high; in PetscRandomSetFromOptions() local 184 PetscCall(PetscRandomGetInterval(rnd, &low, &high)); in PetscRandomSetFromOptions() 186 high = high - PetscImaginaryPart(high); in PetscRandomSetFromOptions() 187 PetscCall(PetscRandomSetInterval(rnd, low, high)); in PetscRandomSetFromOptions()
|
| /petsc/src/vec/vec/tests/ |
| H A D | ex51.c | 24 PetscInt low, high; /* used to store vecownership output */ in main() local 64 PetscCall(VecGetOwnershipRange(testvec, &low, &high)); in main() 67 issize = high - low; in main() 68 } else if (low <= skipuntil && high >= skipuntil) { in main() 70 issize = high - skipuntil; in main()
|
| H A D | ex50.c | 16 PetscInt i, low, high, ldim, iglobal; in main() local 32 PetscCall(VecGetOwnershipRange(u, &low, &high)); in main()
|
| H A D | ex17.c | 8 PetscInt n = 5, N, low, high, iglobal, i; in main() local 32 PetscCall(VecGetOwnershipRange(y, &low, &high)); in main()
|
| H A D | ex25.c | 8 PetscInt n = 5, N, low, high, iglobal, i; in main() local 41 PetscCall(VecGetOwnershipRange(y, &low, &high)); in main()
|
| /petsc/src/sys/utils/ |
| H A D | mpishm.c | 149 PetscMPIInt low, high, t, i; in PetscShmCommGlobalToLocal() local 161 high = pshmcomm->shmsize; in PetscShmCommGlobalToLocal() 162 while (high - low > 5) { in PetscShmCommGlobalToLocal() 163 t = (low + high) / 2; in PetscShmCommGlobalToLocal() 164 if (pshmcomm->globranks[t] > grank) high = t; in PetscShmCommGlobalToLocal() 167 for (i = low; i < high; i++) { in PetscShmCommGlobalToLocal()
|
| /petsc/src/tao/matrix/ |
| H A D | adamat.c | 151 PetscInt i, m, n, low, high; in MatADAComputeDiagonal() local 157 PetscCall(MatGetOwnershipRange(mat, &low, &high)); in MatADAComputeDiagonal() 169 for (i = low; i < high; i++) dptr[i - low] = dtemp[i]; in MatADAComputeDiagonal() 190 PetscInt low, high; in MatCreateSubMatrix_ADA() local 202 PetscCall(MatGetOwnershipRange(ctx->A, &low, &high)); in MatCreateSubMatrix_ADA() 203 PetscCall(ISCreateStride(PetscObjectComm((PetscObject)mat), high - low, low, 1, &ISrow)); in MatCreateSubMatrix_ADA() 245 PetscInt low, high; in MatGetColumnVector_ADA() local 250 PetscCall(VecGetOwnershipRange(Y, &low, &high)); in MatGetColumnVector_ADA() 251 if (col >= low && col < high) PetscCall(VecSetValue(Y, col, one, INSERT_VALUES)); in MatGetColumnVector_ADA() 276 PetscInt i, j, low, high, m, n, M, N; in MatConvert_ADA() local [all …]
|
| /petsc/src/sys/classes/draw/utils/ |
| H A D | axis.c | 30 PetscErrorCode PetscADefTicks(PetscReal low, PetscReal high, int num, int *ntick, PetscReal *ticklo… in PetscADefTicks() argument 36 PetscCall(PetscAGetBase(low, high, num, &base, &power)); in PetscADefTicks() 45 while (i < maxtick && x <= high + eps) { in PetscADefTicks() 50 tickloc[i - 1] = PetscMin(tickloc[i - 1], high); in PetscADefTicks() 52 if (i < 2 && num < 10) PetscCall(PetscADefTicks(low, high, num + 1, ntick, tickloc, maxtick)); in PetscADefTicks()
|
| /petsc/src/vec/is/sf/tests/ |
| H A D | ex9.c | 10 PetscInt i, n, N = 20, low, high; in main() local 59 PetscCall(VecGetOwnershipRange(x, &low, &high)); in main() 60 for (i = low; i < high; i++) { in main() 100 PetscCall(VecGetOwnershipRange(yg, &low, &high)); /* low, high are global indices */ in main() 101 PetscCall(ISCreateStride(PETSC_COMM_SELF, high - low, low, 1, &ix)); in main() 194 PetscCall(VecGetOwnershipRange(x, &low, &high)); in main() 197 for (i = low; i < high; i++) { in main() 236 PetscCall(VecGetOwnershipRange(xg, &low, &high)); /* low, high are global indices of xg */ in main() 237 PetscCall(ISCreateStride(PETSC_COMM_SELF, high - low, low, 1, &ix)); in main() 364 PetscInt n, N = 15, xstart, ystart, low, high; in main() local [all …]
|
| H A D | ex8.c | 6 PetscInt i, N = 10, n = PETSC_DECIDE, low, high, onlylocal = -1; in main() local 24 PetscCall(VecGetOwnershipRange(x, &low, &high)); in main() 32 for (i = low; i < high; i++) PetscCall(VecSetValue(x, i, (PetscScalar)i, INSERT_VALUES)); in main() 66 for (i = low; i < high; i++) PetscCall(VecSetValue(x, i, (PetscScalar)i, INSERT_VALUES)); in main()
|
| H A D | ex7.c | 6 PetscInt i, bs, n, low, high; in main() local 21 PetscCall(VecGetOwnershipRange(x, &low, &high)); in main() 22 for (i = low; i < high; i++) PetscCall(VecSetValue(x, i, (PetscScalar)i, INSERT_VALUES)); in main()
|
| H A D | ex3.c | 9 PetscInt i, N = 10, low, high, nleaves; in main() local 46 PetscCall(VecGetOwnershipRange(x, &low, &high)); in main() 47 for (i = low; i < high; i++) PetscCall(VecSetValue(x, i, (PetscScalar)i + 1.0, INSERT_VALUES)); in main() 102 for (i = low; i < high; i++) PetscCall(VecSetValue(x, i, (PetscScalar)i + 1.0, INSERT_VALUES)); in main() 166 PetscCall(VecGetOwnershipRange(x, &low, &high)); in main() 167 for (i = low; i < high; i++) PetscCall(VecSetValue(x, i, (PetscScalar)i + 1.0, INSERT_VALUES)); in main()
|
| H A D | ex14.c | 7 PetscInt i, j, low, high, n = 256, N, errors, tot_errors; in main() local 35 PetscCall(VecGetOwnershipRange(x, &low, &high)); in main() 48 ix[1] = (rank != nproc - 1) ? high : 0; in main() 108 ix[1] = (rank != nproc - 1) ? high / bs : 0; in main()
|
| /petsc/src/tao/util/ |
| H A D | tao_util.c | 53 PetscInt low[5], high[5], n, i; in VecFischer() local 67 PetscCall(VecGetOwnershipRange(X, low, high)); in VecFischer() 68 PetscCall(VecGetOwnershipRange(F, low + 1, high + 1)); in VecFischer() 69 PetscCall(VecGetOwnershipRange(L, low + 2, high + 2)); in VecFischer() 70 PetscCall(VecGetOwnershipRange(U, low + 3, high + 3)); in VecFischer() 71 PetscCall(VecGetOwnershipRange(FB, low + 4, high + 4)); in VecFischer() 73 …for (i = 1; i < 4; ++i) PetscCheck(low[0] == low[i] && high[0] == high[i], PETSC_COMM_SELF, PETSC_… in VecFischer() 156 PetscInt low[5], high[5], n, i; in VecSFischer() local 165 PetscCall(VecGetOwnershipRange(X, low, high)); in VecSFischer() 166 PetscCall(VecGetOwnershipRange(F, low + 1, high + 1)); in VecSFischer() [all …]
|
| /petsc/src/vec/vec/utils/ |
| H A D | projection.c | 26 PetscInt n, low, high; in VecWhichEqual() local 36 PetscCall(VecGetOwnershipRange(Vec1, &low, &high)); in VecWhichEqual() 92 PetscInt n, low, high; in VecWhichLessThan() local 102 PetscCall(VecGetOwnershipRange(Vec1, &low, &high)); in VecWhichLessThan() 158 PetscInt n, low, high; in VecWhichGreaterThan() local 168 PetscCall(VecGetOwnershipRange(Vec1, &low, &high)); in VecWhichGreaterThan() 225 PetscInt n, low, high; in VecWhichBetween() local 238 PetscCall(VecGetOwnershipRange(VecLow, &low, &high)); in VecWhichBetween() 293 PetscInt n, low, high; in VecWhichBetweenOrEqual() local 306 PetscCall(VecGetOwnershipRange(VecLow, &low, &high)); in VecWhichBetweenOrEqual() [all …]
|
| /petsc/src/snes/tutorials/ |
| H A D | ex73f90t.F90 | 144 PetscInt row, i, j, ione, low, high 156 PetscCall(VecGetOwnershipRange(X1, low, high, ierr)) 158 do row = low, high - 1 248 PetscInt ione, ifive, low, high, ii 264 PetscCall(VecGetOwnershipRange(X1, low, high, ierr)) 268 do irow = low, high - 1 372 PetscInt i, j, low, high, ii, ione, irow, row(1) 379 PetscCall(VecGetOwnershipRange(X1, low, high, ierr)) 383 do irow = low, high - 1 430 PetscInt col(1), low, high, lamlow, lamhigh [all …]
|
| /petsc/src/mat/impls/sell/seq/ |
| H A D | sell.h | 125 …ine MatSetValue_SeqSELL_Private(A, row, col, value, addv, orow, ocol, cp, vp, lastcol, low, high) \ argument 130 else high = a->rlen[row]; \ 132 while (high - low > 5) { \ 133 t = (low + high) / 2; \ 134 if (*(cp + a->sliceheight * t) > col) high = t; \ 137 for (_i = low; _i < high; _i++) { \ 193 high++; \
|
| /petsc/src/vec/vec/tutorials/ |
| H A D | ex15.c | 15 int i, m = 10, rank, size, low, high, ldim, iglobal; in main() local 32 PetscCall(VecGetOwnershipRange(u, &low, &high)); in main()
|
| H A D | ex5.c | 12 PetscInt i, m = 10, low, high, ldim, iglobal; in main() local 32 PetscCall(VecGetOwnershipRange(u, &low, &high)); in main()
|
| /petsc/src/ts/adapt/interface/ |
| H A D | tsadapt.c | 552 PetscErrorCode TSAdaptSetClip(TSAdapt adapt, PetscReal low, PetscReal high) in TSAdaptSetClip() argument 557 PetscValidLogicalCollectiveReal(adapt, high, 3); in TSAdaptSetClip() 560 …k(high == (PetscReal)PETSC_CURRENT || high >= 1, PETSC_COMM_SELF, PETSC_ERR_ARG_OUTOFRANGE, "Incre… in TSAdaptSetClip() 562 if (high != (PetscReal)PETSC_CURRENT) adapt->clip[1] = high; in TSAdaptSetClip() 582 PetscErrorCode TSAdaptGetClip(TSAdapt adapt, PetscReal *low, PetscReal *high) in TSAdaptGetClip() argument 587 if (high) PetscAssertPointer(high, 3); in TSAdaptGetClip() 589 if (high) *high = adapt->clip[1]; in TSAdaptGetClip()
|
| /petsc/src/tao/unconstrained/impls/owlqn/ |
| H A D | owlqn.c | 12 PetscInt low, high, low1, high1, i; in ProjDirect_OWLQN() local 15 PetscCall(VecGetOwnershipRange(d, &low, &high)); in ProjDirect_OWLQN() 20 for (i = 0; i < high - low; i++) { in ProjDirect_OWLQN() 32 PetscInt low, high, low1, high1, i; in ComputePseudoGrad_OWLQN() local 35 PetscCall(VecGetOwnershipRange(x, &low, &high)); in ComputePseudoGrad_OWLQN() 40 for (i = 0; i < high - low; i++) { in ComputePseudoGrad_OWLQN()
|
| /petsc/src/tao/interface/ |
| H A D | fdiff.c | 54 PetscInt low, high, N, i; in TaoDefaultComputeGradient() local 63 PetscCall(VecGetOwnershipRange(X, &low, &high)); in TaoDefaultComputeGradient() 78 if (i >= low && i < high) g[i - low] = (f2 - f) / (2.0 * h); in TaoDefaultComputeGradient()
|
| /petsc/src/sys/yaml/src/ |
| H A D | reader.c | 194 int low, high; in yaml_parser_update_buffer() local 299 high = (parser->encoding == YAML_UTF16LE_ENCODING ? 1 : 0); in yaml_parser_update_buffer() 342 + (parser->raw_buffer.pointer[high] << 8); in yaml_parser_update_buffer() 372 + (parser->raw_buffer.pointer[high+2] << 8); in yaml_parser_update_buffer()
|