24小时热门版块排行榜    

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

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

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的回帖

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的回帖
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] 大佬帮着分析今年的评审意见?该课题连续申请了三年了,明年要不要换个方向。 100+3 cai-11138 2026-08-31 11/550 2026-09-06 20:49 by archvillain
[博后之家] 售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急 +3 j5mmowWXNWxv 2026-09-05 6/300 2026-09-06 18:41 by eObJPa4gWmp6
[硕博家园] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +4 jPDp0sc2B7zQ 2026-09-05 6/300 2026-09-06 18:21 by eObJPa4gWmp6
[公派出国] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +3 jPDp0sc2B7zQ 2026-09-05 4/200 2026-09-06 18:09 by eObJPa4gWmp6
[博后之家] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +3 jPDp0sc2B7zQ 2026-09-05 6/300 2026-09-06 18:09 by eObJPa4gWmp6
[找工作] 售一区SCI文章T0P,我:8O.551.O54,科目全,可十急 +3 jPDp0sc2B7zQ 2026-09-05 8/400 2026-09-06 17:49 by eObJPa4gWmp6
[公派出国] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 +3 jPDp0sc2B7zQ 2026-09-05 6/300 2026-09-06 17:21 by eObJPa4gWmp6
[教师之家] 售一区SCI文章T0P,我:8O.551.O54,科目全,可十急 +3 jPDp0sc2B7zQ 2026-09-05 9/450 2026-09-06 17:09 by eObJPa4gWmp6
[教师之家] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +3 j5mmowWXNWxv 2026-09-05 3/150 2026-09-06 13:09 by eObJPa4gWmp6
[考博] 售SCI一区文章,我:8O5.5.1.O5.4,科目全,可伽急 +3 j5mmowWXNWxv 2026-09-05 4/200 2026-09-06 12:49 by eObJPa4gWmp6
[硕博家园] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +3 jPDp0sc2B7zQ 2026-09-05 7/350 2026-09-06 11:20 by eObJPa4gWmp6
[基金申请] 科研人应该花精力去思考如何解决问题,而不是去凝练问题 +10 瞬息宇宙 2026-09-01 19/950 2026-09-06 11:15 by jiangxuan2004
[论文投稿] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +3 jPDp0sc2B7zQ 2026-09-04 8/400 2026-09-06 11:00 by eObJPa4gWmp6
[论文投稿] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +6 7ZYIEW2YWn72 2026-09-04 9/450 2026-09-06 06:00 by E1iiBLMU2XnD
[教师之家] 售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急 +8 CRJ0Aq2FtVH0 2026-09-03 15/750 2026-09-06 05:48 by E1iiBLMU2XnD
[基金申请] 面上没中,邀请各位路过的虫友分析一下分数 +12 jackleilei 2026-09-03 13/650 2026-09-05 18:10 by fireguard
[基金申请] 学科评审组评审是指会评吗? +6 瞬息宇宙 2026-08-31 9/450 2026-09-05 13:11 by haizai99
[硕博家园] Ei源刊怎么投 +4 Fengshun9711 2026-09-04 4/200 2026-09-04 19:30 by 研途知予
[硕博家园] 哈尔滨工业大学韩晓军教授课题组招收2027年硕士推免生及博士研究生 +3 灯灯灯灯DDDD 2026-09-03 3/150 2026-09-03 21:22 by 科研皮皮猪
[基金申请] 要骂人了,新模版改版就是要淡化问题凝练这种虚的东西,结果有个评委还在说凝练得不够 +9 瞬息宇宙 2026-08-31 17/850 2026-09-02 14:04 by anjeeshine
信息提示
请填处理意见