FORTRAN

Fortran源自于“公式翻译”（英语：FormulaTranslation）的缩写，是一种编程语言。它是世界上最早出现的计算机高级程序设计语言，广泛应用于科学和工程计算领域。FORTRAN语言以其特有的功能在数值、科学和工程计算领域发挥着重要作用。Fortran90之前的版本是人们所知晓的FORTRAN（全部字母大写），从Fortran90以及以后的版本都写成Fortran（仅有第一个字母大写）。

中文名：公式翻译器

外文名：FORmulaTRANslator

外语缩写：Fortran

应用领域：科学和工程计算

1、历史

开发史

1951年：美国IBM公司约翰·贝克斯(JohnBackus)针对汇编语言的缺点着手研究开发FORTRAN语言。

1954年：约翰·贝克斯在纽约正式对外发布，称为FORTRANⅠ，FORTRANⅠ功能简单，但它的开创性工作，在社会上引起了极大的反响。

1957年：第一个FORTRAN编译器在IBM704计算机上实现，并首次成功运行了FORTRAN程序。

1958年：对FORTRANⅠ进行了扩充和完善，引进了子函数等概念，推出了商业化的FORTRANⅡ版本。

1962年：推出了FORTRANⅣ。FORTRANⅣ没有充分考虑兼容性，导致FORTRANⅡ程序不能在FORTRANⅣ系统中运行，使其应用受到了很大限制，这时语言不兼容性问题和影响被突出表现出来。此前也出现过FORTRANⅢ，但由于存在严重缺陷，没有在计算机上实现。

标准化

随着FORTRAN语言版本的不断更新和变化，语言不兼容性问题日益突出，语言标准化工作被提上了日程。

1962年5月：美国标准化协会(简称ANSI)着手进行FORTRAN语言标准化的研究工作。

1966年：ANSI正式公布了两个标准文本：美国国家标准FORTRAN(ANSIX3.9-1966)和美国国家标准基本FORTRAN(ANSIX3.10-1966)，前者相当于FORTRANⅣ，后者相当于FORTRANⅡ。基本FORTRAN是美国国家标准FORTRAN的一个子集，从而实现了语言的向下兼容，初步解决了语言的兼容性问题。通常称美国国家标准FORTRAN为FORTRAN66。FORTRAN66的推出在国际上产生了广泛影响。

1972年：国际标准化组织(简称ISO)在FORTRAN66基础上制定了FORTRAN语言三级国际标准：基本级、中间级和完全级。

20世纪60代末，结构化程序设计方法提出后，具有结构化特征的程序设计语言开始出现。如：ALGOL、PASCAL、MODULA、C等。计算机厂商和研究机构的高度重视将结构化特征引入FORTRAN66，并开始对FORTRAN66进行不同程度的扩充，引入了结构化特征。

1976年：ANSI对FORTRAN66(ANSIX3.9-1966)进行了修订，吸收了计算机厂商所扩充的一些具有可行性的功能，同时增加了许多新内容。

1978年4月：ANSI正式公布了新的美国国家标准(程序设计语言FORTRANANSIX3.9-1978)，同时宣布撤消ANSIFORTRAN3.9-1966，通常称新标准为FORTRAN77(该版本原计划1977年公布)。FORTRAN77向下兼容FORTRAN66。

1980年：FORTRAN77被ISO正式确定为国际标准ISO1539-1980，该标准分全集和子集。FORTRAN77推出后，由于具有结构化特征，在社会上得到了广泛应用，同时由于扩充了字符处理功能，在非数值处理领域也能大显身手。

20世纪80年代末，FORTRAN77结构化和现代化的研究开始兴起。

1991年5月：ANSI公布了新的美国国家标准FORTRAN(ANSI3.198-1991)。之后，ISO采纳该标准，并确定为国际标准ISO/IEC1539-1：1991，新国际标准还采纳了中国计算机和信息处理标准化技术委员会程序设计分会提出的多字节字符集数据类型及相应的内部函数，为非英语国家使用计算机提供了极大的方便。通常称新标准为Fortran90，Fortran90向下兼容FORTRAN77。之后不久又出现了Fortran95。

Fortran90的推出，使传统Fortran语言具有了现代气息。Fortran2003的规则已经由ISO组织制定发布。

平台化

Windows平台下，微软公司将Fortran90无缝集成在DeveloperStudio集成开发环境之中，推出了MicrosoftFortranPowerStation4.0，使Fortran90真正实现了可视化编程，彻底告别了传统DOS环境(字符界面)，转到了现代Windows环境(视窗界面)，共享微软公司Windows平台的丰富资源。

