[makoto@susquehanna test]$ mpif90 mpi_samp3.f90 -o samp
[makoto@susquehanna test]$ mpirun -np 8 samp
 I am id=           2  my sum=       39125  my total sum=           0
 I am id=           3  my sum=       54750  my total sum=           0
 I am id=           7  my sum=      117250  my total sum=           0
 I am id=           0  my sum=        7875  my total sum=      500500
 I am id=           1  my sum=       23500  my total sum=           0
 I am id=           4  my sum=       70375  my total sum=           0
 I am id=           5  my sum=       86000  my total sum=           0
 I am id=           6  my sum=      101625  my total sum=           0
[makoto@susquehanna test]$