Question

程序的执行始终是开始于主程序的第一条可执行语句，所以每个完整的 Fortran 程序必须有且仅有一个主程序。其形式为：

[PROGRAM [程序名]]

[说明部分]

[可执行部分]

[CONTAINS

内部过程]

END [PROGRAM[程序名]]

可以看到，主程序单元中允许包含内部过程。主程序名和外部过程名和公共块名都被认为是全局名称。全局名称在一个程序中必须是唯一的。

例：PROGRAM MAIN

REAL X(10),A(10,10),B(10) !说明部分

…

CALL GAUSS(A,B,X) !执行部分，调用内部过程 GAUSS

CONTAINS

SUBROUTINE GAUSS(R,S,T) !内部过程的开始

…

END SUBROUTINE GAUSS !内部过程的结束

EHD PROGRAM MAIN

下图显示的是一个 F90 程序的标准结构。每个框都可以是一个独立的源文件：