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