24小时热门版块排行榜    

CyRhmU.jpeg
查看: 627  |  回复: 18
当前主题已经存档。
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

spring965

金虫 (正式写手)

[交流] 【求助】[求助]哪位有linux下的nbo5.0软件

哪位有linux下的nbo5.0软件可以共享

[ Last edited by yjcmwgk on 2009-11-13 at 19:14 ]
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

snoopyzhao

至尊木虫 (职业作家)

★ ★ ★ ★ ★ ★
lei0736(金币+3,VIP+0):谢谢 6-21 19:32
spring965(金币+3,VIP+0):高人,好像AIM也得到过你的帮助,O(∩_∩)O谢谢 6-21 22:00
引用回帖:
Originally posted by zhangfq7112 at 2009-6-21 16:56:
真通过了,我用inter fortran 编译不过去!请问snoopyzhao, 编译好的可执行文件能用吗?

我在 sun  的机器上编译的,估计在别的机器上可能用不了

intel 编译器给出的错误信息是啥?

因为 gennbo.f 中有两处需要增加右括号的……

分别是 8427 和 15421 行。前者要增加两个右括号,后者增加一个右括号。下面是个补丁文件:
CODE:
--- gennbo.f        Sun Jun 21 17:43:40 2009
+++ newgennbo.f        Sun Jun 21 17:42:12 2009
@@ -8424,7 +8424,7 @@
                   END IF
                 END IF
   250         CONTINUE
-              IF(MORB.EQ.0.AND.NAMEAT(IATNO(NCTR.NE.'gh') THEN
+              IF(MORB.EQ.0.AND.NAMEAT(IATNO(NCTR.NE.'gh'))) THEN
                 WRITE(LFNPR,2600) ITYP,NAMEAT(IATNO(NCTR)),NCTR,
      +                            (IVAL(I),I=1,4),M,LA
                 CALL NBHALT('Missing valence orbital in SR NAOANL.')
@@ -15418,7 +15418,7 @@
                       OCC = DM(N,N)
                 END IF
    60         CONTINUE
-              IF(MORB.EQ.0.AND.NAMEAT(IATNO(NCTR).NE.'gh') THEN
+              IF(MORB.EQ.0.AND.NAMEAT(IATNO(NCTR).NE.'gh')) THEN
                 WRITE(LFNPR,2600) ITYP,NAMEAT(IATNO(NCTR)),NCTR,
      +                            (IVAL(I),I=1,4),M,LA
                 CALL NBHALT('SR CORE could not find valence orbital.')

[ Last edited by snoopyzhao on 2009-6-21 at 17:45 ]
11楼2009-06-21 17:23:44
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 19 个回答

snoopyzhao

至尊木虫 (职业作家)

★ ★
lei0736(金币+2,VIP+0):谢谢 6-20 15:58
这个坛子里有人给出过源代码,找出来,编译一下试试……
2楼2009-06-20 09:55:00
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

spring965

金虫 (正式写手)

没找到,大侠可以再给点提示吗?
3楼2009-06-20 20:41:50
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

snoopyzhao

至尊木虫 (职业作家)

★ ★ ★ ★ ★
lei0736(金币+2,VIP+0):谢谢 6-21 08:23
spring965(金币+3,VIP+0):O(∩_∩)O嗯! 6-21 15:15
4楼2009-06-20 23:58:41
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
普通表情 高级回复(可上传附件)
信息提示
请填处理意见