Use MPI_Init_thread