Home
last modified time | relevance | path

Searched refs:k1 (Results 1 – 25 of 41) sorted by relevance

12

/petsc/include/petsc/private/
H A Dhashijklkey.h9 #define PetscHashIJKLKeyEqual(k1, k2) ((k1).i == (k2).i && (k1).j == (k2).j && (k1).k == (k2).k && … argument
H A Dhashijkkey.h8 #define PetscHashIJKKeyEqual(k1, k2) ((k1).i == (k2).i && (k1).j == (k2).j && (k1).k == (k2).k) argument
H A Dhashijkey.h8 #define PetscHashIJKeyEqual(k1, k2) ((k1).i == (k2).i && (k1).j == (k2).j) argument
H A Dpetscdsimpl.h44 #define PetscFormKeyEqual(k1, k2) (((k1).label == (k2).label) ? ((k1).value == (k2).value) ? ((k1).… argument
H A Dsectionimpl.h20 static inline int PetscSectionClosurePermEqual(PetscSectionClosurePermKey k1, PetscSectionClosurePe… in PetscSectionClosurePermEqual() argument
22 return k1.depth == k2.depth && k1.size == k2.size; in PetscSectionClosurePermEqual()
/petsc/src/mat/impls/sbaij/seq/
H A Dsbaijfact3.c10 PetscInt *a2anew, i, j, k, k1, jmin, jmax, *jl, *il, vj, nexti, ili; in MatCholeskyFactorNumeric_SeqSBAIJ_3() local
48 for (k1 = 0; k1 < 9; k1++) { in MatCholeskyFactorNumeric_SeqSBAIJ_3()
49 dk[k1] = aa[k * 9 + k1]; in MatCholeskyFactorNumeric_SeqSBAIJ_3()
50 aa[k * 9 + k1] = aa[j * 9 + k1]; in MatCholeskyFactorNumeric_SeqSBAIJ_3()
51 aa[j * 9 + k1] = dk[k1]; in MatCholeskyFactorNumeric_SeqSBAIJ_3()
60 for (k1 = 0; k1 < 3; k1++) *ap++ = dk[k + 3 * k1]; in MatCholeskyFactorNumeric_SeqSBAIJ_3()
172 for (k1 = 0; k1 < 9; k1++) { in MatCholeskyFactorNumeric_SeqSBAIJ_3()
H A Dsbaijfact6.c10 PetscInt i, j, *a2anew, k, k1, jmin, jmax, *jl, *il, vj, nexti, ili; in MatCholeskyFactorNumeric_SeqSBAIJ_4() local
49 for (k1 = 0; k1 < 16; k1++) { in MatCholeskyFactorNumeric_SeqSBAIJ_4()
50 dk[k1] = aa[k * 16 + k1]; in MatCholeskyFactorNumeric_SeqSBAIJ_4()
51 aa[k * 16 + k1] = aa[j * 16 + k1]; in MatCholeskyFactorNumeric_SeqSBAIJ_4()
52 aa[j * 16 + k1] = dk[k1]; in MatCholeskyFactorNumeric_SeqSBAIJ_4()
61 for (k1 = 0; k1 < 4; k1++) *ap++ = dk[k + 4 * k1]; in MatCholeskyFactorNumeric_SeqSBAIJ_4()
202 for (k1 = 0; k1 < 16; k1++) { in MatCholeskyFactorNumeric_SeqSBAIJ_4()
H A Dsbaijfact7.c10 PetscInt i, j, *a2anew, k, k1, jmin, jmax, *jl, *il, vj, nexti, ili, ipvt[5]; in MatCholeskyFactorNumeric_SeqSBAIJ_5() local
48 for (k1 = 0; k1 < 25; k1++) { in MatCholeskyFactorNumeric_SeqSBAIJ_5()
49 dk[k1] = aa[k * 25 + k1]; in MatCholeskyFactorNumeric_SeqSBAIJ_5()
50 aa[k * 25 + k1] = aa[j * 25 + k1]; in MatCholeskyFactorNumeric_SeqSBAIJ_5()
51 aa[j * 25 + k1] = dk[k1]; in MatCholeskyFactorNumeric_SeqSBAIJ_5()
60 for (k1 = 0; k1 < 5; k1++) *ap++ = dk[k + 5 * k1]; in MatCholeskyFactorNumeric_SeqSBAIJ_5()
226 for (k1 = 0; k1 < 25; k1++) { in MatCholeskyFactorNumeric_SeqSBAIJ_5()
H A Dsbaijfact.c564 PetscInt *a2anew, k, k1, jmin, jmax, *jl, *il, vj, nexti, ili; in MatCholeskyFactorNumeric_SeqSBAIJ_N() local
607 for (k1 = 0; k1 < bs2; k1++) { in MatCholeskyFactorNumeric_SeqSBAIJ_N()
608 dk[k1] = aa[k * bs2 + k1]; in MatCholeskyFactorNumeric_SeqSBAIJ_N()
609 aa[k * bs2 + k1] = aa[j * bs2 + k1]; in MatCholeskyFactorNumeric_SeqSBAIJ_N()
610 aa[j * bs2 + k1] = dk[k1]; in MatCholeskyFactorNumeric_SeqSBAIJ_N()
618 for (k1 = 0; k1 < bs; k1++) *ap++ = dk[k + bs * k1]; in MatCholeskyFactorNumeric_SeqSBAIJ_N()
699 for (k1 = 0; k1 < bs2; k1++) { in MatCholeskyFactorNumeric_SeqSBAIJ_N()
737 PetscInt *ai, *aj, k, k1, jmin, jmax, *jl, *il, vj, nexti, ili; in MatCholeskyFactorNumeric_SeqSBAIJ_N_NaturalOrdering() local
831 for (k1 = 0; k1 < bs2; k1++) { in MatCholeskyFactorNumeric_SeqSBAIJ_N_NaturalOrdering()
871 PetscInt *a2anew, k, k1, jmin, jmax, *jl, *il, vj, nexti, ili; in MatCholeskyFactorNumeric_SeqSBAIJ_2() local
[all …]
H A Dsbaijfact9.c10 PetscInt i, j, *a2anew, k, k1, jmin, jmax, *jl, *il, vj, nexti, ili; in MatCholeskyFactorNumeric_SeqSBAIJ_6() local
50 for (k1 = 0; k1 < 36; k1++) { in MatCholeskyFactorNumeric_SeqSBAIJ_6()
51 dk[k1] = aa[k * 36 + k1]; in MatCholeskyFactorNumeric_SeqSBAIJ_6()
52 aa[k * 36 + k1] = aa[j * 36 + k1]; in MatCholeskyFactorNumeric_SeqSBAIJ_6()
53 aa[j * 36 + k1] = dk[k1]; in MatCholeskyFactorNumeric_SeqSBAIJ_6()
62 for (k1 = 0; k1 < 6; k1++) *ap++ = dk[k + 6 * k1]; in MatCholeskyFactorNumeric_SeqSBAIJ_6()
339 for (k1 = 0; k1 < 36; k1++) { in MatCholeskyFactorNumeric_SeqSBAIJ_6()
H A Dsbaijfact4.c11 PetscInt *ai, *aj, k, k1, jmin, jmax, *jl, *il, vj, nexti, ili; in MatCholeskyFactorNumeric_SeqSBAIJ_3_NaturalOrdering() local
134 for (k1 = 0; k1 < 9; k1++) { in MatCholeskyFactorNumeric_SeqSBAIJ_3_NaturalOrdering()
H A Dsbaijfact11.c10 PetscInt *a2anew, k, k1, jmin, jmax, *jl, *il, vj, nexti, ili, i, j, mbs = a->mbs; in MatCholeskyFactorNumeric_SeqSBAIJ_7() local
51 for (k1 = 0; k1 < 49; k1++) { in MatCholeskyFactorNumeric_SeqSBAIJ_7()
52 dk[k1] = aa[k * 49 + k1]; in MatCholeskyFactorNumeric_SeqSBAIJ_7()
53 aa[k * 49 + k1] = aa[j * 49 + k1]; in MatCholeskyFactorNumeric_SeqSBAIJ_7()
54 aa[j * 49 + k1] = dk[k1]; in MatCholeskyFactorNumeric_SeqSBAIJ_7()
63 for (k1 = 0; k1 < 7; k1++) *ap++ = dk[k + 7 * k1]; in MatCholeskyFactorNumeric_SeqSBAIJ_7()
408 for (k1 = 0; k1 < 49; k1++) { in MatCholeskyFactorNumeric_SeqSBAIJ_7()
H A Dsbaijfact5.c11 PetscInt *ai, *aj, k, k1, jmin, jmax, *jl, *il, vj, nexti, ili; in MatCholeskyFactorNumeric_SeqSBAIJ_4_NaturalOrdering() local
163 for (k1 = 0; k1 < 16; k1++) { in MatCholeskyFactorNumeric_SeqSBAIJ_4_NaturalOrdering()
/petsc/src/ts/tutorials/advection-diffusion-reaction/
H A Dex2.c29 PetscScalar k1, k2, k3; member
34 PetscScalar k1(AppCtx *ctx, PetscReal t) in k1() function
39 …else return ctx->k1 * PetscExpReal(7.0 * PetscPowReal(PetscSinReal(.0625 * PETSC_PI * (barth - 4.0… in k1()
51 f[0] = udot[0] - k1(ctx, t) * u[2] + ctx->k2 * u[0]; in IFunction()
52 f[1] = udot[1] - k1(ctx, t) * u[2] + ctx->k3 * u[1] * u[3] - ctx->sigma2; in IFunction()
53 f[2] = udot[2] - ctx->k3 * u[1] * u[3] + k1(ctx, t) * u[2]; in IFunction()
72 J[0][2] = -k1(ctx, t); in IJacobian()
76 J[1][2] = -k1(ctx, t); in IJacobian()
80 J[2][2] = a + k1(ctx, t); in IJacobian()
135 ctx.k1 = 1.0e-5; in main()
/petsc/src/sys/logging/handler/impls/nested/
H A Dlognested.h37 #define NestedIdPairEqual(k1, k2) (((k1).root == (k2).root) && ((k1).leaf == (k2).leaf)) argument
/petsc/src/ksp/ksp/tests/
H A Dex13.c14 for (PetscInt k1 = -1; k1 <= 1; k1++) in Get2DStencil() local
16 … if (i + k1 >= 0 && i + k1 < n && j + k2 >= 0 && j + k2 < n) idxs[k++] = n * (i + k1) + (j + k2); in Get2DStencil()
H A Dex32.c127 PetscInt i, j, k, mx, my, mz, xm, ym, zm, xs, ys, zs, dof, k1, k2, k3; in ComputeMatrix() local
147 for (k1 = 0; k1 < dof; k1++) { in ComputeMatrix()
149 if (k1 == k2) { in ComputeMatrix()
153 v[k3] = k1 / (dof * dof); in ComputeMatrix()
H A Dex10.c85 PetscInt i, j, k, i1, i2, j_1, j2, k1, k2, h1, h2, shiftx, shifty, shiftz; in GetElasticityMatrix() local
111 for (k1 = 0; k1 < 3; k1++) { in GetElasticityMatrix()
115 r1 = base + i1 * shiftx + j_1 * shifty + k1 * shiftz; in GetElasticityMatrix()
/petsc/src/mat/impls/baij/mpi/
H A Dmpb_baij.c9 PetscInt *garrayCMap, col, i, j, *nnz, newRow, newCol, *newbRow, *newbCol, k, k1; in MatGetMultiProcBlock_MPIBAIJ() local
94 for (k1 = 0; k1 < bs; k1++) { in MatGetMultiProcBlock_MPIBAIJ()
95 for (k = 0; k < bs; k++) vals[k1 + k * bs] = *aijBvals++; in MatGetMultiProcBlock_MPIBAIJ()
/petsc/src/mat/impls/lrc/
H A Dlrc.c202 PetscInt k, k1, m, n, m1, n1; in MatLRCSetMats() local
226 PetscCall(MatGetSize(V, NULL, &k1)); in MatLRCSetMats()
227 …= k1, PetscObjectComm((PetscObject)U), PETSC_ERR_ARG_INCOMP, "U and V have different number of col… in MatLRCSetMats()
240 PetscCall(VecGetSize(c, &k1)); in MatLRCSetMats()
241 …k1, PetscObjectComm((PetscObject)c), PETSC_ERR_ARG_INCOMP, "The length of c %" PetscInt_FMT " does… in MatLRCSetMats()
/petsc/src/dm/dt/dualspace/impls/lagrange/tests/
H A Dex1.c21 #define PetscHashLagKeyEqual(k1, k2) \ argument
22 …k1).dim == (k2).dim) ? ((k1).order == (k2).order) ? ((k1).formDegree == (k2).formDegree) ? ((k1).t…
/petsc/src/ts/tutorials/
H A Dex22f_mf.F90334 PetscReal k1, k2
341 k1 = ctx%k(1)
346 val(1) = shift + k1
348 val(3) = -k1
451 PetscReal k1, k2
461 k1 = ctx%k(1)
467 val(1) = shift + k1
469 val(3) = -k1
H A Dex22f.F90302 PetscReal k1, k2
309 k1 = ctx%k(1)
314 val(1) = shift + k1
316 val(3) = -k1
/petsc/src/mat/tests/
H A Dex129.c185 PetscInt i, j, k, mx, my, mz, xm, ym, zm, xs, ys, zs, dof, k1, k2, k3; in ComputeMatrix() local
211 for (k1 = 0; k1 < dof; k1++) { in ComputeMatrix()
213 if (k1 == k2) { in ComputeMatrix()
H A Dex74.c11 …PetscInt n, mbs = 16, bs = 1, nz = 3, prob = 1, i, j, k1, k2, col[3], lf, block, row, Ii, J, … in main() local
177 k1 = (int)(minfo1.nz_allocated - minfo1.nz_used); in main()
179 …if (i < 0 || j < 0 || k1 < 0 || k2 < 0) PetscCall(PetscPrintf(PETSC_COMM_SELF, "Error (compare A a… in main()
206 k1 = (int)(minfo1.nz_allocated - minfo1.nz_used); in main()
208 …if (i < 0 || j < 0 || k1 < 0 || k2 < 0) PetscCall(PetscPrintf(PETSC_COMM_SELF, "Error(compare A an… in main()

12