Fortran下的MPI并行问题，为什么程序在并行区之外的地方并行了

并行区内没有调用函数的指令，结果在并行部分之外的部分也被并行了，求大神解答