应《网络安全法》要求，自2017年10月1日起，未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用，请尽快对帐号进行手机号验证，感谢您的理解与支持！

24小时热门版块排行榜    

Znn3bq.jpeg
小木虫论坛-学术科研互动平台 » 计算模拟区 » 量子化学 » NBO/AIM » 【原创】成功编译NBO 5.G on GAMESS (January 12, 2009 R3.)
北京石油化工学院2026年研究生招生接收调剂公告
271/1返回列表
查看: 4292  |  回复: 26
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看
【奖励】 本帖被评价20次，作者tephoon78增加金币 17.3 个

tephoon78

木虫 (正式写手)

[资源] 【原创】成功编译NBO 5.G on GAMESS (January 12, 2009 R3.)

NBO 5的源码下载
http://www.mdbbs.org/viewthread.php?tid=12591&highlight=nbo
2009年1月的源码。
另外在厦门大学的量子化学论坛上找到的NBO 5是02年的，在链接时出错。

1.  首先确保自己会、且已编译Gamess，可以参考
http://hi.baidu.com/sobereva/blo ... 8dd04fd6887db6.html
很详细，但是有点乱。

2. 先在windows下解压，copy到linux下
3、vi nbo_5g.src
:26638  ! 到达文件的26639行
dG
:w NBO_5GA.SRC   !将nbo_5g.src的剩余内容写到一个新文件内
:q!  !不保存退出。
vi nbo_5g.src
:1   !将光标定位在第一行
:d 26638   ! 从文件的第1行到26638行全删掉
:w NBO_5GB.SRC   !将nbo_5g.src的剩余内容写到一个新文件内
:q!  !不保存退出。
注：这一步的工作是将nbo_5g.src这个文件分成2个文件NBO_5GA.SRC和NBO_5GB.SRC
4、$ifort –o enable enable.f       !编译enable.f，我用的是intel fortran 11.1
$ ./enable                      !运行enable下面是过程。
Currently supported environments:
(1) 32-bit Unix   UNIX/LINUX
(2) 64-bit Unix   UNIX/LINUX
(3) DOS           PC DOS
(4) VMS           VAX VMS

Environment to enable (1-4)? 1
Currently supported NBO versions:
(1) GEN      GENNBO  (standalone)
(2) G03      Gaussian 03
(3) G98      Gaussian 98
(4) G94      Gaussian 94
(5) GMS      GAMESS
(6) NWC      NWChem
(7) AM1      MOPAC or AMPAC

NBO Program version to enable (1-7)? 5

Module  gmsnbo.src  will be created; OK to proceed [Y]/N? Y

NBO source (NBO_5G.SRC ) contains 52194 lines of code.
A total of 44308 lines were written to  gmsnbo.src
   including 272 utility and  2 operating system dependent lines.
－－－－－－
结束后产生一个gmsnbo.src文件。

