24小时热门版块排行榜    

查看: 798  |  回复: 5

suetung8

木虫 (知名作家)

老光棍一个

[交流] 【求助】高手帮我看看这是怎么回事? 已有2人参与

对照书上弄了一个,第一次弄,不知道这是什么错误,麻烦老大给指点下,多谢了

      subroutine forcem(press,th1,th2,nn,n)
      implicit real*8 (a-h,o-z)                                               dp
      dimension n(7)
      real LEN, MAX
c* * * * * *
c PURPOSE
c  definied non_uniformed distributed force on an element
c
c
c
c INPUT
c  press    distributed load magnitude given in input
c  th1      integration point coordinates
c  nn      integration point number
c  n       element number,etc
c
c* * * * * *
        MAX=450000.0
        LEN=25.0
        press=th1(2)*MAX/LEN

      return
      end


错误如下
Linking...
dfor.lib(DFORMAIN.OBJ) : error LNK2001: unresolved external symbol _MAIN__
Debug/fff.exe : fatal error LNK1120: 1 unresolved externals
Error executing link.exe.

fff.exe - 2 error(s), 0 warning(s)


可以编译过
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

湿出个未来!冲动是魔鬼,但是没有冲动连人都不是!饭要一口口吃,爱要一次次做!
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

yalefield

金虫 (文坛精英)

老汉一枚

★ ★
小木虫(金币+0.5):给个红包,谢谢回帖交流
余泽成(金币+1):谢谢参与应助! 2010-06-27 15:09:23
您只是编译了一个函数,您的主函数呢?
2楼2010-06-27 07:49:51
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

suetung8

木虫 (知名作家)

老光棍一个

引用回帖:
Originally posted by yalefield at 2010-06-27 07:49:51:
您只是编译了一个函数,您的主函数呢?

yale兄好,这个是一个有限元软件的子程序,和这个类似的函数有的可以成功的,不知道这个为什么这个不能成功~~~必须要主函数吗?
湿出个未来!冲动是魔鬼,但是没有冲动连人都不是!饭要一口口吃,爱要一次次做!
3楼2010-06-27 14:23:18
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

yalefield

金虫 (文坛精英)

老汉一枚

★ ★ ★
小木虫(金币+0.5):给个红包,谢谢回帖交流
余泽成(金币+2):谢谢参与应助! 2010-06-27 21:34:45
不管您的程序打算干什么,每个.for文件都可以编译为目标文件;
然后,多个目标文件在“连接”起来,形成可执行文件。

问题是,这些目标文件中,必须有、而且只能有一个main,做为程序的起始点。
4楼2010-06-27 15:18:53
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

suetung8

木虫 (知名作家)

老光棍一个

引用回帖:
Originally posted by yalefield at 2010-06-27 15:18:53:
不管您的程序打算干什么,每个.for文件都可以编译为目标文件;
然后,多个目标文件在“连接”起来,形成可执行文件。

问题是,这些目标文件中,必须有、而且只能有一个main,做为程序的起始点。

明白些了~~多谢yale兄的解答,我再试试修改下看
若有不明白的再向yale请教
湿出个未来!冲动是魔鬼,但是没有冲动连人都不是!饭要一口口吃,爱要一次次做!
5楼2010-06-27 16:16:06
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

yalefield

金虫 (文坛精英)

老汉一枚

★
小木虫(金币+0.5):给个红包,谢谢回帖交流
引用回帖:
Originally posted by suetung8 at 2010-06-27 16:16:06:
yale兄

呵呵,俺村的大姑娘、小媳妇都叫俺“老汉”。
6楼2010-06-27 18:59:48
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 suetung8 的主题更新
普通表情 龙 兔 虎 猫 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[公派出国] 售一区SCI文章T0P,我:8O.551.O54,科目全,可十急 +5 qR2AdCWTVtkw 2026-10-09 9/450 2026-10-11 22:34 by XQNyDCa1Tk5n
[找工作] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +5 qR2AdCWTVtkw 2026-10-09 8/400 2026-10-11 22:26 by XQNyDCa1Tk5n
[公派出国] 售SCI一区文章,我:8O5.5.1.O5.4,科目全,可伽急 +5 qR2AdCWTVtkw 2026-10-09 10/500 2026-10-11 22:26 by XQNyDCa1Tk5n
[考博] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +5 qR2AdCWTVtkw 2026-10-09 9/450 2026-10-11 22:15 by XQNyDCa1Tk5n
[考博] 售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急 +3 qR2AdCWTVtkw 2026-10-09 7/350 2026-10-11 22:11 by XQNyDCa1Tk5n
[基金申请] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +5 qR2AdCWTVtkw 2026-10-09 9/450 2026-10-11 22:06 by XQNyDCa1Tk5n
[教师之家] 售SCI文章,我:8O5.5.1.O.54,科目齐全,可+急 (EPI+-1)(金币-50) +5 qR2AdCWTVtkw 2026-10-09 10/500 2026-10-11 22:06 by XQNyDCa1Tk5n
[有机交流] OpenAI又攻克数学难题了,离AI做有机合成还有多远? +3 wangyl_123 2026-10-10 6/300 2026-10-11 15:04 by Abin0406
[教师之家] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 (EPI+-1)(金币-50) +5 qR2AdCWTVtkw 2026-10-09 10/500 2026-10-11 14:25 by VOMexwnDzOFZ
[教师之家] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 (EPI+-1)(金币-50) +4 qR2AdCWTVtkw 2026-10-09 7/350 2026-10-11 14:05 by VOMexwnDzOFZ
[考研] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +5 qR2AdCWTVtkw 2026-10-09 8/400 2026-10-11 13:51 by VOMexwnDzOFZ
[硕博家园] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +5 qR2AdCWTVtkw 2026-10-09 8/400 2026-10-11 13:45 by VOMexwnDzOFZ
[找工作] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +3 qR2AdCWTVtkw 2026-10-09 7/350 2026-10-11 10:54 by VOMexwnDzOFZ
[找工作] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +4 qR2AdCWTVtkw 2026-10-09 7/350 2026-10-11 10:34 by VOMexwnDzOFZ
[考博] 招收博士生一名 +3 mandolin 2026-10-10 3/150 2026-10-11 10:21 by 不是山谷!
[教师之家] 课题组会帮你通过考核么? +3 好运来~9527 2026-10-10 5/250 2026-10-11 09:00 by 好运来~9527
[公派出国] 售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急 +4 qR2AdCWTVtkw 2026-10-09 4/200 2026-10-11 03:14 by M0zrYVSAnxpE
[有机交流] 各位大佬,路线设计求助 +6 zapen 2026-10-08 8/400 2026-10-10 15:59 by zapen
[基金申请] 入职后第一次管课题组的专利缴费,对账才发现官费比别人多掏了一倍 +5 13108017953 2026-10-08 5/250 2026-10-10 11:15 by wdwd123
[有机交流] 我应该选哪条合成路线让实验成功率高一些? +5 jing816y 2026-10-08 9/450 2026-10-10 09:05 by zapen
信息提示
请填处理意见