Lines Matching refs:icomm
1251 MPI_Comm icomm; in MatDestroy_ScaLAPACK() local
1257 PetscCall(PetscCommDuplicate(PetscObjectComm((PetscObject)A), &icomm, NULL)); in MatDestroy_ScaLAPACK()
1258 PetscCallMPI(MPI_Comm_get_attr(icomm, Petsc_ScaLAPACK_keyval, (void **)&grid, &iflg)); in MatDestroy_ScaLAPACK()
1264 PetscCallMPI(MPI_Comm_delete_attr(icomm, Petsc_ScaLAPACK_keyval)); in MatDestroy_ScaLAPACK()
1266 PetscCall(PetscCommDestroy(&icomm)); in MatDestroy_ScaLAPACK()
1779 MPI_Comm icomm; in MatCreate_ScaLAPACK() local
1803 PetscCall(PetscCommDuplicate(PetscObjectComm((PetscObject)A), &icomm, NULL)); in MatCreate_ScaLAPACK()
1804 PetscCallMPI(MPI_Comm_get_attr(icomm, Petsc_ScaLAPACK_keyval, (void **)&grid, &iflg)); in MatCreate_ScaLAPACK()
1808 PetscCallMPI(MPI_Comm_size(icomm, &size)); in MatCreate_ScaLAPACK()
1823 grid->ictxt = Csys2blacs_handle(icomm); in MatCreate_ScaLAPACK()
1832 grid->ictxrow = Csys2blacs_handle(icomm); in MatCreate_ScaLAPACK()
1834 grid->ictxcol = Csys2blacs_handle(icomm); in MatCreate_ScaLAPACK()
1836 PetscCallMPI(MPI_Comm_set_attr(icomm, Petsc_ScaLAPACK_keyval, (void *)grid)); in MatCreate_ScaLAPACK()
1839 PetscCall(PetscCommDestroy(&icomm)); in MatCreate_ScaLAPACK()