prigram main ...... ...... call p1() call p2() .......... contains subroutine p1() ............ end subroutine p1 subroutine p2() ............ end subroutine p2 end ! 子程序中的变量无需重新说明,变量值无需通过哑实结合传递。
elemental代表的是你可以传数组给这个函数,而这个函数会一个一个地处理这个数组的,并且是相互独立的(可并行)
external代表这后面声名的子程序是在别处定义的,不属于当前子程序的内部子程序
contains代表下面的子程序和函数包含在当前的“物件”里,属于当前“物件”的内部子程序或函数,而这个“物件”可以是子程序、函数或者是模块等等