linux下常见的Fortran编译器介绍

(百度和网页https://www.sodocs.net/doc/da9676710.html,/forum/simple/index.php?t6437.html 的作者无关，不对其内容负责。百度快照谨为网络故障时之索引，不代表

被搜索网站的即时页面。) 百度一下

您查询的关键词是：linux fortran 编译器 f90 。如果打开速度慢，可以尝试快速版；如果想保存快照，可以添加到搜藏。

查看完整版本: [-- linux 下常见的Fortran 编译器介绍 --]

蒙特卡罗方法学术交流论坛 -> 数值计算 -> linux 下常见的Fortran 编译器介绍 [打印本

页] 登录 -> 注册 -> 回复主题 -> 发表主题popleaf12008-06-21 21:52

在各种Linux 平台下，常用的有下列几种：g77(f77)，Intel Fortran compiler, G95, gfortran .现在对之一一做介绍：

1、g77(f77)：是GCC 中默认的fortran 编译器，编译出的程序执行速度快，健壮，是十分优秀的编译器，可惜只能针对f77格式的fortran 代码；

下面就其安装做一简单介绍：

[日期：2008-03-23] 来源：Linux 公社 作者：Linux 整理

在Linux 下安装g77 fortran complier 的具体过程：

1.至ftp://https://www.sodocs.net/doc/da9676710.html,.tw/pub/gnu/gnu/g77下载g77-0.5.23.tar.gz

至ftp://https://www.sodocs.net/doc/da9676710.html,.tw/pub/gnu/gnu/gcc 下载gcc-2.8.1.tar.gz

确定这两个东西是相容的(g77-0.5.23.tar.gz 跟gcc-2.8.*.tar.gz 等版本相容)

可以先解压g77-0.5.*.tar.gz 然后查看解压后资料夹内的./f/INSTALL 档案查看跟它相容的gcc 版本.

2.用root 的身分在/usr/下制造一个叫FSF 的目录,如以下指令

#cd /usr

#mkdir FSF

将下载好的两个压缩档移到FSF 目录中

#mv g77-0.5.23.tar.gz /usr/FSF

#mv gcc-2.8.1.tar.gz /usr/FSF

3.接下来跟着以下指令一步一步做,不要改变任何细节:

#cd /usr/src

#gunzip -c < /usr/FSF/gcc-2.8.1.tar.gz | tar xf - (注意|是pipe)

#gunzip -c < /usr/FSF/g77-0.5.23.tar.gz | tar xf -

#ln -s gcc-2.8.1 gcc

#ln -s g77-0.5.23 g77

#mv -i g77/* gcc

#cd gcc

#./configure –prefix=/usr

#make bootstrap (这里请耐心等它跑完这边最容易出错)

#make compare

#rm -fr stage1

#make -k install

#g77 -v (检查g77版本确定已安装OK)

4.详细说明请参看g77-0.

5.23.tar.gz 解压后的./g77-0.5.23/f/INSTALL 档

popleaf12008-06-21 21:57

2、Intel Fortran Compiler ，这个编译器功能十分强大，兼容性也不错，对f77、f90格式的代码均可以编译，同时性能也很好，只是对某些f77格式的代码在编译时有些问题，在f77编译器下可以，但在ifort 下就不行了，同时在编译c-fortran 接口程序时也会因为代码的不兼容，出现各种问题，下面就其安装做一简单介绍：

Intel FORTRAN 编译器 入门系列之一: Linux 安装和使用

csdn, author: intel_iclifort

Intel FORTRAN 编译器能支持安装在绝大多数的主流Linux 发行版本, 包括 Asianux* 3.0, Debian* 4.0, Red Hat

Enterprise Linux* 3, 4, 5, Fedora* 7, SUSE LINUX Enterprise Server* 9, 10, TurboLinux* 11, Ubuntu 7.0等等

I. Intel FORTRAN编译器安装

1) 下载安装包后, 解包, 并运行安装脚本 (请尽量使用 root 权限的账号进行安装)

> tar -zxvf l_fc_x_10.1.xxx.tar.gz

> cd l_fc_x_10.1.xxx

> ./install.sh

2) 选择 1 进行安装, 并提供许可文件(License File). 注意请输入完整的全路径, 包括许可文件名 (许可文件通常以.lic结尾, 建议放入缺省目录/opt/intel/licenses)

3) 选择 1 进行典型安装 (Typical Install)

4) 根据提示, 阅读许可, 选择安装路径等等, 直到全部结束

II. Intel FORTRAN编译器使用

注意, 缺省的安装目录在 /opt/intel/fc[e]/xx.x.xxx/ (xx.x.xxx代表版本号, fc代表IA-32 and IA-64版本, fce代表Intel 64版本)

使用前, 需要设置相关的环境:

] source /opt/intel/fc/10.1.xxx/bin/ifortvars.sh (或者是ifortvars.csh)

然后编译源文件:

] ifort my_source_file.f90

查看当前版本

] ifort -V

参看支持的所有命令行选项

] ifort -help

III. 常见问题

Q: 如果碰到安装失败, 如何解决 ?

A: 首先, 请确认你下载了最新的发行版本, 并检查当前系统,

1) 系统是否已经安装 Linux Developer tools 选件, 包括 GCC, G++ 和其它相关的开发工具包

2) 系统是否已经安装 Linux选件 compat-libstdc++, 它提供 libstdc++.so.5 库

3) 如果是Intel 64(EM64T)环境, 系统是否已经安装了 32-bit 库 (可能被称作 ia32-libs )

然后, 查看发行说明(Release Notes), 核对你的系统是否支持

