Stephan Waser

Learn More
x = pempi_info_coord_x(torus); y = pempi_info_coord_y(torus); /* Get pre-defined row communicator */ pempi_comm_row(torus, &row_comm); temp = (int *) malloc(local_nx*local_ny*sizeof(int)); for (iter = 0; iter < X; iter++) { /* Pipe */ root = (x + iter) % X; if (y==root) memcpy(temp, A_LO, local_nx*local_ny*sizeof(int)); /* stop operations of MPI routines */(More)
  • 1