Lines Matching refs:lld
66 isend[0] = a->lld * a->locc; /* locally allocated */ in MatGetInfo_ScaLAPACK()
133 a->loc[lridx - 1 + (lcidx - 1) * a->lld] = vals[i * nc + j]; in MatSetValues_ScaLAPACK()
136 a->loc[lridx - 1 + (lcidx - 1) * a->lld] += vals[i * nc + j]; in MatSetValues_ScaLAPACK()
142 a->loc[lridx - 1 + (lcidx - 1) * a->lld] = vals[i + j * nr]; in MatSetValues_ScaLAPACK()
145 a->loc[lridx - 1 + (lcidx - 1) * a->lld] += vals[i + j * nr]; in MatSetValues_ScaLAPACK()
537 for (i = 0; i < a->locr; i++) a->loc[i + j * a->lld] *= d2d[j]; in MatDiagonalScale_ScaLAPACK()
569 for (j = 0; j < a->locc; j++) a->loc[i + j * a->lld] *= d2d[i]; in MatDiagonalScale_ScaLAPACK()
583 n = x->lld * x->locc; in MatScale_ScaLAPACK()
624 PetscCall(PetscArraycpy(b->loc, a->loc, a->lld * a->locc)); in MatCopy_ScaLAPACK()
649 if (op == MAT_COPY_VALUES) PetscCall(PetscArraycpy(b->loc, a->loc, a->lld * a->locc)); in MatDuplicate_ScaLAPACK()
674 for (j = 0; j < b->locc; j++) b->loc[i + j * b->lld] = PetscConj(b->loc[i + j * b->lld]); in MatTranspose_ScaLAPACK()
687 for (j = 0; j < a->locc; j++) a->loc[i + j * a->lld] = PetscConj(a->loc[i + j * a->lld]); in MatConjugate_ScaLAPACK()
940 PetscCall(PetscArrayzero(a->loc, a->lld * a->locc)); in MatZeroEntries_ScaLAPACK()
981 PetscBLASInt bdesc[9], bmb, zero = 0, one = 1, lld, info; in MatConvert_ScaLAPACK_Dense() local
1013 PetscCall(PetscBLASIntCast(PetscMax(ldb, 1), &lld)); /* local leading dimension */ in MatConvert_ScaLAPACK_Dense()
1014 …CALAPACKdescinit_(bdesc, &a->M, &a->N, &bmb, &a->N, &zero, &zero, &a->grid->ictxcol, &lld, &info)); in MatConvert_ScaLAPACK_Dense()
1052 PetscCall(PetscBLASIntCast(PetscMax(ldb, 1), &lld)); /* local leading dimension */ in MatConvert_ScaLAPACK_Dense()
1053 …CALAPACKdescinit_(bdesc, &a->M, &a->N, &bmb, &a->N, &zero, &zero, &a->grid->ictxcol, &lld, &info)); in MatConvert_ScaLAPACK_Dense()
1095 PetscBLASInt adesc[9], amb, zero = 0, one = 1, lld, info; in MatConvert_Dense_ScaLAPACK() local
1125 PetscCall(PetscBLASIntCast(PetscMax(lda, 1), &lld)); /* local leading dimension */ in MatConvert_Dense_ScaLAPACK()
1126 …CALAPACKdescinit_(adesc, &b->M, &b->N, &amb, &b->N, &zero, &zero, &b->grid->ictxcol, &lld, &info)); in MatConvert_Dense_ScaLAPACK()
1236 if (!a->lld) a->lld = a->locr; in MatScaLAPACKSetPreallocation()
1239 PetscCall(PetscIntMultError(a->lld, a->locc, &sz)); in MatScaLAPACKSetPreallocation()
1296 a->lld = PetscMax(1, a->locr); in MatSetUp_ScaLAPACK()
1302 …init_(a->desc, &a->M, &a->N, &a->mb, &a->nb, &a->rsrc, &a->csrc, &a->grid->ictxt, &a->lld, &info)); in MatSetUp_ScaLAPACK()
1339 a->loc[lridx - 1 + (lcidx - 1) * a->lld] = val[i]; in MatAssemblyEnd_ScaLAPACK()
1342 a->loc[lridx - 1 + (lcidx - 1) * a->lld] += val[i]; in MatAssemblyEnd_ScaLAPACK()