 |
 |
 |
 |
 |
 |
||
 |
 |
 |
 |
 |
| 1 | 1/1 | 返回列表 |
| 查看: 633 | 回復(fù): 0 | ||
moyi22334新蟲 (初入文壇)
|
[求助]
想固定x軸作優(yōu)化，重新編譯了VASP，為什么沒起作用？
|
|
按照網(wǎng)上的方法，修改了constr_cell_relax.F文件，并重新編譯了VASP，并沒有起作用，可能的原因是什么？ 代碼如下： SUBROUTINE CONSTR_CELL_RELAX(FCELL) USE PREC REAL(Q) FCELL(3,3), SAVE(3) LOGICAL FILFLG INTEGER ICELL(3) INQUIRE(FILE='OPTCELL',EXIST=FILFLG) IF (FILFLG) THEN OPEN(67,FILE='OPTCELL',FORM='FORMATTED',STATUS='OLD') READ(67,"(3I1)"  (ICELL(I),I=1,3)CLOSE(67) DO I=1,3 SAVE(I)=FCELL(I,I) ENDDO FCELL=0.0d0 DO I=1,3 IF (ICELL(I)==1) FCELL(I,I)=SAVE(I) ENDDO ENDIF ! just one simple example ! relaxation in x directions only ! SAVE=FCELL(1,1) ! FCELL=0 ! F90 style: set the whole array to zero ! FCELL(1,1)=SAVE RETURN END SUBROUTINE 方法來(lái)自這里：http://blog.sciencenet.cn/blog-671981-731203.html |
回復(fù)此樓» 猜你喜歡
物理學(xué)求調(diào)劑
已經(jīng)有4人回復(fù)
-
找博導(dǎo)
已經(jīng)有4人回復(fù)
-
282分材料專業(yè)求調(diào)劑院校
已經(jīng)有18人回復(fù)
-
一志愿清華深研院材料專碩294分，專業(yè)課111分，本科中南大學(xué)材料，有六級(jí)，有工作經(jīng)驗(yàn)
已經(jīng)有4人回復(fù)
-
288求調(diào)劑
已經(jīng)有15人回復(fù)
-
材料與化工 一志愿山大 321分 求調(diào)劑
已經(jīng)有7人回復(fù)
-
哈工大材料324求調(diào)劑
已經(jīng)有3人回復(fù)
-
304求調(diào)劑（085602一志愿985）
已經(jīng)有5人回復(fù)
-
環(huán)境調(diào)劑
已經(jīng)有5人回復(fù)
-
材料與化工，291，求調(diào)劑
已經(jīng)有9人回復(fù)
相關(guān)版塊跳轉(zhuǎn)
我要訂閱樓主 moyi22334 的主題更新
| 1 | 1/1 | 返回列表 |
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
