Home
last modified time | relevance | path

Searched refs:nb (Results 1 – 25 of 45) sorted by relevance

12

/petsc/src/ksp/ksp/impls/gmres/ !
H A Dgmreig.c117 PetscInt NbrRitz, nb = 0, n; in KSPComputeRitz_GMRES() local
209 nb = NbrRitz; in KSPComputeRitz_GMRES()
210 PetscCall(PetscMalloc1(nb * bn, &SR)); in KSPComputeRitz_GMRES()
211 for (i = 0; i < nb; i++) { in KSPComputeRitz_GMRES()
217 tetar[i] = PetscRealPart(wr[perm[bn - nb + i]]); in KSPComputeRitz_GMRES()
218 tetai[i] = PetscImaginaryPart(wr[perm[bn - nb + i]]); in KSPComputeRitz_GMRES()
219 …PetscCall(PetscArraycpy(&SR[i * bn], &(Q[perm[bn - nb + i] * bn]), bn)); /* permute columns of Q */ in KSPComputeRitz_GMRES()
225 while (nb < NbrRitz) { in KSPComputeRitz_GMRES()
226 if (!wi[perm[nb]]) nb += 1; in KSPComputeRitz_GMRES()
228 if (nb < NbrRitz - 1) nb += 2; in KSPComputeRitz_GMRES()
[all …]
/petsc/src/vec/vec/impls/nest/ !
H A Dvecnest.c10 for (i = 0; i < vs->nb; i++) { in VecAssemblyBegin_Nest()
23 for (i = 0; i < vs->nb; i++) PetscCall(VecAssemblyEnd(vs->v[i])); in VecAssemblyEnd_Nest()
34 for (i = 0; i < vs->nb; i++) PetscCall(VecDestroy(&vs->v[i])); in VecDestroy_Nest()
37 for (i = 0; i < vs->nb; i++) PetscCall(ISDestroy(&vs->is[i])); in VecDestroy_Nest()
57 for (i = 0; i < bx->nb; i++) PetscCall(VecCopy(bx->v[i], by->v[i])); in VecCopy_Nest()
69 PetscCall(PetscMalloc1(bx->nb, &sub)); in VecDuplicate_Nest()
70 for (i = 0; i < bx->nb; i++) PetscCall(VecDuplicate(bx->v[i], &sub[i])); in VecDuplicate_Nest()
71 PetscCall(VecCreateNest(PetscObjectComm((PetscObject)x), bx->nb, bx->is, sub, &Y)); in VecDuplicate_Nest()
72 for (i = 0; i < bx->nb; i++) PetscCall(VecDestroy(&sub[i])); in VecDuplicate_Nest()
87 nr = bx->nb; in VecDot_Nest()
[all …]
H A Dvecnestimpl.h6 PetscInt nb; /* n blocks */ member
22 …PetscCheck(((Vec_Nest *)(x)->data)->nb == ((Vec_Nest *)(y)->data)->nb, PetscObjectComm((PetscObjec…
38 …PetscCheck(((Vec_Nest *)(x)->data)->nb == ((Vec_Nest *)(y)->data)->nb, PetscObjectComm((PetscObjec…
39 …PetscCheck(((Vec_Nest *)(x)->data)->nb == ((Vec_Nest *)(z)->data)->nb, PetscObjectComm((PetscObjec…
/petsc/src/mat/tests/ !
H A Dex269f.F9011 PetscInt, parameter :: n = 6, nb = 2
28 …PetscCallA(MatCreateNest(PETSC_COMM_WORLD, nb, PETSC_NULL_IS_ARRAY, nb, PETSC_NULL_IS_ARRAY, mats,…
30 PetscCallA(MatNestSetSubMats(A, nb, PETSC_NULL_IS_ARRAY, nb, PETSC_NULL_IS_ARRAY, mats, ierr))
H A Dex124.c15 PetscInt ma, na, mb, nb; in main() local
45 PetscCall(MatGetSize(B, &mb, &nb)); in main()
48 PetscCheck(ma == mb && na == nb, PETSC_COMM_SELF, PETSC_ERR_ARG_SIZ, "nonconforming matrix size"); in main()
H A Dex242.c9 PetscInt i, j, M = 5, N, mb = 2, nb, nrows, ncols, mloc, nloc; in main() local
25 nb = mb; in main()
26 PetscCall(PetscOptionsGetInt(NULL, NULL, "-nb", &nb, NULL)); in main()
36 PetscCall(MatScaLAPACKSetBlockSizes(C, mb, nb)); in main()
102 PetscCall(MatScaLAPACKSetBlockSizes(B, mb, nb)); in main()
197 PetscCall(MatScaLAPACKSetBlockSizes(Asub, mb, nb)); in main()
/petsc/src/ksp/pc/impls/svd/ !
H A Dsvd.c42 PetscBLASInt nb, lwork; in PCSetUp_SVD() local
68 PetscCall(PetscBLASIntCast(n, &nb)); in PCSetUp_SVD()
69 lwork = 5 * nb; in PCSetUp_SVD()
79 …PetscCallBLAS("LAPACKgesvd", LAPACKgesvd_("A", "A", &nb, &nb, a, &nb, d, u, &nb, v, &nb, work, &lw… in PCSetUp_SVD()
87 PetscCall(PetscMalloc1(5 * nb, &rwork)); in PCSetUp_SVD()
88 PetscCall(PetscMalloc1(nb, &dd)); in PCSetUp_SVD()
90 …PetscCallBLAS("LAPACKgesvd", LAPACKgesvd_("A", "A", &nb, &nb, a, &nb, dd, u, &nb, v, &nb, work, &l… in PCSetUp_SVD()
/petsc/src/tao/constrained/impls/ipm/ !
H A Dipm.c68 if (ipmP->nb > 0) { in TaoSolve_IPM()
84 if (ipmP->nb > 0) { in TaoSolve_IPM()
97 if (ipmP->nb > 0) { in TaoSolve_IPM()
104 if (ipmP->nb > 0) { in TaoSolve_IPM()
122 if (ipmP->nb > 0) { in TaoSolve_IPM()
129 if (ipmP->nb > 0) { in TaoSolve_IPM()
144 if (ipmP->nb > 0) { in TaoSolve_IPM()
168 if (ipmP->nb > 0) { in TaoSolve_IPM()
196 ipmP->nb = ipmP->mi = ipmP->me = 0; in TaoSetup_IPM()
242 ipmP->nb = 0; in IPMInitializeBounds()
[all …]
/petsc/src/sys/tests/ !
H A Dex44.cxx19 Box::Box *nb = new Box::Box(); in main() local
20 delete nb; in main()
H A Dex41.c11 PetscInt n, off, array[4], na, nb, i, *marray, size; in main() local
116 PetscCall(PetscHSetIGetCapacity(hd, &nb)); in main()
118 PetscTestCheck(nb >= n); in main()
123 PetscCall(PetscHSetIGetCapacity(ht, &nb)); in main()
124 PetscTestCheck(nb >= na); in main()
H A Dex40.c25 PetscInt n, v, koff, keys[4], voff, vals[4], na, nb, i, size, *karray, off; in PETSC_HASH_MAP() local
146 PetscCall(PetscHMapIVGetCapacity(htv, &nb)); in PETSC_HASH_MAP()
147 PetscTestCheck(nb >= na); in PETSC_HASH_MAP()
/petsc/src/mat/impls/scalapack/ !
H A Dmatscalapack.c42 PetscCall(PetscViewerASCIIPrintf(viewer, "block sizes: %d,%d\n", (int)a->mb, (int)a->nb)); in MatView_ScaLAPACK()
164 …PetscBLASInt xdesc[9], ydesc[9], x2desc[9], y2desc[9], mb, nb, lszx, lszy, zero = 0, one = 1, x… in MatMultXXXYYY_ScaLAPACK() local
175 PetscCall(PetscBLASIntCast(ranges[1], &nb)); /* y block size */ in MatMultXXXYYY_ScaLAPACK()
177 …PetscCallBLAS("SCALAPACKdescinit", SCALAPACKdescinit_(ydesc, &one, &a->N, &one, &nb, &zero, &zero,… in MatMultXXXYYY_ScaLAPACK()
182 lszy = SCALAPACKnumroc_(&a->N, &a->nb, &a->grid->mycol, &a->csrc, &a->grid->npcol); in MatMultXXXYYY_ScaLAPACK()
189 …PetscCallBLAS("SCALAPACKdescinit", SCALAPACKdescinit_(y2desc, &one, &a->N, &one, &a->nb, &zero, &z… in MatMultXXXYYY_ScaLAPACK()
209 PetscCall(PetscBLASIntCast(ranges[1], &nb)); /* x block size */ in MatMultXXXYYY_ScaLAPACK()
211 …PetscCallBLAS("SCALAPACKdescinit", SCALAPACKdescinit_(xdesc, &one, &a->N, &one, &nb, &zero, &zero,… in MatMultXXXYYY_ScaLAPACK()
221 lszx = SCALAPACKnumroc_(&a->N, &a->nb, &a->grid->mycol, &a->csrc, &a->grid->npcol); in MatMultXXXYYY_ScaLAPACK()
226 …PetscCallBLAS("SCALAPACKdescinit", SCALAPACKdescinit_(x2desc, &one, &a->N, &one, &a->nb, &zero, &z… in MatMultXXXYYY_ScaLAPACK()
[all …]
/petsc/src/dm/tests/ !
H A Dex1f.F9018 PetscMPIInt, pointer :: nb(:)
41 PetscCallA(DMDAGetNeighbors(da, nb, ierr))
42 PetscCallA(DMDARestoreNeighbors(da, nb, ierr))
/petsc/src/snes/tests/ !
H A Dex5.c28 PetscInt its, n = 5, nb, maxit, maxf, *lens; in main() local
66 nb = 3 * n / 5; in main()
67 PetscCall(PetscMalloc1(nb, &lens)); in main()
68 for (PetscInt i = 0; i < nb / 3; i++) { in main()
73 PetscCall(MatSetVariableBlockSizes(J, nb, lens)); in main()
H A Dex17.c512 PetscInt index, nb; in FormFunction1_block() local
516 PetscCall(VecNestGetSubVecs(f, &nb, &ff)); in FormFunction1_block()
521 PetscCall(VecNestGetSubVecs(x, &nb, &xx)); in FormFunction1_block()
548 PetscInt index, nb; in FormJacobian1_block() local
555 PetscCall(VecNestGetSubVecs(x, &nb, &xx)); in FormJacobian1_block()
/petsc/include/ !
H A Dpetscstring.h536 size_t na = 0, nb = 0; in PetscStrendswith() local
543 PetscCall(PetscStrlen(b, &nb)); in PetscStrendswith()
544 if (na >= nb) { in PetscStrendswith()
546 *flg = __builtin_memcmp(b, a + (na - nb), nb) == 0 ? PETSC_TRUE : PETSC_FALSE; in PetscStrendswith()
548 *flg = memcmp(b, a + (na - nb), nb) == 0 ? PETSC_TRUE : PETSC_FALSE; in PetscStrendswith()
/petsc/src/dm/impls/plex/ !
H A Dplexmetric.c1085 PetscBLASInt nb; in DMPlexMetricModify_Private() local
1087 PetscCall(PetscBLASIntCast(dim, &nb)); in DMPlexMetricModify_Private()
1093 …PetscCallBLAS("LAPACKsyev", LAPACKsyev_("V", "U", &nb, Mpos, &nb, eigs, work, &lwork, rwork, &lier… in DMPlexMetricModify_Private()
1097 … PetscCallBLAS("LAPACKsyev", LAPACKsyev_("V", "U", &nb, Mpos, &nb, eigs, work, &lwork, &lierr)); in DMPlexMetricModify_Private()
1491 PetscBLASInt lierr, nb; in DMPlexMetricIntersection_Private() local
1495 PetscCall(PetscBLASIntCast(dim, &nb)); in DMPlexMetricIntersection_Private()
1501 …PetscCallBLAS("LAPACKsyev", LAPACKsyev_("V", "U", &nb, evecs, &nb, evals, work, &lwork, rwork, &li… in DMPlexMetricIntersection_Private()
1505 … PetscCallBLAS("LAPACKsyev", LAPACKsyev_("V", "U", &nb, evecs, &nb, evals, work, &lwork, &lierr)); in DMPlexMetricIntersection_Private()
1542 …PetscCallBLAS("LAPACKsyev", LAPACKsyev_("V", "U", &nb, evecs, &nb, evals, work, &lwork, rwork, &li… in DMPlexMetricIntersection_Private()
1546 … PetscCallBLAS("LAPACKsyev", LAPACKsyev_("V", "U", &nb, evecs, &nb, evals, work, &lwork, &lierr)); in DMPlexMetricIntersection_Private()
/petsc/src/snes/tutorials/ex10d/ !
H A Dex10.c89 PetscInt i, j, jstart, inode, nb, nbrs, Nvneighborstotal = 0; in main() local
308 nb = user.AdjM[i][j]; in main()
309 if (!verticesmask[nb]) { in main()
310 vertices[nvertices++] = nb; in main()
311 verticesmask[nb] = nvertices; in main()
330 nb = user.AdjM[i][j]; in main()
331 user.AdjM[i][j] = verticesmask[nb] - 1; in main()
/petsc/src/snes/tutorials/network/output/ !
H A Dex1_2.out1 Power network: nb = 9, ngen = 3, nload = 3, nbranch = 9
H A Dex1_6.out1 Power network: nb = 9, ngen = 3, nload = 3, nbranch = 9
H A Dex1_3.out1 Power network: nb = 9, ngen = 3, nload = 3, nbranch = 9
H A Dex1.out1 Power network: nb = 9, ngen = 3, nload = 3, nbranch = 9
H A Dex1_5.out1 Power network: nb = 9, ngen = 3, nload = 3, nbranch = 9
/petsc/src/snes/interface/ !
H A Dsnesut.c429 PetscBLASInt nb = 0, lwork; in SNESMonitorJacUpdateSpectrum() local
446 PetscCall(PetscBLASIntCast(n, &nb)); in SNESMonitorJacUpdateSpectrum()
447 lwork = 3 * nb; in SNESMonitorJacUpdateSpectrum()
457 …PetscCallBLAS("LAPACKgeev", LAPACKgeev_("N", "N", &nb, a, &nb, eigr, eigi, NULL, &nb, NULL, &nb, w… in SNESMonitorJacUpdateSpectrum()
/petsc/include/petsc/private/ !
H A Dpetscscalapack.h19 PetscBLASInt mb, nb; /* block size, for rows and columns */ member
121 …PetscCheck(_aa->mb == _bb->mb && _aa->nb == _bb->nb && _aa->rsrc == _bb->rsrc && _aa->csrc == _bb-…

12