初学者，刚学习并行计算，试了一个小程序

   program main
        implicit none
    include 'mpif.h'
        integer*4 ierr
        print*,'test *********** '    
              call MPI_INIT(ierr)
         call MPI_COMM_RANK(MPI_COMM_WORLD,rank,ierr)
         call MPI_COMM_SIZE(MPI_COMM_WORLD,size,ierr)
           print*,‘hollow world’
         call MPI_FINALIZE(ierr)

     print*,'test of result'
         stop

         end 


先对改程序利用mpif77 进行了编译生成a.out 的文件，然后利用qsub 提交 选择np=16，结果
‘test***********’出现了16次
‘hollo world’ 出现了16次
‘test of result’出现了16次，可是MPI_Init之前和MPI_Finalize 之后的程序不是不应该并行么？为什么会出现这种情况，第一次来贵板，还望各位高人不吝赐教