王勖成《有限单元法》源程序，在编译时出现错误

qushen001 · 发表于 2010-12-5 21:14:37

本帖最后由 messenger 于 2011-5-13 14:48 编辑

王勖成《有限单元法》附录源程序在编译时出现错误，期望高手指点。
发帖时出现些问题，请版主将前两个帖子删去吧！

qushen001 · 发表于 2010-12-5 21:27:31

首先出现
Error: This intrinsic procedure or system subprogram must not have an expression or constant as an argument. [RAN]
aa(i,j)=ran(i+j)
所以令kkkk=i+j
aa(i,j)=ran(kkkk)
这个错误得到处理。
可是出现新的问题：
Linking...
featp.obj : error LNK2001: unresolved external symbol _NUWMARK@36
featp.obj : error LNK2001: unresolved external symbol _GK@8
featp.obj : error LNK2001: unresolved external symbol _A@8
Debug/featp.exe : fatal error LNK1120: 3 unresolved externals
Error executing link.exe.
不知道怎么办

pasuka · 发表于 2010-12-6 09:15:22

说实在的，那段程序已经过时了。
真想玩类似的Fortran代码练练手的话，去下一个FEAP个人版，自己捣鼓吧
想找更简单、更易懂的代码，去翻翻老外写的maltab有限元书籍，里面的代码都是非常容易看懂的
王勖成的书写得挺好的，但是附录里面的代码现在来看作为教学代码也落伍了

xiazhifan · 发表于 2010-12-17 08:47:19

可能是你的程序中没有NUWMARK的子例子程序,你查一下你的subroutinue

qushen001 · 发表于 2010-12-17 18:24:40

多谢xiazhifan
NUWMARK错了应该是newmark 动力学计算的直接方法改了这个还是不行

账号		自动登录	找回密码
密码			注册

账号		自动登录	找回密码
密码			立即注册

[H. 有限元编程] 王勖成《有限单元法》源程序，在编译时出现错误

本帖子中包含更多资源

相关帖子

评分