5、vi gmsnbo.src
8427行 IF(MORB.EQ.0.AND.NAMEAT(IATNO(NCTR.NE.'gh') THEN
修改成 IF(MORB.EQ.0.AND.NAMEAT(IATNO(NCTR.NE.'gh'))) THEN

15421行  IF(MORB.EQ.0.AND.NAMEAT(IATNO(NCTR).NE.'gh') THEN
修改成   IF(MORB.EQ.0.AND.NAMEAT(IATNO(NCTR).NE.'gh')) THEN

6、cp gmsnbo.src ~gamess/source/
   cd ~gamess/source/
7、vi prppop.src
将1111行修改成
IF(NPROC.EQ.1) CALL RUNNBO
8、vi rhfuhf.src
1676行 插入一行：
           COMMON /ENEDA / E0
4723行在ETOT = EHF+EN行插入1行
           IF(ITER.EQ.1) E0 = ETOT

9、vi  iolib.src:  
269行      IF(LEN.LE.0           ) GO TO 810
修改成      IF(LEN.LT.0           ) GO TO 810

281行         CALL DARD(V(IS),LENW,IDAF,NSP,IDTYP)
修改成        IF(LENW .GT. 0) CALL DARD(V(IS),LENW,IDAF,NSP,IDTYP)

549行        IF (N .GT. 0 .AND. LEN .NE. IFILEN(NREC)) GO TO 800
修改成        IF (N .GT. 0 .AND. LEN .GT. IFILEN(NREC)) GO TO 800

10、cd ..
vi compall
在 265行，插入一行
           ./comp gmsnbo

11. vi lked
在 801行最后 加入 gmsnbo.o

12、./compall >& compall.log&        !重新编译gamess
13、./lked gamess 01 >& lnked.log&   ！重新链接程序  01可以是其它数值
14、vi rungms
修改set VERNO=01 或你自己设置的数值。
完成。注意nbo 不能并行。

http://hi.baidu.com/quchem/blog/ ... 8c40d6a3cc2b00.html

[ Last edited by tephoon78 on 2010-1-21 at 14:40 ]
回复此楼

» 收录本帖的淘帖专辑推荐

物化资料综合 量化

» 猜你喜欢

» 本主题相关价值贴推荐，对您同样有帮助:
1楼 2010-01-20 16:47:54
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

abbott

金虫 (著名写手)

★★★★★ 五星级,优秀推荐

推荐！ 不错 记录了！
回复此楼
2楼2010-01-20 18:49:22
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

fooo

金虫 (正式写手)
上不去mdbbs，LZ给个源代码吧！
引用回帖:
Originally posted by tephoon78 at 2010-1-20 16:47:
NBO 5的源码下载
http://www.mdbbs.org/viewthread.php?tid=12591&highlight=nbo
2009年1月的源码。
另外在厦门大学的量子化学论坛上找到的NBO 5是02年的，在链接时出错。

1.  首先确保自己 ...

赞一下 回复此楼
4楼2010-01-21 03:28:34
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

hakuna

木虫 (知名作家)

★★★★★ 五星级,优秀推荐

很好很好很很好
回复此楼
5楼2010-01-21 16:43:18
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zhangfq7112

银虫 (正式写手)

★★★★★ 五星级,优秀推荐

楼主高手，能否把编译好的程序给我一份？ zhangfq7112@126.com
赞一下 回复此楼
6楼2010-01-21 20:47:00
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

fooo

金虫 (正式写手)
谢谢了！
想奖励金币，该怎么操作？
引用回帖:
Originally posted by tephoon78 at 2010-1-20 16:47:
NBO 5的源码下载
http://www.mdbbs.org/viewthread.php?tid=12591&highlight=nbo
2009年1月的源码。
另外在厦门大学的量子化学论坛上找到的NBO 5是02年的，在链接时出错。

1.  首先确保自己 ...

赞一下 回复此楼
7楼2010-01-22 01:43:30
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

tephoon78

木虫 (正式写手)
源码在文章的最后,可以直接下载。
赞一下 回复此楼
9楼2010-01-24 09:59:48
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wuy069

铁杆木虫 (正式写手)

★★★★★ 五星级,优秀推荐

★★★★★ 五星级
赞一下 回复此楼
10楼2010-03-18 19:59:19
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wang0912302

铁虫 (正式写手)

NB！学习了，，，

NB！学习了，，，！
回复此楼
11楼2010-04-28 16:57:46
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

saintwen

铜虫 (小有名气)

★★★★★ 五星级,优秀推荐

高手，向你学习！
回复此楼
13楼2010-05-31 09:10:48
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

jyki

新虫 (正式写手)

★★★ 三星级,支持鼓励

感谢分享。  大家常去
http://www.mdbbs.org/?fromuid=12949
http://www.mdbbs.org/?fromuser=jyki
看看，这个模拟论坛有不错的东西
赞一下 回复此楼
14楼2010-09-01 14:09:11
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

寒雨人生

铁杆木虫 (知名作家)

★★★★★ 五星级,优秀推荐

楼主有没有试过2011 august 版的Gamess 上编译gmsnbo
貌似有点问题
一直提示getdm_函数重复定义
不知道怎么解决……
赞一下 回复此楼
16楼2011-12-21 21:49:14
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

tephoon78

木虫 (正式写手)
对不起，我没有用过。不知道getdm_函数是什么，请看看gamess自带的安装说明吧！
赞一下 回复此楼
17楼2011-12-22 09:00:36
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

itismineok

捐助贵宾 (正式写手)

★★★★★ 五星级,优秀推荐

★★★★★ 五星级
赞一下 回复此楼
18楼2012-01-12 15:33:08
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
简单回复
snoopyzhao3楼
2010-01-20 20:17   回复  
 
lerel123458楼
2010-01-22 12:11   回复  
 
qzhaosdu12楼
2010-05-05 19:19   回复  
 
drago139415楼
2011-07-04 00:33   回复  
五星好评  顶一下，感谢分享！
skallow19楼
2013-09-07 14:39   回复  
五星好评  顶一下，感谢分享！
qianbh20楼
2014-06-25 20:13   回复  
五星好评  顶一下，感谢分享！
qianbh21楼
2014-07-28 08:47   回复  
顶一下，感谢分享！
zhouqh410222楼
2014-08-13 20:00   回复  
五星好评  顶一下，感谢分享！
hxy36623楼
2015-10-01 23:20   回复  
五星好评  顶一下，感谢分享！
xiao_qft24楼
2015-10-29 13:51   回复  
五星好评  顶一下，感谢分享！
threemi25楼
2016-04-22 22:21   回复  
五星好评  顶一下，感谢分享！
BaO氧化钡26楼
2017-12-09 10:35   回复  
五星好评  顶一下，感谢分享！
715207527楼
2018-10-25 20:18   回复  
五星好评  顶一下，感谢分享！
相关版块跳转 我要订阅楼主 tephoon78 的主题更新
271/1返回列表
☆ 无星级 ★ 一星级 ★★★ 三星级 ★★★★★ 五星级
普通表情 龙 兔 虎 猫 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 一志愿211，化学学硕，310分，本科重点双非，求调剂 +15 努力奋斗112 2026-04-07 15/750 2026-04-07 21:22 by 83503孙老师
[考研] 274求调剂求调剂 +6 Jachenbingoo 2026-04-06 9/450 2026-04-07 18:43 by 蓝云思雨
[考研] 本科郑州大学，一志愿华东师范大学282求调剂 +19 熊哥xtk 2026-04-07 22/1100 2026-04-07 18:09 by 蓝云思雨
[考研] 22408 调剂材料 +7 我叫ez 2026-04-06 8/400 2026-04-07 17:12 by 蓝云思雨
[考研] 307分材料专业求调剂 +9 Hll胡 2026-04-05 9/450 2026-04-07 16:41 by daiee
[考研] 363求调剂 +8 zh096 2026-04-04 8/400 2026-04-07 14:53 by 1104338198
[论文投稿] Decision: Revise for Editor还会送审吗 100+3 CccccccccFD 2026-04-04 5/250 2026-04-07 10:58 by 北京莱茵润色
[考研] 材料334求调剂 +19 Eecho# 2026-04-03 19/950 2026-04-06 08:37 by 小小树2024
[考研] 本科211，293分请求调剂 +8 莲菜就是藕吧 2026-04-03 9/450 2026-04-05 19:12 by 蓝云思雨
[考研] 一志愿北京交通大学材料工程总分358求调剂 +4 cs0106 2026-04-04 4/200 2026-04-05 18:46 by imissbao
[考研] 调剂求助 +10 想换手机不想解� 2026-04-02 13/650 2026-04-05 09:41 by sam3303
[考研] 调剂 +9 19945159693 2026-04-03 10/500 2026-04-04 20:16 by dongzh2009
[考研] 272求调剂 +4 松柏常青5 2026-04-03 4/200 2026-04-04 17:03 by babysonlkd
[考研] 319求调剂 +4 星星不眨眼喽 2026-04-03 4/200 2026-04-04 16:25 by 中飞院空管学院�
[考研] 0710生物学336分求调剂 +6 kiyy 2026-04-01 8/400 2026-04-04 10:10 by kiyy
[考研] 320调剂 +4 农业工程与信息� 2026-04-03 4/200 2026-04-03 21:40 by lbsjt
[考研] 一志愿深大085601材料工程专业（专硕）300分可以调剂去哪 +8 10160315 2026-04-02 8/400 2026-04-03 09:36 by hypershenger
[考研] 312 化工或制药调剂 +8 小小墨123 2026-04-02 9/450 2026-04-03 09:12 by zhouxiaoyu
[考研] 260求调剂 +6 朱芷琳 2026-04-02 6/300 2026-04-02 20:27 by 6781022
[考研] 求调剂推荐 +3 南山南@ 2026-04-01 3/150 2026-04-02 12:09 by xiaoranmu
信息提示
关闭
请填处理意见
关闭