Fortran6.5 使用流程
Gfortran 使用说明
1、source中未使用外部库链接的，直接执行：gfortran foo.f/f90 -o foo./foo如没有"-o"选项，生成a.out文件，这显然不是我想要的。
：D2、gFortran分两部分：compiler and library。
如果gFortran不是标准安装的，编译source后执行，可能找不到lib，这时可以加入"-static"选项：gfortran -static foo.f/f90 -o foogFortran会将库建在所生成程序内部。
3、FortranSource有77和90两种书写格式，gFortran默认根据后缀进行compile。
如果想自定义，例如foo.f是用90格式写的，可执行：gfortran -ffree-form foo.f -o foo大写的后缀名，gFortran会预执行该程序。
4、多source文件时，先compile不含PROGRAM语句段的source文件，各自生成foo1.o，foo2.o等。
再一起编译。
例如：gfortran -c foo1.f/f90gfortran -c foo2.f/f90gfortran main.f/f90 foo1.o foo2.o -o main5、foo.f95的，加选项"-std=f95"，.f2003的，目前支持尚不完整。
顺便说，gFortran unstable版4.3.x将支持pointer。
下面还有一些可能常用到的options。
"-fbounds-check"：检查列表序列脚标是否超出"-ffree/ffix-line-length-n"：设置最大columns。
77默认：72；90默认：132。
n若设为"0"或"none"，则不限有效行数"-fimplicit-none"：等同于在f90每段sub中声明"IMPLICIT NONE"，且source中implicit语句优先"-fmax-error-n"：意义如词义"-fsyntax-only"：不编译，只检查语法"-fexternal-blas"：使用BLAS库函数，替代gFortran默认的函数感谢9楼。
Fortran 第六讲
SUM (ARRAY,MASK) 计算ARRAY中MASK为真的元素的和。MASK为 可选的，如果不提供，计算数组中所有元素的和
TRANSPOSE(MATRIX) 将MATRIX转置后返回
更多的变换函数可以参考教材的附录A的数组函数 部分
这些函数都很有用，我们在以后的例程或习题会涉 及到一部分，请诸位养成查阅这一附录的习惯
说明： WHERE结构中的每个mask_expr是一个逻辑数组， 它应该确保和数组执行语句中处理的数组具有同 样的结构。 WHERE结构使得语句体1中的操作或操作集用于 mask_expr1为TRUE的所有数组元素上，语句体2 中则作用于mask_expr1为FALSE而mask_expr2为 TRUE的所有数组元素上，最后，语句体3作用于 mask_expr1和mask_expr2均为FALSE的所有数组 元素上
6.3 WHERE结构
6.1中，我们学习了如何操作部分数组 INTEGER :: a(10) a(3:5)=3 将a(3),a(4),a(5)赋值为3
如果我们要对满足某个条件的所有元素进行操作 WHERE (a<0) a=ABS(a) END WHERE 将a中所有小于0的元素取绝对值
一般形式 [name:] WHERE (mask_expr1) 数组操作语句体1 ELSEWHERE (mask_expr2) [name] 数组操作语句体2 ELSEWHERE [name] 数组操作语句体3 END WHERE [name]
动态分配一个二维数组 通过status返回分配状态 如果分配成功，status为0，否则不为0
总是使用STAT=status监视分配状态，以便准确知道 程序异常终止的原因
ALLOCATED()函数 ALLOCATED(array) 如果已经用ALLOCATE()给ARRAY分配了空间 那么函数返回值是.TRUE. 否则为.FALSE. 例： IF (ALLOCATED(array)) THEN array=1 ELSE WRITE(*,*) ‘Warning : Array not allocated!’ END IF
win7_64位安装fortran的方法
关于win7 安装fortran6.5或6.6的教程1.先安装fortran6.5 或6.6。
Win7 64位安装时，不能直接双击根目录下的SETUP进行安装。
Win7 32位直接点SETUP安装（直接跳到第2步）而是从X86这个文件夹下的进行安装。
2.安装前，选中右键更改的它的兼容性，以兼容windowsXP ，并以管理员身份运行。
32位直接使用根目录下的SETUP进行安装，同样要右键修改。
3.然后双击运行。
选择默认路径安装，根据提示，输入安装序列号，在安装到约97%时，弹出对话框，问是否更新环境参数，选“是”。
如果有提示兼容性问题，不用理。
4.最重要的一步！安装完成后，把C盘安装目录下C:\Program Files\Microsoft Visual Studio\Common\MSDEV98\BIN\ 的有关六个可执行文件（程序后缀是exe的文件，主要是编译的几个文件：DFDEV.exe, FRMTEDIT.exe, MODWIZ.exe, MSVCMON.exe, RC.exe, VCSPAWN.exe）的属性通过右键更改一下：例如在C:\ProgramFiles\Microsoft Visual Studio\Common\MSDev98\Bin\里面找到DFDEV.EXE，然后右击--》属性--》兼容性选项卡--》不勾选任何“兼容模式”--》把该选项卡下面的“特权等级”全部改成“以管理员身份运行”就可以，然后确定，就OK了。
这时候运行电脑中的原来的Fortran程序，打开、Compile、Build、运行都不会出错，得到计算结果。
如果有问题，就是提示兼容性，选择运行即可。
5.安装完成后，fortran可能还是不能用。
此时我们可以安装C++6.0，因为fortran是基于VC++的平台进行运算的。
关于C++6.0有英文还汉化的两个版本和，我用的是“汉化版”的，（因为有另一个同学尝试了，安装英文版的后还是不能用）。
Windows-7-64bit安装Compaq-Visual-Fortran-6.5说明20160621
基于Windows 7-64位系统的Compaq VisualFortran 6.5安装方法对于Compaq Visual Fortran如何安装在Windows 7-64位操作系统，通过网络搜索，结合本人实践，安装方法详述如下：1、下载安装文件下载Compaq Visual Fortran 6.5编译器安装源文件。
2、逐步安装进入Compaq Visual Fortran 6.5文件夹，继续要进入X86目录下点击里面的SETUPX86.exe，开始安装：需要填入用户名，产品序列号，安装目录等，下一步、下一步逐步往下执行，直到完成安装。
如果过程中有兼容性提示，不用理会。
3、修改兼容性设置安装完成后，进入软件开发环境图形用户界面时（开始->所有程序->Compaq Visual Fortran 6->Develop Studio），如果出现Microsoft Develop Studio已停止工作，无法进入用户界面。
需要修改设置几个可执行应用程序的兼容性。
具体修改方法：到软件安装目录下找到DFDEV.exe, FRMTEDIT.exe, MODWIZ.exe, MSVCMON.exe, RC.exe, VCSPAWN.exe等可执行文件（默认安装目录为：C:\Program Files\Microsoft Visual Studio\Common\MSDEV98\BIN\），鼠标右键修改上述可执行应用程序的兼容性（->属性->兼容性选项卡->勾选任何“以兼容模式运行这个程序”，并在下拉菜单中选Windows XP/ Service Pack 2或Windows XP/ Service Pack 3），然后确定。
可以顺利计入用户界面，至此，实现了基于Windows 7-64位操作系统的Compaq Visual Fortran 6.5安装。
如果运行时出现与系统不兼容提示，可忽略，不会影响运行结果。
Compaq Visual Fortran6.5说明
《Compaq Visual Fortran Installing and Getting Started》文档摘录：一、认识Compaq Visual Fortran1、CVF三种版本所各自包括的组件:其中可能需要关注的有CXML库、Fortran module Wizard、f90SQL组件、IMSL库、Fortran COM Server wizard2、CVF Proferssional版的光盘中包含内容CVF光盘中额外包括了IE4 SP1和Windows NT 4 SP3以及授权管理软件FLEXlm用于多用户授权使用CVF。
CVF proferssional版所需的Compaq Array Visualizer在另外的单独光盘中。
此外，在CVF光盘目录\x86\USUPPORT和\AXP\USUPPORT下有一些不支持但是比较有用的工具（unsupported but nevertheless useful tools.）3、CVF的开始菜单程序组中项目说明•Dependency Walker分析可执行文件和DLL文件的工具•Developer Studio启动visual development environment.•Error Lookup通过error代号查看system error message文本和module error message文本的工具.•FortranCommandPrompt启动Fortran命令行窗口，在命令行下使用Visual Fortran编译器。
该命令行工具自动加载了Fortran编译环境。
•Fortran Module Wizard 用于开发Fortran客户端for COM and automation servers. See Section 7.11, Support for COM and Automation Objects: Fortran ModuleWizard.•Help Workshop创建应用程序的WinHelp文件(.HLP)的工具•IMSL Fortran 90 MP Library Help IMSL模块的在线文档•IMSL Fortran 90 MP Library Read Me IMSL模块的readme文件•OLE-COM Object Viewer 查看OLE或COM对象的详细细节•Online Documentation 启动HTML Help Viewer查看Visual Fortran的在线文档•Online Registration 联机注册Visual Fortran•Per-User Setup 用于设置Visual Fortran运行环境。
Fortran用户指南
Sun Microsystems, Inc.有关本文档的建议请发到：/hwdocs/feedback Fortran 用户指南Sun™ Studio 8部件号码 817-5802-10 2004 年 4 月，修订 A版权所有© 2004 Sun Microsystems, Inc., 4150 Network Circle, Santa Clara, California 95054, U.S.A. 保留所有权利。
美国政府权利―商业软件。
政府用户在使用时应遵循 Sun Microsystems, Inc. 的标准许可协议和 FAR 及其补充中的适用规定。
使用本软件应遵守许可证条款。
此次分发可能包含由第三方开发的内容。
该产品的部分内容可能出自 Berkeley BSD 系统，由加州大学 (University of California) 授权。
UNIX 是在美国和其它国家（地区）的注册商标，由 X/Open Company, Ltd. 独家授权。
Sun、Sun Microsystems、Sun 徽标、Java、JavaHelp 是 Sun Microsystems, Inc. 在美国和其它国家（地区）的商标或注册商标。
所有的 SPARC 商标均需获得授权才能使用，它们是 SPARC International, Inc. 在美国和其它国家（地区）的商标或注册商标。
标有 SPARC 商标的产品都基于由Sun Microsystems, Inc. 开发的体系结构。
该产品为美国的出口控制法所涵该和控制，并有可能要遵守其它国家（地区）的出口或进口法规。
严禁将产品用于核、导弹、生化武器或核海事等最终目的或交给有此类企图的最终用户，无论是直接还是间接。
严禁将产品出口或再次出口到美国禁运的国家（地区）或美国出口排除列表中的实体，包括但不限于被拒绝的人员以及专门指定的公民列表。
本文档按“原样”提供，对所有明示或默示的条件、陈述和担保，包括对适销性、特殊用途的适用性或非侵权性的默示保证，均不承担任何责任，除非此免责声明的适用范围在法律上无效。
Fortran格式输入输出
(3) 输入输出的具体内容。
6.2 格式输入输出语句
一、格式输出
1．PRINT语句 格式：PRINT f, 输出项 f：格式说明符，有三种形式： (1) *，使用表控格式。 (2) ‘(格式编辑符)’，例：PRINT '(1X, 2F7.3)',X,Y (3) 格式语句(FORMAT)的语句标号。例如： PRINT 100, A, B, C 100 FORMAT(1X, F9.4, 2F7.3) 输出项可以是变量、常量、函数以及表达式。 此外，输出项还可以是隐含DO循环。
4. 纵向走纸控制符
将输出记录中的第一个字符作为纵向走纸控制符，这个 字符不输出，而从输出记录的第二个字符开始输出。 常用的控制字符：空格(走纸一行，换行)、0(走纸二行，空 一行)、1(换页）、＋(不走纸，回到本行重迭打印)
例如：WRITE(*, 10) I, J 10 FORMAT(1X, ‘I=’, I3, 2X, ‘J=’, I4) 应输出：□I=123□□J=2347 实际输出：I=123□□J=2347 如果：10 FORMAT( ‘I=’, I3, 2X, ‘J=’, I4) 输出：=123□□J=2347
2. H编辑符
用于输出字符串 n：正整数
格式： nH<字符串>
例：format(1X, 2HL=, I3, 2HJ=, I4) 3. 撇号编辑符 用于输出字符串
例：I=123; J=2347 WRITE(*, 10) I, J 10 FORMAT(1X, ‘I=’, I3, 2X, ‘J=’, I4) 输出：I=123 J=2347
(2) B, O, Z 编辑符。这是FORTRAN 90新增的编辑符。分别采 用二进制、八进制和十六进制形式描述整型量的输入输出。 其基本用法与I 编辑符相同。
FORTRAN上机指导
上机环境一．上机环境FORTRAN语言程序设计的上机环境如下：1.硬件环境微型计算机（Intel X86系列CPU）一台。
2.软件环境∙Windows98/2000/XP操作系统；∙任意一种文本编辑器（EDIT.exe、NOTEPAD.exe、TC.exe等）；∙FOR5.1编译器二．上机步骤1．设置环境变量假设将FOR5.1安装在D：\，则上机前用如下的命令设置环境变量：PATH D:\FOR5\BIN;%PATH%SET LIB=D:\FOR5\LIB2．建立FORTRAN源程序建立FORTRAN源程序可以使用EDIT或NOTEPAD（记事本）文本编辑器，使用方法同Microsoft Office Word。
3．用FL.EXE编译连接源文件将源程序编译为可执行文件的方法，有两种情况：第一种：将编译和连接一次完成，命令如下：FL 源程序名回车后开始编译）例：FL Y.FOR （没有错误，将产生Y.EXE文件）第二种：先将每个程序编译成目标文件（.OBJ），再将多个文件连接装配成可执行文件（.EXE）文件，这时命令分为两步：第一步：FL /C 源程序名（产生目标文件）第二步：FL 目标文件1+目标文件2 /LINK（产生.EXE）例： FL/C Y1.FOR （没有错误，将产生Y1 .OBJ）FL/C Y2.FOR （没有错误，将产生Y2 .OBJ）然后，将两个目标文件连接生成可执行文件：FL Y1.OBJ+Y2.OBJ /link (没有错误，将产生Y1.EXE文件)4．运行程序建立了EXE文件后，就可以直接在DOS下运行此程序，如下所示：C：>Y〈回车〉程序运行结束后，返回DOS。
如果运行结果正确，那么程序运行结束时结果会直接显示在屏幕上。
如果不正确，则从1开始修改程序。
目录上机一顺序程序设计 (1)一．上机目的 (1)二．上机内容 (1)三．上机要求 (2)四．思考题 (2)上机二分支结构程序设计 (3)一．上机目的 (3)二．上机内容 (3)三．上机要求 (4)四．思考题 (4)上机三循环结构（一） (5)一．上机目的 (5)二．上机内容 (5)三．上机要求 (6)四．思考题 (6)上机四循环结构（二） (7)一．上机目的 (7)二．上机内容 (7)三．上机要求 (8)四．思考题 (9)上机五数组（一） (10)一．上机目的 (10)二．上机内容 (10)三．上机要求 (11)四．思考题 (11)上机六数组（二） (12)一．上机目的 (12)二．上机内容 (12)三．上机要求 (13)四．思考题 (14)上机七字符数据（一） (15)一．上机目的 (15)二．上机内容 (15)三．上机要求 (17)四．思考题 (17)上机八字符数据（二） (18)一．上机目的 (18)二．上机内容 (18)三．上机要求 (20)四．思考题 (20)上机九子程序（一） (21)一．上机目的 (21)二．上机内容 (21)三．上机要求 (23)四．思考题 (23)上机十子程序（二） (24)一．上机目的 (24)二．上机内容 (24)三．上机要求 (26)四．思考题 (26)上机十一文件（一） (27)一．上机目的 (27)二．上机内容 (27)三．上机要求 (27)四．思考题 (27)上机十二文件（二） (28)一．上机目的 (28)二．上机内容 (28)三．上机要求 (28)四．思考题 (28)上机十三综合设计 (29)一．上机目的 (29)二．上机内容 (29)三．上机要求 (31)四．思考题 (31)上机一顺序程序设计一．上机目的1、掌握编程、编译、连接过程。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
简单说明一次编译程序的过程：1.建立一个新的Project（File-new-选择Project选项卡-Utility Project,给定project的名称），确定生成Project。
2.生成一个新的程序文件（File-new-选择Files选项卡-Fortran Free Format Source File，给定文件名），或是插入一个已有的程序文件（选项Project/Add to Project/Files）.3.用Build菜单中的Excute选项来编译并运行程序，或是只单击Build选项来只做编译，不运行程序。
4.要写新的程序可以另外建立一个新的Project,或是直接跟换Project中的文件。
千万不要把两个独立的程序文件放入同一个Project中，否则导致编译过程出现错误。
5.下次修改程序时，可以直接使用File/Open Workspace来打开*.dsw的Project工程文件。
一、安装Fortran6.5安装包中包括以下文件（夹）本人电脑-x86 64位-win7进入X86文件夹，运行，中间需要输入序列号，记事本打开获取，进过中间一些文件位置的选择，到百分之九十多的时候，需要选择是否安装运行环境，选是，最后安装完成。
二、运行开始---Compaq Visual Fortran 6---Developer Studio如果提示打开失败，则选中Developer Studio，右键----管理员获得所有权---就可以了三、打开出现如下对话框：熟悉一些tips:第一条：If your program hangs应用程序瘫痪while running outside the debugger在调试器外运行程序, attach贴上、附加the debugger调试器to your program程序by choosing Start Debug调试、除错form the Build menu, and then choosing Attach to Process.如果你的程序在调试器外运行，导致应用程序瘫痪，通过选择Build---Start Dubug---attach to program，讲调试器连接到你的程序。
第二条：Visual可视化Fortran【公式翻译程式语言（formula translator）】uses the file extension文件扩展名. F90 to indicate表示Free Form source code自由形式的源代码, and the extensions .FOR or .F to indicate Fixed Form source code.Visual Fortran采用拓展名为.F90的文件来表示自由形式的源代码，扩展名为.FOR或.F 的文件来表示固定形式的源代码。
第三条：You can have multiple projects in a workspace工作区. Use the Insert Project into Workspace command or select the Add to current workspace check box when you create a new project.你可以在可以工作区拥有多个项目。
使用Insert Project插入当前命令工作区，或者选择create a new project增加一个当前工作区的复选框。
第四条：When debugging调试以排除故障, you can press Alt+6 to display the Memory window.调试的时候，你可以按Alt+6去显示记忆窗口。
第五条：Visual Fortran samples are installed in folders in …\df98\samples. You can also copy folders in …\df\samples form the CD-ROM. Samples are described in the file samples.htm.Visual Fortran的例子被安装在文件夹…\df98\samples中。
你也可以在CD-ROM 的…\df\samples文件夹中复制。
例子在文件samples.htm中有描述。
Tutorial Samples教程的例子contains one source源程序with build instructions构建指令as sourse comments注释. Other samples include source files源文件and a makefile生成文件or a project workspace项目工作区.教程例子包含一个以构建指令作为注释的源程序。
其他例子包含源文件和生成文件或者一个项目工作区。
第六条：Ctrl+Tab cycles through the queue of open Developer Studio windows. (It works like Alt+Tab in Windows. )第七条：You can repeat the last Find command in the source editor by pressing F3.第八条：Microsoft Visual C++ Development Environment organizes projects into Project Workspaces, stored on your hard disk as a .DSK file.To create a makefile (.MAK) for your project, in the Project menu, select Export Makefile.The .MAK file is a standard makefile that can be used with NMAKE to create your application form the command line. is a standard makefile that can be used with NMAKE to create your application form the command line.第九条：If you want to see sample code at the same time you are working on your project, create a new project that contains the sample code as part of your workspace.第十条：The source editor can emulate BRIEF(TM) and Epsilon (TM). From the Tools menu, choose Options, then click Compatibility.第十一条：You can specity many types of compilation options from “Setting …” on the Project menu, including the level of debugging information and optimization needed, types of compiler messages, requesting run-time checks, and other options. For information on compiler options, see the Compiler Options in the Programmer’s Guide.第十二条：To get some new powerful and useful source editor commands, click Macros on the Tools menu and load the sample macro file.第十三条：Holding down Shift as you draw constrains the shape of an object. For example, it constrainsa rectangle to a square or an ellipse to a circle.第十四条：You can easily view and modify Fortran Format statements using the Visual Fortran Format Editor. Just click the Format Editor button on the Fortran Toolbar while the cursor is at a FORMAT statement in your code.第十五条：第十六条：第十七条：第十八条：第十九条：第二十条：…………………….今后学习中，慢慢再补………….………四、新建打开之后，File-new有可能会出现以下对话框经过筛选，找到…\Commom\MSDev98\Addins\DF98，然后打开文件所在位置Addin:外界程序直接叉掉出现的对话框：Files-new-出现以下对话框---输入Project name--选择Utility Project—OK!Fortran6.5会出现如下对话框：New Project will create a new skeleton纲要、构架with the following specification说明、详述:No files will be added to this project。
The utility实用的、效用的project does not generate any predetermined预订的output files(such as a .Lib or .Exe). It can be used as a container集合、容器for files that you want built without a link链接step.Project Directory:D:\MSDEV98\MyProjects\bands直接点OK，进入下一步，出现了‘bands’的工作区域和bands的文件夹：再选一次file-new，出现以下对话框，键入file名，如：001，选择Fortran Free Format Source File（Fortran自由形式的源文件）---然后，OK，进入下一步然后出现了，可以敲代码的编译对话框文件001.f90*,可以在其中敲入代码，也可以将其他代码复制过来。