我有一个C程序,它有一个名为get_name的函数。此函数返回一个字符串(即char *),并根据字符串的大小更改参数size (传递给它):
char *get_name(int &size)
{
*size = strlen(name); // name is a C global variable declared as a char *
return name;
}
我已经创建了以下Fortran模块,以便能够调用C函数get_name
MODULE X
USE, INTRINSIC :: iso_c_binding, ONLY: c_intp
最近,我读到了一个关于寻找完美平方整数的。由于我想玩这个游戏,我编写了以下小程序:
PROGRAM PERFECT_SQUARE
IMPLICIT NONE
INTEGER*8 :: N, M, NTOT
LOGICAL :: IS_SQUARE
N=Z'D0B03602181'
WRITE(*,*) IS_SQUARE(N)
NTOT=0
DO N=1,1000000000
IF (IS_SQUARE(N)) THEN
NTOT=NTOT+1
END IF
END DO
WRITE(*,*) NTOT ! should find 31622 squares
我写了这段代码:
program exponent
implicit none
real(8) :: sum
integer(8) :: i
integer :: limit
real :: start, end
sum = 0d0
limit = 10000000
call CPU_TIME(start)
do i=1, limit
sum = sum + exp(i*1.d0/limit)
end do
call CPU_TIME(end)
print *, sum
我正在使用gfortran编译一个fortran代码,它给了我一个错误
2.6/cp2k/tools/build_libsmm/run_tiny_dnn/output_linux.gnu/"//trim(filename)
1
Error: Syntax error in OPEN statement at (1)
我不知道是什么触发了这一切。顺便说一句,ifort没有问题,触发的线路是
open(unit=unit,file=\"`pw
短版
我有CUDA代码,我需要在本地运行。因此,我试图在OpenMPI之后安装。当我尝试make我的代码时,我会收到,类似于描述的内容。我尝试用文档的建议修复重新安装OpenMPI,但现在我在安装过程中得到了以下错误:
Making all in tools/ompi_info
make[2]: Entering directory '/home/hatfull/Downloads/openmpi-2.1.1/ompi/tools/ompi_info'
CC ompi_info.o
CC param.o
CCLD ompi_info
我想在Windows下编译一个Fortran 90 (固定格式)库。但是,我不能理解prepocessor变量的错误。
Say the sample file is VF_TestPreprocessor.F:
program VF_TestPreprocessor
implicit Integer(A-Z)
Parameter (TestAlpha=22,TestBeta=TestGamma)
print *, TestBeta
end program VF_TestPreprocessor
在Linux下,我可以使用ifort V
我下载并安装了以下评估软件:Intel Parallel Studio XE Professional Edition for Fortran Windows.我的系统是64位的Windows7操作系统。在它的安装过程中,我被要求下载并安装:Microsoft Visual C++ 2013 Redistributable(x64)- 12.0.21005。
我正在尝试使用命令行编译我的源文件。
为了识别命令ifort,我添加了以下目录:
C:\Program Files (x86)\IntelSWTools\compilers_and_libraries_2016.0.110\windows