爱气象,爱气象家园! 

气象家园

 找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 3535|回复: 3

[求助] IVF调用IMSL函数库 WRRRN WRRRL 等输出函数只能编译不能运行!

[复制链接]
发表于 2013-10-31 21:00:37 | 显示全部楼层 |阅读模式

登录后查看更多精彩内容~

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
编译环境:win7-64位+vs2008+ivf 11.0+imsl6.0

新装了IMSL 函数库 可是应用函数库中的输出矩阵子程序时总是运行不出结果(其他函数基本都能运行)。

还请各位高手帮忙看下!

program fnl

! Include the necessary header file:

! For the dynamic library:

INCLUDE 'link_fnl_shared.h'

! For the static library:

!INCLUDE 'link_fnl_static.h'

!!DEC$ OBJCOMMENT lib:"libguide.lib"

! Declare which IMSL functions will be used

USE LSARG_INT

USE WRRRN_INT

! Declare variables

PARAMETER (LDA=3, N=3)

REAL A(LDA,LDA), B(N), X(N)

! Set values for A and B

! A = (33.0 16.0 72.0)

! (-24.0 -10.0 -57.0)

! (18.0 -11.0 7.0)

! B = (129.0 -96.0 8.5)

DATA A/33.0, -24.0, 18.0, 16.0, -10.0, -11.0, 72.0, -57.0, 7.0/

DATA B/129.0, -96.0, 8.5/

! The main IMSL function call to solve for x in Ax=B.

! This is the floating point version, to use double-precision, call DLSARG.

CALL LSARG(A,B,X)

! Now print the solution x using WRRRN, a printing utility

CALL WRRRN('X',X,1,N,1)

END PROGRAM fnl

在编译生成时没有提示错误,提示 生成成功!

但是当调试(ctrl+f5)时便不出结果如下所示:

2.jpg

输出屏变灰色。
改用WRITE 输出X 能够输出结果。不知道为什么WRRRN等输出函数不能使用。请各位大神帮忙啊!


密码修改失败请联系微信:mofangbao
 楼主| 发表于 2013-11-1 07:53:53 | 显示全部楼层
自己先顶一下啊,希望高手帮帮忙啊!
密码修改失败请联系微信:mofangbao
 楼主| 发表于 2013-11-1 09:56:49 | 显示全部楼层
有没有懂的人帮忙看下啊
密码修改失败请联系微信:mofangbao
 楼主| 发表于 2013-11-5 07:58:37 | 显示全部楼层
多谢大家关注。
经过多次尝试,自己已经解决这个问题。
可能是自己还对VS + IVF 的使用不到家。
在打开VS 2008 创建项目时,我之前一直选择的是QuickWin Application。后来新建时选择Console Application 然后source Files 添加新建项目。运行代码后就可以出结果了。
这个QuickWin Application 和 Console Application 有什么区别? 有人可以回答下吗?
密码修改失败请联系微信:mofangbao
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

Copyright ©2011-2014 bbs.06climate.com All Rights Reserved.  Powered by Discuz! (京ICP-10201084)

本站信息均由会员发表,不代表气象家园立场,禁止在本站发表与国家法律相抵触言论

快速回复 返回顶部 返回列表