/*****************************************************************************
 * Copyright (c) 2019 FrontISTR Commons
 * This software is released under the MIT License, see LICENSE.txt
 *****************************************************************************/

#define HECMW_STATUS_SIZE 4
int HECMW_ANY_TAG;

/*
extern int
HECMW_Comm_rank( HECMW_Comm comm, int *rank );

extern int
HECMW_Comm_size( HECMW_Comm comm, int *size );

extern int
HECMW_Comm_dup( HECMW_Comm comm, HECMW_Comm *new_comm );

extern int
HECMW_Finalize(void);

*/

#define HECMW_Finalize HECMW_finalize

extern void whole_copy_array(int *recv_num, int *global_recv_num, int mynode,
                             int pesize, HECMW_Comm repart_comm);

extern int stack_part_send_recv(int neibpetot, int *neibpe, int *stack_import,
                                int *stack_export, HECMW_Comm repart_comm,
                                int my_rank);

extern int stack_whole_send_recv(int pesize, int *stack_export,
                                 int *stack_import, HECMW_Comm repart_comm,
                                 int my_rank);

extern int int_part_send_recv(int n, int neibpetot, int *neibpe,
                              int *stack_import, int *nod_import,
                              int *stack_export, int *nod_export, int *x,
                              HECMW_Comm repart_comm, int my_rank);

extern int double_part_send_recv(int n, int neibpetot, int *neibpe,
                                 int *stack_import, int *nod_import,
                                 int *stack_export, int *nod_export, double *x,
                                 HECMW_Comm repart_comm, int my_rank);

extern void int_whole_send_recv(int n1, int n2, int pesize, int *stack_import,
                                int *nod_import, int *stack_export,
                                int *nod_export, int *x, int *y,
                                HECMW_Comm repart_comm, int my_rank);
extern void int2_whole_send_recv(int n1, int n2, int pesize, int *stack_import,
                                 int *stack_export, int *x, int *y,
                                 HECMW_Comm repart_comm, int my_rank);

extern void double2_whole_send_recv(int n1, int n2, int pesize,
                                    int *stack_import, int *stack_export,
                                    double *x, double *y,
                                    HECMW_Comm repart_comm, int my_rank);

extern void int3_whole_send_recv(int n1, int n2, int pesize, int *stack_import,
                                 int *stack_export, int *x, int *y,
                                 HECMW_Comm repart_comm, int my_rank);

extern void double_whole_send_recv(int n1, int n2, int pesize,
                                   int *stack_import, int *nod_import,
                                   int *stack_export, int *nod_export,
                                   double *x, double *y, HECMW_Comm repart_comm,
                                   int my_rank);