Searched refs:Petsc_Reduction_keyval (Results 1 – 3 of 3) sorted by relevance
275 PetscMPIInt Petsc_Reduction_keyval = MPI_KEYVAL_INVALID; variable303 if (Petsc_Reduction_keyval == MPI_KEYVAL_INVALID) { in PetscSplitReductionGet()311 …(MPI_Comm_create_keyval(MPI_COMM_NULL_COPY_FN, Petsc_DelReduction, &Petsc_Reduction_keyval, NULL)); in PetscSplitReductionGet()313 PetscCallMPI(MPI_Comm_get_attr(comm, Petsc_Reduction_keyval, (void **)sr, &iflg)); in PetscSplitReductionGet()316 PetscCallMPI(MPI_Comm_set_attr(comm, Petsc_Reduction_keyval, *sr)); in PetscSplitReductionGet()
292 …if (Petsc_Reduction_keyval != MPI_KEYVAL_INVALID) PetscCallMPI(MPI_Comm_free_keyval(&Petsc_Reducti… in VecFinalizePackage()
358 PETSC_INTERN PetscMPIInt Petsc_Reduction_keyval; variable