1997年3月：微软公司和数据设备公司(DigitalEquipmentCorp，简称DEC)合作研究、开发和推出了功能更强的Fortran语言新版本：DigitalVisualFORTRAN5.0，它是MicrosoftFORTRANPowerStation4.0的升级换代产品。DEC公司在高性能科学和工程计算方面拥有先进的技术，研发了高质量的FORTRAN编译器。

1998年1月：DEC与Compaq公司合并，DEC成为Compaq公司的全资子公司，于是DigitalVisualFortran更名为CompaqVisualFortran，其最新版本为CompaqVisualFortran6.6。Compaq和HP合并之后，Compaq的Fortran小组和Intel的Fortran开发小组合并，开发出来IntelFotran编译器9，有Linux和windows2个版本，其Windows版本为IntelVisualFortran，可以和微软的VisualStudio,net集成。Windows平台下还有PGI，Absoft，Intel等多个商业公司的Fortran编译器，还有大量小公司的免费Fortran编译器。

OpenMPI使Fortran等语言可以容易且免费的实现并行计算。

Linux平台下，其GCC编译器默认支持Fortran，另外有Intel，SunStudio，OpenMPI，Photran等共享编译器和PGI，Absoft，lachy，IBM，SGI，HP等多个版本的商业编译器。

2、语法版本

IBM版本

最早的FORTRAN版本应用于IBM704系统上，包含了32种语句，包括：DIMENSION和EQUIVALENCE语句赋值语句三态算术IF语句。以IF这个陈述式检查例外情况（ACCUMULATOROVERFLOW、QUOTIENTOVERFLOW和DIVIDECHECK）；IF语句以处理判断开关和判断指示灯GOTO，计算的GOTO，ASSIGN，和赋值GOTODO循环，格式化的输入与输出（FormattedI/O）：FORMAT、READ、READINPUTTAPE、WRITE、WRITEOUTPUTTAPE、PRINT和PUNCH，非格式化的输入与输出（UnformattedI/O）：READTAPE、READDRUM、WRITETAPE和WRITEDRUM，其他的输入与输出：ENDFILE、REWIND，和BACKSPACEPAUSE，STOP，和CONTINUEFREQUENCY语句（为编译器提供优化帮助）。

FORTRAN

1958年IBM又推出FORTRANII。支援使用者撰写副编程（subroutines）以及函数（functions）。有六个新陈述如下：SUBROUTINE、FUNCTION，和ENDCALL和RETURNCOMMON。接下来的几年内，FORTRANII继续又支援DOUBLEPRECISION和COMPLEX等资料型态（datatypes）。

IBM继续开发FORTRANIII。至1958年时已可以内建组合语言码并新增其它功能；然而这个版本却从未推出。有如704FORTRAN和FORTRANII、FORTRANIII等的开发过程包含了过多的机器相依性（machine-dependent），造成编程码不易移植到其他机器上的问题。

自1961年开始，IBM开始发展FORTRANIV，目的在于移除一些FORTRANII中过于依赖机器本身的编程码（例如：READINPUTTAPE）同时新增一些新的功能，如LOGICAL资料型别。布尔类型（TRUE或者FALSE）与逻辑IF语句则取代了算术IF语句。FORTRANIV于1962年推出，最早应用于IBM7030（Stretch）计算机之上，以及其接续的IBM7090和IBM7094版本。

标准化版本

在早期的FORTRAN语言发展史上，美国标准协会（AmericanStandardsAssociation，即今日的ANSI）的委员们开始为FORTRAN制定标准规格，名为"AmericanStandardFortran"。1966年委员会推出两套FORTRAN标准版本，分别定义成FORTRAN（基于FORTRANIV，用来应付defacto标准）和BasicFORTRAN（基于FORTRANII，并且移除其平台依赖性）。FORTRAN第一套标准后来被称为FORTRAN66（大家仍习惯称之为FORTRANIV）。FORTRAN66有效的成功第一套工业标准版的FORTRAN。其功能如下：

主程序，程序单元SUBROUTINE、FUNCTION和BLOCKDATA，数据类型INTEGER、REAL、DOUBLEPRECISION、COMPLEX和LOGICAL，语句COMMON、DIMENSION和EQUIVALENCE。DATA语句用以指定初始值内部和EXTERNAL（例如库）函数，赋值语句GOTO、赋值GOTO和计算GOTO语句逻辑IF和算术（三态）IF语句DO循环READ、WRITE、BACKSPACE、REWIND和ENDFILE语句以处理顺序读写FORMAT语句CALL、RETURN、PAUSE和STOP语句DATA和FORMAT语句中的霍尔瑞斯常数，作为子程序的实际参数最长六个字母的标识符注释行。

