Searched refs:lszd (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/mat/impls/scalapack/ |
| H A D | matscalapack.c | 435 PetscBLASInt j, ddesc[9], d2desc[9], mb, nb, lszd, zero = 0, one = 1, dlld, info; in MatGetDiagonal_ScaLAPACK() local
450 lszd = SCALAPACKnumroc_(&a->M, &a->mb, &a->grid->myrow, &a->rsrc, &a->grid->nprow); in MatGetDiagonal_ScaLAPACK()
451 PetscCall(PetscCalloc1(lszd, &d2d)); in MatGetDiagonal_ScaLAPACK()
452 PetscCall(PetscBLASIntCast(PetscMax(1, lszd), &dlld)); in MatGetDiagonal_ScaLAPACK()
478 lszd = SCALAPACKnumroc_(&a->N, &a->nb, &a->grid->mycol, &a->csrc, &a->grid->npcol); in MatGetDiagonal_ScaLAPACK()
479 PetscCall(PetscCalloc1(lszd, &d2d)); in MatGetDiagonal_ScaLAPACK()
508 PetscBLASInt i, j, ddesc[9], d2desc[9], mb, nb, lszd, zero = 0, one = 1, dlld, info; in MatDiagonalScale_ScaLAPACK() local
521 lszd = SCALAPACKnumroc_(&a->N, &a->nb, &a->grid->mycol, &a->csrc, &a->grid->npcol); in MatDiagonalScale_ScaLAPACK()
522 PetscCall(PetscCalloc1(lszd, &d2d)); in MatDiagonalScale_ScaLAPACK()
532 if (!a->grid->myrow) Cdgebs2d(a->grid->ictxt, "C", " ", 1, lszd, d2d, dlld); in MatDiagonalScale_ScaLAPACK()
[all …]
|