For tatara@kyushu-u, add source /home/etc/intelMPI.csh. Show message in MPI_rank_divider.

+#for tatara in kyushu-u This is neglected in other cases.
+if(-e /home/etc/intelMPI.csh) source /home/etc/intelMPI.csh
comment out flush() from cpitid.F.

I don't know why. But tatara@kyushu-u cause segmentation fault when it
exists.
Different file handle name, instead of ifi in sugw.F