[makoto@susquehanna test]$ mpif90 mpi_samp1.f90 -o samp
[makoto@susquehanna test]$ mpirun -np 8 samp
 hello, world! i am node            0
 hello, world! i am node            4
 hello, world! i am node            3
 hello, world! i am node            1
 hello, world! i am node            6
 hello, world! i am node            2
 hello, world! i am node            5
 hello, world! i am node            7
[makoto@susquehanna test]$