Home
last modified time | relevance | path

Searched refs:c2 (Results 1 – 25 of 34) sorted by relevance

12

/petsc/src/sys/classes/viewer/impls/hdf5/ftn-custom/
H A Dzhdf5f.c28 char *c2; in petscviewerhdf5writeattributeint_() local
31 FIXCHAR(name, len2, c2); in petscviewerhdf5writeattributeint_()
32 *ierr = PetscViewerHDF5WriteAttribute(*viewer, c1, c2, PETSC_INT, value); in petscviewerhdf5writeattributeint_()
34 FREECHAR(name, c2); in petscviewerhdf5writeattributeint_()
40 char *c2; in petscviewerhdf5writeattributescalar_() local
43 FIXCHAR(name, len2, c2); in petscviewerhdf5writeattributescalar_()
44 *ierr = PetscViewerHDF5WriteAttribute(*viewer, c1, c2, PETSC_SCALAR, value); in petscviewerhdf5writeattributescalar_()
46 FREECHAR(name, c2); in petscviewerhdf5writeattributescalar_()
52 char *c2; in petscviewerhdf5writeattributereal_() local
55 FIXCHAR(name, len2, c2); in petscviewerhdf5writeattributereal_()
[all …]
/petsc/src/dm/impls/plex/
H A Dplexfluent.c313 PetscInt firstVertex, lastVertex, c2; in ReorderPolygon() local
317 for (c2 = 0; c2 < coneSize; ++c2) { in ReorderPolygon()
320 PetscCall(DMPlexGetCone(dm, cone[c2], &fcone2)); in ReorderPolygon()
321 firstVertex = ornt[c2] ? fcone2[1] : fcone2[0]; in ReorderPolygon()
327 …PetscCheck(c2 < coneSize, PETSC_COMM_SELF, PETSC_ERR_ARG_WRONG, "Cell %" PetscInt_FMT " could not … in ReorderPolygon()
328 newCone[c] = cone[c2]; in ReorderPolygon()
329 newOrnt[c] = ornt[c2]; in ReorderPolygon()
367 PetscInt c2; in ReorderTetrahedron() local
374 for (c2 = 0; c2 < 3; ++c2) { in ReorderTetrahedron()
375 …edge2 = fcone2[farr2[c2 * 2 + 0]], eornt2 = DMPolytopeTypeComposeOrientation(DM_POLYTOPE_SEGMENT, … in ReorderTetrahedron()
[all …]
/petsc/src/mat/impls/diagonal/tests/
H A Dex1.c8 Vec a, a2, b, b2, c, c2, A_diag, A_inv_diag; in main() local
28 PetscCall(VecDuplicate(c, &c2)); in main()
54 PetscCall(MatMult(A, b, c2)); in main()
55 PetscCall(VecAXPY(c2, -1.0, c)); in main()
56 PetscCall(VecNorm(c2, NORM_INFINITY, &vec_norm)); in main()
61 PetscCall(MatMultAdd(A, b, a, c2)); in main()
62 PetscCall(VecAXPY(c2, -1.0, c)); in main()
63 PetscCall(VecNorm(c2, NORM_INFINITY, &vec_norm)); in main()
67 PetscCall(VecSet(c2, 1.2)); in main()
69 PetscCall(VecAXPY(c, 1.0, c2)); in main()
[all …]
/petsc/src/sys/classes/bag/ftn-custom/
H A Dzbagf.c12 char *c1, *c2; in petscbagregisterenumprivate_() local
15 FIXCHAR(help, len2, c2); in petscbagregisterenumprivate_()
16 *ierr = PetscBagRegisterEnum(*bag, addr, list, *def, c1, c2); in petscbagregisterenumprivate_()
19 FREECHAR(help, c2); in petscbagregisterenumprivate_()
/petsc/src/sys/fileio/ftn-custom/
H A Dzmpiuopenf.c17 char *c1, *c2; in petscfopen_() local
20 FIXCHAR(fmode, len2, c2); in petscfopen_()
21 *ierr = PetscFOpen(MPI_Comm_f2c(*(MPI_Fint *)&*comm), c1, c2, file); in petscfopen_()
24 FREECHAR(fmode, c2); in petscfopen_()
/petsc/src/sys/objects/
H A Dfinit.c49 MPI_Fint c1 = 0, c2 = 0; in PetscInitializeFortran() local
52 c2 = MPI_Comm_c2f(PETSC_COMM_SELF); in PetscInitializeFortran()
54 petscsetcomm_(&c1, &c2); in PetscInitializeFortran()
/petsc/src/sys/classes/draw/tests/
H A Dex7.c16 int c2 = 255; in main() local
17 int c1 = (c0 + c2) / 2; in main()
83 PetscCall(PetscDrawTriangle(draw, 0 + 1, 0 + 1, w - 1, 0 + 1, w - 1, h - 1, c0, c1, c2)); in main()
84 PetscCall(PetscDrawTriangle(draw, 0 + 1, 0 + 1, 0 + 1, h - 1, w - 1, h - 1, c0, c1, c2)); in main()
86 PetscCall(PetscDrawTriangle(draw, w / 4, h / 4, w / 2, 3 * h / 4, 3 * w / 4, h / 2, c2, c1, c0)); in main()
/petsc/include/
H A Dpetscbt.h92 const PetscByte c2 = 0x33; in PetscBTCountSet() local
96 byte = ((byte >> 2) & c2) + (byte & c2); in PetscBTCountSet()
/petsc/src/mat/tests/
H A Dex233.c12 PetscScalar c2[16] = {0, 1, 4, 5, 2, 3, 6, 7, 8, 9, 12, 13, 10, 11, 14, 15}; in main() local
38 PetscCall(MatMPIAIJSetPreallocationCSR(ssbaij, ia2, ja2, c2)); in main()
/petsc/src/sys/classes/draw/interface/
H A Ddtri.c24 … x1, PetscReal y_1, PetscReal x2, PetscReal y2, PetscReal x3, PetscReal y3, int c1, int c2, int c3) in PetscDrawTriangle() argument
28 PetscUseTypeMethod(draw, triangle, x1, y_1, x2, y2, x3, y3, c1, c2, c3); in PetscDrawTriangle()
221 int c1, c2, c3, c4, i, j; in PetscDrawTensorContourPatch() local
234 c2 = PetscDrawRealToColor(v[i + j * m + 1], min, max); in PetscDrawTensorContourPatch()
242 PetscCall(PetscDrawTriangle(draw, x1, y_1, x2, y2, x3, y3, c1, c2, c3)); in PetscDrawTensorContourPatch()
H A Ddrect.c124 …cDraw draw, PetscReal xl, PetscReal yl, PetscReal xr, PetscReal yr, int c1, int c2, int c3, int c4) in PetscDrawRectangle() argument
128 PetscUseTypeMethod(draw, rectangle, xl, yl, xr, yr, c1, c2, c3, c4); in PetscDrawRectangle()
/petsc/src/sys/objects/ftn-custom/
H A Dzoptionsf.c311 char *c1, *c2; in petscoptionsgetenumprivate_() local
315 FIXCHAR(name, len2, c2); in petscoptionsgetenumprivate_()
316 *ierr = PetscOptionsGetEnum(*opt, c1, c2, list, ivalue, &flag); in petscoptionsgetenumprivate_()
320 FREECHAR(name, c2); in petscoptionsgetenumprivate_()
325 char *c1, *c2, *c3; in petscoptionsgetstring_() local
330 FIXCHAR(name, len2, c2); in petscoptionsgetstring_()
334 *ierr = PetscOptionsGetString(*options, c1, c2, c3, len3, &flag); in petscoptionsgetstring_()
338 FREECHAR(name, c2); in petscoptionsgetstring_()
/petsc/src/sys/classes/draw/impls/win32/
H A Dwin32draw.c157 static PetscErrorCode AverageColorRectangle_Win32(PetscDraw draw, int c1, int c2, int c3, int c4) in AverageColorRectangle_Win32() argument
162 …c1] + RedMap[c2] + RedMap[c3] + RedMap[c4]) / 4, (GreenMap[c1] + GreenMap[c2] + GreenMap[c3] + Gre… in AverageColorRectangle_Win32()
166 static PetscErrorCode AverageColorTriangle_Win32(PetscDraw draw, int c1, int c2, int c3) in AverageColorTriangle_Win32() argument
171 …= RGB((RedMap[c1] + RedMap[c2] + RedMap[c3]) / 3, (GreenMap[c1] + GreenMap[c2] + GreenMap[c3]) / 3… in AverageColorTriangle_Win32()
175 …cDraw draw, PetscReal xl, PetscReal yl, PetscReal xr, PetscReal yr, int c1, int c2, int c3, int c4) in PetscDrawRectangle_Win32() argument
189 if (c1 == c2 && c2 == c3 && c3 == c4) TranslateColor_Win32(draw, c1); in PetscDrawRectangle_Win32()
190 else AverageColorRectangle_Win32(draw, c1, c2, c3, c4); in PetscDrawRectangle_Win32()
470 …x1, PetscReal yone, PetscReal x2, PetscReal y2, PetscReal x3, PetscReal y3, int c1, int c2, int c3) in PetscDrawTriangle_Win32() argument
479 AverageColorTriangle_Win32(draw, c1, c2, c3); in PetscDrawTriangle_Win32()
/petsc/src/ksp/ksp/tutorials/
H A Dex54f.F90263 PetscReal xx, yy, psi, cs, sn, c2, s2, dd(2, 2)
275 c2 = cs*cs
279 dd(1, 1) = c2*ev(1) + s2*ev(2)
280 dd(2, 2) = s2*ev(1) + c2*ev(2)
/petsc/src/sys/classes/draw/impls/null/
H A Ddrawnull.c48 …cDraw draw, PetscReal xl, PetscReal yl, PetscReal xr, PetscReal yr, int c1, int c2, int c3, int c4) in PetscDrawRectangle_Null() argument
60 … X1, PetscReal Y_1, PetscReal X2, PetscReal Y2, PetscReal X3, PetscReal Y3, int c1, int c2, int c3) in PetscDrawTriangle_Null() argument
/petsc/src/sys/classes/draw/impls/image/
H A Ddrawimage.c162 …cDraw draw, PetscReal xl, PetscReal yl, PetscReal xr, PetscReal yr, int c1, int c2, int c3, int c4) in PetscDrawRectangle_Image() argument
168 PetscDrawValidColor(c2); in PetscDrawRectangle_Image()
174 int c = (c1 + c2 + c3 + c4) / 4; in PetscDrawRectangle_Image()
197 … PetscReal Y_1, PetscReal X_2, PetscReal Y_2, PetscReal X_3, PetscReal Y_3, int c1, int c2, int c3) in PetscDrawTriangle_Image() argument
203 PetscDrawValidColor(c2); in PetscDrawTriangle_Image()
208 PetscImageDrawTriangle(img, x_1, y_1, c1, x_2, y_2, c2, x_3, y_3, c3); in PetscDrawTriangle_Image()
/petsc/src/snes/impls/ntrdc/
H A Dntrdc.c305 …PetscReal auk, gfnorm, ycnorm, c0, c1, c2, tau, tau_pos, tau_neg, gTBg; /*… in SNESSolve_NEWTONTRDC() local
434 PetscCall(VecNorm(YCtmp, NORM_2, &c2)); /* this could be improved */ in SNESSolve_NEWTONTRDC()
435 c2 = PetscSqr(c2) - PetscSqr(delta); in SNESSolve_NEWTONTRDC()
436 … tau_pos = (c1 + PetscSqrtReal(PetscSqr(c1) - 4. * c0 * c2)) / (2. * c0); /* quadratic formula */ in SNESSolve_NEWTONTRDC()
437 tau_neg = (c1 - PetscSqrtReal(PetscSqr(c1) - 4. * c0 * c2)) / (2. * c0); in SNESSolve_NEWTONTRDC()
/petsc/src/snes/impls/al/
H A Dal.c408 PetscReal a0, b0, b1, c0, c1, c2; in SNESSolve_NEWTONAL() local
425 c2 = PetscRealPart(coefs2[1]); in SNESSolve_NEWTONAL()
427 as = b1 * b1 - 4 * a0 * c2; in SNESSolve_NEWTONAL()
445 PetscQuadraticRoots(a0, b0 + b1, c0 + c1 + c2, &dlambda1, &dlambda2); in SNESSolve_NEWTONAL()
/petsc/src/mat/impls/aij/seq/
H A Dmatrart.c111 PetscScalar *d, *c, *c2, *c3, *c4; in MatMatMatMultNumeric_SeqAIJ_SeqAIJ_SeqDense() local
146 c2 = c + am; in MatMatMatMultNumeric_SeqAIJ_SeqAIJ_SeqDense()
147 c3 = c2 + am; in MatMatMatMultNumeric_SeqAIJ_SeqAIJ_SeqDense()
180 r2 += (*ra) * c2[*rj]; in MatMatMatMultNumeric_SeqAIJ_SeqAIJ_SeqDense()
H A Dmatmatmult.c1498 PetscScalar *c, r1, r2, r3, r4, *c1, *c2, *c3, *c4; in MatMatMultNumericAdd_SeqAIJ_SeqDense() local
1525 c2 = c1 + clda; in MatMatMultNumericAdd_SeqAIJ_SeqDense()
1526 c3 = c2 + clda; in MatMatMultNumericAdd_SeqAIJ_SeqDense()
1544 c2[i] += r2; in MatMatMultNumericAdd_SeqAIJ_SeqDense()
1549 c2[i] = r2; in MatMatMultNumericAdd_SeqAIJ_SeqDense()
1561 c2 += am4; in MatMatMultNumericAdd_SeqAIJ_SeqDense()
1593 c2[i] += r2; in MatMatMultNumericAdd_SeqAIJ_SeqDense()
1596 c2[i] = r2; in MatMatMultNumericAdd_SeqAIJ_SeqDense()
1614 c2[i] += r2; in MatMatMultNumericAdd_SeqAIJ_SeqDense()
1618 c2[i] = r2; in MatMatMultNumericAdd_SeqAIJ_SeqDense()
/petsc/src/tao/leastsquares/impls/pounders/
H A Dpounders.h52 PetscReal c2; /* Factor for linear poisedness */ member
/petsc/src/sys/classes/draw/impls/tikz/
H A Dtikz.c96 …cDraw draw, PetscReal xl, PetscReal yl, PetscReal xr, PetscReal yr, int c1, int c2, int c3, int c4) in PetscDrawRectangle_TikZ() argument
106 …l x1, PetscReal y1, PetscReal x2, PetscReal y2, PetscReal x3, PetscReal y3, int c1, int c2, int c3) in PetscDrawTriangle_TikZ() argument
/petsc/src/sys/classes/draw/impls/x/
H A Dxops.c131 …cDraw draw, PetscReal xl, PetscReal yl, PetscReal xr, PetscReal yr, int c1, int c2, int c3, int c4) in PetscDrawRectangle_X() argument
134 int x, y, w, h, c = (c1 + c2 + c3 + c4) / 4; in PetscDrawRectangle_X()
167 … X1, PetscReal Y_1, PetscReal X2, PetscReal Y2, PetscReal X3, PetscReal Y3, int c1, int c2, int c3) in PetscDrawTriangle_X() argument
172 if (c1 == c2 && c2 == c3) { in PetscDrawTriangle_X()
190 PetscCall(PetscDrawInterpolatedTriangle_X(XiWin, x1, y_1, c1, x2, y2, c2, x3, y3, c3)); in PetscDrawTriangle_X()
/petsc/src/dm/impls/plex/tests/
H A Dex11.c63 PetscInt c2[4] = {13, 15, 19, 21}; in TestEmptyStrata() local
103 PetscCall(DMPlexSetCone(dm, 2, c2)); in TestEmptyStrata()
/petsc/src/sys/ftn-mod/
H A Dpetscsysmod.F90641 MPIU_Comm c1, c2
644 PETSC_COMM_SELF = c2

12