Searched refs:Bbn1 (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/mat/impls/aij/mpi/ |
| H A D | mpimatmatmult.c | 419 PetscInt Am = A->rmap->n, Bm = B->rmap->n, BN = B->cmap->N, Bbn, Bbn1, bs, numBb; in MatMatMultSymbolic_MPIAIJ_MPIDense() local
446 Bbn1 = 2 * Am * BN / nz; in MatMatMultSymbolic_MPIAIJ_MPIDense()
447 if (!Bbn1) Bbn1 = 1; in MatMatMultSymbolic_MPIAIJ_MPIDense()
448 } else Bbn1 = BN; in MatMatMultSymbolic_MPIAIJ_MPIDense()
451 Bbn1 = Bbn1 / bs * bs; /* Bbn1 is a multiple of bs */ in MatMatMultSymbolic_MPIAIJ_MPIDense()
452 if (Bbn1 > BN) Bbn1 = BN; in MatMatMultSymbolic_MPIAIJ_MPIDense()
453 PetscCallMPI(MPIU_Allreduce(&Bbn1, &Bbn, 1, MPIU_INT, MPI_MAX, comm)); in MatMatMultSymbolic_MPIAIJ_MPIDense()
464 Bbn1 = BN - numBb * Bbn; in MatMatMultSymbolic_MPIAIJ_MPIDense()
469 if (Bbn1) { /* Create workB1 for the remaining columns */ in MatMatMultSymbolic_MPIAIJ_MPIDense()
470 PetscCall(PetscInfo(C, "use Bb1, BN=%" PetscInt_FMT ", Bbn1=%" PetscInt_FMT "\n", BN, Bbn1)); in MatMatMultSymbolic_MPIAIJ_MPIDense()
[all …]
|