在FORTRAN66标准推出之后，各家编译器厂商不断推出更具扩充性的标准FOTRAN（StandardFortran），这使得ANSI于1969年开始着手于1966标准版本的修正工作。最后定稿于1977年，1978年四月正式推出FORTRAN。新的标准规格也就是著名的FORTRAN77，这个版本是基于FORTRAN66之上新增许多功能，弥补过去的缺点：

CHARACTER数据类型，极大地扩展了的字符输入和输出以及对基于字符的数据进行处理的工具IMPLICIT语句IF语句块，以及可选的ELSE和ELSEIF从句，提供改进了的对结构化编程的语言支持。OPEN，CLOSE和INQUIRE语句以改进I/O能力，直接访问文件I/O。PARAMETER语句以指定常数SAVE语句以保存本地变量内部函数的通用名称。1978年推出了一个重要的版本FORTRAN77是为MIL-STD-1753Release版。这个规格由美国国防部制定，这个标准化的FORTRAN77编译器并未引入ANSIFORTRAN77标准。一些新功能最终合并到Fortran90标准版。

DOWHILE和ENDDO语句、INCLUDE语句、IMPLICITNONE变量，用于IMPLICIT语句位处理内部函数，基于类似的包含在工业实时Fortran（ANSI/ISAS61.1(1976)）中的函数1991年推出IEEE1003.9POSIX标准版，为Fortran77的编程人员提供了POSIXsystem上的呼叫。有超过一百种功能呼叫被定义在文件上。允许存取POSIX-相容的行程控制（processcontrol）、信号取得（signalhandling）、档案系统控制（filesystemcontrol）、装置控制（devicecontrol）、程序指定（procedurepointing），以及资料流的输入与输出（streamI/O）。

由于成功的修正了FORTRAN77发展流程，使得原本过于缓慢重复的编程设计可以顺利的应付计算机领域迅速的变化。同时，作为将近15年的“标准FORTRAN”，FORTRAN77成为历史上最重要的一套电脑语言。

FORTRAN77的被严重推迟的后续版本，非正式的名称是Fortran90，最终于1992年作为ANSI标准被发表。这一大版本添加了许多新特性以反映自1978年标准以来发展的在编程方面显著的变化：

*格式源代码输入，以及小写的Fortran关键字模块，将有关联的过程和数据组合在一起，使它们可以被其它程序单元调用，包括允许限制一些模块的特定部分访问。RECURSIVE过程极大地改善了参数传递机制，允许在编译时检查接口通用过程的用户自定义接口操作符重载派生/抽象数据类型新的数据类型定义语法，以指定数据类型和变量的其它属性可以在表达式和赋值语句中按整体操作数组（或数组节），由此极大地简化了数学和工程计算。这些特性包括整体、部分和通配的数组赋值（比如用WHERE语句作选择性赋值），数组常数和表达式，用户定义的数组函数和数组构造。动态内存分配通过ALLOCATABLE属性和ALLOCATE和DEALLOCATE语句POINTER属性，指针赋值和NULLIFY语句以便于创建和操作动态数据结构CASE结构以用于多路选择EXIT和CYCLE语句以用于在按顺序地"跳出"正常的DO循环重复最长31个字符的标识符行内注释用户可控制的可定义的数字精度新的和增强的内部过程。

平台化版本

Fortran95仅是一个小改版，大部份修正了Fortran90standard一些较为显著的问题。Fortran95有不少的扩充，尤其是在HighPerformanceFortran的规格：

FORALL和嵌套的WHERE结构以帮助向量化用户定义的PURE和ELEMENTAL过程。Fortran95的一个重要补充是ISO技术报告TR-15581：增强的数据类型工具，非正式名称是可分配的TR。这一标准定义了ALLOCATABLE数组的增强的应用，先于与完全的Fortran2003兼容的Fortran编译器，以供使用。这些使用包括在过程伪参数列表中以及将函数返回值使用ALLOCATABLE数组作为派生的类型组件。（ALLOCATABLE数组比基于POINTER的数组更受欢迎，因为ALLOCATABLE数组是由Fortran95保证的，当它们退出范围时会被自动释放掉，避免了内存溢出的可能性。另外，别名也不再是优化数组引用时的一个问题，可以使编译器生成比用指针时更快的代码。）

