fortran

0热度

1回答

我想使用库fgsl，这取决于gsl。我有问题，指示在配置fgsl时已安装gsl。我想要使用这些库的静态版本。我不能使用来自Linux软件包的gsl库，这些版本不够新。首先我在本地下载，配置，编译并安装gsl，即使用--prefix选项。（说明如下）然后我下载fgsl，配置它。这最后一次操作失败，因为我没有成功指示gsl的位置。我试图使用gsl_LIBS失败。 wget http://ft

0热度

1回答

如何编写一个使用另一个生成10000个值的函数的2个值的函数？

我编写了一个线性同余发生器，它向终端输出10000个伪随机值。这是模块的一部分，因此也是它自己的功能。我现在要编写一个新的函数，它需要2个随机均匀分布的数字，并将它们用在盒子磨床方法中以生成2个以上的数字。我理解盒子零件本身，我只是不明白我如何编程才能从前面的10000中取出2个值？这里是我的代码： module rng implicit none integer, para

0热度

1回答

Linux的gfortran GDB错误在启动程序与代码退出126

我有我写的，跑，在1996年Fortran程序，我试图导入到gfortran 95 我编辑源代码编译后： gfortran -c -g -fno-align-commons MT3Dm2.f95 -o MT3Dm2 它不生成错误消息。我然后跑GDB，并得到： Success During startup program exited with code 126. 谷歌搜索的错误信息导致

0热度

1回答

通用'dde_solver'没有特定功能

我正在尝试使用的DDE解算器，可从radford使用Fortran90 sourcedde_solver_m_unix.f90。我相信我应该能够简单地下载和零个变化编译，但我收到以下错误： ex4p4p1.f90:107:8: SOL = DDE_SOLVER(NVAR,DDES,DELAYS,HISTORY,TSPAN=(/ 0D0,350D0 /)) 1 Error:

1热度

2回答

这段代码为什么给我不正确的答案？

我正在尝试编写一个程序，该程序使用lcg作为一个函数，以使用方块计算器计算更多的随机数。我已经获得了lcg的工作，但使用box muller算法的函数正在给出错误的值。这里是我的代码： module rng implicit none integer, parameter :: dp = selected_real_kind(15,300) real(kind=d

1热度

2回答

sqrt（x）和x **（1./2。）之间的比较

我刚刚得到一个快速问题，这个问题是由我在Fortran中获取数字的平方根时得到的一个观察结果产生的。下面的两个语句比较 wp = selected_real_kind(15, 307) somevar = sqrt(3.0) somevar2 = (3.0_wp)**(1.0/2.0) 我发现somevar = 1.7320507764816284和somevar2 = 1

0热度

1回答

如何在每次分析结束时更改文本文件特定部分的值？

我正在用Fortran读取文本文件进行分析。我想在每次分析结束时覆盖文本文件特定部分的值。它被输入到纺织文件中，如下所示。 64,0.015d-4,0.01d+6,0, 我想只覆盖第三列的值的实部，如0，02，0，03 ...每次主程序结束。

0热度

1回答

从Fortran中的变量输入文件中读取数据

我试图从输入文件（实际上是多个文件）中读取数据，然后对每个文件的数据执行某些操作并将每个输入文件的输出打印到输出中Fortran语言，所以它是这样的.. Open (20, file="a0001.csv) [perform operation on this file] print output0001.txt input files :a0001.csv,a0002.csv,...a

1热度

1回答

在FORTRAN中使用内部SUM函数的数组的轨迹

是否可以使用内部SUM函数来计算数组（轨迹> 1）的轨迹？目前，我正在使用do循环来计算跟踪。 trace = 0.0d0 do i = 1, 10 trace = trace + a(i,i) end do

2热度

1回答

如果GDB条件语法错误

我在一个文件test.f90有一个非常简单的Fortran程序： program test real :: x x=12 write(*,*) x end program test 我 gfortran -g test.f90 编译它，然后我尝试使用gdb： gdb a.out break 4 if a == 12 但我得到 A syntax erro