Lines Matching refs:m
35 PetscInt m = A->rmap->n; /* Number of rows in the matrix. */ in MatSeqAIJCRL_create_aijcrl() local
43 aijcrl->m = A->rmap->n; in MatSeqAIJCRL_create_aijcrl()
47 PetscCall(PetscMalloc2(rmax * m, &aijcrl->acols, rmax * m, &aijcrl->icols)); in MatSeqAIJCRL_create_aijcrl()
50 for (i = 0; i < m; i++) { in MatSeqAIJCRL_create_aijcrl()
52 acols[j * m + i] = *aa++; in MatSeqAIJCRL_create_aijcrl()
53 icols[j * m + i] = *aj++; in MatSeqAIJCRL_create_aijcrl()
56 acols[j * m + i] = 0.0; in MatSeqAIJCRL_create_aijcrl()
57 icols[j * m + i] = (j) ? icols[(j - 1) * m + i] : 0; /* handle case where row is EMPTY */ in MatSeqAIJCRL_create_aijcrl()
60 …iply %g. Rmax= %" PetscInt_FMT "\n", 1.0 - ((double)a->nz) / PetscMax((double)rmax * m, 1), rmax)); in MatSeqAIJCRL_create_aijcrl()
89 PetscInt m = aijcrl->m; /* Number of rows in the matrix. */ in MatMult_AIJCRL() local
115 fortranmultcrl_(&m, &rmax, x, y, icols, acols); in MatMult_AIJCRL()
119 for (j = 0; j < m; j++) y[j] = acols[j] * x[icols[j]]; in MatMult_AIJCRL()
126 ii = i * m; in MatMult_AIJCRL()
130 for (j = 0; j < m; j++) y[j] = y[j] + acols[ii + j] * x[icols[ii + j]]; in MatMult_AIJCRL()
133 PetscCall(PetscLogFlops(2.0 * aijcrl->nz - m)); in MatMult_AIJCRL()
197 PetscErrorCode MatCreateSeqAIJCRL(MPI_Comm comm, PetscInt m, PetscInt n, PetscInt nz, const PetscIn… in MatCreateSeqAIJCRL() argument
201 PetscCall(MatSetSizes(*A, m, n, m, n)); in MatCreateSeqAIJCRL()