前言

Fortran77没有全局变量这一说，也就是几个subroutines之间都用的变量。Fortran77都是使用subroutine parameter list 或者叫做common block，但是我们应该减少使用全局变量的定义。

一、例子。定义两个全局变量alpha, beta

c2345678program mainsome declarationsreal alpha, betacommon /coeff/ alpha, betastatementsstopendsubroutine sub1 (some arguments)declarations of argumentsreal alpha, betacommon /coeff/ alpha, betastatementsreturnendsubroutine sub2 (some arguments)declarations of argumentsreal alpha, betacommon /coeff/ alpha, betastatementsreturnend

这里我们定义一个公共区域coeff(coeff是这个公共区域的名字). 上述程序在common blocks中定义了两个变量一个叫做alpha，另一个叫beta。common block中可以定义很多的全局变量。这些变量在common block定义时，不必所有的变量类型都一样。每一个想要使用全局变量的subroutine都得在subroutine的local variables定义的位置重新定义所有的全局变量。

二、语法

common /name/ list_of_variables

这个common应该与变量声明语句一起出现，在可执行语句之前。
不同的common blocks应该有不同的名字，就像是变量一样。
一个公共变量只能隶属于一个common block.
全局变量的名字可以不一样，但是他们必须得是同样的数据类型和大小，并且位置得是一样。最好名字也是一摸一样的，就是复制粘贴。

二、Arrays in common blocks公共区域内的数组

common blocks内可以包括数组，如下面所示。

program main
integer nmax
parameter (nmax=20)
integer n
real A(nmax, nmax)
common /matrix/ A, n

但是并不推荐，因为如果你想要在一些subroutines中使用这个矩阵A，那么你就需要包含下列所有的声明。

subroutine sub1(...)
integer nmax
parameter (nmax=20)
integer n
real A(nmax, nmax)
common /matrix/ A, n

所以最好的是将数组作为subroutine的参数输进去，同时有这个数组的行数，lda，leading dimension。

Fortran的全局变量（Common blocks）相关推荐

Fortran:COMMON数据块
COMMON BLOCK COMMON数据块是Fortran77语言中全局变量的唯一一种实现方式.程序单元(function & subroutine&program)之间可以引用同一 ...
数值运算工具Fortran（1）
FORTRAN是英文"FORmula TRANslator"的缩写,译为"公式翻译器",它是世界上最早出现的计算机高级程序设计语言,广泛应用于科学和工程计算领域 ...
FORTRAN语言（Formula Translation）自学笔记
FORTRAN语言是Formula Translation的缩写,意为"公式翻译",工程界最常用的编程语言,它在科学计算中(如航空航天.地质勘探.天气预报和建筑工程等领域)发挥着极 ...
Fortran 77
FORTRAN结构化程序设计第一章 FORTRAN语言程序设计初步 1.1 Fortran语言发展概况 1.2 简单的FORTRAN程序分析 1.3 FORTRAN源程序书写格式 1.4 Fortr ...
Fortran语言初探及Win7 64位下Fortran开发环境配置
笔者作为一只游走在生态.遥感.GIS与计算机的学生狗,最近终于因缘际会各种巧合下开始学习Fortran.还记得遥感物理课上牛柳两位老师(真是一个折磨萌萌哒台湾腔南方银口音的老师组合)的辐射传输方程.几 ...
Linux openmp教程,OpenMP中文教程
1.摘要 OpenMP 是一个应用程序接口(API),由一组主要的计算机硬件和软件供应商联合定义.OpenMP 为共享内存并行应用程序的开发人员提供了一个可移植的.可伸缩的模型.该API在多种体系结构 ...
ctags查看java代码,ctags 详细使用介绍
ctags命令帮助命令格式 ctags [options] [files(s)] 或 etags [options] [files(s)] 1 源文件参数不同语言中对象的种类及定义方式等都有尽相同 ...
g++的英文版使用说明和选项
使用g++ -v --help可以列出g++的所有可选项当然脚本最香了 g++ -v --help >> lionel.txt Usage: g++ [options] file... ...
ctags中−−−kinds=[+|−]kinds的使用
ctags是对自己认识的语言(比方说c,java等)生产索引的linux 工具. 这里只是简单的介绍一下ctags的查找功能. 要说查找,必须先说明一个选项: −−<LANG>−kinds ...
ELF符号表分析（转载）
An object file's symbol table holds information needed to locate and relocate a program's symbolic d ...

Fortran的全局变量（Common blocks）

文章目录

前言

一、例子。定义两个全局变量alpha, beta

二、语法

二、Arrays in common blocks公共区域内的数组

Fortran的全局变量（Common blocks）相关推荐

最新文章

热门文章