Home
last modified time | relevance | path

Searched refs:PCTFS_my_id (Results 1 – 5 of 5) sorted by relevance

/petsc/src/ksp/pc/impls/tfs/
H A Dcomm.c18 PetscMPIInt PCTFS_my_id = 0; variable
37 PetscCallMPI(MPI_Comm_rank(MPI_COMM_WORLD, &PCTFS_my_id)); in PCTFS_comm_init()
46 edge_node[PCTFS_i_log2_num_nodes] = PCTFS_my_id ^ PCTFS_floor_num_nodes; in PCTFS_comm_init()
55 …if ((PCTFS_my_id > 0) && (PCTFS_my_id <= modfl_num_nodes)) edge_not_pow_2 = ((PCTFS_my_id | PCTFS_… in PCTFS_comm_init()
56 …else if (PCTFS_my_id >= PCTFS_floor_num_nodes) edge_not_pow_2 = ((PCTFS_my_id ^ PCTFS_floor_num_no… in PCTFS_comm_init()
94 if (PCTFS_my_id >= PCTFS_floor_num_nodes) { in PCTFS_giop()
95 … PetscCallMPI(MPI_Send(vals, n, MPIU_INT, edge_not_pow_2, MSGTAG0 + PCTFS_my_id, MPI_COMM_WORLD)); in PCTFS_giop()
103 if (PCTFS_my_id < PCTFS_floor_num_nodes) { in PCTFS_giop()
105 dest = PCTFS_my_id ^ mask; in PCTFS_giop()
106 if (PCTFS_my_id > dest) { in PCTFS_giop()
[all …]
H A Dxyt.c168 …if (!PCTFS_my_id) PetscCall(PetscPrintf(PETSC_COMM_WORLD, "XYT_stats() :: no stats available!\n")); in XYT_stats()
180 if (!PCTFS_my_id) { in XYT_stats()
181 …PetscCall(PetscPrintf(PETSC_COMM_WORLD, "%d :: min xyt_nnz=%" PetscInt_FMT "\n", PCTFS_my_id, va… in XYT_stats()
182 …PetscCall(PetscPrintf(PETSC_COMM_WORLD, "%d :: max xyt_nnz=%" PetscInt_FMT "\n", PCTFS_my_id, va… in XYT_stats()
183 …PetscCall(PetscPrintf(PETSC_COMM_WORLD, "%d :: avg xyt_nnz=%g\n", PCTFS_my_id, (double)(1.0 * va… in XYT_stats()
184 …PetscCall(PetscPrintf(PETSC_COMM_WORLD, "%d :: tot xyt_nnz=%" PetscInt_FMT "\n", PCTFS_my_id, va… in XYT_stats()
185 …PetscCall(PetscPrintf(PETSC_COMM_WORLD, "%d :: xyt C(2d) =%g\n", PCTFS_my_id, (double)(vals[2] … in XYT_stats()
186 …PetscCall(PetscPrintf(PETSC_COMM_WORLD, "%d :: xyt C(3d) =%g\n", PCTFS_my_id, (double)(vals[2] … in XYT_stats()
187 …PetscCall(PetscPrintf(PETSC_COMM_WORLD, "%d :: min xyt_n =%" PetscInt_FMT "\n", PCTFS_my_id, va… in XYT_stats()
188 …PetscCall(PetscPrintf(PETSC_COMM_WORLD, "%d :: max xyt_n =%" PetscInt_FMT "\n", PCTFS_my_id, va… in XYT_stats()
[all …]
H A Dgs.c506 PetscCall(PCTFS_set_bit_mask(p_mask, p_mask_size, PCTFS_my_id)); in get_ngh_buf()
679 PetscCall(PCTFS_set_bit_mask(p_mask, p_mask_size, PCTFS_my_id)); in set_pairwise()
1179 …PetscCallMPI(MPIU_Isend(dptr3, *msg_size * step, MPIU_SCALAR, *msg_list, MSGTAG1 + PCTFS_my_id, gs… in PCTFS_gs_gop_vec_pairwise_plus()
1345 if ((PCTFS_my_id | mask) == (*list | mask)) { in PCTFS_gs_gop_pairwise_plus_hc()
1363 if ((PCTFS_my_id | mask) == (*list | mask)) { in PCTFS_gs_gop_pairwise_plus_hc()
1368 …PetscCallMPI(MPIU_Isend(dptr3, *msg_size, MPIU_SCALAR, *list, MSGTAG1 + PCTFS_my_id, gs->PCTFS_gs_… in PCTFS_gs_gop_pairwise_plus_hc()
1385 if ((PCTFS_my_id | mask) == (*list | mask)) { in PCTFS_gs_gop_pairwise_plus_hc()
1401 if ((PCTFS_my_id | mask) == (*msg_list | mask)) { in PCTFS_gs_gop_pairwise_plus_hc()
H A Dtfs.h133 PETSC_INTERN PetscMPIInt PCTFS_my_id; variable
H A Dxxt.c518 …for (iptr = fo + n, id = PCTFS_my_id, mask = PCTFS_num_nodes >> 1, edge = level; edge > 0; edge--,… in det_separators()
620 …for (iptr = fo + n, id = PCTFS_my_id, mask = PCTFS_num_nodes >> 1, edge = level; edge > 0; edge--,… in det_separators()