| /petsc/src/mat/impls/baij/seq/ |
| H A D | dgedi.c | 19 PetscInt i__2, kb, kp1, nm1, i, j, k, l, ll, kn, knp1, jn1; in PetscLINPACKgedi() local 37 for (ll = 0; ll < i__2; ll++) aa[ll] *= t; in PetscLINPACKgedi() 46 for (ll = 0; ll < k; ll++) ay[ll] += t * ax[ll]; in PetscLINPACKgedi() 67 for (ll = 0; ll < n; ll++) ay[ll] += t * ax[ll]; in PetscLINPACKgedi() 73 for (ll = 0; ll < n; ll++) { in PetscLINPACKgedi() 74 tmp = ax[ll]; in PetscLINPACKgedi() 75 ax[ll] = ay[ll]; in PetscLINPACKgedi() 76 ay[ll] = tmp; in PetscLINPACKgedi()
|
| H A D | dgefa2.c | 16 PetscInt i__2, i__3, kp1, j, k, l, ll, i, ipvt[2], k3; in PetscKernel_A_gets_inverse_A_2() local 38 for (ll = 1; ll < i__2; ll++) { in PetscKernel_A_gets_inverse_A_2() 39 tmp = PetscAbsScalar(aa[ll]); in PetscKernel_A_gets_inverse_A_2() 42 l = ll + 1; in PetscKernel_A_gets_inverse_A_2() 69 for (ll = 0; ll < i__2; ll++) aa[ll] *= stmp; in PetscKernel_A_gets_inverse_A_2() 83 for (ll = 0; ll < i__3; ll++) ay[ll] += stmp * ax[ll]; in PetscKernel_A_gets_inverse_A_2() 102 for (ll = 0; ll < i__2; ll++) aa[ll] *= stmp; in PetscKernel_A_gets_inverse_A_2() 111 for (ll = 0; ll < k; ll++) ay[ll] += stmp * ax[ll]; in PetscKernel_A_gets_inverse_A_2() 148 PetscInt i__2, i__3, kp1, j, k, l, ll, i, ipvt[9], kb, k3; in PetscKernel_A_gets_inverse_A_9() local 169 for (ll = 1; ll < i__2; ll++) { in PetscKernel_A_gets_inverse_A_9() [all …]
|
| H A D | dgefa3.c | 16 PetscInt i__2, i__3, kp1, j, k, l, ll, i, ipvt[3], kb, k3; in PetscKernel_A_gets_inverse_A_3() local 38 for (ll = 1; ll < i__2; ll++) { in PetscKernel_A_gets_inverse_A_3() 39 tmp = PetscAbsScalar(aa[ll]); in PetscKernel_A_gets_inverse_A_3() 42 l = ll + 1; in PetscKernel_A_gets_inverse_A_3() 70 for (ll = 0; ll < i__2; ll++) aa[ll] *= stmp; in PetscKernel_A_gets_inverse_A_3() 84 for (ll = 0; ll < i__3; ll++) ay[ll] += stmp * ax[ll]; in PetscKernel_A_gets_inverse_A_3() 103 for (ll = 0; ll < i__2; ll++) aa[ll] *= stmp; in PetscKernel_A_gets_inverse_A_3() 112 for (ll = 0; ll < k; ll++) ay[ll] += stmp * ax[ll]; in PetscKernel_A_gets_inverse_A_3()
|
| H A D | dgefa5.c | 16 PetscInt i__2, i__3, kp1, j, k, l, ll, i, kb, k3; in PetscKernel_A_gets_inverse_A_5() local 38 for (ll = 1; ll < i__2; ll++) { in PetscKernel_A_gets_inverse_A_5() 39 tmp = PetscAbsScalar(aa[ll]); in PetscKernel_A_gets_inverse_A_5() 42 l = ll + 1; in PetscKernel_A_gets_inverse_A_5() 70 for (ll = 0; ll < i__2; ll++) aa[ll] *= stmp; in PetscKernel_A_gets_inverse_A_5() 84 for (ll = 0; ll < i__3; ll++) ay[ll] += stmp * ax[ll]; in PetscKernel_A_gets_inverse_A_5() 103 for (ll = 0; ll < i__2; ll++) aa[ll] *= stmp; in PetscKernel_A_gets_inverse_A_5() 112 for (ll = 0; ll < k; ll++) ay[ll] += stmp * ax[ll]; in PetscKernel_A_gets_inverse_A_5()
|
| H A D | dgefa4.c | 16 PetscInt i__2, i__3, kp1, j, k, l, ll, i, ipvt[4], kb, k3; in PetscKernel_A_gets_inverse_A_4() local 38 for (ll = 1; ll < i__2; ll++) { in PetscKernel_A_gets_inverse_A_4() 39 tmp = PetscAbsScalar(aa[ll]); in PetscKernel_A_gets_inverse_A_4() 42 l = ll + 1; in PetscKernel_A_gets_inverse_A_4() 70 for (ll = 0; ll < i__2; ll++) aa[ll] *= stmp; in PetscKernel_A_gets_inverse_A_4() 84 for (ll = 0; ll < i__3; ll++) ay[ll] += stmp * ax[ll]; in PetscKernel_A_gets_inverse_A_4() 103 for (ll = 0; ll < i__2; ll++) aa[ll] *= stmp; in PetscKernel_A_gets_inverse_A_4() 112 for (ll = 0; ll < k; ll++) ay[ll] += stmp * ax[ll]; in PetscKernel_A_gets_inverse_A_4()
|
| H A D | dgefa6.c | 16 PetscInt i__2, i__3, kp1, j, k, l, ll, i, ipvt[6], kb, k3; in PetscKernel_A_gets_inverse_A_6() local 38 for (ll = 1; ll < i__2; ll++) { in PetscKernel_A_gets_inverse_A_6() 39 tmp = PetscAbsScalar(aa[ll]); in PetscKernel_A_gets_inverse_A_6() 42 l = ll + 1; in PetscKernel_A_gets_inverse_A_6() 70 for (ll = 0; ll < i__2; ll++) aa[ll] *= stmp; in PetscKernel_A_gets_inverse_A_6() 84 for (ll = 0; ll < i__3; ll++) ay[ll] += stmp * ax[ll]; in PetscKernel_A_gets_inverse_A_6() 103 for (ll = 0; ll < i__2; ll++) aa[ll] *= stmp; in PetscKernel_A_gets_inverse_A_6() 112 for (ll = 0; ll < k; ll++) ay[ll] += stmp * ax[ll]; in PetscKernel_A_gets_inverse_A_6()
|
| H A D | dgefa7.c | 16 PetscInt i__2, i__3, kp1, j, k, l, ll, i, ipvt[7], kb, k3; in PetscKernel_A_gets_inverse_A_7() local 38 for (ll = 1; ll < i__2; ll++) { in PetscKernel_A_gets_inverse_A_7() 39 tmp = PetscAbsScalar(aa[ll]); in PetscKernel_A_gets_inverse_A_7() 42 l = ll + 1; in PetscKernel_A_gets_inverse_A_7() 70 for (ll = 0; ll < i__2; ll++) aa[ll] *= stmp; in PetscKernel_A_gets_inverse_A_7() 84 for (ll = 0; ll < i__3; ll++) ay[ll] += stmp * ax[ll]; in PetscKernel_A_gets_inverse_A_7() 103 for (ll = 0; ll < i__2; ll++) aa[ll] *= stmp; in PetscKernel_A_gets_inverse_A_7() 112 for (ll = 0; ll < k; ll++) ay[ll] += stmp * ax[ll]; in PetscKernel_A_gets_inverse_A_7()
|
| H A D | dgefa.c | 17 PetscInt i__2, i__3, kp1, nm1, j, k, l, ll, kn, knp1, jn1; in PetscLINPACKgefa() local 41 for (ll = 1; ll < i__2; ll++) { in PetscLINPACKgefa() 42 tmp = PetscAbsScalar(aa[ll]); in PetscLINPACKgefa() 45 l = ll + 1; in PetscLINPACKgefa() 68 for (ll = 0; ll < i__2; ll++) aa[ll] *= t; in PetscLINPACKgefa() 82 for (ll = 0; ll < i__3; ll++) ay[ll] += t * ax[ll]; in PetscLINPACKgefa()
|
| /petsc/config/BuildSystem/config/packages/ |
| H A D | sundials2.py | 52 ll = os.path.basename(l) 53 if ll.endswith('.a'): libs.append(ll[3:-2]) 54 elif ll.endswith('.so'): libs.append(ll[3:-3]) 55 elif ll.endswith('.dylib'): libs.append(ll[3:-6]) 56 libs.append(ll[3:-2])
|
| H A D | hypre.py | 63 ll = os.path.dirname(l) 64 libdirs.append(ll) 69 ll = os.path.basename(l) 70 if ll.endswith('.a'): libs.append(ll[3:-2]) 71 if ll.endswith('.so'): libs.append(ll[3:-3]) 72 if ll.endswith('.dylib'): libs.append(ll[3:-6])
|
| H A D | Trilinos.py | 291 ll = [os.path.join(dir,'lib'+l[0][2:]+'.a')] 293 ll.append('lib'+i[2:]+'.a') 294 llp = ll 296 return [ll,llp]
|
| /petsc/src/mat/tests/ |
| H A D | ex235.c | 27 Vec ll, d, rr; in shiftandscale() local 30 PetscCall(MatCreateVecs(A, &ll, &rr)); in shiftandscale() 32 PetscCall(VecSetRandom(ll, NULL)); in shiftandscale() 41 PetscCall(VecSetRandom(ll, NULL)); in shiftandscale() 43 PetscCall(MatDiagonalScale(A, ll, rr)); in shiftandscale() 48 PetscCall(VecSetRandom(ll, NULL)); in shiftandscale() 50 PetscCall(MatDiagonalScale(A, ll, rr)); in shiftandscale() 55 PetscCall(VecDestroy(&ll)); in shiftandscale()
|
| /petsc/share/petsc/matlab/ |
| H A D | PetscBinaryWrite.m | 71 ll = length(s); variable 74 s(1:2:2*ll) = sr; 75 s(2:2:2*ll) = si; 87 ll = length(A); variable 90 A(1:2:2*ll) = sr; 91 A(2:2:2*ll) = si;
|
| /petsc/src/dm/tests/ |
| H A D | ex10k.kokkos.cxx | 35 Vec g, l, gg, ll; /* global/local vectors of the da */ in main() local 56 PetscCall(DMCreateLocalVector(da, &ll)); in main() 77 PetscCall(DMGlobalToLocal(da, gg, INSERT_VALUES, ll)); in main() 92 PetscCall(DMDAVecGetKokkosOffsetViewDOF(da, ll, &lview)); in main() 97 PetscCall(DMDAVecRestoreKokkosOffsetViewDOF(da, ll, &lview)); in main() 107 PetscCall(VecDestroy(&ll)); in main() 129 PetscCall(DMCreateLocalVector(da, &ll)); in main() 155 PetscCall(DMGlobalToLocal(da, gg, INSERT_VALUES, ll)); in main() 172 PetscCall(DMDAVecGetKokkosOffsetView(da, ll, &lview2)); /* read-only */ in main() 182 PetscCall(DMDAVecRestoreKokkosOffsetView(da, ll, &lview2)); in main() [all …]
|
| /petsc/src/snes/tutorials/ |
| H A D | ex48.c | 712 PetscInt l, ll; in PointwiseNonlinearity() local 722 for (ll = 0; ll < 3; ll++) { in PointwiseNonlinearity() 723 du[ll] += dphi[l][ll] * n[l].u; in PointwiseNonlinearity() 724 dv[ll] += dphi[l][ll] * n[l].v; in PointwiseNonlinearity() 733 PetscInt l, ll; in PointwiseNonlinearity2D() local 743 for (ll = 0; ll < 2; ll++) { in PointwiseNonlinearity2D() 744 du[ll] += dphi[l][ll] * n[l].u; in PointwiseNonlinearity2D() 745 dv[ll] += dphi[l][ll] * n[l].v; in PointwiseNonlinearity2D() 967 PetscInt xs, ys, xm, ym, i, j, q, l, ll; in THIJacobianLocal_2D() local 1005 for (ll = 0; ll < 4; ll++) { in THIJacobianLocal_2D() [all …]
|
| H A D | ex16.c | 468 PetscInt i, j, k, l, ii, jj, kk, ll, qi, qj, qk, m; in FormElementJacobian() local 543 for (ll = 0; ll < 3; ll++) { in FormElementJacobian() 544 PetscInt teidx = ll + 3 * (ii + jj * NB + kk * NB * NB); in FormElementJacobian() 545 …x + NPB * tridx] += scl * (lgrad[0] * dFS[3 * ll + 0] + lgrad[1] * dFS[3 * ll + 1] + lgrad[2] * dF… in FormElementJacobian() 562 PetscInt ii, jj, kk, ll, ei, ej, ek, el; in ApplyBCsElement() local 566 for (ll = 0; ll < 3; ll++) { in ApplyBCsElement() 567 PetscInt tridx = ll + 3 * (ii + jj * NB + kk * NB * NB); in ApplyBCsElement()
|
| H A D | ex56.c | 73 #define IDX(ii, jj, kk, ll) (27 * ii + 9 * jj + 3 * kk + ll) argument
|
| /petsc/src/sys/utils/ |
| H A D | fhost.c | 75 size_t l, ll; in PetscGetHostName() local 85 PetscCall(PetscStrlen(name, &ll)); in PetscGetHostName() 86 if (ll > 4) { in PetscGetHostName()
|
| /petsc/src/ts/tutorials/ |
| H A D | ex14.c | 731 PetscInt l, ll; in PointwiseNonlinearity() local 741 for (ll = 0; ll < 3; ll++) { in PointwiseNonlinearity() 742 du[ll] += dphi[l][ll] * n[l].u; in PointwiseNonlinearity() 743 dv[ll] += dphi[l][ll] * n[l].v; in PointwiseNonlinearity() 1096 PetscInt xs, ys, xm, ym, zm, i, j, k, q, l, ll; in THIJacobianLocal_Momentum() local 1137 for (ll = ls; ll < 8; ll++) { /* trial functions */ in THIJacobianLocal_Momentum() 1138 const PetscReal *restrict dpl = dphi[ll]; in THIJacobianLocal_Momentum() 1143 …Ke[l * 2 + 0][ll * 2 + 0] += dp[0] * jw * eta * 4. * dpl[0] + dp[1] * jw * eta * dpl[1] + dp[2] * … in THIJacobianLocal_Momentum() 1144 … Ke[l * 2 + 0][ll * 2 + 1] += dp[0] * jw * eta * 2. * dpl[1] + dp[1] * jw * eta * dpl[0]; in THIJacobianLocal_Momentum() 1145 … Ke[l * 2 + 1][ll * 2 + 0] += dp[1] * jw * eta * 2. * dpl[0] + dp[0] * jw * eta * dpl[1]; in THIJacobianLocal_Momentum() [all …]
|
| /petsc/src/ksp/ksp/tutorials/ |
| H A D | ex54f.F90 | 29 PetscInt ki, kj, nel, ll, j1, i1, ndf, f4 121 do ll = 1, 4 122 call shp2dquad(sg(1, ll), sg(2, ll), coord, shp, xsj, f2) 123 xsj = xsj*sg(3, ll)*thk
|
| /petsc/lib/petsc/bin/maint/petsclinter/petsclinter/classes/ |
| H A D | _add_line.py | 42 ll, lr = re_match.group(1).split(',')
|
| /petsc/src/dm/impls/da/ |
| H A D | grglvis.c | 7 PetscBool ll; member 47 if (dactx->ll) { in DMDAGetNumElementsGhosted() 109 if (dactx->ll) { in DMDASampleGLVisFields_Private() 157 dactx->ll = PETSC_TRUE; /* default to match elements layout obtained by DMDAGetElements */ in DMSetUpGLVisViewer_DMDA() 159 …sBool("-viewer_glvis_dm_da_ll", "Left-looking subdomain view", NULL, dactx->ll, &dactx->ll, NULL)); in DMSetUpGLVisViewer_DMDA() 481 if (dactx->ll) { in DMDAView_GLVis_ASCII()
|
| /petsc/src/mat/impls/baij/seq/baijmkl/ |
| H A D | baijmkl.c | 364 static PetscErrorCode MatDiagonalScale_SeqBAIJMKL(Mat A, Vec ll, Vec rr) in MatDiagonalScale_SeqBAIJMKL() argument 367 PetscCall(MatDiagonalScale_SeqBAIJ(A, ll, rr)); in MatDiagonalScale_SeqBAIJMKL()
|
| /petsc/doc/manual/ |
| H A D | tao.md | 628 \begin{array}{ll} 1216 \Delta_{k+1} = \left\{\begin{array}{ll} 1236 \Delta_{k+1} = \left\{\begin{array}{ll} 1262 \begin{array}{ll} 1494 \Delta_{k+1} = \left\{\begin{array}{ll} 1665 \begin{array}{ll} \displaystyle 1686 \mathfrak{P}(g) = \left\{\begin{array}{ll} 1696 \mathfrak{B}(x) = \left\{\begin{array}{ll} 1964 \begin{array}{ll} 2023 \begin{array}{ll} [all …]
|
| /petsc/src/mat/impls/sell/mpi/ |
| H A D | mpisell.c | 797 static PetscErrorCode MatDiagonalScale_MPISELL(Mat mat, Vec ll, Vec rr) in MatDiagonalScale_MPISELL() argument 811 if (ll) { in MatDiagonalScale_MPISELL() 812 PetscCall(VecGetLocalSize(ll, &s1)); in MatDiagonalScale_MPISELL() 814 PetscUseTypeMethod(b, diagonalscale, ll, NULL); in MatDiagonalScale_MPISELL() 817 PetscUseTypeMethod(a, diagonalscale, ll, rr); in MatDiagonalScale_MPISELL()
|