fortran语言中出现的错误

学习使用MKL,出现error lnk209, 大神救命啊_fortran吧_百度贴吧
&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&签到排名:今日本吧第个签到,本吧因你更精彩,明天继续来努力!
本吧签到人数:0成为超级会员,使用一键签到本月漏签0次!成为超级会员,赠送8张补签卡连续签到:天&&累计签到:天超级会员单次开通12个月以上,赠送连续签到卡3张
关注:2,050贴子:
学习使用MKL,出现error lnk209, 大神救命啊收藏
我用的是VS2013+Intel Composer XE 2013 SP1,想用MKL自带的blas,lapack。
设置了Project& Properties& Libraries& Use Intel Math Kernel Libraryand, 我选了 Parallel。
运行了一个dgemm_example.f (来自Intel® Math Kernel Library Tutorial)成功了
但我运行安装路径里的另一个example(C:\Program Files (x86)\Intel\Composer XE 2013 SP1\mkl\examples\examples_f95.zip\blas95\source)时,提示如下错误Error1 error LNK2019: unresolved external symbol _PRINTVECTORD referenced in function _MAIN__Source1.objError2 error LNK2019: unresolved external symbol _DASUM_MKL95 referenced in function _MAIN__Source1.obj具体程序如下:program DASUM_MAIN
use mkl95_precision, only: wp =& dp
use mkl95_blas, only: asum
implicit none
integer :: n
integer :: incx
integer :: nx, nx1, nx2
real(wp), allocatable :: x(:)
real(wp) :: sum
integer :: i!
Intrinsic Functions
intrinsic abs!
External Subroutines
external PrintVectorD!
Executable Statements
EXAMPLE PROGRAM'!
Read input data from input file
read*, n, incx
nx = 1+(n-1)*abs(incx)
allocate(x(n))
read*, (x(i),i=1,nx)!
Print input data
INPUT DATA'
print 100, n
call PrintVectorD(0,n,x,incx,'X ')!
Call DASUM subroutine
if (incx & 0) then
sum = ASUM(x(nx1:nx2:incx))
OUTPUT DATA'
print 101, sum
deallocate(x) 100
format(7x,'N=',i2) 101
format(10x,'DASUM = ',f8.3)
end刚接触fortran,求大神解答
登录百度帐号我的游戏推荐游戏
后查看最近玩过的游戏
为兴趣而生,贴吧更懂你。或精品:怎么运行fortran 运行fortran fortran fortran语言 visual fortran intel f..
扫扫二维码,随身浏览文档
手机或平板扫扫即可继续访问
Fortran运行中给出的系统错误及解决方法
举报该文档为侵权文档。
举报该文档含有违规或不良信息。
反馈该文档无法正常浏览。
举报该文档为重复文档。
推荐理由:
将文档分享至:
分享完整地址
文档地址:
粘贴到BBS或博客
flash地址:
支持嵌入FLASH地址的网站使用
html代码:
&embed src='/DocinViewer-4.swf' width='100%' height='600' type=application/x-shockwave-flash ALLOWFULLSCREEN='true' ALLOWSCRIPTACCESS='always'&&/embed&
450px*300px480px*400px650px*490px
支持嵌入HTML代码的网站使用
您的内容已经提交成功
您所提交的内容需要审核后才能发布,请您等待!
3秒自动关闭窗口我关注的版块:
查看: 3034|回复: 7
技术员, 积分 25, 距离下一级还需 25 积分
我在编译程序时,出现以下错误,请高手告知出错的原因,谢谢!
--------------------Configuration: HSCTM - Win32 Release--------------------
Compiling Fortran...
C:\HSCTM2D\HSCTCODE\HSCTM.FOR
C:\HSCTM2D\HSCTCODE\HSCTM.FOR(1): error FOR2173: column 6 non-blank on initial line in fixed-form source code
C:\HSCTM2D\HSCTCODE\HSCTM.FOR(1): error FOR2934: lexical error: Unrecognized statement
C:\HSCTM2D\HSCTCODE\HSCTM.FOR(1): error FOR3852: syntax error
C:\HSCTM2D\HSCTCODE\HSCTM.FOR(1): error FOR1768: missing END statement or missing program unit (possibly free-form source in fixed-form file)
Error executing fl32.exe.
HSCTM.OBJ - 4 error(s), 0 warning(s)
技术员, 积分 25, 距离下一级还需 25 积分
点击错误提示,无法定位到错误行,这是为什么?
怎么实现“自由格式”、
谢谢,请赐教!!!
技术员, 积分 25, 距离下一级还需 25 积分
怎么没有人阿?各位高手。。。
一星助理工程师, 积分 66, 距离下一级还需 34 积分
不知道用的什么编译系统,但从错误提示来看,由于文件扩展名使用的是.for,所以系统认为是fortran固定格式的程序,即每个语句从第7列以后开始写,而如果某一行的第六列有字符,则认为是上一行的续行。而如果第一列为C,则认为该行为说明语句。
一星助理工程师, 积分 50, 距离下一级还需 50 积分
未用过ForTran, 以下试解释:
Compiling Fortran...
C:\HSCTM2D\HSCTCODE\HSCTM.FOR
C:\HSCTM2D\HSCTCODE\HSCTM.FOR(1): error FOR2173: column 6 non-blank on initial line in fixed-form source code
’’源码初始化行的第 6 列(字符)有问题
C:\HSCTM2D\HSCTCODE\HSCTM.FOR(1): error FOR2934: lexical error: Unrecognized statement
’’无效的声明语句
C:\HSCTM2D\HSCTCODE\HSCTM.FOR(1): error FOR3852: syntax error
’’语法错误
C:\HSCTM2D\HSCTCODE\HSCTM.FOR(1): error FOR1768: missing END statement or missing program unit (possibly free-form source in fixed-form file)
’’缺少 END 语句块标识符号
Error executing fl32.exe.
’’可执行文件 Fl32.exe 错误
HSCTM.OBJ - 4 error(s), 0 warning(s)
’’OBJ 文件有 4 处错,无警告。
若遇到编译问题,查查词典,有限的错误词,摸索、揣摩,可以解决。
我基本不懂英文,在DOS下编译程序都是如此处理的。
祝你好运!!!
一星助理工程师, 积分 50, 距离下一级还需 50 积分
其中:FOR2173 可能是指文件的第 2173 行
技术员, 积分 25, 距离下一级还需 25 积分
技术员, 积分 39, 距离下一级还需 11 积分
我从网上下了一个FORTRAN 77 的程序,编译时系统总提示“找不到FORTRAN 77&.
有人能告诉我这是什么原因?
相关专题:
8-1(商易宝)
8-2(英才网)
8-3(媒体广告)visual studio 2005 编fortran程序,运行后dos窗口显示问题
- 第一专业IT门户网站
visual studio 2005 编fortran程序,运行后dos窗口显示问题
我是一初学者,在visual studio 2005 编fortran程序时,运行后dos窗口遇到问题,想请教一下 比如程序: program main implicit none write(*,*) "AAAAAAAAAAAAAAAAAAAAAAAA" stop end 虽然可以看见DOS窗口显示AAAAAAAAAAAAAAAAAAAAAAAA,不过是一闪而过,请问怎样解决呢?
stop的上一行加pause。 比如程序: program main implicit none write(*,*) &AAAAAAAAAAAAAAAAAAAAAAAA& pause stop end
相关知识等待您来回答
该问题来自:太平洋电脑网是首家以专业电脑市场联盟为基础的IT资讯网站,为IT企业与终端用户提供全面、权威、专业的IT资讯服务。电脑常识领域专家fortran读入TXT数据。显示读入错误END OF FILE DURING READ,UNIT 10.........._百度知道
fortran读入TXT数据。显示读入错误END OF FILE DURING READ,UNIT 10..........
0.50 1 -0.157.08 0 0.5012.33 0 -0.3719.75 0 0.771.50 2 -0.458.42 0 0.4312.50 0 -0.2420.17 0 0.992.58 3 -0.619.25 0 0.2312.83 0 -0.2619.67 0 0.943.75 4 -0.8510.00 0 0.0413.67 0 -0.2320.58 0 0.995.00 5 -0.99...................共120行---------打算先把全部用数组a(120,3)存取,在设置b(120),c(120),d(120)来分别存储三列的数据。莫喷,新手。program homeworkimplicit noneinteger::i,jreal::a(120,3),b(120),c(120),d(120)open(10,file='12.txt',status='old')rewind(10)do i=1,3;do j=1,120;read(10,*) a(j,i);end dodo i=1,120;b(i)=a(i,1);end dodo i=1,120;c(i)=a(i,2);end dodo i=1,120;d(i)=a(i,3);end doclose(10)write(*,*) c(3)end program
我有更好的答案
按默认排序
do i=1,3;do j=1,120;read(10,*) a(j,i);end do这一行错了,改为do j=1,120;do i=1,3;read(10,*) a(j,i);end do
很有可能是数组长度跟数据个数不符
提示说你准备的 数据比程序中要的少了几个
其他类似问题
fortran的相关知识
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁

我要回帖

更多关于 fortran中不等于 的文章

 

随机推荐