 |
 |
 |
 |
 |
 |
||
 |
 |
 |
 |
 |
| 5 | 1/1 | 返回列表 |
| 查看: 1179 | 回復(fù): 7 | |||||
| 當(dāng)前只顯示滿足指定條件的回帖，點擊這里查看本話題的所有回帖 | |||||
[求助]
求一個能砍PROCAR的程序，或者編一個程序砍PROCAR
|
|||||
|
如題，我計算出的PROCAR是帶有f軌道的，但是我不希望f軌道存在，想砍掉所有的f軌道，附件中是希望被砍掉的軌道，格式為： ion s py pz px dxy dyz dz2 dxz dx2 f-3 f-2 f-1 f0 f1 f2 f3 tot 希望砍為： ion s py pz px dxy dyz dz2 dxz dx2 tot 在此特奉上100金幣，求大俠出手相助 |
回復(fù)此樓» 本帖附件資源列表
-
歡迎監(jiān)督和反饋：小木蟲僅提供交流平臺，不對該內(nèi)容負責(zé)。
本內(nèi)容由用戶自主發(fā)布，如果其內(nèi)容涉及到知識產(chǎn)權(quán)問題，其責(zé)任在于用戶本人，如對版權(quán)有異議，請聯(lián)系郵箱：xiaomuchong@tal.com - 附件 1 : Abnormal-PROCAR.7z
2015-04-08 21:35:48, 3.91 M
» 猜你喜歡
0856，材料與化工321分求調(diào)劑
已經(jīng)有6人回復(fù)
-
0703化學(xué)求調(diào)劑，各位老師看看我！�。�
已經(jīng)有5人回復(fù)
-
266分，求材料冶金能源化工等調(diào)劑
已經(jīng)有7人回復(fù)
-
張芳銘-中國農(nóng)業(yè)大學(xué)-環(huán)境工程專碩-298
已經(jīng)有3人回復(fù)
-
070300化學(xué)求調(diào)劑
已經(jīng)有4人回復(fù)
-
086000調(diào)劑
已經(jīng)有3人回復(fù)
-
320分，材料與化工專業(yè)，求調(diào)劑
已經(jīng)有4人回復(fù)
-
265求調(diào)劑
已經(jīng)有7人回復(fù)
-
295材料工程專碩求調(diào)劑
已經(jīng)有4人回復(fù)
-
高溫高壓反應(yīng)求助
已經(jīng)有4人回復(fù)
» 本主題相關(guān)價值貼推薦，對您同樣有幫助:
- PROCAR里面的相因子究竟是如何對應(yīng)到波函數(shù)系數(shù)的
已經(jīng)有3人回復(fù)
- 用dos_procar處理dos數(shù)據(jù)不準(zhǔn)
已經(jīng)有3人回復(fù)
- PROCAR里數(shù)據(jù)是什么意思
已經(jīng)有8人回復(fù)
- dos-procar.f90
已經(jīng)有94人回復(fù)
- 如何把16位dos程序變成64位程序
已經(jīng)有8人回復(fù)
- vasp.5.3.3 的PROCAR 和PARCHG結(jié)果相差很大
已經(jīng)有8人回復(fù)
- 從PROCAR中提取態(tài)密度的shell代碼
已經(jīng)有42人回復(fù)
- 【求助成功】Band－procar 和Dos－procar 程序執(zhí)行出錯
已經(jīng)有8人回復(fù)
- 【求助】procar文件如何提取dxy,dz2,dy等的LDOS
已經(jīng)有6人回復(fù)
- 【求助】請教一下PROCAR的格式
已經(jīng)有11人回復(fù)
jpchou
專家顧問 (著名寫手)
-
專家經(jīng)驗: +20 - 1ST強帖: 5
- 應(yīng)助: 231 (大學(xué)生)
- 金幣: 2342
- 散金: 4367
- 紅花: 103
- 帖子: 1061
- 在線: 757.3小時
- 蟲號: 585915
- 注冊: 2008-08-08
- 性別: GG
- 專業(yè): 凝聚態(tài)物性 II ：電子結(jié)構(gòu)
- 管轄: 第一性原理
|
討人厭的害羞圖案又出現(xiàn)~~ 再貼一次 implicit real*8(a-h,o-z) character*128 t,tt open(1,file="Abnormal-PROCAR" ) open(2,file="Abnormal-PROCAR.out" ) read(1,'(a28)') t ; write(2,'(a28)') t do i=1,2 read(1,'(a66)') t ; write(2,'(a66)') t do nk=1,30 read(1,'(a )') t ; write(2,'(a )') t read(1,'(a75)') t ; write(2,'(a75)') t do nb=1,100 read(1,'(a )') t ; write(2,'(a )') t read(1,'(a50)') t ; write(2,'(a50)') t read(1,'(a )') t ; write(2,'(a )') t read(1,'(a66,49x,a7)') t,tt ; write(2,'(a66,a7)') t,tt do natom=1,32 read(1,'(a66,49x,a7)') t,tt ; write(2,'(a66,a7)') t,tt end do read(1,'(a66,49x,a7)') t,tt ; write(2,'(a66,a7)') t,tt read(1,'(a )') t ; write(2,'(a )') t read(1,'(a66)') t ; write(2,'(a66)') t do natom=1,32*2 read(1,'(a66)') t ; write(2,'(a66)') t end do end do read(1,'(a )') t ; write(2,'(a )') t end do end do end |
3樓2015-04-09 23:20:51
jpchou
專家顧問 (著名寫手)
-
專家經(jīng)驗: +20 - 1ST強帖: 5
- 應(yīng)助: 231 (大學(xué)生)
- 金幣: 2342
- 散金: 4367
- 紅花: 103
- 帖子: 1061
- 在線: 757.3小時
- 蟲號: 585915
- 注冊: 2008-08-08
- 性別: GG
- 專業(yè): 凝聚態(tài)物性 II ：電子結(jié)構(gòu)
- 管轄: 第一性原理
★ ★ ★ ★ ★
fzx2008: 金幣+5, 多謝出手 2015-04-10 08:27:51
fzx2008: 金幣+5, 多謝出手 2015-04-10 08:27:51
|
隨手寫了個非常陽春的 fortran 測過~ 應(yīng)該是沒有問題的 如下 implicit real*8(a-h,o-z) character*128 t,tt open(1,file="Abnormal-PROCAR"  open(2,file="Abnormal-PROCAR.out" read(1,'(a28)') t ; write(2,'(a28)') t do i=1,2 read(1,'(a66)') t ; write(2,'(a66)') t do nk=1,30 read(1,'(a )') t ; write(2,'(a )') t read(1,'(a75)') t ; write(2,'(a75)') t do nb=1,100 read(1,'(a )') t ; write(2,'(a )') t read(1,'(a50)') t ; write(2,'(a50)') t read(1,'(a )') t ; write(2,'(a )') t read(1,'(a66,49x,a7)') t,tt ; write(2,'(a66,a7)') t,tt do natom=1,32 read(1,'(a66,49x,a7)') t,tt ; write(2,'(a66,a7)') t,tt end do read(1,'(a66,49x,a7)') t,tt ; write(2,'(a66,a7)') t,tt read(1,'(a )') t ; write(2,'(a )') t read(1,'(a66)') t ; write(2,'(a66)') t do natom=1,32*2 read(1,'(a66)') t ; write(2,'(a66)') t end do end do read(1,'(a )') t ; write(2,'(a )') t end do end do end 金幣就免了~ 大放送 |
» 本帖已獲得的紅花（最新10朵）
甲斐之虎2樓2015-04-09 23:19:33
vasp001
金蟲 (正式寫手)
- 應(yīng)助: 69 (初中生)
- 金幣: 1513.7
- 散金: 134
- 紅花: 24
- 帖子: 702
- 在線: 326小時
- 蟲號: 727265
- 注冊: 2009-03-20
- 性別: GG
- 專業(yè): 凝聚態(tài)物性 II ：電子結(jié)構(gòu)
4樓2015-04-10 23:01:10
5樓2015-04-11 19:40:10
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 求調(diào)劑 +4 | 零八# 2026-03-27 | 4/200 |
|
|---|---|---|---|---|
|
[考研] 070300求調(diào)劑306分 +3 | 26要上岸 2026-03-27 | 3/150 |
|
|
|
[考研] 求調(diào)劑推薦 材料 304 +14 | 荷包蛋hyj 2026-03-26 | 14/700 |
|
|
|
[考研]
 一志愿 西北大學(xué) 總分282 英語一62 求調(diào)劑
+7
|
18419759900 2026-03-25 | 8/400 |
|
|
|
[考研] 0703一志愿9，初試成績：338，四六級已過，有科研經(jīng)歷，求調(diào)劑！ +3 | Zuhui0306 2026-03-25 | 3/150 |
|
|
|
[考研] 一志愿211，335分，0856，求調(diào)劑院校和導(dǎo)師 +4 | 傾____蕭 2026-03-27 | 5/250 |
|
|
|
[考研] 0703化學(xué)/290求調(diào)劑/本科經(jīng)歷豐富/工科也可 +7 | 丹青奶蓋 2026-03-26 | 8/400 |
|
|
|
[考研] 0703化學(xué)一志愿南京師范大學(xué)303求調(diào)劑 +3 | zzffylgg 2026-03-24 | 3/150 |
|
|
|
[考研] 一志愿吉大071010，316分求調(diào)劑 +3 | xgbiknn 2026-03-27 | 3/150 |
|
|
|
[考研] 0856材料專碩353求調(diào)劑 +9 | NIFFFfff 2026-03-20 | 9/450 |
|
|
|
[考研]
材料學(xué)碩，求調(diào)劑
 6+5
|
糖葫蘆888ll 2026-03-22 | 10/500 |
|
|
|
[考研] 343求調(diào)劑 +4 | 贈我一本書 2026-03-23 | 4/200 |
|
|
|
[考研] 336材料求調(diào)劑 +7 | 陳瀅瑩 2026-03-26 | 9/450 |
|
|
|
[考研] 071000生物學(xué)求調(diào)劑，初試成績343 +6 | 小小甜面團 2026-03-25 | 6/300 |
|
|
|
[考研] 資源與環(huán)境 調(diào)劑申請(333分) +9 | holy J 2026-03-21 | 9/450 |
|
|
|
[考研] 一志愿天津大學(xué)339材料與化工求調(diào)劑 +3 | 江往賣魚 2026-03-26 | 3/150 |
|
|
|
[考研] 290分調(diào)劑求助 +3 | 吉祥止止陳 2026-03-25 | 3/150 |
|
|
|
[考研] 308求調(diào)劑 +3 | 墨墨漠 2026-03-21 | 3/150 |
|
|
|
[考研] 一志愿深大，0703化學(xué)，總分302，求調(diào)劑 +4 | 七月-七七 2026-03-21 | 4/200 |
|
|
|
[考研] 336求調(diào)劑 +5 | rmc8866 2026-03-21 | 5/250 |
|