Home
last modified time | relevance | path

Searched refs:PetscRealPart (Results 1 – 25 of 402) sorted by relevance

12345678910>>...17

/petsc/src/sys/tests/
H A Dex25.c77 …(PetscPrintf(PETSC_COMM_WORLD, "abs(%f) = %f\n", (double)PetscRealPart(a), (double)PetscRealPart(b… in main()
79 …(PetscPrintf(PETSC_COMM_WORLD, "arg(%f) = %f\n", (double)PetscRealPart(a), (double)PetscRealPart(b… in main()
81 …PetscPrintf(PETSC_COMM_WORLD, "conj(%f) = %f\n", (double)PetscRealPart(a), (double)PetscRealPart(b… in main()
84 …PetscPrintf(PETSC_COMM_WORLD, "sqrt(%f) = %f\n", (double)PetscRealPart(a), (double)PetscRealPart(b… in main()
87 …SC_COMM_WORLD, "pow(%f,%f) = %f\n", (double)PetscRealPart(a), (double)PetscRealPart(c), (double)Pe… in main()
89 …(PetscPrintf(PETSC_COMM_WORLD, "exp(%f) = %f\n", (double)PetscRealPart(a), (double)PetscRealPart(b… in main()
91 …(PetscPrintf(PETSC_COMM_WORLD, "log(%f) = %f\n", (double)PetscRealPart(a), (double)PetscRealPart(b… in main()
94 …(PetscPrintf(PETSC_COMM_WORLD, "sin(%f) = %f\n", (double)PetscRealPart(a), (double)PetscRealPart(b… in main()
96 …(PetscPrintf(PETSC_COMM_WORLD, "cos(%f) = %f\n", (double)PetscRealPart(a), (double)PetscRealPart(b… in main()
98 …(PetscPrintf(PETSC_COMM_WORLD, "tan(%f) = %f\n", (double)PetscRealPart(a), (double)PetscRealPart(b… in main()
[all …]
/petsc/src/tao/util/
H A Dtao_util.c84 xval = PetscRealPart(x[i]); in VecFischer()
85 fval = PetscRealPart(f[i]); in VecFischer()
86 lval = PetscRealPart(l[i]); in VecFischer()
87 uval = PetscRealPart(u[i]); in VecFischer()
182 xval = PetscRealPart(*x++); in VecSFischer()
183 fval = PetscRealPart(*f++); in VecSFischer()
184 lval = PetscRealPart(*l++); in VecSFischer()
185 uval = PetscRealPart(*u++); in VecSFischer()
271 …if (PetscRealPart(l[i]) > PETSC_NINFINITY && PetscAbsScalar(x[i] - l[i]) <= PETSC_MACHINE_EPSILON)… in MatDFischer()
276 …if (PetscRealPart(u[i]) < PETSC_INFINITY && PetscAbsScalar(u[i] - x[i]) <= PETSC_MACHINE_EPSILON) { in MatDFischer()
[all …]
/petsc/src/ts/tutorials/phasefield/
H A Dbiharmonic.c260 …if (PetscRealPart(x[i]) < -1.0 + 2.0 * tol) f[i] += (.25 * theta / (tol - tol * tol)) * (x[i - 1] … in FormFunction()
261 …else if (PetscRealPart(x[i]) > 1.0 - 2.0 * tol) f[i] += (.25 * theta / (tol - tol * tol)) * (x[i -… in FormFunction()
266 …if (PetscRealPart(x[i]) < -1.0 + 2.0 * tol) f[i] += -1.0 * a * .25 * (x[i + 1] - x[i - 1]) * (x[i … in FormFunction()
267 …else if (PetscRealPart(x[i]) > 1.0 - 2.0 * tol) f[i] += 1.0 * a * .25 * (x[i + 1] - x[i - 1]) * (x… in FormFunction()
274 …if (PetscRealPart(x[i]) < -1.0 + 2.0 * tol) f[i] += (.25 * theta / (tol - tol * tol)) * (x[i - 1] … in FormFunction()
275 …else if (PetscRealPart(x[i]) > 1.0 - 2.0 * tol) f[i] += (.25 * theta / (tol - tol * tol)) * (x[i -… in FormFunction()
280 …if (PetscRealPart(x[i]) < -1.0 + 2.0 * tol) f[i] += -1.0 * a * .25 * (x[i + 1] - x[i - 1]) * (x[i … in FormFunction()
281 …else if (PetscRealPart(x[i]) > 1.0 - 2.0 * tol) f[i] += 1.0 * a * .25 * (x[i + 1] - x[i - 1]) * (x… in FormFunction()
512 …if (ctx->degenerate) yy[0] = PetscRealPart(.25 * (1. - u[i] * u[i]) * ctx->kappa * (u[i - 1] - u[i… in MyMonitor()
513 … else yy[0] = PetscRealPart(.25 * ctx->kappa * (u[i - 1] - u[i + 1]) * (u[i - 1] - u[i + 1]) * sx); in MyMonitor()
[all …]
/petsc/src/snes/impls/vi/
H A Dvi.c118 …PetscRealPart(x[i]) > PetscRealPart(xl[i]) + zerotolerance || (PetscRealPart(f[i]) <= 0.0)) && ((P… in SNESMonitorVI()
119 …else if (PetscRealPart(x[i]) <= PetscRealPart(xl[i]) + zerotolerance && PetscRealPart(f[i]) > 0.0)… in SNESMonitorVI()
120 …else if (PetscRealPart(x[i]) >= PetscRealPart(xu[i]) - zerotolerance && PetscRealPart(f[i]) < 0.0)… in SNESMonitorVI()
125 if (PetscRealPart(x[i]) <= PetscRealPart(xl[i]) + zerotolerance) act_bound[0]++; in SNESMonitorVI()
126 else if (PetscRealPart(x[i]) >= PetscRealPart(xu[i]) - zerotolerance) act_bound[1]++; in SNESMonitorVI()
248 if (PetscRealPart(x[i]) < PetscRealPart(xl[i])) x[i] = xl[i]; in SNESVIProjectOntoBounds()
249 else if (PetscRealPart(x[i]) > PetscRealPart(xu[i])) x[i] = xu[i]; in SNESVIProjectOntoBounds()
288 …PetscRealPart(x[i]) > PetscRealPart(xl[i]) + zerotolerance || (PetscRealPart(f[i]) <= 0.0)) && ((P… in SNESVIGetActiveSetIS()
295 …PetscRealPart(x[i]) > PetscRealPart(xl[i]) + zerotolerance || (PetscRealPart(f[i]) <= 0.0)) && ((P… in SNESVIGetActiveSetIS()
339 …PetscRealPart(x[i]) > PetscRealPart(xl[i]) + zerotolerance || (PetscRealPart(f[i]) <= 0.0)) && ((P… in SNESVIComputeInactiveSetFnorm()
[all …]
/petsc/src/vec/vec/utils/
H A Dprojection.c116 if (PetscRealPart(v1[i]) < PetscRealPart(v2[i])) { in VecWhichLessThan()
182 if (PetscRealPart(v1[i]) > PetscRealPart(v2[i])) { in VecWhichGreaterThan()
258 …if (PetscRealPart(v1[i]) < PetscRealPart(vmiddle[i]) && PetscRealPart(vmiddle[i]) < PetscRealPart(… in VecWhichBetween()
326 …if (PetscRealPart(v1[i]) <= PetscRealPart(vmiddle[i]) && PetscRealPart(vmiddle[i]) <= PetscRealPar… in VecWhichBetweenOrEqual()
421 … if (PetscRealPart(v1[i]) < PetscRealPart(v[i]) && PetscRealPart(v[i]) < PetscRealPart(v2[i])) { in VecWhichInactive()
424 } else if (PetscRealPart(v1[i]) == PetscRealPart(v[i]) && PetscRealPart(d[i]) < 0) { in VecWhichInactive()
427 } else if (PetscRealPart(v2[i]) == PetscRealPart(v[i]) && PetscRealPart(d[i]) > 0) { in VecWhichInactive()
434 … if (PetscRealPart(v1[i]) < PetscRealPart(v[i]) && PetscRealPart(v[i]) < PetscRealPart(v2[i])) { in VecWhichInactive()
437 } else if (PetscRealPart(v1[i]) == PetscRealPart(v[i]) && PetscRealPart(d[i]) <= 0) { in VecWhichInactive()
440 } else if (PetscRealPart(v2[i]) == PetscRealPart(v[i]) && PetscRealPart(d[i]) >= 0) { in VecWhichInactive()
[all …]
/petsc/src/dm/impls/stag/tests/
H A Dex7.c45 …COMM_SELF, "[%d] Unexpected value %g (expecting %g)\n", rank, (double)PetscRealPart(a1[k][j][i][d]… in main()
69 …] Unexpected value %g (expecting %g)\n", rank, (double)PetscRealPart(a[i]), (double)PetscRealPart(… in main()
92 …e %g (expecting %g)\n", rank, i, j, k, d, (double)PetscRealPart(a2[k][j][i][d]), (double)PetscReal… in main()
101 …e %g (expecting %g)\n", rank, i, j, k, d, (double)PetscRealPart(a2[k][j][i][d]), (double)PetscReal… in main()
110 …e %g (expecting %g)\n", rank, i, j, k, d, (double)PetscRealPart(a2[k][j][i][d]), (double)PetscReal… in main()
119 …e %g (expecting %g)\n", rank, i, j, k, d, (double)PetscRealPart(a2[k][j][i][d]), (double)PetscReal… in main()
128 …e %g (expecting %g)\n", rank, i, j, k, d, (double)PetscRealPart(a2[k][j][i][d]), (double)PetscReal… in main()
137 …e %g (expecting %g)\n", rank, i, j, k, d, (double)PetscRealPart(a2[k][j][i][d]), (double)PetscReal… in main()
146 …e %g (expecting %g)\n", rank, i, j, k, d, (double)PetscRealPart(a2[k][j][i][d]), (double)PetscReal… in main()
155 …e %g (expecting %g)\n", rank, i, j, k, d, (double)PetscRealPart(a2[k][j][i][d]), (double)PetscReal… in main()
H A Dex10.c43 …COMM_SELF, "[%d] Unexpected value %g (expecting %g)\n", rank, (double)PetscRealPart(a1[j][i][d]), … in main()
64 …] Unexpected value %g (expecting %g)\n", rank, (double)PetscRealPart(a[i]), (double)PetscRealPart(… in main()
84 … value %g (expecting %g)\n", rank, i, j, d, (double)PetscRealPart(a2[j][i][d]), (double)PetscRealP… in main()
93 … value %g (expecting %g)\n", rank, i, j, d, (double)PetscRealPart(a2[j][i][d]), (double)PetscRealP… in main()
102 … value %g (expecting %g)\n", rank, i, j, d, (double)PetscRealPart(a2[j][i][d]), (double)PetscRealP… in main()
111 … value %g (expecting %g)\n", rank, i, j, d, (double)PetscRealPart(a2[j][i][d]), (double)PetscRealP… in main()
/petsc/src/ts/tests/
H A Dex13.c70 …(reconstructed %g)\n", (double)testtime, (double)PetscRealPart(func(p, testtime)), (double)PetscRe… in main()
71 …reconstructed %g)\n", (double)testtime, (double)PetscRealPart(dfunc(p, testtime)), (double)PetscRe… in main()
85 …(reconstructed %g)\n", (double)testtime, (double)PetscRealPart(func(p, testtime)), (double)PetscRe… in main()
96 …reconstructed %g)\n", (double)testtime, (double)PetscRealPart(dfunc(p, testtime)), (double)PetscRe… in main()
109 …(reconstructed %g)\n", (double)testtime, (double)PetscRealPart(func(p, testtime)), (double)PetscRe… in main()
110 …reconstructed %g)\n", (double)testtime, (double)PetscRealPart(dfunc(p, testtime)), (double)PetscRe… in main()
149 …(reconstructed %g)\n", (double)testtime, (double)PetscRealPart(func(p, testtime)), (double)PetscRe… in main()
156 …reconstructed %g)\n", (double)testtime, (double)PetscRealPart(dfunc(p, testtime)), (double)PetscRe… in main()
/petsc/src/ksp/pc/impls/gamg/
H A Dclassical.c113 if (PetscRealPart(-rval[c]) > rmax && rcol[c] != r) rmax = PetscRealPart(-rval[c]); in PCGAMGCreateGraph_Classical()
121 … if (PetscRealPart(-rval[c]) > gamg->threshold[0] * PetscRealPart(Amax[r - s]) || rcol[c] == r) { in PCGAMGCreateGraph_Classical()
146 … if (PetscRealPart(-rval[c]) > gamg->threshold[0] * PetscRealPart(Amax[r - s]) || rcol[c] == r) { in PCGAMGCreateGraph_Classical()
261 …if ((PetscRealPart(-rval[j]) > Amax_neg[i - fs]) && i != rcol[j]) Amax_neg[i - fs] = PetscAbsScala… in PCGAMGProlongator_Classical_Direct()
262 …if ((PetscRealPart(rval[j]) > Amax_pos[i - fs]) && i != rcol[j]) Amax_pos[i - fs] = PetscAbsScalar… in PCGAMGProlongator_Classical_Direct()
282 …if (lcid[col] >= 0 && (PetscRealPart(rval[j]) > gamg->threshold[0] * Amax_pos[i] || PetscRealPart(… in PCGAMGProlongator_Classical_Direct()
290 …if (gcid[col] >= 0 && (PetscRealPart(rval[j]) > gamg->threshold[0] * Amax_pos[i] || PetscRealPart(… in PCGAMGProlongator_Classical_Direct()
324 …if (lcid[col] >= 0 && (PetscRealPart(rval[j]) > gamg->threshold[0] * Amax_pos[i] || PetscRealPart(… in PCGAMGProlongator_Classical_Direct()
325 if (PetscRealPart(rval[j]) > 0.) { in PCGAMGProlongator_Classical_Direct()
332 if (PetscRealPart(rval[j]) > 0.) { in PCGAMGProlongator_Classical_Direct()
[all …]
/petsc/src/snes/tutorials/
H A Dex64.c18 const PetscReal mu = PetscRealPart(constants[0]); in u_1()
34 const PetscReal mu = PetscRealPart(constants[0]); in Ju_1_u1u1()
47 const PetscReal lam = PetscRealPart(constants[1]); in p_0()
48 const PetscReal alpha = PetscRealPart(constants[2]); in p_0()
61 const PetscReal lam = PetscRealPart(constants[1]); in Jp_0_p0p0()
68 const PetscReal mu = PetscRealPart(constants[0]); in pJp_0_p0p0()
75 const PetscReal lam = PetscRealPart(constants[1]); in Jp_0_p0w0()
76 const PetscReal alpha = PetscRealPart(constants[2]); in Jp_0_p0w0()
83 const PetscReal lam = PetscRealPart(constants[1]); in w_0()
84 const PetscReal alpha = PetscRealPart(constants[2]); in w_0()
[all …]
H A Dex5.c172 PetscReal x = PetscRealPart(c->x), y = PetscRealPart(c->y); in MMSSolution1()
181 PetscReal x = PetscRealPart(c->x), y = PetscRealPart(c->y); in MMSForcing1()
190 PetscReal x = PetscRealPart(c->x), y = PetscRealPart(c->y); in MMSSolution2()
199 PetscReal x = PetscRealPart(c->x), y = PetscRealPart(c->y); in MMSForcing2()
208 PetscReal x = PetscRealPart(c->x), y = PetscRealPart(c->y); in MMSSolution3()
217 PetscReal x = PetscRealPart(c->x), y = PetscRealPart(c->y); in MMSForcing3()
228 PetscReal x = PetscRealPart(c->x), y = PetscRealPart(c->y); in MMSSolution4()
238 PetscReal x = PetscRealPart(c->x), y = PetscRealPart(c->y); in MMSForcing4()
339 lobj += PetscRealPart((hydhx + hxdhy) * x[j][i] * x[j][i]); in FormObjectiveLocal()
357 lobj += PetscRealPart(0.5 * (uxux + uyuy) - sc * PetscExpScalar(u)); in FormObjectiveLocal()
[all …]
H A Dex55.c131 PetscReal x = PetscRealPart(c->x), y = PetscRealPart(c->y); in MMSSolution1()
138 PetscReal x = PetscRealPart(c->x), y = PetscRealPart(c->y); in MMSForcing1()
145 PetscReal x = PetscRealPart(c->x), y = PetscRealPart(c->y); in MMSSolution2()
152 PetscReal x = PetscRealPart(c->x), y = PetscRealPart(c->y); in MMSForcing2()
159 PetscReal x = PetscRealPart(c->x), y = PetscRealPart(c->y); in MMSSolution3()
166 PetscReal x = PetscRealPart(c->x), y = PetscRealPart(c->y); in MMSForcing3()
175 PetscReal x = PetscRealPart(c->x), y = PetscRealPart(c->y); in MMSSolution4()
183 PetscReal x = PetscRealPart(c->x), y = PetscRealPart(c->y); in MMSForcing4()
282 lobj += PetscRealPart((hydhx + hxdhy) * x[j][i] * x[j][i]); in FormObjectiveLocal()
300 lobj += PetscRealPart(0.5 * (uxux + uyuy) - sc * PetscExpScalar(u)); in FormObjectiveLocal()
[all …]
/petsc/src/vec/vec/utils/tagger/impls/
H A Drelative.c33 …bxs[j].min = PetscCMPLX(PetscMin(PetscRealPart(bxs[j].min), PetscRealPart(vArray[k])), PetscMin(Pe… in VecTaggerComputeBoxes_Relative()
34 …bxs[j].max = PetscCMPLX(PetscMax(PetscRealPart(bxs[j].max), PetscRealPart(vArray[k])), PetscMax(Pe… in VecTaggerComputeBoxes_Relative()
48 …bxs[i].min = mins + PetscCMPLX(PetscRealPart(smpl->box[i].min) * PetscRealPart(difs), PetscImagina… in VecTaggerComputeBoxes_Relative()
49 …bxs[i].max = mins + PetscCMPLX(PetscRealPart(smpl->box[i].max) * PetscRealPart(difs), PetscImagina… in VecTaggerComputeBoxes_Relative()
H A Dandor.c170 …PetscRealPart(superBox[i].min) > PetscRealPart(subBox[i].min) || PetscImaginaryPart(superBox[i].mi… in VecTaggerAndOrIsSubBox_Private()
196 PetscReal maxMinReal = PetscMax(PetscRealPart(a[i].min), PetscRealPart(b[i].min)); in VecTaggerAndOrIntersect_Private()
198 PetscReal minMaxReal = PetscMin(PetscRealPart(a[i].max), PetscRealPart(b[i].max)); in VecTaggerAndOrIntersect_Private()
203 … if ((PetscRealPart(c[i].max - c[i].min) < 0.) || (PetscImaginaryPart(c[i].max - c[i].min) < 0.)) { in VecTaggerAndOrIntersect_Private()
/petsc/src/dm/tutorials/
H A Dex2.c98 live_neighbors += PetscRealPart(x[j - 1][i - 1]) > 0; in main()
99 live_neighbors += PetscRealPart(x[j - 1][i]) > 0; in main()
100 live_neighbors += PetscRealPart(x[j - 1][i + 1]) > 0; in main()
101 live_neighbors += PetscRealPart(x[j][i - 1]) > 0; in main()
102 live_neighbors += PetscRealPart(x[j][i + 1]) > 0; in main()
103 live_neighbors += PetscRealPart(x[j + 1][i - 1]) > 0; in main()
104 live_neighbors += PetscRealPart(x[j + 1][i]) > 0; in main()
105 live_neighbors += PetscRealPart(x[j + 1][i + 1]) > 0; in main()
106 if (PetscRealPart(x[j][i]) > 0) { /* Live cell */ in main()
/petsc/src/ts/tutorials/
H A Dex11.h34 #define PetscRealPart(a) a macro
190 for (i = 0; i < 1 + dim; i++) uLreal.vals[i] = PetscRealPart(xL[i]); in PhysicsRiemann_SW_Rusanov()
191 for (i = 0; i < 1 + dim; i++) uRreal.vals[i] = PetscRealPart(xR[i]); in PhysicsRiemann_SW_Rusanov()
290 for (i = 0; i < 1 + dim; i++) uLreal.vals[i] = PetscRealPart(xL[i]); in PhysicsRiemann_SW_HLL()
291 for (i = 0; i < 1 + dim; i++) uRreal.vals[i] = PetscRealPart(xR[i]); in PhysicsRiemann_SW_HLL()
383 if (PetscRealPart(*test) > 0.) goto L10; in cvmgp_()
396 if (PetscRealPart(*test) < 0.) goto L10; in cvmgm_()
441 *pstar = PetscMax(PetscRealPart(*pstar), PetscRealPart(smallp)); in riem1mdt()
451 if (PetscRealPart(*pr) < PetscRealPart(*pl)) { in riem1mdt()
452 if (PetscRealPart(durl) >= PetscRealPart(rarepr1)) { in riem1mdt()
[all …]
/petsc/src/sys/classes/random/impls/sprng/
H A Dsprng.c21 …*val = PetscRealPart(r->width) * sprng() + PetscRealPart(r->low) + (PetscImaginaryPart(r->width) *… in PetscRandomGetValue_Sprng()
36 if (r->iset) *val = PetscRealPart(r->width) * sprng() + PetscRealPart(r->low); in PetscRandomGetValueReal_Sprng()
/petsc/src/sys/classes/random/impls/rand/
H A Drand.c15 …if (r->iset) *val = PetscRealPart(r->width) * RAND_WRAP + PetscRealPart(r->low) + (PetscImaginaryP… in PetscRandomGetValue_Rand()
28 if (r->iset) *val = PetscRealPart(r->width) * RAND_WRAP + PetscRealPart(r->low); in PetscRandomGetValueReal_Rand()
/petsc/src/sys/classes/random/impls/rand48/
H A Drand48.c16 …*val = PetscRealPart(r->width) * (PetscReal)drand48() + PetscRealPart(r->low) + (PetscImaginaryPar… in PetscRandomGetValue_Rand48()
31 if (r->iset) *val = PetscRealPart(r->width) * drand48() + PetscRealPart(r->low); in PetscRandomGetValueReal_Rand48()
/petsc/src/ksp/pc/impls/svd/
H A Dsvd.c102 if (PetscRealPart(d[i]) > jac->zerosing) break; in PCSetUp_SVD()
106 … " of %" PetscInt_FMT " singular values are (nearly) zero\n", (double)PetscRealPart(d[0] / d[n - 1… in PCSetUp_SVD()
114 PetscCall(PetscViewerASCIIPrintf(jac->monitor, " %14.12e", (double)PetscRealPart(d[i]))); in PCSetUp_SVD()
118 …ble)PetscRealPart(d[n - 1]), (double)PetscRealPart(d[n - 2]), (double)PetscRealPart(d[n - 3]), (do… in PCSetUp_SVD()
119 …n", (double)PetscRealPart(d[4]), (double)PetscRealPart(d[3]), (double)PetscRealPart(d[2]), (double… in PCSetUp_SVD()
123 …d smallest singular values %14.12e %14.12e\n", (double)PetscRealPart(d[0]), (double)PetscRealPart(… in PCSetUp_SVD()
/petsc/src/sys/classes/random/tutorials/
H A Dex1.c35 …ETSC_COMM_SELF, "[%d] value[%" PetscInt_FMT "] = %6.4e\n", rank, i, (double)PetscRealPart(value))); in main()
36 values[i] = (PetscInt)(n * PetscRealPart(value) + 2.0); in main()
39 …Call(PetscPrintf(PETSC_COMM_SELF, "[%d] Average value %6.4e\n", rank, (double)PetscRealPart(avg))); in main()
49 values[i] = (PetscInt)(n * PetscRealPart(value) + 2.0); in main()
/petsc/src/sys/classes/random/impls/curand/
H A Dcurand2.cu18 rl = PetscRealPart(low); in complexscalelw()
20 rw = PetscRealPart(width); in complexscalelw()
54 PetscReal rl = PetscRealPart(r->low); in PetscRandomCurandScale_Private()
55 PetscReal rw = PetscRealPart(r->width); in PetscRandomCurandScale_Private()
/petsc/src/vec/vec/tutorials/
H A Dex13.c42 …PetscCall(PetscPrintf(PETSC_COMM_WORLD, "Sum of entire vector: %g\n", (double)PetscRealPart(sum))); in main()
45 PetscCall(PetscPrintf(PETSC_COMM_WORLD, "Sum of sub-vector 0: %g\n", (double)PetscRealPart(sum))); in main()
48 PetscCall(PetscPrintf(PETSC_COMM_WORLD, "Sum of sub-vector 1: %g\n", (double)PetscRealPart(sum))); in main()
/petsc/src/sys/classes/random/impls/random123/
H A Drandom123.c73 re = re * PetscRealPart(r->width) + PetscRealPart(r->low); in PetscRandomGetValue_Random123()
94 if (r->iset) rreal = rreal * PetscRealPart(r->width) + PetscRealPart(r->low); in PetscRandomGetValueReal_Random123()
118 scale *= PetscRealPart(r->width); in PetscRandomGetValuesReal_Random123()
119 shift *= PetscRealPart(r->width); in PetscRandomGetValuesReal_Random123()
120 shift += PetscRealPart(r->low); in PetscRandomGetValuesReal_Random123()
/petsc/src/mat/graphops/coarsen/impls/hem/
H A Dhem.c513 …for (PetscInt kk = 0; kk < num_ghosts; kk++) lghost_matched[kk] = (PetscBool)(PetscRealPart(buf[kk… in MatCoarsenApply_HEM_private()
523 …for (PetscInt kk = 0; kk < num_ghosts; kk++) lghost_pe[kk] = (PetscMPIInt)PetscRealPart(buf[kk]); … in MatCoarsenApply_HEM_private()
537 … for (PetscInt kk = 0; kk < num_ghosts; kk++) lghost_gid[kk] = (PetscInt)PetscRealPart(buf[kk]); in MatCoarsenApply_HEM_private()
564 if ((tt = PetscRealPart(ap[jj])) > threshold && lidj != lid) { in MatCoarsenApply_HEM_private()
575 if ((tt = PetscRealPart(ap[jj])) > threshold) { in MatCoarsenApply_HEM_private()
612 …for (PetscInt kk = 0; kk < num_ghosts; kk++) lghost_max_pe[kk] = (PetscMPIInt)PetscRealPart(buf[kk… in MatCoarsenApply_HEM_private()
619 …for (PetscInt kk = 0; kk < nloc; kk++) lid_max_pe[kk] = (PetscMPIInt)PetscRealPart(buf[kk]); // th… in MatCoarsenApply_HEM_private()
636 if ((tt = PetscRealPart(ap[jj])) > threshold && lidj != lid) { in MatCoarsenApply_HEM_private()
652 if ((tt = PetscRealPart(ap[jj])) > threshold) { in MatCoarsenApply_HEM_private()
696 …PetscRealPart(lid_max_ew[lid0]) >= e->weight - MY_MEPS, PETSC_COMM_SELF, PETSC_ERR_SUP, "edge weig… in MatCoarsenApply_HEM_private()
[all …]

12345678910>>...17