Fortran学习报错[1]:warning #5427: Program may contain only one main entry routine

Message:

refer_25_2.f90(267): warning #5427: Program may contain only one main entry routine
stop
^
compilation aborted for refer_25_2.f90 (code 1)

EXPLANATION:  Two or more main program units were found,
     possibly caused by missing FUNCTION or SUBROUTINE statements.

修正前：

...
   max_CONC_nO2 = maxval(z)

   write(*,'(f10.2)') max_CONC_nO2

end subroutine cal_z_varibl
stop

#stop 应放在end subroutine* 前

修正后：

...
   max_CONC_nO2 = maxval(z)

   write(*,'(f10.2)') max_CONC_nO2
stop
end subroutine cal_z_varibl

Reference:Warning_Messages_Fortran-CSDN博客