Home
last modified time | relevance | path

Searched refs:rval (Results 1 – 25 of 32) sorted by relevance

12

/petsc/src/mat/tests/
H A Dex48.c10 PetscScalar rval, vals1[4], vals2[4]; in main() local
37 PetscCall(PetscRandomGetValue(rdm, &rval)); in main()
38 col = PetscMin(M - 1, (PetscInt)(PetscRealPart(rval) * M)); in main()
39 PetscCall(MatSetValues(A, 1, &row, 1, &col, &rval, INSERT_VALUES)); in main()
40 PetscCall(MatSetValues(B, 1, &row, 1, &col, &rval, INSERT_VALUES)); in main()
46 PetscCall(PetscRandomGetValue(rdm, &rval)); in main()
47 cols[0] = PetscMin(M - 1, (PetscInt)(PetscRealPart(rval) * M)); in main()
48 vals1[0] = rval; in main()
49 PetscCall(PetscRandomGetValue(rdm, &rval)); in main()
50 cols[1] = PetscMin(M - 1, (PetscInt)(PetscRealPart(rval) * M)); in main()
[all …]
H A Dex51.c9 PetscScalar *vals, rval; in main() local
40 PetscCall(PetscRandomGetValue(rdm, &rval)); in main()
41 cols[0] = bs * (int)(PetscRealPart(rval) * m); in main()
42 PetscCall(PetscRandomGetValue(rdm, &rval)); in main()
43 rows[0] = bs * (int)(PetscRealPart(rval) * m); in main()
45 PetscCall(PetscRandomGetValue(rdm, &rval)); in main()
46 if (PetscRealPart(rval) > .5) rows[nr++] = rows[0] + j - 1; in main()
49 PetscCall(PetscRandomGetValue(rdm, &rval)); in main()
50 if (PetscRealPart(rval) > .5) cols[nc++] = cols[0] + j - 1; in main()
54 PetscCall(PetscRandomGetValue(rdm, &rval)); in main()
[all …]
H A Dex54.c10 PetscScalar *vals, rval; in main() local
62 PetscCall(PetscRandomGetValue(rdm, &rval)); in main()
63 cols[0] = bs * (int)(PetscRealPart(rval) * Mbs); in main()
64 PetscCall(PetscRandomGetValue(rdm, &rval)); in main()
65 rows[0] = rstart + bs * (int)(PetscRealPart(rval) * m); in main()
67 PetscCall(PetscRandomGetValue(rdm, &rval)); in main()
68 if (PetscRealPart(rval) > .5) rows[nr++] = rows[0] + j - 1; in main()
71 PetscCall(PetscRandomGetValue(rdm, &rval)); in main()
72 if (PetscRealPart(rval) > .5) cols[nc++] = cols[0] + j - 1; in main()
76 PetscCall(PetscRandomGetValue(rdm, &rval)); in main()
[all …]
H A Dex238.c10 PetscScalar rval, *vals; in main() local
32 PetscCall(PetscRandomGetValue(rdm, &rval)); in main()
33 col = (PetscInt)(PetscRealPart(rval) * m); in main()
36 PetscCall(PetscRandomGetValue(rdm, &rval)); in main()
37 vals[k * bs + l] = rval; in main()
H A Dex92.c12 PetscScalar *vals, rval, one = 1.0; in main() local
65 PetscCall(PetscRandomGetValue(rand, &rval)); in main()
66 cols[0] = bs * (PetscInt)(PetscRealPart(rval) * Mbs); in main()
67 PetscCall(PetscRandomGetValue(rand, &rval)); in main()
68 rows[0] = rstart + bs * (PetscInt)(PetscRealPart(rval) * mbs); in main()
75 PetscCall(PetscRandomGetValue(rand, &rval)); in main()
76 vals[j] = rval; in main()
113 PetscCall(PetscRandomGetValue(rand, &rval)); in main()
114 sz = (PetscInt)((0.5 + 0.2 * PetscRealPart(rval)) * mbs); /* 0.5*mbs < sz < 0.7*mbs */ in main()
117 PetscCall(PetscRandomGetValue(rand, &rval)); in main()
[all …]
H A Dex91.c10 PetscScalar *vals, rval, one = 1.0; in main() local
50 PetscCall(PetscRandomGetValue(rand, &rval)); in main()
51 cols[0] = bs * (int)(PetscRealPart(rval) * m); in main()
52 PetscCall(PetscRandomGetValue(rand, &rval)); in main()
53 rows[0] = bs * (int)(PetscRealPart(rval) * m); in main()
60 PetscCall(PetscRandomGetValue(rand, &rval)); in main()
61 vals[j] = rval; in main()
107 PetscCall(PetscRandomGetValue(rand, &rval)); in main()
108 size = (int)(PetscRealPart(rval) * m); in main()
110 PetscCall(PetscRandomGetValue(rand, &rval)); in main()
[all …]
H A Dex145.c10 PetscScalar *v, *barray, rval; in main() local
51 PetscCall(PetscRandomGetValue(rand, &rval)); in main()
52 v[i * ncols + j] = rval; in main()
83 PetscCall(PetscRandomGetValue(rand, &rval)); in main()
84 v[i * ncols + j] = rval; in main()
106 PetscCall(PetscRandomGetValue(rand, &rval)); in main()
107 barray[j] = rval; in main()
141 rval = 100.0; in main()
142 PetscCall(MatSetValues(Aher, 1, &i, 1, &i, &rval, ADD_VALUES)); in main()
H A Dex245.c10 PetscScalar *v, *barray, rval; in main() local
50 PetscCall(PetscRandomGetValue(rand, &rval)); in main()
51 v[i * ncols + j] = rval; in main()
82 PetscCall(PetscRandomGetValue(rand, &rval)); in main()
83 v[i * ncols + j] = rval; in main()
105 PetscCall(PetscRandomGetValue(rand, &rval)); in main()
106 barray[j] = rval; in main()
H A Dex47.c16 PetscScalar rval; in main() local
82 PetscCall(PetscRandomGetValue(r, &rval)); in main()
83 row = (int)(rval * m); in main()
H A Dex163.c14 PetscScalar *Barray, *Carray, rval, *array; in main() local
63 PetscCall(PetscRandomGetValue(rand, &rval)); in main()
64 array[m * j + i] = rval; in main()
H A Dex39.c39 PetscScalar rval; in main() local
44 PetscCall(PetscRandomGetValue(rand, &rval)); in main()
45 v[i * ncols + j] = rval; in main()
H A Dex104.c19 PetscScalar *v, rval; in main() local
52 PetscCall(PetscRandomGetValue(r, &rval)); in main()
53 v[i * ncols + j] = rval; in main()
H A Dex94.c34 PetscScalar *a, rval, alpha, none = -1.0; in main() local
196 PetscCall(PetscRandomGetValue(rdm, &rval)); in main()
197 idxn[j] = (PetscInt)(PetscRealPart(rval) * PN); in main()
283 PetscCall(PetscRandomGetValue(rdm, &rval)); in main()
284 idxn[j] = (PetscInt)(PetscRealPart(rval) * PN); in main()
H A Dex62.c32 PetscScalar *a, rval, alpha; in main() local
155 PetscCall(PetscRandomGetValue(rdm, &rval)); in main()
156 idxn[j] = (PetscInt)(PetscRealPart(rval) * PN); in main()
H A Dex129.c154 PetscScalar *array, rval; in ComputeRHSMatrix() local
167 PetscCall(PetscRandomGetValue(rand, &rval)); in ComputeRHSMatrix()
168 array[i] = rval; in ComputeRHSMatrix()
/petsc/src/ksp/pc/impls/gamg/
H A Dclassical.c87 const PetscScalar *rval; in PCGAMGCreateGraph_Classical() local
111 PetscCall(MatGetRow(A, r, &ncols, &rcol, &rval)); in PCGAMGCreateGraph_Classical()
113 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()
129 PetscCall(MatRestoreRow(A, r, &ncols, &rcol, &rval)); in PCGAMGCreateGraph_Classical()
142 PetscCall(MatGetRow(A, r, &ncols, &rcol, &rval)); in PCGAMGCreateGraph_Classical()
146 … if (PetscRealPart(-rval[c]) > gamg->threshold[0] * PetscRealPart(Amax[r - s]) || rcol[c] == r) { in PCGAMGCreateGraph_Classical()
148 gval[idx] = rval[c]; in PCGAMGCreateGraph_Classical()
153 PetscCall(MatRestoreRow(A, r, &ncols, &rcol, &rval)); in PCGAMGCreateGraph_Classical()
196 const PetscScalar *rval; in PCGAMGProlongator_Classical_Direct() local
[all …]
/petsc/include/
H A Dpetscdmmoab.h20 …efine MBERR(msg, rval) PetscCheck(rval == moab::MB_SUCCESS, PETSC_COMM_SELF, PETSC_ERR_LIB, "MOAB … argument
21 #define MBERRNM(rval) PetscCheck(rval == moab::MB_SUCCESS, PETSC_COMM_SELF, PETSC_ERR_LIB, "MOAB… argument
22 #define MBERRV(mbif, rval) \ argument
24 if (rval != moab::MB_SUCCESS) { \
27 …SETERRQ(PETSC_COMM_SELF, PETSC_ERR_LIB, "MOAB ERROR (%i): %s", (PetscErrorCode)rval, emsg.c_str())…
30 #define MBERRVM(mbif, msg, rval) \ argument
32 if (rval != moab::MB_SUCCESS) { \
35 …SETERRQ(PETSC_COMM_SELF, PETSC_ERR_LIB, "MOAB ERROR (%i): %s :: %s", (PetscErrorCode)rval, msg, em…
/petsc/src/dm/impls/plex/tests/
H A Dex99.c63 PetscReal rval; in CheckIntegral() local
70 rval = PetscRealPart(result); in CheckIntegral()
71 if (integral > 0 && PetscAbsReal(integral - rval) > tol) { in CheckIntegral()
72 … actual value (error %g > %g tol)\n", (double)rval, (double)integral, (double)PetscAbsReal(integra… in CheckIntegral()
/petsc/src/sys/tests/
H A Dex80f.F9015 PetscReal :: rval = 3.14
30 PetscCallA(PetscViewerHDF5WriteAttribute(viewer, "vec", "float_attribute", rval, ierr))
/petsc/src/sys/objects/device/tests/
H A Dex7.c9 PetscReal rval; in IncrementSize() local
14 PetscCall(PetscRandomGetValueReal(rand, &rval)); in IncrementSize()
15 *value += (PetscInt)rval; in IncrementSize()
/petsc/src/binding/petsc4py/src/petsc4py/PETSc/
H A DRandom.pyx162 cdef PetscReal rval = 0
163 CHKERR(PetscRandomGetValueReal(self.rnd, &rval))
164 return toReal(rval)
H A DTS.pyx953 cdef PetscReal rval = asReal(t)
955 CHKERR(TSComputeIFunction(self.ts, rval, x.vec, xdot.vec,
1166 cdef PetscReal rval = asReal(t)
1167 CHKERR(TSComputeI2Function(self.ts, rval, x.vec, xdot.vec, xdotdot.vec,
1702 cdef PetscReal rval = asReal(t)
1703 CHKERR(TSSetTime(self.ts, rval))
1719 cdef PetscReal rval = 0
1720 CHKERR(TSGetTime(self.ts, &rval))
1721 return toReal(rval)
1733 cdef PetscReal rval = 0
[all …]
H A DVec.pyx1747 cdef PetscReal rval = asReal(tol)
1748 CHKERR(VecFilter(self.vec, rval))
2107 cdef PetscReal rval[2]
2108 CHKERR(VecNorm(self.vec, ntype, rval))
2109 if ntype != norm_1_2: return toReal(rval[0])
2110 else: return (toReal(rval[0]), toReal(rval[1]))
2146 cdef PetscReal rval[2]
2147 CHKERR(VecNormEnd(self.vec, ntype, rval))
2148 if ntype != norm_1_2: return toReal(rval[0])
2149 else: return (toReal(rval[0]), toReal(rval[1]))
[all …]
/petsc/src/mat/impls/baij/seq/
H A Dbaij2.c2831 PetscInt mbs, i, rval, bs = A->rmap->bs, j, n; in MatMultHermitianTransposeAdd_SeqBAIJ() local
2862 rval = ib[j]; in MatMultHermitianTransposeAdd_SeqBAIJ()
2863 z[rval] += PetscConj(*v) * x1; in MatMultHermitianTransposeAdd_SeqBAIJ()
2878 rval = ib[j] * 2; in MatMultHermitianTransposeAdd_SeqBAIJ()
2879 z[rval++] += PetscConj(v[0]) * x1 + PetscConj(v[1]) * x2; in MatMultHermitianTransposeAdd_SeqBAIJ()
2880 z[rval++] += PetscConj(v[2]) * x1 + PetscConj(v[3]) * x2; in MatMultHermitianTransposeAdd_SeqBAIJ()
2896 rval = ib[j] * 3; in MatMultHermitianTransposeAdd_SeqBAIJ()
2897 z[rval++] += PetscConj(v[0]) * x1 + PetscConj(v[1]) * x2 + PetscConj(v[2]) * x3; in MatMultHermitianTransposeAdd_SeqBAIJ()
2898 z[rval++] += PetscConj(v[3]) * x1 + PetscConj(v[4]) * x2 + PetscConj(v[5]) * x3; in MatMultHermitianTransposeAdd_SeqBAIJ()
2899 z[rval++] += PetscConj(v[6]) * x1 + PetscConj(v[7]) * x2 + PetscConj(v[8]) * x3; in MatMultHermitianTransposeAdd_SeqBAIJ()
[all …]
/petsc/src/ksp/ksp/impls/fetidp/
H A Dfetidp.c269 PetscReal val, rval; in KSPFETIDPCheckOperators() local
319 PetscCallMPI(MPI_Reduce(&val, &rval, 1, MPIU_REAL, MPIU_MAX, 0, comm)); in KSPFETIDPCheckOperators()
320 PetscCall(PetscViewerASCIIPrintf(viewer, "A: CHECK glob to loc: % 1.14e\n", (double)rval)); in KSPFETIDPCheckOperators()
325 PetscCallMPI(MPI_Reduce(&val, &rval, 1, MPIU_REAL, MPIU_MAX, 0, comm)); in KSPFETIDPCheckOperators()
326 PetscCall(PetscViewerASCIIPrintf(viewer, "A: CHECK glob to loc (p): % 1.14e\n", (double)rval)); in KSPFETIDPCheckOperators()
336 PetscCallMPI(MPI_Reduce(&val, &rval, 1, MPIU_REAL, MPIU_MAX, 0, comm)); in KSPFETIDPCheckOperators()
337 PetscCall(PetscViewerASCIIPrintf(viewer, "B: CHECK loc to glob: % 1.14e\n", (double)rval)); in KSPFETIDPCheckOperators()
356 PetscCallMPI(MPI_Reduce(&val, &rval, 1, MPIU_REAL, MPIU_MAX, 0, comm)); in KSPFETIDPCheckOperators()
357 PetscCall(PetscViewerASCIIPrintf(viewer, "B: CHECK loc to glob (p): % 1.14e\n", (double)rval)); in KSPFETIDPCheckOperators()
430 PetscCallMPI(MPI_Reduce(&val, &rval, 1, MPIU_REAL, MPIU_MAX, 0, comm)); in KSPFETIDPCheckOperators()

12