带内部 goto 的 Fortran do 循环
我有一个 Fortran77 代码片段,如下所示: DO 1301 N=NMLK-2,2,-1 Some code... IF(NB1(N).EQ.50) GOTO 1300 Some code... IF(BS(N).EQ.0.0) GOTO 130…
Fortran 变量类型转换
快问。 我有一个带有变量声明的 fortran77 子例程, DIMENSIONS HH(13, 1000) 我假设由于没有指定类型,因此该变量是一个整数数组。稍后在程序中,我…
FORTRAN 77 程序比 Fortran 90 程序更快吗?
今天,我正在阅读一些用 FORTRAN 77 编写的非常流行的数值库中的代码,例如 QUADPACK(最后更新于 1987 年),我想知道是否有任何理由不在 Fortran 90…
linux下pgf90编译器第二次调用子程序出现分段错误
我无法在 Linux 环境下使用 pgf90 fortran 编译器调用同一子例程两次。第一次调用该子程序没问题,但第二次调用它时,就会出现分段错误。有人可以给我…
FORTRAN 77 简单输入/输出
我是 FORTRAN 新手,必须编写一个 FORTRAN 77 程序来从文件重定向或标准输入读取以下格式: [CHARACTER] [REAL] [REAL] [REAL] ... (can have any num…
Fortran 中的星号:(1) 处参数列表中的语法错误
在下面的fortran77代码中,有这个子程序定义, SUBROUTINE MSIRNS ( D , NOBST , N , X , R , RR , SURFT , , INOBSI , ISUR , IDELTS , IRELPS , , R…
Fortran 中的实数与整数
我有一个程序,它循环一个变量并在每一步计算一个值: program cpout implicit none !declarations integer, parameter :: dp = selected_real_kind(1…
Fortran 77 可变大小字符串数组?
我是 Fortran 77 中的傻瓜,一直是 C++ 编码员,但我必须修改多年前的代码...... 我想创建一个可变大小的字符串数组,但我无法在网上找到如何在 Fortr…
Fortran 嵌套循环,带有一个 continue
我正在重写一些遗留代码,并发现了这一点: DO 4 I=1,N ... DO 4 J=1,N ... 4 CONTINUE 这两个循环似乎只有一个 CONTINUE 。它相当于这个Java代码吗?…
Fortran 77 注释掉 write 语句的错误
我正在使用一个旧的 FORTRAN 77 程序,并且遇到了一个奇怪的错误。按原样,代码似乎运行良好,并在不到一秒的时间内完成。但它会产生一堆我不感兴趣的…
是否可以为 iPad 编译 Fortran 代码?
我有一个用 Fortran 77 编写的应用程序,需要它在 iPad 上运行。 是否可以?我不想用 Objective C 重写这段代码,因为有很多复杂的计算,而且我担心会…
GNU f77/gfortran 和 f2c 的关系?
今天的 g77/gfortran 和 f2c 是什么关系?还有发展吗?一个人是否从其他进步中受益(例如错误和性能)? 谁在开发 f2c(如果不是由 g77/gfortran 开发…
Fortran 77 处理 C++内存分配
我正在尝试编写一个使用几万行 Fortran 77 代码的 C++ 程序,但遇到了一些奇怪的错误。我将三个坐标 (x,y,z) 和三个向量的地址从 C++ 传递到 fortran …