Lines Matching refs:ml
73 FineGridCtx *ml = (FineGridCtx *)ML_Get_MyGetrowData(ML_data); in PetscML_getrow() local
74 Mat_SeqAIJ *a = (Mat_SeqAIJ *)ml->Aloc->data; in PetscML_getrow()
76 if (MatGetSize(ml->Aloc, &m, NULL)) return 0; in PetscML_getrow()
95 FineGridCtx *ml = (FineGridCtx *)ML_data; in PetscML_comm() local
96 Mat A = ml->A; in PetscML_comm()
99 PetscInt i, in_length = A->rmap->n, out_length = ml->Aloc->cmap->n; in PetscML_comm()
106 PetscCall(VecPlaceArray(ml->y, p)); in PetscML_comm()
107 PetscCall(VecScatterBegin(a->Mvctx, ml->y, a->lvec, INSERT_VALUES, SCATTER_FORWARD)); in PetscML_comm()
108 PetscCall(VecScatterEnd(a->Mvctx, ml->y, a->lvec, INSERT_VALUES, SCATTER_FORWARD)); in PetscML_comm()
109 PetscCall(VecResetArray(ml->y)); in PetscML_comm()
127 FineGridCtx *ml = (FineGridCtx *)ML_Get_MyMatvecData(ML_data); in PetscML_matvec() local
128 Mat A = ml->A, Aloc = ml->Aloc; in PetscML_matvec()
130 PetscScalar *pwork = ml->pwork; in PetscML_matvec()
136 PetscCall(VecPlaceArray(ml->x, p)); in PetscML_matvec()
139 PetscCall(PetscML_comm(pwork, ml)); in PetscML_matvec()
140 PetscCall(VecPlaceArray(ml->x, pwork)); in PetscML_matvec()
142 PetscCall(VecPlaceArray(ml->y, ap)); in PetscML_matvec()
143 PetscCall(MatMult(Aloc, ml->x, ml->y)); in PetscML_matvec()
144 PetscCall(VecResetArray(ml->x)); in PetscML_matvec()
145 PetscCall(VecResetArray(ml->y)); in PetscML_matvec()