Fortran 95：if 条件的内联计算
这里有一小段代码，返回 epsilon() 以获得实际值： program epstest real :: eps=1.0, d do d=1.0+eps if (d==1.0) then eps=eps*2 exit else eps=eps…
使用 Fortran DLL 进行 NUnit 测试
我有一个来自 Fortran 的 ServerCom DLL。我使用 tlbimp 从 ServerCom.dll 自动生成 MyFortran.dll，可以直接从 C# 引用。 在 C# 类库中，我引用了 My…
从 Fortran IV 更新到 Fortran 77
我收到了一项咨询任务，我将把 Fortran IV 程序更新到 Fortran 77。问题是我从来没有用 Fortran 编写过代码。您能给我一些关于在哪里可以学习 Fortran…
如何在 CUDA FORTRAN 中生成随机数？
我正在寻找一种简单的方法来为并行的多个线程生成 0.0 和 1.0 之间的随机浮点数。到目前为止，这是我的内核.. attributes(global) subroutine rand_ke…
重新编译旧的 Fortran 程序并出现此错误
代码部分如下所示； DO i = 1 , no2 + 1 IF ( Isign.EQ.1 ) THEN Ans(i) = fft(i)*Ans(i)/no2 ELSEIF ( Isign.EQ.-1 ) THEN IF ( ABS(Ans(i)) .EQ. 0.…
意图（inout）和指针虚拟参数之间的区别
有什么实际区别 subroutine fillName(person) type(PersonType), intent(inout) :: person person%name = "Name" end subroutine 拥有或以下 subrouti…
Fortran 可以与 Windows 上的 Silverlight、WPF 或 MFC 交互吗？
我想使用 Fortran 来解决数值问题，但我不确定使用 Fortran GUI 库是否是可视化结果的最佳选择。在 Silverlight、WPF 或者 MFC 中拥有 GUI 并调用用 F…
波特兰组 FORTRAN pgf90 程序在使用 -fast 编译时失败，使用 -fast -Mnounroll 成功
这段代码愉快地运行了很长一段时间，直到我们最近发现了一个边缘情况，它默默地失败了——没有返回错误。 失败显然相当微妙。我们可以通过以下方式让…
Fortran/C 中介语问题：结果在第 14 位数字不同
我必须同时使用 C 和 Fortran 来做一些模拟。在他们的课程中，我通过在 C 中定义一个指针来访问 Fortran 分配的内存，在两个编程语言部分中使用相同的…
Fortran - 旧（1972）代码中的两分支 IF 语句
问候。有谁知道这个 Fortran IF 语句是做什么的？ IF(IJJ-2) ,409,411 我不认为这是一个拼写错误，因为同一程序中还有其他一些错误。我认为这是一个标…
当虚拟对象具有指定长度时传递字符串作为参数
如果我有这段代码， module test contains subroutine xx(name) character(len=20), intent(in), optional :: name if (present(name)) then print *,…
fortran90中整数的智能打印
几年前简单介绍了Fortran77之后，我开始学习Fortran90。在 Fortran 中打印整数时，必须指定要为打印整数保留多少个空格。考虑这个程序... implicit no…
GAMMA 的结果低于同类
我想使用下面的程序计算 gamma(-170.1)： program arithmetic ! program to do a calculation real(8) :: x x = GAMMA(-170.1) print *, x end progra…
为什么 Fortran POINTER 需要 TARGET？
为什么 Fortran 90 规范 指定 (5.2.8)必须使用 TARGET 关键字将 POINTER 与其关联吗？为什么不是每种类型都是有效的目标？ 例如， <代码>INTEGER,…
