Lines Matching refs:PCTFS_num_nodes
19 PetscMPIInt PCTFS_num_nodes = 1; variable
36 PetscCallMPI(MPI_Comm_size(MPI_COMM_WORLD, &PCTFS_num_nodes)); in PCTFS_comm_init()
39 …PetscCheck(PCTFS_num_nodes <= (INT_MAX >> 1), PETSC_COMM_SELF, PETSC_ERR_PLIB, "Can't have more th… in PCTFS_comm_init()
45 while (PCTFS_floor_num_nodes <= PCTFS_num_nodes) { in PCTFS_comm_init()
53 modfl_num_nodes = (PCTFS_num_nodes - PCTFS_floor_num_nodes); in PCTFS_comm_init()
80 if ((PCTFS_num_nodes < 2) || (!n)) PetscFunctionReturn(PETSC_SUCCESS); in PCTFS_giop()
157 if ((PCTFS_num_nodes < 2) || (!n)) PetscFunctionReturn(PETSC_SUCCESS); in PCTFS_grop()
233 if ((PCTFS_num_nodes < 2) || (!n) || (dim <= 0)) PetscFunctionReturn(PETSC_SUCCESS); in PCTFS_grop_hc()
295 type = MSGTAG3 + PCTFS_my_id + (PCTFS_num_nodes * edge); in PCTFS_ssgl_radd()
311 type = MSGTAG6 + PCTFS_my_id + (PCTFS_num_nodes * edge); in PCTFS_ssgl_radd()
346 if ((PCTFS_num_nodes < 2) || (!n) || (dim <= 0)) PetscFunctionReturn(PETSC_SUCCESS); in PCTFS_giop_hc()