| 查看: 1075 | 回复: 5 | |||
| 当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖 | |||
[交流]
【求助】高手请进
|
|||
|
调试正常,为什么运行的时候出现 segmentation fault,请大家帮忙看看,这个程序哪里有问题,我调试了很长时间,总是这个错误,请大家帮帮忙,不甚感激。 sum = 0 open(nin,file='TRAJ1',status='old',form & ='unformatted') open(nout,file='cswb.out',form='formatted') open(21,file='check') call readmdinit (mdtype,nin) loop1: do istep=1, nstep call readmd & (mdtype,nattot,nin,atomname,xxx,yyy,zzz,& cell,resname,resindex) open(npdb,file='newsystem.pdb',status='old') call readpdb (atomname,npdb,nattot,resname,resindex) close(npdb) ! loop over all waters nhb=0 loop2: do i=1, nattot if ((atomname(i).eq.' O ').and.(resname(i).eq.'WAT')) then io = i loop3: do j=1,2 ih=io+j loop4: do iat=1,nattot if((resname(iat).eq.'DC5'.or.resname(iat).eq.'DC ').and.& (atomname(iat).eq.' N1 '.or.atomname(iat).eq.' N4 '.or.& atomname(iat).eq.' N3 '.or.atomname(iat).eq.' O2 ')) then call findhbond & (io,ih,iat,xxx,yyy,zzz,nattot,cell,ihbnum) if (ihbnum==1) then acc(j)=iat else exit loop3 endif endif enddo loop4 enddo loop3 if (acc(1)*acc(2)/=0) then if (resindex(acc(1)).ne.resindex(acc(2))+1 & .or. resindex(acc(1)).ne. resindex(acc(2))-1) then nhb=nhb+1 endif endif endif enddo loop2 sum=sum+nhb enddo loop1 avgnhb=sum/nstep write (nout,*) ihbnum |
» 猜你喜欢
遇见不省心的家人很难过
已经有23人回复
天津大学招2026.09的博士生,欢迎大家推荐交流(博导是本人)
已经有6人回复
AI 太可怕了,写基金时,提出想法,直接生成的文字比自己想得深远,还有科学性
已经有6人回复
有院领导为了换新车,用横向课题经费买了俩车
已经有9人回复
酰胺脱乙酰基
已经有13人回复
博士延得我,科研能力直往上蹿
已经有8人回复
同年申请2项不同项目,第1个项目里不写第2个项目的信息,可以吗
已经有4人回复
有时候真觉得大城市人没有县城人甚至个体户幸福
已经有10人回复
» 本主题相关价值贴推荐,对您同样有帮助:
重氮化高手请进
已经有12人回复
解谱高手请进!!!
已经有5人回复
气质高手请进!!!
已经有7人回复
PCR高手请进,小女子有事相求,我刚来金币不要嫌少啊,我只有这么多啊,全给你了
已经有20人回复
c语言高手请进,请勿灌水,谢谢!(关于读写文件的问题)
已经有6人回复
水热反应高手请进
已经有17人回复
史上最难,高手请进!
已经有9人回复
【求助】有机高手请进-合成反应解释
已经有19人回复
【求助】合成高手请进
已经有9人回复
» 抢金币啦!回帖就可以得到:
985教授征女友
+1/275
中国石油大学(华东)吴传德教授团队(国家杰青)2026硕、博招生
+2/206
香港岭南大学郭瑛课题组博士招生 (2026年秋季入学)
+1/174
华南师范大学(211)- 光电科学与工程学院 - 申请审核制(2026年4-5月份面试考核)
+2/128
诚招化工、有机、高分子等领域博士后及科研助理
+2/112
供应爱德华RV 3、RV 12,阿特拉斯及莱宝真空品牌油泵及分子泵等真空产品15216851283
+1/84
江西理工大学联合中国科学院赣江创新研究院招收2026级博士研究生
+1/84
威格焊接手套箱:稳定惰性环境,实现节能降本
+1/83
哈工大医康学院材料模拟计算方向人才招聘
+1/83
湘潭大学“过程强化与绿色化工”创新团队补招2026年秋入学博士生
+2/38
中国科学院深圳先进技术研究院——招聘博士后
+2/36
上海交通大学大气环境科学课题组招收2026年入学博士生
+1/33
香港城市大学软物质课题组现招收博士研究生 2026.09 入学
+1/32
湖南大学袁达飞课题组招收第二批2026年9月入学的博士研究生一名
+1/31
西交利物浦大学招收26年【全奖】博士生1名(空间智能沉浸式手术导航)
+1/27
深圳大学柔性电子材料方向“申请-考核制”博士生招生
+2/16
德国Karlsruhe Institute of Technology招收电化学储能及联合培养CSC博士
+1/8
上海理工顾敏院士/李蔚团队招收2026级博士研究生 (集成光学、量子信息方向)
+1/3
美国密苏里大学“柔性电子”课题组诚招博士研究生
+1/3
澳科大招收2026年秋季入学生物材料方向全奖博士研究生(3月5日截止)
+1/1
4楼2010-12-14 19:46:39
2楼2010-12-14 13:44:36
3楼2010-12-14 13:47:15
5楼2010-12-15 02:36:51













回复此楼