program ch3201 implicit none print *,' hello world from image ', this_image() end program ch3201