Fortran95的第二个补充是ISO技术报告TR-15580：浮点异常处理，非正式名称是IEEETR。这一标准定义了对IEEE浮点算术和浮点异常处理的支持。

最新的版本Fortran2003，有着更大幅度的改版。ISOFortranWorkingGroup(WG5)的官方网站有关于Fortran2003新特性的详细总结，并有PDF文件PDF或者压缩PostScript文件可供直接下载。

据该文所述，本版本的主要改进包括：

增强了衍生类型：带参数的衍生类型，改善了控制的可操作性，改善了结构化的创建和释放。支持面向对象编程：扩展类型和继承，多态，动态类型分配，以及类型绑定过程。改善了数据操作：可分配的组件（编入IEEETR15581），延期的类型参数，VOLATILE属性，在数组构造和分配语句中显式定义类型，增强的指针，扩展的初始化表达式，增强的内部过程。增强的输入/输出：异步传输，流访问，用户指定衍生类型的传输操作，用户在格式转换时指定舍入控制，为连接前单元指定常数，FLUSH语句，关键字的规范，访问错误信息。过程指针。支持IEEE浮点算法和浮点异常处理（编入IEEETR15580）。与C语言的交互性支持国际化：访问ISO106464字节字符和在格式化的数字输入/输出中选择数字或者逗号。与宿主操作系统增强的集成：访问命令行参数，环境变量和处理器错误信息。

Fortran2003之后的下一个版本是Fortran2008。和Fortran95一样只是一个小改版，略微更正了Fortran2003的一些问题，并且合并了TR-19767的语言功能。

如同February2007，新的功能包括了Co-arrayFortran–平行处理模式BIT资料型态。2007年8月，资料型态BIT被删除了。2008年2月，Coarrays的计划已缩小，仅有ParallelI/O，而研发团队也被裁员了。

3、特性

Fortran语言的最大特性是接近数学公式的自然描述，在计算机里具有很高的执行效率。

易学，语法严谨。

可以直接对矩阵和复数进行运算，这一点类似MATLAB。

自诞生以来广泛地应用于数值计算领域，积累了大量高效而可靠的源程序。

很多专用的大型数值运算计算机针对Fortran做了优化。

广泛地应用于并行计算和高性能计算领域。

Fortran90，Fortran95，Fortran2003的相继推出使Fortran语言具备了现代高级编程语言的一些特性。

4、编译器

Windows操作系统下：

FortranPowerStation4.0(FPS4.0)，微软公司开发的Fortran编译器。1997年3月转让给DEC公司。

DigitalVisualFortran(DVF)，FortranPowerStation的DEC公司版本。

CompaqVisualFortran(CVF)，1998年1月，DEC公司被康柏公司收购，DigitalVisualFortran更名为CompaqVisualFortran。一个著名的版本是CompaqVisualFortran6.5。2002年，康柏公司已并入惠普公司。CompaqVisualFortran的最新版是6.6。

IntelFortran，英特尔公司的开发的Fortran编译器。

LaheyFortran

AbsoftFortran

OpenWatcom

Linux操作系统下：

PGIFortran

IntelFortran，英特尔公司的开发的Linux平台Fortran编译器。

G77，GNU的Fortran77编译器，集成在GCC中。

GFORTRAN，GNU的最新的Fortran编译器，集成在GCC4.0中，目的是支持Fortran95和一部分Fortran2003的功能，以替代G77。

G95，跟GFortran同为开放源代码的Fortran95编译器。

5、程序包

几个著名的Fortran程序包：

IMSL--国际数学和统计链接库

BLAS--BasicLinearAlgebraSubroutines

LAPACK--LinearAlgebraPACKage

6、发展趋势

Fortran语言是一种极具发展潜力的语言，在全球范围内流行过程中，Fortran语言的标准化不断吸收现代化编程语言的新特性，并且在工程计算领域仍然占有重要地位。

Fortran语言与程序化语言JAVA,C#等高级语言相比，它缺乏创造力。但是，由于很多优秀的工程计算软件都是运用Fortran语言编写，例如ANSYS、Marc，为了能够使用这些商业软件的高级功能，用户必须先学会Fortran语言，才能编写应用程序接口。由此决定了Fortran在工程计算领域将长期处于统治地位。

在数值计算中，Fortran语言仍然不可替代。Fortran90标准引入了数组计算等非常利于矩阵运算的功能。在数组运算时，Fortran能够自动进行并行运算，这是很多编程语言不具备的。运用Fortran语言，用户能够运用很多现成的函数软件包，所以非常便利。（MATLAB的早期版本，主要就是为两个著名的Fortran函数包提供程序接口。）