| 查看: 19996 | 回复: 142 | ||||||||||||||||||||
| 【奖励】 本帖被评价116次，作者gaottgougou增加金币 90.6501 个 | ||||||||||||||||||||
[资源]
【分享】将ELFCAR、CHGCAR转化成MS阅读可读的fortran代码
|
||||||||||||||||||||
|
在程序中只要修改读取格式就能转换不同的vasp生成文件（ELFCAR或CHGCAR） http://d.namipan.com/d/chgcar2gr ... 23622d46c678c080000 [ Last edited by zzy870720z on 2010-9-9 at 20:32 ] youzhizhe版主补充本地下载[ Last edited by youzhizhe on 2011-10-6 at 22:49 ] |
回复此楼» 收录本帖的淘帖专辑推荐
 纳米技术与能源及模拟 | 精华网帖收集 | 第一性原理计算资源总汇 | VASP and MS |
| 研究生资料集 | VASP | VASP | VASP使用技巧 |
| 第一性原理计算-tg | vasp | first principle | VASP算例 |
| VASP资料 | @个人收集@ | VASP计算 | 爪机党 |
| Gaussian软件 | VASP相关 |
» 本帖已获得的红花（最新10朵）
hookah» 猜你喜欢
308求调剂
已经有4人回复
-
NSFC申报书里申请人简历中代表性论著还需要在申报书最后的附件里面再上传一遍吗
已经有14人回复
-
材料与化工一志愿南昌大学327求调剂推荐
已经有6人回复
-
化学调剂0703
已经有7人回复
-
327求调剂
已经有11人回复
-
调剂
已经有8人回复
-
梁成伟老师课题组欢迎你的加入
已经有7人回复
-
伙伴们，祝我生日快乐吧
已经有24人回复
-
中科院材料273求调剂
已经有3人回复
-
材料工程专硕274一志愿211求调剂
已经有5人回复
» 本主题相关价值贴推荐，对您同样有帮助:
- GC-MS定量测定脂肪酸时标品的问题
已经有10人回复
- 纳米薄膜太阳能电池转化效率达8.1%
已经有11人回复
- Intel Visual Fortran应用程序开发
已经有259人回复
- 有关用HPLC-MS检测食物中农药残留可以投的英文杂志（影响因子低于1 一下）
已经有17人回复
- 【活动】Show 脚本，赢奖励
已经有23人回复
- 大家来帮我看看这两个INCAR 文件有什么区别哦。。为啥计算结果不一样呢
已经有4人回复
- 【原创】CHGCAR转化成MS可读文件修正
已经有18人回复
17楼2010-09-16 09:00:46
48楼2012-04-12 12:52:28
22楼2010-11-02 21:38:34
2楼2010-09-10 08:01:19
4楼2010-09-10 17:09:10
5楼2010-09-10 17:23:33
6楼2010-09-10 19:26:01
7楼2010-09-11 13:07:59
8楼2010-09-11 13:17:22
|
实际上ELFCAR和CHGCAR是有差别的。在两点上： （1）网格划分的控制参数不同。CHGCAR是NGXF*NGYF*NGZF;ELGCAR是NGX*NGY*NGZ. (2)每个数字的格式不同。 另外，你的程序中这段： IF(NSPIN==1) THEN ALLOCATE(work1(nx,ny,nz)) READ(16,vasp_form) (((work1(i,j,k),i=1,nx),j=1,ny),k=1,nz) WRITE(15,dmol_form) (((work1(i,j,k),i=1,nx),j=1,ny),k=1,nz) DEALLOCATE(work1) ELSE ALLOCATE(work1(nx,ny,nz),work2(nx,ny,nz)) READ(16,vasp_form) (((work1(i,j,k),i=1,nx),j=1,ny),k=1,nz) READ(16,*) READ(16,vasp_form) (((work2(i,j,k),i=1,nx),j=1,ny),k=1,nz) work1=work1-work2 WRITE(15,dmol_form) (((work1(i,j,k),i=1,nx),j=1,ny),k=1,nz) DEALLOCATE(work1,work2) END IF 从红色部分看，如果是考虑自旋（NSPIN=2）的话,你只给出了部分结果。 请问ELFCAR或者CHGCAR中自旋结果是不是这样给出的： 第一部分：total(spin up + spin down) 第二部分：spin up or spin down. 你用减法来处理是得到单纯上旋结果？ [ Last edited by cenwanglai on 2010-9-12 at 11:22 ] |
9楼2010-09-12 10:45:01
10楼2010-09-12 17:09:53
11楼2010-09-12 17:12:26
13楼2010-09-14 11:13:29
|
先用MS单开你的结构文件，然后通过“Edit”中的“Insert From”导入".grd"文件。在“View”的“Toolbars”中有一个“Volume Visualization”选项，将其选中。这样在MS的快捷菜单了就会出现切面的选项，切一个面然后调整切面到你想要的情况。（面的移动，旋转等操作与MS对原子的操作相同） 当让，你还可以得到立体的图像。导入“.grd”文件后，在“Display Style”里有一组“Field”（与Atom，Lattice等并列）设置，在其中选择“visiable”，这是右键点击MS的3D界面就会出现与“Display Style”并列的等高线调整选项，选中它然后调整得到你喜欢的图样 |
14楼2010-09-14 16:39:19
|
先用MS打开你的结构文件，然后通过“Edit”中的“Insert From”导入".grd"文件。在“View”的“Toolbars”中有一个“Volume Visualization”选项，将其选中。这样在MS的快捷菜单里就会出现切面的选项，切一个面然后调整切面到你想要的情况。（面的移动，旋转等操作与MS对原子的操作相同） 当然，你还可以得到立体的图像。导入“.grd”文件后，在“Display Style”里有一组“Field”（与Atom，Lattice等并列）设置，在其中选择“visiable”，这时右键点击MS的3D界面就会出现与“Display Style”并列的等高线调整选项，选中它然后调整得到你喜欢的图样 |
15楼2010-09-14 16:52:09
完整的CHGCAR转化程序
|
http://www.namipan.com/d/chgcar2 ... e442e27594b330e0000 程序既考虑了VASP的版本，也考虑了spin=1和spin=2的情况。请大家多指正批评，欢迎交流。 |
16楼2010-09-15 16:59:51
18楼2010-09-19 21:25:43
19楼2010-10-04 11:53:35
20楼2010-10-24 11:38:19
21楼2010-10-31 08:41:05
24楼2010-12-16 16:58:50
25楼2011-04-14 16:01:48
26楼2011-04-14 16:34:44
27楼2011-05-17 11:55:20
28楼2011-05-20 11:26:40
29楼2011-05-31 10:43:05
30楼2011-08-31 16:08:02
31楼2011-09-03 11:18:18
32楼2011-09-16 14:57:06
33楼2011-09-19 21:06:20
34楼2011-10-06 22:50:05
35楼2011-10-14 09:10:32
41楼2012-03-11 14:47:42
45楼2012-04-07 15:10:54
47楼2012-04-11 11:05:32
简单回复
2010-09-10 08:53
回复
顶 。
smile893212楼
2010-09-12 17:25
回复
huijiany23楼
2010-12-05 09:18
回复
liupeitao2036楼
2011-11-27 12:35
回复
五星好评 顶一下，感谢分享！
vodka37楼
2011-12-07 15:56
回复
五星好评 顶一下，感谢分享！
wangyujia38楼
2012-01-04 14:52
回复
五星好评 顶一下，感谢分享！
alick_cxj39楼
2012-03-07 12:40
回复
五星好评 顶一下，感谢分享！
dxf_dxf_dxf40楼
2012-03-10 15:06
回复
五星好评 顶一下，感谢分享！
liupeitao2042楼
2012-03-18 16:20
回复
顶一下，感谢分享！
晓兔儿43楼
2012-03-23 11:08
回复
五星好评 顶一下，感谢分享！
thelrgbird44楼
2012-04-07 11:02
回复
五星好评 顶一下，感谢分享！
jwuleopard46楼
2012-04-07 17:54
回复
三星好评 顶一下，感谢分享！
techfan49楼
2012-04-16 10:24
回复
五星好评 顶一下，感谢分享！
冷小漠50楼
2012-04-16 15:35
回复
三星好评 支持
20