same_high_low.c

来自「mpi并行计算的c++代码 可用vc或gcc编译通过 可以用来搭建并行计算试验环」· C语言 代码 · 共 20 行

/*
   (C) 2004 by Argonne National Laboratory.
       See COPYRIGHT in top-level directory.
*/
#include "collchk.h" 

int CollChk_same_high_low(MPI_Comm comm, int high_low, char* call)
{
    char err_str[COLLCHK_STD_STRLEN];

    if(    CollChk_same_int(comm, high_low, call, "High/Low", err_str)
        != MPI_SUCCESS ) {
        return CollChk_err_han(err_str, COLLCHK_ERR_HIGH_LOW, call, comm);
    }
    else {
        return MPI_SUCCESS;
    }

}