impls/tfs/gs.c

29 typedef struct gather_scatter_id {  struct
30   PetscInt     id;
31   PetscInt     nel_min;
32   PetscInt     nel_max;
33   PetscInt     nel_sum;
34   PetscInt     negl;
35   PetscInt     gl_max;
36   PetscInt     gl_min;
37   PetscInt     repeats;
38   PetscInt     ordered;
39   PetscInt     positive;
40   PetscScalar *vals;
43   PetscInt *my_proc_mask;
44   PetscInt  mask_sz;
45   PetscInt *ngh_buf;
46   PetscInt  ngh_buf_sz;
47   PetscInt *nghs;
48   PetscInt  num_nghs;
49   PetscInt  max_nghs;
50   PetscInt *pw_nghs;
51   PetscInt  num_pw_nghs;
52   PetscInt *tree_nghs;
53   PetscInt  num_tree_nghs;
55   PetscInt num_loads;
58   PetscInt  nel;  /* number of unique elements */
59   PetscInt *elms; /* of size nel */
60   PetscInt  nel_total;
61   PetscInt *local_elms; /* of size nel_total */
62   PetscInt *companion;  /* of size nel_total */
65   PetscInt   num_local_total;
66   PetscInt   local_strength;
67   PetscInt   num_local;
68   PetscInt  *num_local_reduce;
69   PetscInt **local_reduce;
70   PetscInt   num_local_gop;
71   PetscInt  *num_gop_local_reduce;
72   PetscInt **gop_local_reduce;
75   PetscInt     level;
76   PetscInt     num_pairs;
77   PetscInt     max_pairs;
78   PetscInt     loc_node_pairs;
79   PetscInt     max_node_pairs;
80   PetscInt     min_node_pairs;
81   PetscInt     avg_node_pairs;
82   PetscInt    *pair_list;
83   PetscInt    *msg_sizes;
84   PetscInt   **node_list;
85   PetscInt     len_pw_list;
86   PetscInt    *pw_elm_list;
87   PetscScalar *pw_vals;
89   MPI_Request *msg_ids_in;
90   MPI_Request *msg_ids_out;
92   PetscScalar *out;
93   PetscScalar *in;
94   PetscInt     msg_total;
97   PetscInt   max_left_over;
98   PetscInt  *pre;
99   PetscInt  *in_num;
100   PetscInt  *out_num;
101   PetscInt **in_list;
102   PetscInt **out_list;
105   PetscInt     tree_nel;
106   PetscInt    *tree_elms;
107   PetscScalar *tree_buf;
108   PetscScalar *tree_work;
110   PetscInt  tree_map_sz;
111   PetscInt *tree_map_in;
112   PetscInt *tree_map_out;
115   PetscInt gl_bss_min;
116   PetscInt gl_perm_min;
119   PetscInt vec_sz;
122   MPI_Comm PCTFS_gs_comm;