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

24小时热门版块排行榜    

小木虫论坛-学术科研互动平台 » 计算模拟区 » 第一性原理 » Vasp&MedeA » 【分享】将ELFCAR、CHGCAR转化成MS阅读可读的fortran代码
51/1返回列表
查看: 21660  |  回复: 142
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看
【奖励】 本帖被评价116次，作者gaottgougou增加金币 90.6501 个
当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖

gaottgougou

金虫 (小有名气)

[资源] 【分享】将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 吃鸟的小虫 jjk921121

» 猜你喜欢

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

gaottgougou

金虫 (小有名气)
★
zzy870720z(金币+1):谢谢补充 2010-09-11 14:55:33
引用回帖:
Originally posted by sunyang1988 at 2010-09-10 17:23:33:
请问怎么用啊，我编译后在有CHGCAR的文件夹里运行出错啊

源程序是操作ELFCAR的，如果是操作CHGCAR需要改一下程序
将第一个变量“vasp_form = '(10(1X,E11.5))'”改为“vasp_form = '(6(1X,E17.11))'”
将 “OPEN(unit=16,file='ELFCAR')”改为 “OPEN(unit=16,file='CHGCAR')”
赞一下(1人) 回复此楼
7楼2010-09-11 13:07:59
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 143 个回答

sunyang1988

至尊木虫 (著名写手)

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

请问怎么用啊，我编译后在有CHGCAR的文件夹里运行出错啊
赞一下 回复此楼
5楼2010-09-10 17:23:33
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

cenwanglai

荣誉版主 (知名作家)

★★★ 三星级,支持鼓励

为什么不传递一个参数，用来分别处理ELFCAR和CHGCAR?

或者设置一个开关？

修改以下格式怎么修改呢？先去读读你的程序再说。呵呵
赞一下 回复此楼
6楼2010-09-10 19:26:01
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

gaottgougou

金虫 (小有名气)
★
zzy870720z(金币+1):辛苦了，呵呵 2010-09-11 14:55:51
引用回帖:
Originally posted by cenwanglai at 2010-09-10 19:26:01:
为什么不传递一个参数，用来分别处理ELFCAR和CHGCAR?

或者设置一个开关？

修改以下格式怎么修改呢？先去读读你的程序再说。呵呵

哈哈，当时没想得这么周全。这个程序的初衷并不是要做电荷密度的，它只是为了用MS作差分电荷密度和离化电荷密度而做的一个前期准备。程序很简单，有接触过fortran的都能编的。至于处理ELFCAR和CHGCAR，如果大家看一下vasp的输出就会发现两个文件的格式是一样的，包括对电荷密度表述方式也很相似，唯一的差别在于每一行记录的浮点数值的个数不同，前者为10个后者为5个，所以我们编的那个小代码只要改一下读入格式及读入文件的名字就可以分别操作ELFCAR或CHGCAR（如上贴所述）
赞一下(1人) 回复此楼
8楼2010-09-11 13:17:22
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
简单回复
fanchen0213楼
2010-09-10 08:53   回复  
 顶 。
查看全部 143 个回答
☆ 无星级 ★ 一星级 ★★★ 三星级 ★★★★★ 五星级
普通表情 龙 兔 虎 猫 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 售SCI一区T0P文章，我:8O.55.1.O.54,科目全,可伽急 +3 G6APbkg8SA6w 2026-08-29 6/300 2026-08-31 01:48 by hZiFeudZyoGR
[硕博家园] 售SCI一区T0P文章，我:8.O.55.1.O.54,科目齐全,可+急 +4 gy1nBQXYQJqL 2026-08-29 8/400 2026-08-31 00:45 by hZiFeudZyoGR
[硕博家园] 售SCI一区文章，我:8.O.55.1.O.54,科目齐全,可伽急 +7 ASdOkHsho7FD 2026-08-28 12/600 2026-08-31 00:31 by hZiFeudZyoGR
[基金申请] 能否申诉？ +4 echo8914667 2026-08-30 5/250 2026-08-30 21:11 by echo8914667
[基金申请] 为什么到现在没收到通知？ +5 tannykie 2026-08-29 5/250 2026-08-30 21:05 by purplejack
[公派出国] 售SCI一区文章，我:8O5.5.1.O5.4,科目全,可伽急 +3 4FFAWE8HcgUD 2026-08-29 5/250 2026-08-30 20:41 by hZiFeudZyoGR
[论文投稿] 售SCI一区T0P文章，我:8O.55.1.O.5.4,科目齐全,可+急 +3 jCd0dEvKHShX 2026-08-29 4/200 2026-08-30 19:57 by hZiFeudZyoGR
[考研] 售SCI一区文章，我:8O5.5.1.O5.4,科目全,可伽急 +3 jCd0dEvKHShX 2026-08-29 5/250 2026-08-30 19:37 by hZiFeudZyoGR
[找工作] 售SCI一区T0P文章，我:8.O55.1.O.54,科目全,可十急 +3 jCd0dEvKHShX 2026-08-29 4/200 2026-08-30 19:35 by hZiFeudZyoGR
[考博] 售SCI一区T0P文章，我:8.O.55.1.O.5.4,科目全,可+急 +3 jCd0dEvKHShX 2026-08-29 3/150 2026-08-30 19:26 by hZiFeudZyoGR
[硕博家园] 售SCI一区T0P文章，我:8O.55.1.O.54,科目全,可伽急 +4 G6APbkg8SA6w 2026-08-29 5/250 2026-08-30 18:40 by hZiFeudZyoGR
[考博] 售SCI-T0P文章，我:8O.5.5.1.O.54,科目齐全,可+急 +4 gy1nBQXYQJqL 2026-08-29 6/300 2026-08-30 18:20 by hZiFeudZyoGR
[基金申请] 基金系统什么内容也没有 30+4 winsaint 2026-08-27 9/450 2026-08-28 11:06 by maolC
[基金申请] 面上合作单位盖章 +5 ssyjh 2026-08-27 5/250 2026-08-27 20:50 by gdfollow
[基金申请] 申请删除本帖 +6 lyz123lyz 2026-08-27 7/350 2026-08-27 17:31 by 宁静致远sy
[基金申请] 看板上这么多中的，有点像50人群里49个人都是骗子的那种感觉…… +5 a089 2026-08-26 6/300 2026-08-27 14:05 by jonewore
[基金申请] 我不理解！ +15 Edward_pc 2026-08-26 23/1150 2026-08-26 20:34 by zzuzxg
[基金申请] 项目信息和经费信息在系统里都可以看到了 +6 wittyboy 2026-08-26 14/700 2026-08-26 10:55 by wittyboy
[基金申请] 今天务委会开完了，明天出结果吗 +19 angus9576 2026-08-25 23/1150 2026-08-26 10:03 by zp519
[基金申请] 某些机构，以效率低为荣，以效率低作为存在感 +9 yuleib84 2026-08-25 10/500 2026-08-25 17:14 by alexon
信息提示
关闭
请填处理意见
关闭