带括号的Fortran实数变量
是指在Fortran编程语言中，用于表示实数的变量，并且在变量名后面使用括号来指定变量的精度和范围。
Fortran是一种面向科学和工程计算的编程语言，广泛应用于高性能计算和科学计算领域。在Fortran中，实数变量可以使用括号来指定其精度和范围。括号内的数字表示变量的总位数和小数位数。
例如，声明一个带括号的Fortran实数变量可以使用以下语法：
real(kind=n) :: variable其中，n表示变量的精度和范围，可以是1、2、4或8。不同的精度对应不同的存储空间和表示范围。
带括号的Fortran实数变量具有以下优势：
- 精度控制：通过使用括号，可以精确控制实数变量的精度和范围，以满足不同的计算需求。
- 数值计算：Fortran是一种专门用于数值计算的编程语言，带括号的实数变量可以提供高精度的数值计算能力。
- 科学计算：Fortran在科学计算领域应用广泛，带括号的实数变量可以满足科学计算中对精度和范围的要求。
带括号的Fortran实数变量适用于各种科学计算和工程计算场景，包括但不限于：
- 数值模拟：在数值模拟中，需要对实数进行高精度的计算和表示，带括号的Fortran实数变量可以满足这一需求。
- 物理建模：在物理建模中，需要对实数进行精确的计算和表示，带括号的Fortran实数变量可以提供所需的精度。
- 工程计算：在工程计算中，需要对实数进行准确的计算和表示，带括号的Fortran实数变量可以满足这一需求。
腾讯云提供了适用于Fortran开发的云计算产品和服务，例如：
- 云服务器（https://cloud.tencent.com/product/cvm）：提供高性能的云服务器实例，可用于Fortran程序的部署和运行。
- 云数据库MySQL版（https://cloud.tencent.com/product/cdb_mysql）：提供可靠的云数据库服务，可用于存储Fortran程序的数据。
- 云存储（https://cloud.tencent.com/product/cos）：提供高可用性和可扩展性的云存储服务，可用于存储Fortran程序的文件和数据。
以上是关于带括号的Fortran实数变量的完善且全面的答案。
相关·内容
我是FORTRAN的新手。我有一些用英特尔FORTRAN编写的FORTRAN程序，现在我正在使用gfortran编译它们。
其中一个子例程使用JFIX()函数。当我完成时，抛出了以下错误。
undefined reference to 'jfix_'
子例程在顶部引用了这个内部函数，如External::JFIX
有人能帮我解决这个问题吗？
浏览 0提问于2012-01-10得票数 0
回答已采纳
2回答
我在Fortran中有以下函数签名。我是第一次接触Fortran语言-在下面的函数中0.是什么意思？
ANTY(IAN,NA,0.,0.)
浏览 7提问于2009-08-18得票数 0
我正在写一个Fortran，它必须求解平方根，这会导致得到一个复数，但Fortran不会打印它，也不会将它传递给另一个变量。它给出了(NaN，0.000)。
这是一个虚拟代码，用来表示我正在处理的实际代码中遇到的问题。如果你们能给我任何有用的信息。谢谢。
program test
IMPLICIT NONE
COMPLEX X
REAL a, b, c
a = 1
b = 1
c = 1
X = sqrt(b - 4*a*c)
print *, REAL(X), ' -
浏览 2提问于2013-01-04得票数 0
回答已采纳
2回答
我有一段Fortran代码，我的Fortran编辑器(Force2.0.9)无法理解该代码中的以下行。
real(kr8) :: rnum
我找不到关于这种类型的变量声明的任何东西。(kr8)是什么意思？如果有人能给我解释一下，我真的很感激。
浏览 0提问于2012-08-03得票数 3
回答已采纳
如何修复Fortran运行时错误:列表输入中0项的整数错误？
下面是生成运行时错误的Fortran程序。
CHARACTER CNFILE*(*)
REAL BOX
INTEGER CNUNIT
PARAMETER ( CNUNIT = 10 )
INTEGER NN
OPEN ( UNIT = CNUNIT, FILE = CNFILE, STATUS = 'OLD' )
READ ( CNUNIT,* ) NN, BOX
从gdb收到的错误消息为：
At line 688 of fil
浏览 0提问于2014-05-28得票数 0
我正在将一些Fortran翻译成我们的C#应用程序，我试图弄清楚一些Fortran在函数的顶部是什么意思。
DOUBLE PRECISION INF, DMIN, D12
DATA INF/1.D+300/
INF的价值是什么？
浏览 0提问于2010-02-24得票数 3
回答已采纳
1回答
我已经将Fortran PowerStation(4.0)中的一些Fortran代码移植到Fortran11(2003)编译器中。为了保持新旧编译器之间的double和real值，我将properties>fortran>data>"Default Read Kind"从4改为8。现在的问题是，全局变量不能维护从一个文件到另一个文件的数据。
假设我在一个文件中创建了一个名为abc的real*8变量作为全局变量(COMMON/test/abc)。它在一个文件中修改，并在另一个文件中使用。当检查第二个文件中的abc变量的值时，发现不包含修改后的数据。只有当我将&#
浏览 1提问于2009-10-09得票数 0
3回答
我一直在尝试用最新版本的GNU Fortran编译器(gfortran)在我的研究项目中使用Fortran，但我在处理实数的方式上遇到了一些问题。例如，如果您有以下代码：
program test
implicit none
real :: y = 23.234, z
z = y * 100000
write(*,*) y, z
end program
您将得到以下输出：
23.23999 2323400.0
我觉得这真的很奇怪。有人能告诉我这里到底发生了什么吗？看看z，我可以看到y确实保持了它的精度，所以对于计算来说，我想这不应该是一个问题。但是为什么y的输出与我指定的值不完全
浏览 0提问于2012-04-05得票数 2
我有一个很大的代码，用fortran写的，用来建立和迭代求解非线性偏微分方程组。我需要所有的变量都是双精度的。在我为代码编写的附加模块中，我将所有变量声明为双精度类型，但我的模块仍然使用旧源代码中声明为real类型的变量。所以我的问题是，在fortran中，单精度变量乘以双精度变量会发生什么？如果用于存储值的变量被声明为双精度，那么结果是双精度吗？如果一个双精度的值乘以一个在末尾没有"D0“的常量，该怎么办？我是否可以在英特尔11.1中设置一个编译器选项，使所有实数/双精度/常量成为双精度？
浏览 0提问于2011-03-11得票数 3
简单的问题:我正在查看大气模型中的Fortran代码，无论何时声明一个真实的变量，它总是被声明为real :: foo = 1.而不是real :: foo = 1。尾随的小数点是必需的吗？
当从名称列表文件中读取参数时，这些规则会发生变化吗？例如，我可以在名字列表中写
&main_nml
foo = 1
/
而不是
&main_nml
foo = 1.
/
并使用namelist /main_nml/ foo读取原始模块中的变量
最后，对于不同版本的Fortran，这个答案是否会有所不同？
浏览 0提问于2017-12-02得票数 1
/home/disk/p/atms380/xx/October-Runs/timeManMod/SourceMods/time_manager.F90(664):
error #6404: This name does not have a type, and must have an explicit
type. [FLOOR]
tmd = day_earth/PLANET_DAY_RATIO - floor(day_earth/PLANET_DAY_RATIO)
我正在使用ifort编译器运行Fortran 90。据我所知，floor是Fortran 90中引入的一个函数
Using
浏览 3提问于2011-10-05得票数 1
回答已采纳
我在Fortran代码中指定了一个实数变量作为a=0.00001。在打印以下行的变量时，给出了a=9.9999997473787516E-006而不是1E-5。
此问题的修复方法是使用用值8定义的rk声明a=0.00001_8或a=0.00001_rk。
我想在我的编程中避免这种underscore风格。有没有像在C或C++中那样不用下划线的方法？
浏览 1提问于2017-03-15得票数 0
1回答
我的节目有个问题。带掩码调用的内禀函数和导致可疑结果:当我执行一个平均值时，我获得一个超出数组界限的值。我怀疑这与舍入错误有关。我正在处理大数组，舍入误差会导致很大的偏差(与40,000元素的期望值相比，相差约40% )。
下面是一个很小的例子来再现它，以及相关的输出。
program main
implicit none
integer :: nelem
real, allocatable, dimension(:) :: real_array
logical, allocatable, dimension(:) :: log_array
! init
nele
浏览 3提问于2016-05-23得票数 0
回答已采纳
有人知道下面这行中的4HEND是什么意思吗?它来自一段古老的Fortran代码。
DATA XHEND / 4HEND /
浏览 3提问于2012-08-08得票数 0
回答已采纳
我想在Fortran中多次阅读相同的文件行。有关数据是实数。我试图构建这个代码作为测试，但我总是搞错了。
program advance
implicit none
integer , parameter :: ut = 20
character(len=7) :: fname = 'dat.dat'
integer :: n, idx
character(len=100) :: lnumber
open(unit = ut, file =fname, status='old', action='re
浏览 0提问于2018-05-14得票数 1
回答已采纳
我目前正在将一个应用程序从Fortran移植到C，并且需要输出一些变量来比较结果。我对Fortran非常陌生，虽然我理解代码，并且已经移植了几千行代码，但我自己在编写Fortran代码方面还是个新手。
这段代码：
write(6,'(A,I3,A,E12.8,A,E12.8,A,E12.8,A,E12.8,A,E12.8)') 'iHyd:',
& ih,'; dzdr: ',dzdr,'; tauray:', tauRay,'; zRay: ',
& zray,';
浏览 1提问于2011-03-21得票数 0
回答已采纳
我继承了一些Fortran代码，我正在尝试理解这些代码。它在很多地方使用了实数变量，我认为这是不应该的--但也许我误解了Fortran中它是如何工作的(与我更熟悉的C++相比)，因此出现了这个问题。
因此，所讨论的变量本质上是“分类值”、“因素”或“枚举”，这取决于您如何看待它/想如何调用它。它们的数据类型是REAL，并且只能接受有限数量的预定整数值。假设变量a只能是值1、2或3。这些值是从外部文件中读取的；在这些外部文件中，它们被表示为整数，所以这不是“外部数据源中的舍入问题”之类的情况。
然而，在代码中，它从不进行直接比较，总是进行大于/低于检查。所以，与其这样做
if (a == 1)
浏览 0提问于2018-06-05得票数 0
我正在编写一小块Fortran 90代码，使用复杂变量计算一些量。
我有一个带有以下说明的子程序：
complex, dimension(3) :: v
integer :: i
real:: tmp
do i = 1,3
tmp = vg(i)
v(i) = (tmp, 0.0)
enddo
v是一个长度为3的复杂数组，vg也是一个长度为3的数组，其元素是实的。
当我用gfortran 4.7.3编译上面的代码时，我得到以下错误：
v(i) = (tmp,0.0)
Error: Expected PARAMETER symbol in complex constant
浏览 0提问于2013-11-19得票数 6
回答已采纳
在从这个网站( )了解到Fortran中的selected_int_kind和selected_real_kind语句后，我在键入以下代码时遇到了这个问题：
program large_integers
integer, parameter :: Single = selected_int_kind(precision(1.e0))
integer, parameter :: Double = selected_int_kind(precision(1.d0))
integer(Single), parameter :: sNaN = Z"7FC0000"
浏览 0提问于2019-04-10得票数 0
我正试着在windows下用FORTRAN在控制台上写二进制格式，但我做不到。我知道我可以使用Open()函数并使用Form='Unformatted‘打开一个文件并以二进制格式写入。但我需要在控制台上写，而不是外部文件。
我的项目是使用管道机制在FORTRAN和C++程序之间进行通信。通信的一部分是发送大量的双精度数字。现在我正在发送真实的数字。如果我可以将它们作为二进制格式发送，这将加快过程。
有没有办法在控制台上用FORTRAN写成二进制格式？我试图通过char()函数对数字进行类型转换，但它只适用于整型，而不适用于双精度！
任何帮助我们都将不胜感激。
谢谢
浏览 1提问于2013-03-23得票数 0
2回答
我有以下Fortran代码：
Program Strange
Real(Kind=8)::Pi1=3.1415926535897932384626433832795028841971693993751058209;
Real(Kind=8)::Pi2=3.1415926535897932384626433832795028841971693993751058209_8;
Print*, "Pi1=", Pi1;
Print*, "Pi2=", Pi2;
End Program Strange
我用gfortran编译，输出是：
Pi
浏览 0提问于2013-05-04得票数 6
回答已采纳
有没有可能在Fortran中实现像1E-1200这样的非常小的数字？我知道怎么用python写，但是我写硕士论文的代码运行太慢了。我的主管建议我使用Fortran，但我不确定这是否有问题。
浏览 1提问于2017-01-22得票数 0
我不确定这是什么版本的Fortran，但这行代码是：
Term = F*F - 4.*E*G
我知道它将F乘以F，然后减去一些东西，但我不知道4后面的周期是做什么的。
浏览 0提问于2009-04-29得票数 3
回答已采纳
我必须将一个Fortran程序翻译成C++，Fortran程序包括一个头文件，其中包含许多行，如下所示：
`COMMON/TDD/IDONE(NX,NY,NZ),IDTWO(NX,NY,NZ),IDTHRE(NX,NY,NZ)`
`COMMON/ESCAT/EXS(NX,NY,NZ),EYS(NX,NY,NZ),EZS(NX,NY,NZ)`
`COMMON/HSCAT/HXS(NX,NY,NZ),HYS(NX,NY,NZ),HZS(NX,NY,NZ)`
这里NX，NY和NZ是整数我不知道这些行是做什么的
浏览 0提问于2013-06-26得票数 0
回答已采纳
1回答
在一个简单的程序中，我想通过定义一个函数来构建一个矩阵。问题在于，在程序中声明和初始化的变量具有确切的赋值零(zero_test)和矩阵的某些组成部分(D(4,1), D(1,4)等)。赋值给0.，并不完全为零。后者的值是order、E-308或E-291等等。我想知道为什么会有区别。
由于我读过一些文章，比如、其他组件(D(1,1), D(1,2)等)。是不精确的，因为要转换为二进制格式。
系统信息: IA-32，集成了Microsoft Visual Studio 2008的英特尔Visual Fortran 11.1.048
代码：
program test
implicit none
浏览 1提问于2014-03-22得票数 0
3回答
用Fortran90编写的程序手册上写道：“所有实数变量和参数都是以64位精度(即real*8)指定的。”
根据的说法，单精度对应于32位精度，而双精度对应于64位精度，因此显然该程序使用双精度。
但是real*8是什么意思呢？
我以为8的意思是小数点后跟8位数字。然而，似乎说单精度通常提供6-9位数字，而通常提供15-17位数字。这是否意味着“64位精度”语句与real*8不一致？
浏览 0提问于2012-05-10得票数 33
回答已采纳
非标准的数学分析将实数线扩展到包括“超真实”--无穷小和无限数。是否有使用超真实实现计算的数据类型的实现(规范)？我正在寻找与您在Python和Fortran以及其他地方找到的复数数据类型类似的数据类型。实际上，我不知道这样的计算是否有用:我只是好奇。我已经玩弄了这个概念，但由于我可能犯了错误，所以我将省去所有细节。参考
浏览 0提问于2010-08-28得票数 6
2回答
我正在通过fortran 90运行这段代码
Program Projectile
! This Program Calculates the Velocity and Height of a
! Projectile
! Given its Initial Height, Initial Velocity and Constant
! Acceleration.
Implicit None
Real :: Initial_Hight, Height, Initial_Velocity, Velocity, &
Time, Acceleration = -9.807
! Obtai
浏览 1提问于2015-09-15得票数 0
回答已采纳
我曾尝试在C++和Fortran中实现一个递归函数，它计算第n次勒让德多项式在x处的值。
recursive function legendre(n, x) result(p)
integer, intent(in) :: n
real(8), intent(in) :: x
real(8) :: p
if(n == 0) then
p = 1.0
else if (n == 1) then
p = x
else
p = (2.0*real(n,dp)-1.0)*x*legendre(n-1,x)-(real(n,dp)-1.0)*legend
浏览 0提问于2020-02-26得票数 6
我需要从c++向Fortran dll传递一个指针向量，但我不知道这是否可能。 我试着搜索，但我真的找不到并回答我的问题。想法是这样的： Fortran侧 !DEC$ATTRIBUTES DLLEXPORT :: TO_FORTRAN
integer function TO_FORTRAN (test4) BIND(C)
use, intrinsic :: ISO_C_BINDING
implicit none
REAL, intent(in) :: test4(3)
REAL, pointer :: test5
ca
浏览 30提问于2019-04-19得票数 1
random_number()函数能在Fortran中生成NAN吗？例如，如果我有一个名为A的实数组*8，并且我调用了函数random_number(A) --任何A元素(结果)都可以是NAN吗？
浏览 1提问于2016-10-25得票数 2
2回答
我在Fortran中有一个字符串数组，作为“结果: CI- Energies th= 89 ph=120”。如何从字符串中提取字符'120‘并将其存储到真正的变量中？
字符串被写入文件'input.DAT‘中。我将Fortran代码写成：
implicit real*8(a-h,o-z)
character(39) line
open(1,file='input.DAT',status='old')
read(1,'(A)') line,phi
write(*,'(A)') line
write(*,*)phi
浏览 7提问于2014-07-15得票数 1
回答已采纳
我想用Fortran创建一个程序，从具有以下格式的.dat文件中乘以向量：
x1 y1 z1
x2 y2 z2
索引1和2分别引用向量1和2。首先，我要确定向量，到目前为止，我已经
program ex2
implicit none
real*8 x
integer i
write(6,*) "Insert the vectors from vet_in.dat"
open (
浏览 2提问于2017-03-18得票数 0
回答已采纳
我正在编译一些最初由ifort用gFortran编译的程序，现在重写编译命令。
最初的ifort编译命令是：
ifort -integer-size 64 -real-size 64 -double-size 128 fortran_code.f90
由此，我用以下方式编写了gFortran命令：
gfortran -fdefault-integer-8 -fdefault-real-8 fortran_code.f90
我可以看到-integer-size 64 -real-size 64将成为gFortran的-fdefault-integer-8 -fdefault-real-8，但是-
浏览 28提问于2022-11-28得票数 0
我要进入FORTRAN，有一个沉重的C背景。这一切都很简单，除了COMMON块工作的实际机制使我感到困惑，我找不到任何地方详细描述它们。
假设我在FORTRAN中有下面的COMMON块。
COMMON/MYBLOCK/ A,B,C
据我所理解，这将留出包含three...things的内存块，这些内存与块中的名称并没有真正关联，事实上，如果后面的源代码中有这段代码的话：
SUBROUTINE MYSUB(...)
...
COMMON/MYBLOCK/ X,Y,Z
...
END
现在X和A中的任何东西都有关联，而Y到B和Z到C的关系也是一样的。
这意味着声明时COMMON/MYBLOCK/
浏览 1提问于2020-03-24得票数 2
回答已采纳
我有一个输入文件，第一行包含以下小数。
0.5053102074297753
我有一个Fortran 90程序，它读取文件并输出值。
read(*,*) answer
write(*,"(F20.16)") answer
这是输出：
0.5053101778030396
显然，存储的内容与读取的内容不同。问题是，为什么？
浏览 0提问于2010-09-25得票数 1
回答已采纳
我在理解Fortran90的kind参数时遇到了问题。据我所知，它不决定变量的精度(即，浮点数或双精度)，也不决定变量的类型。
那么，它决定了什么，它到底是为了什么呢？
浏览 0提问于2009-05-08得票数 46
这个问题适用于Fortran，更准确地说是编译器gfortran。
我需要知道如何将实数(kind=8)数组转换为实数(kind=4)数组，以便保留数组中每个条目中的所有合理数字。
显然，从kind=8到kind=4的类型转换意味着信息的丢失。因此，我正在寻找的是正确的方法来丢失尽可能多的信息-但不是更多。
浏览 3提问于2021-07-30得票数 1
2回答
我正在用Fortran 77编写一个程序，我需要在一行上读取指定数量的实数。例如，输入可能如下所示：
1.0 2.0 3.0 4.0
将指定一行上的值数。这将被保存在某个值中，称为M。
如何在一行中读取M个实值。我尝试过使用循环来完成此操作，但我认为READ语句在执行后会跳到下一行。另外，我使用变量INFILE来引用文件单元。
谢谢
浏览 0提问于2012-12-01得票数 0
我有一个简单的Fortran代码，我收到了一个错误，我找不到解决方案。有人知道怎么解决这个问题吗？
subroutine sort(A,A_done,N,P)
! Sort a real array by algebraically increasing value and return the permutation that
! rearranges the array
implicit none
Integer N, TEMP1, K, L, P(N), TEMP2
real(8), dimension(:) :: A_done
real(8), dimension
浏览 0提问于2013-04-03得票数 0
在编写Fortran代码时，通过赋值kind=8或double precision来声明实数变量是确保双精度的一种方法。另一种方法是不在代码中显式地声明任何东西，而是使用编译器选项，即-r8 (ifort)等。
这两者之间有区别吗？
浏览 4提问于2014-06-21得票数 2
我正在用C语言编写这段代码，我无法理解为什么这两个代码会得到不同的结果。
第一次写入不带小数点的值
float num2=(5/9);
这为我提供了如下输出：
0.000000
带小数点
float num2=(5.0/9.0);
这为我提供了如下输出：
0.555556
这种答案差异背后的工作或理论是什么？
浏览 32提问于2020-05-15得票数 2
您好，我正在尝试使用fortran结构，如下所示
type some
u ! actual code will have 17 such scalars
end type some
TYPE(some),ALLOCATABLE,DIMENSION(:) :: metvars,newmetvars
现在，我的测试程序的目标是将10个数字从一个处理器发送到另一个处理器，但这10个数字的起点将是我的选择(例如，如果我有一个向量，假设20个数字不是必须的，我将把前10个数字带到下一个处理器，但假设我的选择是5到15)。所以首先使用mpi_type_contiguou
浏览 0提问于2011-03-18得票数 0
回答已采纳
1回答
我没有使用Fortran的经验，但我正在尝试用Fortran语言运行一个非常简单的循环，方法是通过.Fortran()函数从R调用它。每当我运行粘贴在下面的R代码的最后一行时，R gui崩溃，我没有得到任何结果。我感兴趣的是将实值x的向量从Fortran带回R进行进一步分析。G是0到1之间的数值，n是整数，它们都是由用户在R中提供的。
任何帮助都将不胜感激！最好的
文森
保存在bar.f中的Fortran代码：
subroutine bar(n, g, x)
integer n
double precision g
double precision
浏览 0提问于2011-01-19得票数 13
回答已采纳
1回答
我发现在JSP中也存在类似的问题，但是对于Fortran，我没有看到一个StackOverflow问题。
问题是:比较运算符".eq.“和"==”在Fortran中有什么区别？
请注意，由于我使用了Fortran的多个版本(主要是77和90 )，所以我想知道这是否在不同版本之间发生了变化，或者至少更改到了您的答案是什么版本。
此外，由于我只能找到谷歌的教程，如果你能在你的答案中引用一些权威的东西(虽然我不确定是否在线存在Fortran手册)，那就太好了。
说到这一点，我从教程页面中发现了这一点:这个教程页面似乎表明它们之间没有区别，而这组幻灯片似乎表明"==“表示字符串
浏览 2提问于2016-03-06得票数 8
回答已采纳
3回答
我正在尝试写一个fortran程序，它使用格林函数来求解热方程。我使用fortran 90而不是77，部分原因是我的印象是它几乎是fortran 77的复制品，但加入了一些非常有用的功能。虽然最主要的原因是自由格式编码。我在一个名为"useful“的模块中有一些”有用的“常量和变量。我想在我的大多数程序、子例程、函数等中包含这些变量和常量。我只是在学习fortran。我已经用perl，C++，java，matlab和mathematica编程过。我发现这很难。我不明白程序和子例程之间的区别。我绝对不清楚什么是模块。在过去的12个小时里，我一直在研究这些术语，但还没有得到简洁的区别和定义
浏览 0提问于2011-01-08得票数 0
1回答
我用FORTRAN 77编写了以下代码：
REAL*8 :: dm
dm=1.-1.E-12
write(6,*) 'dm: ', dm
我明白了：dm: 1
这样可以吗？我想要dm=0.999999999999
浏览 0提问于2013-06-08得票数 0
回答已采纳
1回答
我知道Tcl中的if语句需要大括号{ }而不是圆括号( )。
但是，以下(错误的)代码会打印"Aha!"，因为Tcl似乎能够正确解释if条件：
set flow_control 1
if ($flow_control==1) {
puts "Aha!"
}
然而，以下代码(带空格)失败，并显示“表达式中不平衡的开放paren”(1“”)
set flow_control 1
if ($flow_control == 1) {
puts "Aha!"
}
当然，使用带括号或不带括号、带空格或不带空格的大括号都是可行的：
set fl
浏览 3提问于2015-01-30得票数 1
2回答
我是Fortran新手，我被要求使用Salford/Silverfrost编译器编写一个用Fortran 77编写的旧Fortran代码库(最初的开发人员去世了)。
最初的开发人员广泛使用命名的COMMON块(以模拟全局变量，AFAIU)，并在需要时使用EQUIVALENCE来(重新)初始化这些块，如以下代码片段所示：
IMPLICIT REAL*8 (A-H,O-Z)
COMMON/COMMF2D/
* ASCN(0:99,0:20,0:4)
*,FEMPTY2(8700)
DIMENSION KLCKF2D(38400)
浏览 6提问于2012-08-08得票数 1
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
对象存储
腾讯会议
实时音视频活动推荐
腾讯云开发者