最后, 联系Intel Premier Support (https://www.sodocs.net/doc/da9676710.html,), 寻求帮助

当然, 还可以通过论坛, 搜索网络, 和他人讨论

Q: 使用时, 遇到错误信息 "ifort: error: could not find directory in which g++ resides"

A: Intel Fortran编译器无法在你的系统中找到GNU* g++ 编译器. 可能是由于你没有安装 GCC 开发包, 或者 g++ 不是安装在缺省路径, 或者你使用了非英文的Linux版本. 解决办法请访问Intel网站:

https://www.sodocs.net/doc/da9676710.html,/support/performancetools/fortran/linux/sb/CS-017386.htm

Q: 使用时, 遇到错误信息 "Intel 10.x compiler's dependency on /usr/lib/libstdc++.so.5"

A: Intel 10.x 编译器为了保证和基于 GCC 3.2 的系统兼容, 需要使用标准 C++ 库 /usr/lib/libstdc++.so.5, 但是很多比较新的 Linux发行版本中开始使用 GCC 3.4, 并且提供了全新的标准 C++ 库 /usr/lib/libstdc++.so.6. 因此需要安装 compat-libstdc++ RPM包, 它包含了 /usr/lib/libstdc++.so.5 库.

IV. 常用链接:

Intel Linux FORTRAN编译器 帮助文档: https://www.sodocs.net/doc/da9676710.html,/cd/software/products/asmo-na/eng/346152.htm Intel Linux FORTRAN编译器 发行说明:

https://www.sodocs.net/doc/da9676710.html,/software/products/compilers/docs/flin/release_notes.htm

Intel Linux FORTRAN编译器 安装指导:

https://www.sodocs.net/doc/da9676710.html,/software/products/compilers/docs/flin/install.htm

Intel Linux FORTRAN编译器 英文 FAQ: https://www.sodocs.net/doc/da9676710.html,/cd/software/products/asmo-

na/eng/346192.htm

popleaf12008-06-21 22:02 G95:这个编译器我用的不多，仅仅用过几次，这里做一简单介绍：

其使用十分方便，到https://www.sodocs.net/doc/da9676710.html,/下载一个可执行包，如果愿意，也可以下载代码包进行编译安装，我使用时是在CentOS4.5下直接在bin目录下建立了主程序的快捷方式，就直接可以用了，具体大家请看代码包里面Readme帮助文件，在我接触的Fortran编译器里面这是最简单的，对代码的兼容性不错，生成的程序的健壮性也还可以，但在使用中发现，对C-fortran接口的链接生成可执行程序时会发生内存的偶尔泄漏，与G95组织联系，给出的答案也很模糊，由于时间关系，我没有深入研究，如果哪位同仁有时间，请帮忙补充，在这里popleaf1先谢谢。

popleaf12008-06-21 22:04最近十分的繁忙，同事们都有事，我只能代劳，所以关注论坛的时间相对少了一些，敬请大家见谅。

MCyongshi2008-06-22 11:30 popleaf1斑竹辛苦了,以后还要向您多多学习,现在我的编程水平太差了,呵呵 [s:5]

popleaf12008-06-22 18:34

在 GCC 4.0 之前，g77 是 GCC 的一部分；此后，gfortran 是 GCC 的一部分。g95 是一个基于 GCC 的 Fortran编译器，它不是 GCC 的一部分。

g77介绍

g77 是 Fortran77 的编译器。它对 Fortran 77 标准提供完备的支持，并支持 Fortran 90 和 95 的部分特性。

由于 Fortran 77 标准在数值计算中的影响力，g77 可能是应用最广的Fortran编译器。

在 GCC 4.0 之前，g77 是 GCC 的一部分，但现在，g77 已经停止开发。

g77为何不再被支持：

gcc-4.0 改变了 gcc 中所有语言的前端界面。由于缺少志愿者和公司来更新 g77 到 gcc-4.0 的架构，因此它被废弃了。不同于 g77，gfortran 项目处于活跃开发期，因此它 取代了 g77 的位置。

这是一篇g77使用入门(https://www.sodocs.net/doc/da9676710.html,/index.php?title=Compiling_Fortran77&variant=zh-cn)

gfortran介绍

GNU 的 Fortran 95 编译器，支持Fortran95和一部分Fortran2003的功能。

取代 g77 集成在 GCC 4.0 及以后版本中

这是一篇gfortran使用入门(https://www.sodocs.net/doc/da9676710.html,/index.php?title=Compiling_Fortran&variant=zh-cn)

关于g95

gfortran 不是 g95：

gfortran 是一个 Fortran 95 的编译器，它是 GCC 的一部分。

g95 是另一个 Fortran 95 的编译器，它是一个基于 GCC 的编译器。

历史：

Andrew Vaught 在 2000 年上半年创建了 g95——一个使用 GCC 做后端的开放源代码的 Fortran 95 编译器。在随后的两年里，这是一个多人协作的项目，但是 2002 年下半年 Andrew Vaught 决定单独开发 g95。2003 年 1 月，gfortran 项目创建，它建立在当时 GPL 授权的 g95 源码的基础上，目的是允许协同开发并与 GCC 代码集成。

从那时起，Andrew 一个人在持续地开发 g95，g95 与 gfortran 的差别也越来越大。因此，gfortran 项目组也无法为 g95 提供支持或建议。

popleaf12008-06-25 14:03 Fortran编程中相关文件后缀

.a 静态库 (archive)

.f, .for, .FOR

.ftn*, .f90*, .f95*, .f03* Fortran源代码（不需编译预处理）

.F, .fpp, .FPP

.FTN*, .F90*, .F95*, .F03* Fortran源代码（需要编译预处理）

.r Fortran源代码（需要RatFor编译预处理）

.o 对象文件

.s 汇编语言代码

.so 动态库

其中，标 * 的后缀名是gfortran的文件后缀，g77不能识别。

单个源文件生成可执行程序

传统的 Fortran程序（也就是以 Fortran 77 为代表的）只能用大写字符书写，而且每行前六个字符为特定用途所保留。第一列为字符 C 或 * 所保留，用来表征整行都是注释。第二列到第六列是为标号预留的。代码从第七列开始，到72列结束（73列及以后将被直接忽略，可作注释）。下面是示例程序采用的是传统的 Fortran格式：

C helloworld.f

C

PROGRAM HELLOWORLD

WRITE(*,10)

10 FORMAT('hello, world')

END PROGRAM HELLOWORLD编译器gortran 并不要求所有代码都大写——程序中任何关键词都可以用小写字母。下面的命令将该程序编译成可执行文件：

$ gfortran helloworld.f -o helloworld

注意到：gfortran 默认会将 .f, .for, .fpp, .ftn, .F, .FOR, .FPP 和 .FTN 结尾的文件作为固定格式处理，而将.f90, .f95, .f03, .F90, .F95 和 .F03 结尾的文件作为自由格式来处理。如果我们将上面程序文件重命名为 helloworld.f90，那么我们必须手动指定其为固定格式：

$ mv helloworld.f helloworld.f90

$ gfortran helloworld.f90 -ffixed-form -o helloworld

Fortran 90及以后的标准允许并鼓励用自由的格式书写 Fortran代码。注释以感叹号（！）开始直到行尾。先前的程序采用自由格式重写如下，其中语句、标号都可从任一列开始：

! helloworldff.f90

!

Program Helloworld

write(*,10)

10 format('hello, world')

end Program Helloworld后缀名为 .f90，故 gfortran 将其作为自由格式处理

$ gfortran helloworldff.f90 -o helloworldff

同样，如果将程序重命名为传统后缀名，那么要通过在命令行中加入选项 -ffree-form 进行编译，如下：

$ mv helloworldff.f90 helloworldff.for

$ gfortran -ffree-form helloworldff.for -o helloworldff

由于两种格式的具有很大的区别，程序书写是只能选择其中的一种格式进行书写。注意：遵守后缀约定是很重要的。

多个源文件生成可执行程序

命令 gfortran 可将多个 fortran源码文件编译链接成为一个单一的可执行程序。下面列出了一个保存在文件 caller.f 中的简单程序的主体部分，它调用一个函数并显示出结果：

C caller.f

C

PROGRAM CALLER

I = Iaverageof(10,20,83)

WRITE(*,10) 'Average=', I

10 FORMAT(A,I5)

END PROGRAM CALLER名为 Iaverage 函数定义在另一个独立的源文件中，如下：

C called.f

C

INTEGER FUNCTION Iaverageof(i,j,k)

Iaverageof = (i + j + k) / 3

RETURN

END FUNCTION Iaverageof通过下面的语句这两个源码文件可被编译链接成一个名为 caller 的可执行程序：

$ gfortran caller.f called.f -o caller

同样的结果可由下面的命令序列得到——先将每一个源码文件编译成对象文件，而后将对象文件链接为可执行程序：

$ gfortran -c caller.f -o caller.o

$ gfortran -c called.f -o called.o

$ gfortran caller.o called.o -o caller

生成汇编代码

选项 -S 指示编译器gfortran 生成汇编语言代码然后结束。要得到我们本文先前的 helloworld.f 例子的汇编代码，只需输入以下命令：

$ gfortran -S helloworld.f

生成的汇编语言文件名为 helloworld.s。汇编语言的具体形式依赖于编译器的目标平台。

编译预处理

编译以 .F, .fpp, .FPP, .FTN, .F90, .F95 和 .F03 结尾的文件时，在它真正编译之前需要预处理。预处理器原本是为协助 C 语言工作所设计的。下面的例子是一个自由格式的 Fortran程序，它通过预处理器将一个函数包含进主程序：

! evenup.F90

!

#define ROUNDUP

#include "iruefunc.h"

!

program evenup

do 300 i=11,22

j = irue(i)

write(*,10) i,j

300 continue

10 format(I5,I5)

end program evenup函数 irue() 的源代码保存在文件 iruefunc.h 中，根据宏 ROUNDUP 所定义的值的不同将产生不同的编译结果。该函数将任何一个奇数近似为一个偶数。默认情况下，它向下取近似，但是当 ROUNDUP 被定义时，该函数将向上取近似而得到一个偶数。ireu() 的函数体如下：

integer function irue(i)

k = i / 2

k = k * 2

if (i .EQ. k) then

irue = i

else

#ifdef ROUNDUP

irue = i + 1

#else

irue = i - 1

#endif

end if

end function irue下面的命令将该程序编译成可执行文件：

$ gfortran evenup.F90 -o evenup

采用自由格式写程序以利用预处理器不是必须的。固定格式程序也可进行编译预处理，下面的程序也是有效的：

C adder.F

C

#define SEVEN 7

#define NINE 9

C

program adder

isum = SEVEN + NINE

write(*,10) isum

10 format(I5)

end program adder下面的命令将该程序编译成可执行文件：

$ gfortran adder.F -o adder

理解gfortran是gcc的前端

像 g++ 一样，gfortran 也只是设置过 Fortran程序所需基本环境的 gcc 的一个前端。本文一开始的例子我们可以通过下面 gcc 的命令来编译：

查看完整版本: [-- linux 下常见的Fortran 编译器介绍 --] [-- top --]

Powered by PHPWind v7.3.2 Code ? 2003-08 PHPWind Gzip enabled

You can contact us $ gcc helloworld.f -o helloworld -lgfortran -lgfortranbegin

库文件 libgfortranbegin.a (通过命令行选项 -lgfortranbegin 被调用) 包含运行和终止一个 Fortran 程序所必须的开始和退出代码。库文件 libgfortran.a 包含 Fortran 底层的输入输出等所需要的运行函数。当运行 gfortran 时，会自动链接这两个库。这和下面的命令是等价的：

$ gfortran helloworld.f -o helloworld

当我们运行 gfortran 时，实际上运行并不是这个编译器，而是编译器驱动器。该驱动器解析命令行中所给出的选项，然后才调用真正的编译器，汇编器和链接器。默认情况下，编译器驱动器根据命令行中给定的文件的后缀决定它自己下一步的动作：一个名为 foo.c 将传递给 C 编译器，而名为 foo.f95 的文件将传递给 Fortran 95 的编译器，等等。

理解了这一点，我们就可以知道 gcc helloworld.f 将自动调用 fortran 的编译器。只不过我们要为链接器指定必要的库。

理解了这一点，我们可以知道 gfortran helloworld.c 可以编译一个 c 程序，gfortran helloworld.cpp -lstdc++ 编译的是一个 C++ 程序。

fortran常见问题解决

楼主为了减少重复回答问题，特编此帖，并不定期添加和更新内容。 错误难免，欢迎讨论，仅供参考。 很多人问哪里可以找到Fortran编译器，有不少热心学友提供网址，特汇集在这里。虽然俺检验过这些链接，但是它们不一定总有效。 Fortran编译器下载： CVF？ FTN95(License:Freeforpersonaluse) 以下操作，如无特别说明，都是以为例。 1.如何加大Stacksize？ 选Project=>Settings=>Link=>Category:Output=>？ Stackallocations Reserve:这里填新值（默认为1M，若需要10M，则填） 2.如何用Fortran批量生成文件？ 设要生成4000个文件，文件名为AA1-AA4000，如何写循环生成文件,而不用写4000次write 命令呢？ 用内部文件： character(len=80)::filename,form integer::i doi=1,4000 selectcase(i) case(1:9) write(form,'(i1)')i case(10:99) write(form,'(i2)')i case(100:999) write(form,'(i3)')i case(1000:9999) write(form,'(i4)')i endselect write(filename,*)"AA",trim(form),".TXT" open(10,file=filename) write(10,*)i close(10)

enddo？ stop end 3.如何用Fortran动态生成输出格式？ 设有一个数组data(100)，输出时，希望每行输出num个数，而num由用户输入，如何实现？ 用内部文件： character(len=80)::form real::data(100) integer::i,num data=(/(i,i=1,100)/)/ read(*,*)num write(form,*)"(",num,"" write(*,form)data stop end 4.MS是不是很垃圾？ 是垃圾，其中Bug太多，多到不可用的地步！ 在这个主题里，换了CVF后问题就没了的人已有相当的数目。 如果你用，遇到莫名其妙的错误，建议换，这是一个比较成熟的编译器。 5.如何用F90/95生成随机数？ 注意： 现在计算机产生的随机数都是伪随机数。 random_number(x)产生一个0到1之间的随机数（x可以是向量），但是每次总是那几个数。用了random_seed()后，系统根据日期和时间随机地提供种子，使得随机数更随机了。 programrandom implicitnone real::x callrandom_seed()!系统根据日期和时间随机地提供种子 callrandom_number(x)!每次的随机数就都不一样了 write(*,*)x stop endprogramrandom 6.函数/子程序超载的例子

(完整)Fortran经典编程语言笔记(你值得拥有)

FORTRAN笔记 2014.10.07 目录 第七讲_FORTRAN的基本知识.ppt (2) FORTRAN语言程序设计初步 (2) FORTRAN源程序的书写格式（以77为例） (2) 变量 (2) 变量类型 (2) 算术运算符和运算优先级 (3) 赋值语句 (3) 参数语句（PARAMETER语句） (3) END语句 (3) PAUSE语句 (3) 逻辑运算和选择结构 (4) 关系表达式 (4) FORTRAN中数组的定义及使用 (4) 其他 (5) 1. fortran语言定义CHARACTER*6 TTL(14,3),CNAM(400)是什么意思? (5) 2. fortran里character*10 是什么意思 (5) 3. Fortran中kind是什么函数？ (5)

第七讲_FORTRAN的基本知识.ppt FORTRAN语言程序设计初步 FORTRAN是Formula Translation的缩写，意为“公式翻译”，它是为科学、工程问题或企事业管理中的那些能够用 数学公式表达的问题而设计的，其数值计算的功能较强。 常用的是FORTRAN77和FORTRAN90两种标准。 1、一个程序由若干个程序单位组成。主程序和每一个子程序分别是一个独立的程序单位。 2、每一个程序单位都是以“END”结束的。 3、一个程序单位包括若干行。 1）语句行。由一个FORTRAN语句组成。 2）非语句行，即注释行。 4、FORTRAN程序中的语句可以没有标号，也可以有标号，根据需要而定。标号的作用是标志一个语句以便被其 他语句引用。 5、一个程序单位中各类语句的位置是有一定规定的。 6、FORTRAN源程序必须按一定的格式书写。 FORTRAN源程序的书写格式（以77为例） 每一行有80列，分别如下： 1、第1-5列为标号区。一行中第一列为“C”或“*”，该行即被认为是注释行。 2、第6列为“续行标志区”，如果在一行的第6列上写一个非空格和非零的字符，则该行作为其上一行的续行。 3、第7-72列为语句区。 4、第73-80列，注释区。 变量 变量名：一个变量需要用一个名字（变量名）来识别。在同一个程序单位中不能用同一个变量名代表两个不同的变 量。 FORTRAN的变量名按以下规则选定： 1）第一个字符必须是字母，即变量名必须以字母开头； 2）在一个字母后面可以跟1-5为数字或字母。 如果选定的变量名超过6个字符，则只有前面6个字符有效。 注：在变量名中大写与小写字母是等价的。 变量类型 整型变量Integer、实型变量Real、双精度变量Double Precision、复型变量Complex、逻辑型变量Logical和字符型变量Character。 1、隐含约定（I-N规则） FORTRAN规定：在程序中的变量名，凡以字母I，J，K，L，M，N六个字母开头的，即认为该变量为整型变量。 在程序中，凡是变量名以字母I,J,K,L,M,N,i,j,k,l,m,n开头的变量被默认为整型变量，以其他字母开头的变量被 默认为实型变量。 2、用类型说明语句确定变量类型 1）INTEGER语句（整型说明语句） 2）REAL语句（实型说明语句） 3）DOUBLE PRECISION语句（双精度说明语句） 4）COMPLEX语句（复型说明语句） 5）LOGICAL语句（逻辑型说明语句）

fortran语法手册

1 FORTRAN77四则运算符 + - * / ** (其中**表示乘方) 在表达式中按优先级次序由低到高为：+或-→*或/→**→函数→() 2 FORTRAN77变量类型 2.1 隐含约定：I-N规则 凡是以字母I，J，K，L，M，N六个字母开头的，即认为是整型变量，其它为实型变量。 如IMPLICIT REAL (I,J) 三种定义的优先级别由低到高顺序为：I-N规则→IMPLICIT语句→类型说明语句，因此，在程序中IMPLICIT语句应放在类型说明语句之前。 2.4 数组的说明与使用 使用I-N规则时用DIMENSION说明数组，也可在定义变量类型同时说明数组，说明格式为：数组名(下标下界,下标上界），也可省略下标下界，此时默认为1，例： DIMENSION IA(0:9),ND(80:99),W(3,2),NUM(-1:0),A(0:2,0:1,0:3) REAL IA(10),ND(80:99)使用隐含DO循环进行数组输入输出操作：例如WRITE(*,10) ('I=',I,'A=',A(I),I=1,10,2) 10FORMAT(1X,5(A2,I2,1X,A2,I4)) 2.5 使用DATA语句给数组赋初值 变量表中可出现变量名,数组名,数组元素名,隐含DO循环，但不许出现任何形式的表达式：例如 DATA A,B,C/-1.0,-1.0,-1.0/ DATA A/-1.0/,B/-1.0/,C/-1.0/ DATA A,B,C/3*-1.0/CHARACTER*6 CHN(10)

DATA CHN/10*' '/INTEGER NUM(1000) DATA (NUM(I),I=1,500)/500*0/,(NUM(I),I=501,1000)/500*1/ 3 FORTRAN77程序书写规则 程序中的变量名，不分大小写； 变量名称是以字母开头再加上1到5位字母或数字构成，即变更名字串中只有前6位有效； 一行只能写一个语句； 程序的第一个语句固定为PROGRAM 程序名称字符串 某行的第１个字符至第５个字符位为标号区，只能书写语句标号或空着或注释内容； 某行的第１个字符为Ｃ或＊号时，则表示该行为注释行，其后面的内容为注释内容； 某行的第６个字符位为非空格和非０字符时，则该行为上一行的续行，一个语句最多可有19个续行； 某行的第７至７２字符位为语句区，语句区内可以任加空格以求美观； 某行的第７３至８０字符位为注释区，８０字符位以后不能有内容。 4 FORTRAN77关系运算符 .GT. 大于 .GE. 天于或等于 .LT. 小于 .LE. 小于或等于 .EQ. 等于 .NE. 不等于 .AND. 逻辑与 .OR. 逻辑或 .NOT. 逻辑非 .EQV. 逻辑等 .NEQV. 逻辑不等 运算符优先级由高到低顺序为:()→**→*或/→+或-→.GT.或.GE.或.LT. 或.LE.或.EQ.或.NE.→.NOT.→.AND.→.OR.→.EQV.或.NEQV 5 FORTRAN77语句

几种Fortran 编译器简介

几种Fortran 编译器 --------------------------------------------------------------------------------------- 1.CVF Compaq Visual Fortran （CVF）, 当今PC平台上功能相当强大与完整的Fortran程序开发工具，还用于Abaqus的开发。 1997年，微软将Fortran PowerStation卖给DEC之后，微软就不再出版Fortran编译器了。后来DEC并入了Compaq，再后来Compaq又和HP合并了。现在最新的版本是HP出的Fortran for Windows v6.6，现在HP/Compaq已经不再开发Fortran了，CVF 6.6是最终的版本了，Compaq的Fortran开发小组已经投入Intel旗下，目前Intel已经有Intel Visual Fortran 11.0。Compaq Visual Fortran 6.6官方的单价也相当昂贵。 Compaq Visual Fortran 6.6 下载： https://www.sodocs.net/doc/da9676710.html,/SoftDown.asp?ID=11937 Compaq Visual Fortran 6.6 绿色版下载： https://www.sodocs.net/doc/da9676710.html,/down/10915.html Compaq Visual Fortran 6.5 下载： https://www.sodocs.net/doc/da9676710.html,/soft/fortran6.5.rar ftp://2006:2006@https://www.sodocs.net/doc/da9676710.html,/36/https://www.sodocs.net/doc/da9676710.html,-002124.rar --------------------------------------------------------------------------------------- 2. IVF Intel Visual Fortran (IVF)将Compaq Visual Fortran* (CVF) 语言的丰富功能与英特尔代码生成及优化技术结合在一起。目前Intel已经有Intel Visual Fortran 11.0。 下载： Intel官方网站 ftp://166.111.26.159/software/science/ ftp://202.112.85.101/pub2/Windows/Scientific_Tools/Fortran/https://www.sodocs.net/doc/da9676710.html,p iler/ 从https://www.sodocs.net/doc/da9676710.html,/maths/下载。IVF10可以用IVF9的licence https://www.sodocs.net/doc/da9676710.html,/irc_nas/730/w_cc_p_10.0.025_ia3 2.exe 集成VS2005的IVF10.1：w_fc_p_10.1.021.exe （302MB） Intel(R) Visual Fortran for IA-32 and Intel(R) 64 (with Microsoft Visual Studio 2005

FORTRAN内部函数库

FORTRAN内部函数 用FORTRAN解题往往要用到一些专门运算，如求三角函数sinx, cosx,对数lnx,指数ex,求一组数中最大数和最小数等。 FORTRAN提供了一些系统函数（称为内部函数）来完成这些运算。程序设计者不必自己设计进行这些运算的语句组（即程序段或子程序），只需写出一个函数的名字以及给出一个或若干个自变量，就可以得到所需的值，例如： SQRT(4.0)求出4.0的平方根， SIN(2.0)求出2（弧度）的正弦值， EXP(3.5)求出e3.5, LOG(3.0)求出3， 常用的函数如下表，FORTRAN77提供的全部函数明细见FORTRAN77内部函数。 函数名含义应用例子相当于数学上的运算 ABS 求绝对值ABS(A) |a| EXP 指数运算EXP(A) e^a SIN 正弦值SIN(X) sin x COS 余弦值COS(X) cos x ASIN 反正弦ASIN(X) sin^(-1)a ACOS 反余弦ACOS(X) cos-1a TAN 正切TAN(X) tan x ATAN 反正切ATAN(A) tan^(-1)a LOG 自然对数LOG(A) lna,或loge(a) LOG10 常用对数LOG10(A) log10a INT 取整INT(A) int(a),取a的整数部分 MOD 求余MOD(A1,A2) a - int(a1/a2)*a2 SIGN 求符号SIGN(A1,A2) |a1|(若a2>0) -|a1|(若a2<0) REAL 转换为实型REAL(I) MAX 求最大值MAX(A1,A2,A3) max(a1,a2,a3) MIN 求最小值 MIN(A1,A2,A3) min(a1,a2,a3) 说明： （1）FORTRAN77将这些系统函数分别编成一个个子程序，组成函数库，存贮于外部介质（如磁盘）上。在完成源程序的编译之后，用LINK命令实现连接，即将已翻译成二进制指令的目标程序与函数库连接。也就是将程序中出现函数名的地方用函数库中相应的一组指令代入之，组成一个统一的“可执行目标块”。例如，程序中出现一个SIN函数，在连接时就将一组二进制指令（它们是实现求正弦值的运算的）直接插入到程序中出现SIN的地方。由于是插入到程序内部的，所以称为“内部函数”。 （2）一个内部函数要求一个或多个自变量。例如，SQRT函数只能有一个自变量SQRT(4.6)，MOD函数要求两个自变量MOD(8,3)，MAX和MIN函数要求两个以上自变量MAX(6,-8,10),MIN(-6,8,0)。当自变量个数规定为2个时，自变量的顺序不应任意颠倒，MOD(8,3)表示8被3除的余数，其值为2，而MOD(3,8)则表示3被8除的余数，其值为3。当自变量个数>2时，自变量的顺序无关，MAX(6,8,10)和MAX(8,10,6)结果是一样的。

fortran基本函数

FORTRAN 90标准函数（一） (2012-07-03 17:14:57) 转载▼ 分类：学习 标签： fortran 函数 教育 符号约定： ●I代表整型;R代表实型;C代表复型;CH代表字符型;S代表字符串;L代表逻辑型;A代表数组;P代表指针;T代表派生类型;AT为任意类型。 ●s:P表示s类型为P类型(任意kind值)。s:P(k)表示s类型为P类型(kind值=k)。 ●[…]表示可选参数。 ●*表示常用函数。

注：三角函数名前有C、D的函数为复数、双精度型函数。 注：指数函数名、平方根函数名、对数函数名前有C、D的函数为复数、双精度型函数。 表4 参数查询函数

atan2函数的值域是多少？我从网上找到一个fortran函数的日志，说此值域是-π~π，但正常反正切函数的值域应该是-π/2~π/2。对atan2函数不够了解，所以不知道你的答案对不对，我个人认为不对。我是用正常的反正切函数atan(v/u)来算的： FORTRAN： if (u>0..and.v>0.) dir=270-atan(v/u)*180/pi if (u<0..and.v>0.) dir=90-atan(v/u)*180/pi if (u<0..and.v<0.) dir=90-atan(v/u)*180/pi if (u>0..and.v<0.) dir=270-atan(v/u)*180/pi if (u==0..and.v>0.) dir=180 if (u==0..and.v<0.) dir=0 if (u>0..and.v==0.) dir=270 if (u<0..and.v==0.) dir=90 if (u==0..and.v==0.) dir=999 其中uv等于零的五种情况要单独挑出来，不然程序会有瑕疵。atan函数换成atand函数的话直接是度数，不用*180/pi 我四个象限和轴都试了，应该没错。 最需要注意的问题，一个是函数值域，另一个是uv矢量方向和风向是反着的，并且风向角度数是从正Y轴开始顺时针算，和三角函数里度数从正X轴开始逆时针算不一样。

FORTRAN 95 语法速查

FORTRAN 95 语法速查 ----------白云、李学哲、陈国新、贾波编著《FORTRAN95程序设计》读书笔记 目录：一、应用程序的创建与运行/FORTRAN 95所用的字符/ 变量类型及其声明，常量声明/表达式与运算符 二、输入与输出：表控、有格式 三、选择语句与结构：IF语句、CASE结构 四、DO循环结构 五、数组：数组的声明，数组的引用，数组的算术运算，数组的输入、输出，给数组赋初值， 动态数组，WHERE、FORALL语句 六、子程序：语句函数，内部子程序，调用子程序时的虚实结合：形参为数组、非定界数组、子 程序名、星号，递归子程序，外部子程序，纯子程序，逐元子程序 七、派生数据类型与结构体 八、指针与动态链表 九、文件：存取方式，基本操作语句，各类文件的读写操作 十、接口、模块 十一、公用区、存储关联、数据块子程序 十二、绘图：坐标系、设置图形颜色、创建图形程序/ 常用过程：设置线型、绘一像素点、设置当前位置、绘直线、绘弧线、绘矩形、绘多边形、绘制扇形（圆、椭圆）/ 文字信息的显示 附/录：标准函数与标准子例行程序 一、基础部份 1-1 FORTRAN 95 应用程序的创建与运行 创建或运行FORTRAN 95程序必须在Microsoft Developer Studio平台上进行。尽管程序文本及相关文件的编辑可以在任一文本编辑器上进行，然后再拷到Studio的文档窗口中。但最好还是一开始就进入Studio环境。创建FORTRAN 95 程序的步骤大致如下： 1）启动Microsoft Developer Studio 可以通过不同方式运行dfdev.exe程序以启动Microsoft Developer Studio [开始] \ Compaq Visual Fortran 6 \ Developer Studio \ dfdev.exe：或 ……\CVF66 \https://www.sodocs.net/doc/da9676710.html,\MSDEV98\dfdev.exe Microsoft Developer Studio的界面如下图所示： 文档窗口 工作空间窗口 输出窗口

Fortran编译器及下载地址

Fortran 编译器 --------------------------------------------------------------------------------------- 1. Fortran Powerstation 4.0 Fortran Powerstation 4.0是最老的版本 下载ftp://2006:2006@https://www.sodocs.net/doc/da9676710.html,/36/https://www.sodocs.net/doc/da9676710.html,-002123.ZIP --------------------------------------------------------------------------------------- 2.CVF Compaq Visual Fortran （CVF）, 当今PC平台上功能相当强大与完整的Fortran程序开发工具，还用于Abaqus的开发。 1997年，微软将Fortran PowerStation卖给DEC之后，微软就不再出版Fortran编译器了。后来DEC并入了Compaq，再后来Compaq又和HP合并了。现在最新的版本是HP出的Fortran for Windows v6.6，现在HP/Compaq已经不再开发Fortran了，CVF 6.6是最终的版本了，Compaq的Fortran开发小组已经投入Intel旗下，目前Intel 已经有Intel Visual Fortran 11.0。Compaq Visual Fortran 6.6官方的单价也相当昂贵。 Compaq Visual Fortran 6.6 下载： https://www.sodocs.net/doc/da9676710.html,/SoftDown.asp?ID=11937 Compaq Visual Fortran 6.6 绿色版下载： https://www.sodocs.net/doc/da9676710.html,/down/10915.html Compaq Visual Fortran 6.5 下载： https://www.sodocs.net/doc/da9676710.html,/soft/fortran6.5.rar ftp://2006:2006@https://www.sodocs.net/doc/da9676710.html,/36/https://www.sodocs.net/doc/da9676710.html,-002124.rar ---------------------------------------------------------------------------------------

fortran语言语法

FORTRAN是世界上最早出现的高级编程语言，是工程界最常用的编程语言，它在科学计算中（如航空航天、地质勘探、天气预报和建筑工程等领域）发挥着极其重要的作用。经过40多年的发展，伴随着FORTRAN语言多次版本的更新及相应开发系统的出现，其功能不断完善，最新版本的开发系统几乎具备了VC、VB的所有特点，如图形界面编程、数据库等。目前，工科院校开设的计算机编程语言课首选仍然是FORTRAN :< 说实话，从科技发展的趋势来说这不是好事。您可以设想一下，如果需要用鹅毛笔抄写大量的古籍是什么感受！ 强烈建议阅读《发掘C#特性赋予科学计算项目以威力》 1 FORTRAN77四则运算符 + - * / ** (其中**表示乘方) 在表达式中按优先级次序由低到高为： +或-→*或/→**→函数→() 2 FORTRAN77变量类型 隐含约定：I-N规则 凡是以字母I，J，K，L，M，N六个字母开头的，即认为是整型变量，其它为实型变量。 用类型说明语句确定变量类型：可以改变I-N规则

用IMPLICIT语句将某一字母开头的全部变量指定为所需类型 如IMPLICIT REAL (I,J) 三种定义的优先级别由低到高顺序为：I-N规则→IMPLICIT语句→类型说明语句，因此，在程序中IMPLICIT语句应放在类型说明语句之前。 数组的说明与使用 使用I-N规则时用DIMENSION说明数组，也可在定义变量类型同时说明数组，说明格式为：数组名(下标下界,下标上界），也可省略下标下界，此时默认为1，例：DIMENSION IA(0:9),ND(80:99),W(3,2),NUM(-1:0),A(0:2,0:1,0:3)

FORTRAN-90-程序编程规范

FORTRAN 90 程序编程规范 Fortran 90 编程规范，使程序代码高度组织化，更加易读、易懂、易于维护，程序更加高效。使编出的程序更易懂、易于维护。 1 语言选择 数值预报创新系统软件开发应避免使用Fortran77 的某些过时特征以Fortran 90不一致的特征。选择Fortran 90 作为开发语言，并采用Fortran 90 的新功能，如动态内存的分配(dynamic memory allocation)、递归（recursion ）, 模块(modules)、POINTER 、长变量名、自由格式等。 Fortran 77其中某些只是一些冗余的功能，这些功能已经过时，另外，还有一些在Fortran90 中被证明是不好的用法，建议不要使用。 2 Fortran 90 的新特性 2.1.1 建议使用的Fortran 90 新特性 建议使用Fortran 90 提供的模块（module ），并用Use ONLY 指定module 中哪些变量或派生类型定义可用于调用程序。 尽量使用数组下标三元组，这样可优化并减少所需的代码行数。为提高可读性，要在括号内表明数组的维数，例如： 1dArrayA(:) = 1dArrayB(:) + 1dArrayC(:) 2dArray(: , :) = scalar * Another2dArray(: , :) 当访问数组的子集时，例如在有限差分等式中，可以通过使用下标三元组实现。例如：2dArray(: , 2:len2) = scalar *（ & Another2dArray(:, 1:len2 -1) & - Another2dArray(:, 2:len2) & ) 对程序单元（program units ）命名，并使用End program ，End subroutine ，End interface ，End module 等结构再次指定“program unit ”的名称。 在逻辑表达式中使用>、 >=、 ==、 <、 <=、 /=，它们分别代 替.gt.、.ge.、.eq.、.lt.、.le.、.ne. 。新的表示方法更接近标准的数学符号

fortran语法手册

1F O R T R A N77四则运算符+ - */ ** (其中**表示乘方) 在表达式中按优先级次序由低到高为：+或-→*或/→**→函数→() 2 FORTRAN77变量类型 隐含约定：I-N规则 凡是以字母I，J，K，L，M，N六个字母开头的，即认为是整型变量，其它为实型变量。 如IMPLICIT REAL (I,J) 三种定义的优先级别由低到高顺序为：I-N规则→IMPLICIT语句→类型说明语句，因此，在程序中IMPLICIT语句应放在类型说明语句之前。 数组的说明与使用 使用I-N规则时用DIMENSION说明数组，也可在定义变量类型同时说明数组，说明格式为：数组名(下标下界,下标上界），也可省略下标下界，此时默认为1，例：DIMENSION IA(0:9),ND(80:99),W(3,2),NUM(-1:0),A(0:2,0:1,0:3) REAL IA(10),ND(80:99)使用隐含DO循环进行数组输入输出操作：例如 WRITE(*,10) ('I=',I,'A=',A(I),I=1,10,2) 10FORMAT(1X,5(A2,I2,1X,A2,I4)) 使用DATA语句给数组赋初值 变量表中可出现变量名,数组名,数组元素名,隐含DO循环，但不许出现任何形式的表达式：例如 DATA A,B,C/,, DATA A/,B/,C/ DATA A,B,C/3*CHARACTER*6 CHN(10) DATA CHN/10*''/INTEGER NUM(1000) DATA (NUM(I),I=1,500)/500*0/,(NUM(I),I=501,1000)/500*1/ 3 FORTRAN77程序书写规则

fortran库参考

第3 章FORTRAN 77 和VMS 内函数 本章列出了FORTRAN 77 f95 接受的一系列内函数，旨在帮助将传统的FORTRAN 77 程序迁移至Fortran 95。 在f95 中，本章列出的所有FORTRAN 77 和VMS 函数以及前一章列出的所有Fortran 95 函数都识别为内函数。为了帮助从传统的FORTRAN 77 程序迁移至f95，使用-f77=intrinsics 进行编译会让编译器只将FORTRAN 77 和VMS 函数识别为内函数，但Fortran 95 函数不会识别为内函数。 属于Sun 扩展的ANSI FORTRAN 77 标准的内函数标有¤ 符号。使用非标准内函数和库函数的程序可能无法移植到其他平台。 内函数在接受多种数据类型的参数时，有通用名称和专用名称。通常，通用名称返回与参数具有相同数据类型的值。但也有一些例外，如类型转换函数（表3–2）和查询函数（表3–7）。这些函数也可以通过函数的某个专用名称进行调用，以便处理专用参数数据类型。 对于处理多个数据项的函数（例如sign(a1,a2)），所有数据参数的类型必须相同。 下表按以下几方面列出FORTRAN 77 内函数： 内函数－描述函数的作用 定义－数学定义 参数数量－函数接受的参数的数量 通用名称－函数的通用名称 专用名称－函数的专用名称 参数类型－与每个专用名称关联的数据类型 函数类型－针对专用参数数据类型返回的数据类型 注– 编译器选项-xtypemap 会更改变量的缺省大小，并且对内在引用产生影响。请参见3.4 备注以及《Fortran 用户指南》中有关缺省大小和对齐方式的介绍。 3.1 算术和数学函数 本节详细介绍算术函数、类型转换函数、三角函数以及其他函数。“a”代表函数的单个参数，“a1”和“a2”代表两个参数函数的第一个参数和第二个参数，“ar”和“ai”代表函数的复数参数的实部和虚部。 3.1.1 算术函数

Fortran基本用法小结档

Fortran基本用法小结 目录： 一、说明 二、概述 三、数据类型及基本输入输出 四、流程控制 五、循环 六、数组 七、函数 八、文件 一、说明 本文多数内容是我读彭国伦《Fortran 95 程序设计》的笔记。只读到第九章，主要是3~9章，都是些最基本的用法（原书共16章）。这里主要摘录了我看书过程中总结的一些Fortran和C不同的地方，主要是语法方面。希望这份笔记能够给学过C但没有接触过Fortran的同学带去一些帮助。要想弄得更清楚些，推荐看一下原书，觉得作者真的写得很好，很清楚；如果有C语言的基础，看完前九章应该很快的，花一两天就行了。觉得如果耐心看完本文，基本功能应该也可以顺利用起来了。 另外，由于我之前没有用过Fortran，这次为了赶文档看书又看得很粗浅，大多数东西看过之后都没来得及仔细想，只是按着作者的意思去理解。所以这份笔记还处于纸上谈兵的层次。如果有不妥的地方，希望大家指正。谢谢！ 文中蓝色的部分是程序代码，!后面的内容为注释。 二、概述 1、名词解释 Fortran=Formula Translator/Translation 一看就知道有什么特色了：可以把接近数学语言的文本翻译成机械语言。的确，从一开始，IBM设计它的时候就是为了方便数值计算和科学数据处理。设计强大的数组操作就是为了实现这一目标。Fortran奠定了高级语言发展的基础。现在Fortran在科研和机械方面应用很广。 2、Fortran的主要版本及差别 按其发展历史，Fortran编译器的版本其实很多。现在在广泛使用的是Fortran 77和Fortran90。Fortran 90在Fortran 77基础上添加了不少使用的功能，并且改良了77编程的版面格式，所以编程时推荐使用90。鉴于很多现成的程序只有77版本，有必要知道77的一些基本常识，至少保证能够看懂77程序。以下是77和90的一些格式上的区别。

常用基本函数

R语言基本函数 一、数据管理 vector：向量 numeric：数值型向量 logical：逻辑型向量 character；字符型向量 list：列表 data.frame：数据框 c：连接为向量或列表 length：求长度 subset：求子集 seq，from:to，sequence：等差序列 rep：重复 NA：缺失值 NULL：空对象 sort，order，unique，rev：排序 unlist：展平列表 attr，attributes：对象属性 mode，typeof：对象存储模式与类型 names：对象的名字属性 二、字符串处理 character：字符型向量 nchar：字符数 substr：取子串 format，formatC：把对象用格式转换为字符串paste，strsplit：连接或拆分 charmatch，pmatch：字符串匹配 grep，sub，gsub：模式匹配与替换 三、复数 complex，Re，Im，Mod，Arg，Conj：复数函数 四、因子 factor：因子 codes：因子的编码 levels：因子的各水平的名字 nlevels：因子的水平个数 cut：把数值型对象分区间转换为因子 table：交叉频数表 split：按因子分组 aggregate：计算各数据子集的概括统计量 tapply：对“不规则”数组应用函数 数学 一、计算 +, -, *, /, ^, %%, %/%：四则运算 ceiling，floor，round，signif，trunc，zapsmall：舍入 max，min，pmax，pmin：最大最小值 range：最大值和最小值 sum，prod：向量元素和，积 cumsum，cumprod，cummax，cummin：累加、累乘 sort：排序 approx和approx fun：插值 diff：差分 sign：符号函数 二、数学函数 abs，sqrt：绝对值，平方根 log, exp, log10, log2：对数与指数函数 sin，cos，tan，asin，acos，atan，atan2：三角函数 sinh，cosh，tanh，asinh，acosh，atanh：双曲函数 beta，lbeta，gamma，lgamma，digamma，trigamma，tetragamma，pentagamma，choose ，lchoose：与贝塔函数、伽玛函数、组合数有关的特殊函数 fft，mvfft，convolve：富利叶变换及卷积 polyroot：多项式求根 poly：正交多项式 spline，splinefun：样条差值 besselI，besselK，besselJ，besselY，gammaCody：Bessel函数 deriv：简单表达式的符号微分或算法微分

Fortran常用函数

1、RANDOM_NUMBER Syntax ['sint?ks] n. 语法 CALL RANDOM_NUMBER (harvest结果) Intrinsic Subroutine（固有子程序）：Returns a pseudorandom number greater than or equal to zero and less than one from the uniform distribution. 返回大于或等于0且小于1，服从均匀分布的随机数 2、RNNOA/ DRNNOA （Single/Double precision） Generate pseudorandom numbers from a standard normal distribution using an acceptance/rejection method. 产生服从标准正态分布的随机数 Usage（用法） CALL RNNOA (NR, R) Arguments（参数） NR— Number of random numbers to generate. (Input) 要产生随机数的个数 R— Vector of length NR containing the random standard normal deviates. (Output) 输出长度为NR，随机正态分布的向量 Comments（注解） The routine RNSET can be used to initialize the seed of the random number generator. The routine RNOPT can be used to select the form of the generator. 程序RNSET可以用来初始化随机数发生器的种子 Example In this example, RNNOA is used to generate five pseudorandom deviates from a standard normal distribution. INTEGER ISEED, NOUT, NR REAL R(5) EXTERNAL RNNOA, RNSET, UMACH C CALL UMACH (2, NOUT) NR = 5 ISEED = 123457 CALL RNSET (ISEED) CALL RNNOA (NR, R) WRITE (NOUT,99999) R 99999 FORMAT (' Standard normal random deviates: ', 5F8.4) END Output Standard normal random deviates: 2.0516 1.0833 0.0826 1.2777 -1.2260

FORTRAN知识点总结

F O R T R A N 第2章FORTRAN90基础知识： 程序单元的概念: fortran90程序是一种分块形式的程序，整个程序由若干程序单元块组成。每个程序只有一个主程序单元。各单元体的程序体形式上相同。 程序单元可以是主程序、子程序（外部过程或内部过程）、模块MODULE （供其他程序单元引用即把该程序单元内的全部语句复制到程序单元中）或块数据程序单元BLOCK 。 语言元素：指在程序设计中用到的基本成分，如字符集、常量、变量、记号（标号、关键字、名字、常数、运算符和定界符）以及其他的基本结构等。 字符集：英文字母、阿拉伯数字、下划线、21个特殊字符（$和？没有规定用法）。 数据结构： 整型INTEGER （34-2下划线后面是种别参数），n 位字长的计算机的数据表示范围一般为12~211-+---n n ，种别参数由内在询问函数KIND 送回，种别值提供的最小范围由内在函数SELECTED-INT-KIND 送回，表示十进制幂的范围由内在函数RANGE 送回； 实型REAL ，小数形式和指数形式；复型COMPLEX （种别类

型参数值取实部与虚部中较大者）； 字符型CHARACTER，由一对单撇号或双撇号之间的字符序列组成； 逻辑型LOGICAL。 派生数据类型TYPE； 数组INTEGER,DIMENSION(1,50)::A，可直接对数组元素进行运算如3*A,SQRT(A)； 字符子串，在字符串CHARACTER(LEN=80)::ROW中，ROW(1:3)就表示字符串ROW中第1到第3个元素组成的子串。 变量名的命名规则：不能超过31个字符；组成成分是字母、数字、下划线；第一个字符必须是字母。 第3章基本语句： 类型说明语句：类型说明（种别说明），属性说明：：变量名表 尽量避免把两个实数作相等或不相等的比较。淘汰隐式说明IMPLICIT NONE 种别说明：种别参数即对可移植数据精度和范围进行选择的机制 KIND(X) 返回变元X的种别参数值 SELECTED-REAL-KIND(n,m) 产生一个种别值，它表示某一精度和范围。N指十进制有效位数，m指明值范围内以10为底的幂次。

Fortran基本用法小结

【以下文字转载自D_Atmosphere 讨论区】 【原文由superjyq 所发表】 我的Fortran基本用法小结 高级语言和算法组heavensky 目录： 一、说明 二、概述 三、数据类型及基本输入输出 四、流程控制 五、循环 六、数组 七、函数 八、文件 一、说明 本文多数内容是我读彭国伦《Fortran 95 程序设计》的笔记。只读到第九章，主要是3~9章，都是些最基本的用法（原书共16章）。这里主要摘录了我看书过程中总结的一些Fortran和C不同的地方，主要是语法方面。希望这份笔记能够给学过C但没有接触过Fortran的同学带去一些帮助。要想弄得更清楚些，推荐看一下原书，觉得作者真的写得很好，很清楚；如果有C语言的基础，看完前九章应该很快的，花一两天就行了。觉得如果耐心看完本文，基本功能应该也可以顺利用起来了。 另外，由于我之前没有用过Fortran，这次为了赶文档看书又看得很粗浅，大多数东西看过之后都没来得及仔细想，只是按着作者的意思去理解。所以这份笔记还处于纸上谈兵的层次。如果有不妥的地方，希望大家指正。谢谢！ 文中蓝色的部分是程序代码，!后面的内容为注释。 二、概述 1、名词解释 Fortran=Formula Translator/Translation 一看就知道有什么特色了：可以把接近数学语言的文本翻译成机械语言。的确，从一开始，IBM设计它的时候就是为了方便数值计算和科学数据处理。设计强大的数组操作就是为了实现这一目标。Fortran奠定了高级语言发展的基础。现在Fortran在科研和机械方面应用很广。 2、Fortran的主要版本及差别 按其发展历史，Fortran编译器的版本其实很多。现在在广泛使用的是Fortran 77和Fortran90。Fortran 90在Fortran 77基础上添加了不少使用的功能，并且改良了77编程的版面格式，所

fortran文件操作

fortran文件操作 From: 《Fortran 95 程序设计》彭国伦 1.文件读取的概念： 读取：“顺序读取”和“直接读取”。 保存：“文本文件”和“二进制文件”。 二进制文件：读取快，因为保存格式和数据在内存中的保存方法一样，同时也节省空间。 －－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－ 2. 文件的操作： －－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－ open的使用：使用open命令打开文件之后，就可以对文件来做输入输出。 example: program ex0901 impicit none open(unit=10, file='hello.txt') ! 打开hello.txt文件, unit指定文件代码，file 指定文件名称。 write(10, *) "hello" !在代码为10的文件中写入hello stop end program ex0901 open中有很多参数可以使用，详细如下： OPEN(UNIT=number, FILE='filename', FORM='...', STATUS='...', ACCESS='...', RECL=length, ERR=label, IOSTAT=iostat, BLANK='...', POSITION='...', ACTION=action, PAD='...', DELIM='...') UNIT='number'： number必须是一个正整数，它可以使用变量或是常量来赋值。number最好避开1,2,5,6。因为2,6是默认的输出位置，也就是屏幕。1，5则是默认的输入位置，键盘。 FILE='filename'：指定要打开的文件名称，文件名要符合系统规定。windows下不区分大小写，unix下则会区分大小写，最好不要使用中文文件名。 FORM='FORMATTED' OR 'UNFORMATTED' FORM字段只有两个值可以设置： FORM='FORMATTED' “文本文件”格式来保存 FORM='UNFORMATTED' “二进制文件”格式保存 这一栏不给定时候的默认值是: FORM='FORMATTED' STATUS='NEW' or 'OLD' or 'SCRATCH' or 'UNKNOWN' 用来说明打开一个新的文件或已经存在的旧文件。 STATUS='NEW' 打开一个原本不存在的新文件 STATUS='OLD' 打开一个原来已经存在的文件 STATUS='REPLACE' 若文件已经存在则重新创建一次，原来的内容消失；若不存在则会创建新文件。 STATUS='SCRATCH' 表示要打开一个暂存文盘，这个时候可以不需要指定文件名称，也就是FILE这个一栏可以忽略。因为程序本身会自动取一个文件名，至于文件名是啥也不重要，因为暂存盘会在程序结束后自动删除。 STATUS='UNKNOWN' 由各编译器自定义。通常会同REPLACE的效果。 ！这一栏不给定时，默认为STATUS='UNKNOWN'。 ACCESS='SEQUENTIAL' or 'DIRECT' 设置读写文件的方法：