Jacobi Iteration: create topology

call MPI_CART_CREATE(MPI_COMM_WORLD,

ndim,dims,periods,

reorder,comm2d,ierr)

CALL MPI_COMM_RANK( MPI_COMM_WORLD,

myrank, ierr )

CALL MPI_CART_COORDS( MPI_COMM_WORLD,

myrank, 2, coords, ierr )

CALL MPI_CART_SHIFT( comm2d,

2, 1, nbrleft, nbrright, ierr )

CALL MPI_CART_SHIFT( comm2d,

1, 1, nbrbottom, nbrtop, ierr )

Previous slide

Next slide

Back to first slide

View graphic version