source: XIOS/dev/branch_openmp/extern/src_ep_dev/ep_init.cpp @ 1533

Last change on this file since 1533 was 1533, checked in by yushan, 6 years ago

save dev

File size: 653 bytes
RevLine 
[1134]1#include "ep_lib.hpp"
2#include <mpi.h>
3#include "ep_declaration.hpp"
4
5
6namespace ep_lib
7{
8
9
10
11  int MPI_Init_thread(int *argc, char*** argv, int required, int*provided)
12  {
[1520]13    Debug("MPI_Init_thread with EP/MPI\n");
[1134]14
[1520]15    if(omp_get_thread_num() == 0)
[1134]16    {
17      ::MPI_Init_thread(argc, argv, required, provided);
18    }
19  }
20
21  int MPI_Init(int *argc, char ***argv)
22  {
[1520]23    Debug("MPI_Init with EP/MPI\n");
[1134]24
[1520]25    if(omp_get_thread_num() == 0)
[1134]26    {
27      ::MPI_Init(argc, argv);
28    }
29  }
[1533]30 
31  int EP_group_init()
32  {
33 
34  }
[1134]35
36  int MPI_Initialized(int *flag)
37  {
[1520]38    Debug("MPI_Initialized with EP/MPI\n");
[1134]39
[1520]40    return ::MPI_Initialized(flag);
[1134]41  }
42
43
44
45}
46
47
Note: See TracBrowser for help on using the repository browser.