Lines Matching refs:matproperties

170   PetscInt           matproperties[8] = {0}, rstart, rend;  in PCMPISetMat()  local
187 PetscCall(MatGetSize(sA, &matproperties[0], &matproperties[1])); in PCMPISetMat()
189 matproperties[2] = bs; in PCMPISetMat()
191 matproperties[3] = !isset ? 0 : (issymmetric ? 1 : 2); in PCMPISetMat()
193 matproperties[4] = !isset ? 0 : (ishermitian ? 1 : 2); in PCMPISetMat()
195 matproperties[5] = !isset ? 0 : (isspd ? 1 : 2); in PCMPISetMat()
197 matproperties[6] = !isset ? 0 : (isstructurallysymmetric ? 1 : 2); in PCMPISetMat()
202 matproperties[7] = (PetscInt)clen; in PCMPISetMat()
204 …PetscCallMPI(MPI_Bcast(matproperties, PETSC_STATIC_ARRAY_LENGTH(matproperties), MPIU_INT, 0, comm)… in PCMPISetMat()
208 PetscCall(PetscLayoutSetBlockSize(layout, matproperties[2])); in PCMPISetMat()
209 PetscCall(PetscLayoutSetSize(layout, matproperties[1])); in PCMPISetMat()
216 PetscCall(PetscLayoutSetBlockSize(layout, matproperties[2])); in PCMPISetMat()
217 PetscCall(PetscLayoutSetSize(layout, matproperties[0])); in PCMPISetMat()
246 if (matproperties[7] > 0) { in PCMPISetMat()
249 PetscCall(PetscMPIIntCast(matproperties[7] + 1, &ni)); in PCMPISetMat()
250 if (!pc) PetscCall(PetscMalloc1(matproperties[7] + 1, &cprefix)); in PCMPISetMat()
256 PetscCall(MatSetSizes(A, m, n, matproperties[0], matproperties[1])); in PCMPISetMat()
286 PetscCall(MatSetBlockSize(A, matproperties[2])); in PCMPISetMat()
288 …if (matproperties[3]) PetscCall(MatSetOption(A, MAT_SYMMETRIC, matproperties[3] == 1 ? PETSC_TRUE … in PCMPISetMat()
289 …if (matproperties[4]) PetscCall(MatSetOption(A, MAT_HERMITIAN, matproperties[4] == 1 ? PETSC_TRUE … in PCMPISetMat()
290 …if (matproperties[5]) PetscCall(MatSetOption(A, MAT_SPD, matproperties[5] == 1 ? PETSC_TRUE : PETS… in PCMPISetMat()
291 …if (matproperties[6]) PetscCall(MatSetOption(A, MAT_STRUCTURALLY_SYMMETRIC, matproperties[6] == 1 … in PCMPISetMat()
324 PetscInt rstart, matproperties[4] = {0, 0, 0, 0}; in PCMPIUpdateMatValues() local
363 matproperties[0] = !isset ? 0 : (issymmetric ? 1 : 2); in PCMPIUpdateMatValues()
365 matproperties[1] = !isset ? 0 : (ishermitian ? 1 : 2); in PCMPIUpdateMatValues()
367 matproperties[2] = !isset ? 0 : (isspd ? 1 : 2); in PCMPIUpdateMatValues()
369 matproperties[3] = !isset ? 0 : (isstructurallysymmetric ? 1 : 2); in PCMPIUpdateMatValues()
373 PetscCallMPI(MPI_Bcast(matproperties, 4, MPIU_INT, 0, comm)); in PCMPIUpdateMatValues()
375 …if (matproperties[0]) PetscCall(MatSetOption(A, MAT_SYMMETRIC, matproperties[0] == 1 ? PETSC_TRUE … in PCMPIUpdateMatValues()
376 …if (matproperties[1]) PetscCall(MatSetOption(A, MAT_HERMITIAN, matproperties[1] == 1 ? PETSC_TRUE … in PCMPIUpdateMatValues()
377 …if (matproperties[2]) PetscCall(MatSetOption(A, MAT_SPD, matproperties[2] == 1 ? PETSC_TRUE : PETS… in PCMPIUpdateMatValues()
378 …if (matproperties[3]) PetscCall(MatSetOption(A, MAT_STRUCTURALLY_SYMMETRIC, matproperties[3] == 1 … in PCMPIUpdateMatValues()