方式Fortran处理空的空间
我想澄清一下Fortran处理字符串中“空”字符的方式。 让我们假设我们有这种情况： $ $ $ $ $ $ $ $ $ $ $ b test（'AB'） end program 其中 $ b $ 函数测试（名称） 隐式无 字符（10）::名称 字符（3）:: cutname 写（*，*）' - '// name //' - '！给出输出“-AB - ” ！空格已添加
..
fortran90相关内容
Fortran无法在865398.78和-865398.78之间进行添加？为什么答案是-0.03？
在下面的代码中，我将865398.78和-865398.78加在一起。我希望得到0，但我得到-0.03。 源代码： open（10，file =“test.txt”） read（10，*）x print *，“x =”，x x = x + 865398.78 print *，“x + 865398.78 =”，x 结束程序 结果： x = -86
..
假定字符串长度输入到Fortran函数中
我正在写下面的简单例程： program scratch character * 4 :: word 字='hell' print *，concat（字） 结束程序暂存 函数concat（x） 字符*（*）x concat = x //'plus stuff' end function concat 程序应该是将字符串'hell'连接到字符串'plus
..
程序内SUBROUTINE声明的无法分类的声明
所以我在Fortran 90编写了一个基本的Vigenere Cypher，但是当我尝试编译它时，由于我的内部子程序的缘故，我遭受了无法分类的声明错误。 我在'（''）'中列出了每个SUBROUTINE中使用的变量，但是我仍然收到错误。我认为这是一个非常简单的解决方法，但我似乎无法找到解决方案。 这是我的代码： PROGRAM Assign_8 IMPLICIT NON
..
在fortran中传递指针参数
程序foo INTEGER :: x REAL（KIND = 8），TARGET，DIMENSION（0：10）:: array REAL（KIND = 8），POINTER，DIMENSION（:) :: ptr ptr =>数组 CALL bar（ptr） END程序foo 子程序bar（ptr） REAL（KIND = 8），POINTER，D
..
错误：在（1）处名称中的无效字符
我试图编译Fortran文件以及FORTRAN中的一些.h文件。 .h文件包含变量通用块的定义。当我在Fortran中编译它们时，出现以下错误： $ p $ 整数knue，knumu，kmu，knutau，ktau， ku，kd，kc，ks，kt，kb，kgamma， 1 错误：名称中的无效字符（1） 发生这种错误的代码是， 现在我的问题是，这个错误是“1” ？ 这个错
..
从另一个函数创建动态函数
我有一个以函数作为参数的Fortran 90子例程，我想将该函数的修改版本传递给另一个子例程。我希望程序看起来像这样： 子程序foo（f，...） real :: pt（2），dir（2） 接口 函数f（x）结果（y） 实数，意图（in）:: x（2） real :: y 结束函数f 结束接口 pt = ... dir = ... !!以某种方式创建g（x）= f（
..
在Fortran中重新启动循环
我有一个如下所示的算法： 10 WRITE（*，*）“开始” DO I = 1，10 WRITE（*，*）“Step” IF（I .EQ。5）然后 转到10 END IF END DO 当if语句执行时，我想重新启动循环。但是，我不想用一个去，我试过这个： 10 WRITE（*，*） “开始” DO I = 1，10 WRITE（*，*）“S
..
如何获取作为标准输入/标准输出的文件的名称？
我遇到以下问题。我想在Fortran90中编写一个程序，我希望能够这样调用它： ./ program.x main.out除了“main.out”（我在调用程序时可以设置的名字）之外，还有一个名为“main.out”的主键。 ，次要输出必须写出来，我希望它们有一个与“main.in”或“main.out”类似的名称（它们实际上并不称为“main”）;然
..
复杂数字的fortran格式说明符
我可以在fortran中为复数指定格式说明符吗？我有一个简单的程序。 程序complx1 隐式无 复杂:: var1 var1 =（10,20） write（*，*）var1 write（*，'（F0.0）'）var1 write（*，'（F0.0，A ，F0.0）'）real（var1），'+ i'，aimag（var1） end program complx1
..
在子程序调用期间保持fortran中的数组限制
我有以下程序： pre $ module test 包含 子程序foo（） 整型，allocatable :: a（:) 分配（a（-5：5）） 调用栏（a） print *，a 结束子程序 子程序吧（a） 整数，意图（out）:: a（:) a = 0 a（-4）= 3！这里 a（2）= 3 结束子程序 结束模块 程序x 使用测试 调用foo（） e
..
康柏视觉fortran和gfortran之间的Fortran 90差异
这可能是一个具体问题，但我认为它与这两种编译器（Compaq visual Fortran Optimizing Compiler Version 6.5和minGW）如何处理内存有关。我想了解在Fortran 90中使用指针的最佳做法（我必须使用它）。下面是一个示例代码，它应该可以通过gfortran编译器的一个警告“开箱即用”：“赋值函数出现在赋值的RHS上”，并且没有其他编译器的警告。
..
在Fortran模块中生成随机数
现在我面临的问题是，在一个模块中，使用种子生成随机数用于函数循环，但每次调用该函数时，都会使用相同的随机数（因为种子显然是相同的），但是它假设它必须继续这个系列，或者至少它在调用之间必须是不同的。一种解决方案可能是主程序为模块提供了一个新的种子，但我认为这可能是另一个优雅的解决方案。 我使用 Mersenne Twister 生成器，由许多人建议。 新增 我的模块中的函数（它是一个函
..
在Fortran 90中打开多个文件
我想打开10,000个文件，文件名从 abc25000 直到 abc35000 ，并将一些信息复制到每个文件中文件。我写的代码如下： PROGRAM puppy IMPLICIT NONE integer :: CHARACTER（len = 3）:: n1 CHARACTER（len = 5）:: cnum CHARACTER（len = 8）:: n2
..
FORTRAN 90如何编写长度不同的非常长的输出行
我花了几个小时在互联网上寻找解决这个问题的办法，但找不到任何东西。我一直在试图将未格式化的输出写入CSV输出文件，其中包含多条长度可变且数据类型多样的非常长的行。我试着先写一个长头文件，指出将要写在下面的变量，用逗号分隔。然后在下面的行中，我正在写入标题中指定的值。但是，通过顺序访问，长输出线被分成多条较短的线，这不是我所希望的。我试图在open语句中使用recl来控制行长度，但在输出后只添加了一
..
用Fortran中的空格读取字符串
如果要从用户读取的字符串包含空格，在Fortran中使用read（星号，星号）似乎不起作用。 请考虑以下代码： character（Len = 1000）:: input ='' read （*，*）输入 如果用户输入字符串“Hello，我的名字是John Doe” ，只有“你好，”将被存储在输入中;在空间之后的一切都被忽视了。我的假设是，编译器假设“Hello”是第一
..
Fortran 90存在可选参数
我不明白使用pgf90 7.2的present（）内在函数的行为。我写了一个20行的示例程序来测试这个，但结果对我来说仍然没有意义。注意： 子例程testopt（一，二，三，四，五） 隐式无 整数，意图（in）::一，二 整数，意图（输出）:: three 整数，意向（in），可选::四 整数，intent（out），可选:: five three = one + tw
..
在FORTRAN中创建名称包含实数的目录
在我的程序中，我需要为不同情况存储结果文件。我决定创建单独的目录来存储这些结果文件。在这里解释确切的情况是一个伪代码。 do i = 1，N！ N分析我的分析 U = SPEED（i） 调用write_files（U）！为这种情况创建一个新目录并打开文件（1 = a.csv，2 = b.csv）数据 调用postprocess（）！将数据写入文件（a.csv，b.csv） 调用close
..
数组构造函数中不同的CHARACTER长度（3/4），如何修剪字符串 - fortran
根据对类似问题的回答，我已经声明了这些字符 gfortran不允许具有不同组件长度的字符数组。不过，我想使用修剪功能，因为我需要添加空格来手动填充名称，然后这些变量在代码的另一部分中使用。我可以在创建数组的同时进行修剪吗？ 错误：数组构造函数中不同CHARACTER长度（3/4） ） 如果我添加随机字符以使它们具有相同的长度，但由于显而易见的原因，我无法这么做。我用gfortran和m
..
如何在Fortran中执行块注释？
我在C ++中看到了 / * block comment * / 用于块注释。我知道我可以通过使用！或 c 来进行行注释，但在Fortran中是否有任何选项可用于块注释？ 解决方案 不，块评论的奇怪概念与Fortran不同。您的编辑器或开发环境可能提供一种方式来一次性评论一行代码。
..