I try to parallel my fortran program by means of mpi. The point is that I have to pass some individual elements (not all) of an array from some rank to zero rank. Namely, it
