Hi, If you are worried about the difference between send and recv, just replace my example with: > call MPI_Irecv(buffer,...) > ... > temp=buffer(1) > buffer(1)=temp > ... > call MPI_Wait() > call DD(buffer) Aleks