Znn3bq.jpeg
²é¿´: 6450  |  »Ø¸´: 15

wbt11129

ľ³æ (ÕýʽдÊÖ)

[½»Á÷] ¡¾ÇóÖú¡¿VASP¼ÆËã³öµÄµç¼«»¯Ç¿¶ÈÊý¾Ý£¬Ôõô×öºó´¦Àí

ÓÃVASPÖеÄBerryÏà·½·¨¼ÆËã³ö¼«»¯Êý¾ÝÒԺ󣬲»»á×öºó´¦Àí£¬


±ÈÈçÎÒ¼ÆËãËùµÃ
G1·½ÏòP[elc]=(-0.00001, -0.00006, 0.01615),
G2·½ÏòP[elc]=(0.00000, 0.00000, 0.01615)£¬
G3·½ÏòP[elc]=(0.00000, 0.00000, -9.59885),
Èý¸ö·½ÏòµÄP[ion]=(-61.97390,133.49391,-194.56332)ÊÇÒ»Öµģ¬µ¥Î»¶¼ÊÇe*Angst¡£

ÄÇô£¬ÎÒËùÇóÌåϵµÄµç¼«»¯Ç¿¶ÈÊǶàÉÙ£¿ÑØÄĸö·½Ïò£¿Àë×Ó¹±Ï×¶àÉÙ£¿µç×Ó¹±Ï×ÓÖΪ¶àÉÙ£¿

±¾ÈËʵÔÚ²»»áºóÃæµÄ´¦Àí£¬Çëºî²©ºÍ¸÷λ´óϺָ½Ì¡£

×¢Ò⣬ÎÒÏÖÔÚ¼ÆËãµÄ²ÄÁϵÄprototype structure¸ù±¾¾Í²»ÖªµÀ¡£
»Ø¸´´ËÂ¥

» ÊÕ¼±¾ÌûµÄÌÔÌûר¼­ÍƼö

vasp¼ÆËã×ÊÁÏ µÚÒ»ÐÔÔ­Àí¼ÆËã¾­Ñé µÚÒ»ÐÔÔ­Àí

» ²ÂÄãϲ»¶

» ±¾Ö÷ÌâÏà¹ØÉ̼ÒÍÆ¼ö: (ÎÒÒ²ÒªÔÚÕâÀïÍÆ¹ã)

» ±¾Ö÷ÌâÏà¹Ø¼ÛÖµÌùÍÆ¼ö£¬¶ÔÄúͬÑùÓаïÖú:

BaotianWang
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
»ØÌûÖ§³Ö ( ÏÔʾ֧³Ö¶È×î¸ßµÄǰ 50 Ãû )

valenhou001

ÖÁ×ðľ³æ (Ö°Òµ×÷¼Ò)

¡ï
wuli8(½ð±Ò+1):лл 2010-10-01 22:57:08
wbt11129(½ð±Ò+3):ллºî²©ÁË£¬²»¹ý»¹ÊDz»»áÎÒÕâÖÖÌåϵµÄµç¼«»¯Ç¿¶È¼ÆË㣬ÒòΪÎÒÕâÖÖÌåϵûÓÐÔ­Ðͽṹ¡£ 2010-10-20 09:14:04
Ö»ÓÐÕâÑùµÄÊý¾ÝÊǵõ½²»µ½µÄ¡£
¿ÉÒÔ¿´¿´ÎÒblogÉϵÄÒ»¸öÀý×Ó£º
http://valenhou.blog.edu.cn/2008/133226.html
4Â¥2010-09-30 12:09:30
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

ãÛÃô

гæ (СÓÐÃûÆø)

¡ï
Сľ³æ: ½ð±Ò+0.5, ¸ø¸öºì°ü£¬Ð»Ð»»ØÌû
ÒýÓûØÌû:
731528Â¥: Originally posted by valenhou001 at 2010-09-30 12:09:30
Ö»ÓÐÕâÑùµÄÊý¾ÝÊǵõ½²»µ½µÄ¡£
¿ÉÒÔ¿´¿´ÎÒblogÉϵÄÒ»¸öÀý×Ó£º
http://valenhou.blog.edu.cn/2008/133226.html

ºîÀÏʦ£¬ÎÒ¾ÍÊÇÓÃÄ㲩¿ÍÀïÃæµÄ·½·¨¼ÆËãµÄ£¬µ«ÊÇÎÒ·¢ÏÖÖ»ÒªDIPOLÄÇÒ»ÏîÉÔ΢±äһϣ¬Ëã³öÀ´µÄ¼«»¯¾Í²î±ðÌØ±ð´ó
8Â¥2013-01-05 10:18:36
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
ÆÕͨ»ØÌû

wbt11129

ľ³æ (ÕýʽдÊÖ)

ÓÐË­Ëã¹ý¶àÌú²ÄÁϵģ¬Çë¹ýÀ´¿´¿´
BaotianWang
2Â¥2010-09-28 16:32:26
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

wbt11129

ľ³æ (ÕýʽдÊÖ)

¶¥ÆðÀ´£¬Ï£ÍûÓÐÈ˹Ø×¢¡£
BaotianWang
3Â¥2010-09-30 10:19:14
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

bnliu

½ð³æ (СÓÐÃûÆø)

½á¹û´¦Àí

¡ï ¡ï ¡ï
zzy870720z(½ð±Ò+3):лл·ÖÏí 2010-10-14 19:40:43
wbt11129(½ð±Ò+3):лл·ÖÏí¡£ÄãÄÜ·ñ°ÑÄãÕâ¸ö³ÌÐòʹÓõÄÊäÈëÎļþ¸øÎÒÒ»·Ý£¬ÎҺòο¼¡£ÎÒQQ£º158604782 2010-10-19 10:35:16
±¾ÈË֮ǰ¼ÆËãÁËîÑËá±µµÄ×Ô·¢¼«»¯£¬×îºó½á¹û´¦ÀíһϾͿÉÒԵõ½×Ô·¢¼«»¯¡£×îºÃÓýű¾³ÌÐò£¬°Ñ×îºóÒª´¦ÀíµÄÏà¹ØÊý¾Ý·Åµ½Ò»¸öÎļþÀïÃæ£¬ÔÙÓÃFORTRAN¶ÔÎļþÊý¾Ý½øÐд¦Àí¾Í¿ÉÒÔÁË¡£        program polar
!this program is write for calculated the s_p of the solid after the
!scrip "berry" has been done and the file data developed by the scrip
!"berry" must be needed
        implicit real*8 (a-h,o-z)
        dimension gpar(9,3),pelec(2,3),berry(2,3),pionic(2,3)
        dimension p(3)
        character*86 nosen,nosen1
        character aa
        open (9,file='data')
        open (10,file= 'result')
        read(9,'(a86)')nosen
        write(10,'(a86)')nosen
        do i=1,9
       read(9,'(a7,f12.5,a,f12.5,a,f12.5)')aa,gpar(i,1),aa,gpar(i,2),aa,gpar(i,3)
!         write(10,110)gpar(i,1),gpar(i,2),gpar(i,3)
        enddo  
        do j=1,3
         pelec(1,j)=(gpar(1,j)+gpar(4,j)+gpar(7,j))/3
         berry(1,j)=gpar(2,j)+gpar(5,j)+gpar(8,j)
         pionic(1,j)=gpar(3,j)
        enddo
!        write(10,*)'the elec, Berry, ionic is'
        write(10,110)pelec(1,1),pelec(1,2),pelec(1,3)         
        write(10,110)berry(1,1),berry(1,2),berry(1,3)
        write(10,110)pionic(1,1),pionic(1,2),pionic(1,3)
110    format(f12.5,f12.5,f12.5)      
        read(9,'(a86)')nosen1
        write(10,'(a86)')nosen1
        do i=1,9
       read(9,'(a7,f12.5,a,f12.5,a,f12.5)')aa,gpar(i,1),aa,gpar(i,2),aa,gpar(i,3)
!         write(10,110)gpar(i,1),gpar(i,2),gpar(i,3)
        enddo  
        do j=1,3
         pelec(2,j)=(gpar(1,j)+gpar(4,j)+gpar(7,j))/3
         berry(2,j)=gpar(2,j)+gpar(5,j)+gpar(8,j)
         pionic(2,j)=gpar(3,j)
        enddo
        write(10,110)pelec(2,1),pelec(2,2),pelec(2,3)
        write(10,110)berry(2,1),berry(2,2),berry(2,3)
        write(10,110)pionic(2,1),pionic(2,2),pionic(2,3)
        read (9,*)nosen
        read (9,*)nosen
        read (9,'(a20,f10.2)')nosen,volum
        read (9,'(a13,f18.10)')nosen,alat
        read (9,'(a13,f18.10)')nosen,ratio
        correct= ((1.000/alat)/alat)*1600
!to calculate the polaraztion in x, y, z direction!
         do k=1,3
          p(k)=(pelec(2,k)+berry(2,k)+pionic(2,k)-pelec(1,k)-berry(1,k)-pionic(1,k))
!*1600/volum
          write(10,*)'the diff is',p(k),'the polar is',(p(k)*(-1600))/volum
         enddo
         write(10,*)'The free correction is ', correct
       end
ÕâÊdzÌÐò£¬¿ÉÒÔ¿´Ò»Ï¡£
ÈËÉúÖ»ÓÐÒ»´Î
5Â¥2010-10-14 16:30:55
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

byin

Í­³æ (ÕýʽдÊÖ)

ÒýÓûØÌû:
Originally posted by bnliu at 2010-10-14 16:30:55:
±¾ÈË֮ǰ¼ÆËãÁËîÑËá±µµÄ×Ô·¢¼«»¯£¬×îºó½á¹û´¦ÀíһϾͿÉÒԵõ½×Ô·¢¼«»¯¡£×îºÃÓýű¾³ÌÐò£¬°Ñ×îºóÒª´¦ÀíµÄÏà¹ØÊý¾Ý·Åµ½Ò»¸öÎļþÀïÃæ£¬ÔÙÓÃFORTRAN¶ÔÎļþÊý¾Ý½øÐд¦Àí¾Í¿ÉÒÔÁË¡£        program polar
!this progr ...

ÇóÊäÈëÎļþ¸ñʽ¡£¡£
6Â¥2011-03-23 08:39:35
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

future_wl

ľ³æ (ÖøÃûдÊÖ)

¡ï
Сľ³æ: ½ð±Ò+0.5, ¸ø¸öºì°ü£¬Ð»Ð»»ØÌû
ÒýÓûØÌû:
731528Â¥: Originally posted by valenhou001 at 2010-09-30 12:09:30
Ö»ÓÐÕâÑùµÄÊý¾ÝÊǵõ½²»µ½µÄ¡£
¿ÉÒÔ¿´¿´ÎÒblogÉϵÄÒ»¸öÀý×Ó£º
http://valenhou.blog.edu.cn/2008/133226.html

ÇëÎʺîÀÏʦ£¬ÓÃBerry phaseËã³öµÄBECͬ DFPTËã³öµÄBECÓкÎÇø±ð£¿Èç¹ûË㼫»¯Ç¿¶ÈµÄ»°£¬Á½¸öÖµÊÇ·ñ¶¼¿ÉÒÔÓã¿
лл!
δÀ´¾ÍÊÇÏÖÔÚ
7Â¥2013-01-04 23:49:58
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

ãÛÃô

гæ (СÓÐÃûÆø)

ÒýÓûØÌû:
2416727Â¥: Originally posted by future_wl at 2013-01-04 23:49:58
ÇëÎʺîÀÏʦ£¬ÓÃBerry phaseËã³öµÄBECͬ DFPTËã³öµÄBECÓкÎÇø±ð£¿Èç¹ûË㼫»¯Ç¿¶ÈµÄ»°£¬Á½¸öÖµÊÇ·ñ¶¼¿ÉÒÔÓã¿
лл!...

ÎÒÊÇËãµÄѹµçÕÅÁ¿£¬´î³µÍ¬ÎÊ
9Â¥2013-01-05 10:19:25
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

zyqh

Ìú¸Ëľ³æ (ÖøÃûдÊÖ)

¡ï
Сľ³æ: ½ð±Ò+0.5, ¸ø¸öºì°ü£¬Ð»Ð»»ØÌû
ÒýÓûØÌû:
5Â¥: Originally posted by bnliu at 2010-10-14 16:30:55
±¾ÈË֮ǰ¼ÆËãÁËîÑËá±µµÄ×Ô·¢¼«»¯£¬×îºó½á¹û´¦ÀíһϾͿÉÒԵõ½×Ô·¢¼«»¯¡£×îºÃÓýű¾³ÌÐò£¬°Ñ×îºóÒª´¦ÀíµÄÏà¹ØÊý¾Ý·Åµ½Ò»¸öÎļþÀïÃæ£¬ÔÙÓÃFORTRAN¶ÔÎļþÊý¾Ý½øÐд¦Àí¾Í¿ÉÒÔÁË¡£        program polar
!this program ...

´óϺ£¬ÄãºÃ£¬ÇëÎÊÄã¿ÉÒÔ°ÑÄãµÄ´¦Àí¼«»¯µÄ½Å±¾´«Ò»·Ý¸øÎÒÂ𣿠ллÁË
Óêºó·½Äܼû²Êºç
10Â¥2014-05-28 22:32:13
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
Ïà¹Ø°æ¿éÌø×ª ÎÒÒª¶©ÔÄÂ¥Ö÷ wbt11129 µÄÖ÷Ìâ¸üÐÂ
×î¾ßÈËÆøÈÈÌûÍÆ¼ö [²é¿´È«²¿] ×÷Õß »Ø/¿´ ×îºó·¢±í
[¿¼ÑÐ] 346·Ö£¬¹¤¿Æ0854Çóµ÷¼Á£¬×¨Ë¶ +6 moser233 2026-04-12 7/350 2026-04-12 22:11 by fqwang
[¿¼ÑÐ] 272·Ö²ÄÁÏ×ÓÇóµ÷¼Á +40 Loy0361 2026-04-10 52/2600 2026-04-12 19:23 by laoshidan
[¿¼ÑÐ] ҩѧÇóµ÷¼Á +3 RussHu 2026-04-12 4/200 2026-04-12 17:49 by ³ÂƤƤ
[¿¼ÑÐ] 0856ר˶Çóµ÷¼Á Ï£ÍûÊÇaÇøÔºÐ£ +22 ºÃºÃÐÝÏ¢ºÃ²»ºÃ 2026-04-09 25/1250 2026-04-12 17:09 by ajpv·çÀ×
[¿¼ÑÐ] 0860004 Çóµ÷¼Á 309·Ö +9 Yin DY 2026-04-08 9/450 2026-04-11 22:55 by dongdian1
[¿¼ÑÐ] Ò»Ö¾Ô¸Ïôó0856£¬306Çóµ÷¼Á +15 Bblinging 2026-04-11 15/750 2026-04-11 22:53 by 314126402
[¿¼ÑÐ] ²ÄÁϹ¤³ÌÈÕÓÉúÇóµ÷¼Á +7 0856?µ÷¼Á 2026-04-10 7/350 2026-04-11 21:33 by À¶ÔÆË¼Óê
[¿¼ÑÐ] Ò»Ö¾Ô¸211£¬»¯Ñ§Ñ§Ë¶£¬310·Ö£¬±¾¿ÆÖصãË«·Ç£¬Çóµ÷¼Á +17 ŬÁ¦·Ü¶·112 2026-04-06 20/1000 2026-04-11 00:31 by wangjihu
[¿¼ÑÐ] 289 ·Ö105500ҩѧר˶Çóµ÷¼Á(ÕÒBÇøÑ§Ð£) +6 °×ÔÆ123456789 2026-04-09 8/400 2026-04-10 21:13 by zhouxiaoyu
[¿¼ÑÐ] ÉúÎïѧ308·ÖÇóµ÷¼Á£¨Ò»Ö¾Ô¸»ª¶«Ê¦´ó£©×ö¹ý·Ö×ÓʵÑé +8 ÏàÐűػá¹ââÍòÕ 2026-04-07 9/450 2026-04-10 21:03 by zhouxiaoyu
[¿¼ÑÐ] 22408 366·Ö£¬±¾¿Æ211£¬Ò»Ö¾Ô¸Î÷¹¤´ó +4 Rubt 2026-04-09 4/200 2026-04-10 19:51 by chemisry
[¿¼ÑÐ] 298Çóµ÷¼Á +13 ¶¤¶£ß˶¬¹Ï 2026-04-09 13/650 2026-04-10 15:49 by jiajinhpu
[¿¼ÑÐ] 344Çóµ÷¼Á +7 ؼ·çѩҹ¹éÈËØ¼ 2026-04-09 7/350 2026-04-10 12:05 by pengliang8036
[¿¼ÑÐ] »úе»¹Óл¹ÓÐÃû¶îÂð£¿Ì«ÄÑÁË +6 ЦЦԬ 2026-04-10 6/300 2026-04-10 11:54 by ¸ßά´º
[¿¼ÑÐ] Ò»Ö¾Ô¸ÖÐÄÏ´óѧÎïÀíѧ£¬Ó¢Ò»66£¬Çóµ÷¼Á +4 ³¤ÑÌì½ì» 2026-04-08 5/250 2026-04-10 10:31 by Ó±¹û¶ù
[¿¼ÑÐ] ÉúÎïѧÇóµ÷¼Á Ò»Ö¾Ô¸»¦9£¬326·Ö +7 Áõīī 2026-04-06 7/350 2026-04-10 08:11 by kangsm
[¿¼ÑÐ] 278Çóµ÷¼Á +27 ·¶æÃÄÈ 2026-04-07 31/1550 2026-04-09 20:49 by zhouxiaoyu
[¿¼ÑÐ] 0703»¯Ñ§Çóµ÷¼Á +21 ²»ÖªÃûµÄСئ 2026-04-08 21/1050 2026-04-09 18:55 by l_paradox
[¿¼ÑÐ] »¯Ñ§¹¤³ÌÓë¼¼Êõרҵһ־Ը¹þ¹¤³Ì 291·ÖBÇø ¹ú¼Ò¼¶´ó´´¸ºÔðÈË ÓÐÒ»×÷ÂÛÎÄ +13 Emmy~ 2026-04-09 13/650 2026-04-09 14:47 by onlyÖÜ
[¿¼ÑÐ] 22408 318·ÖÇóµ÷¼Á +4 ÇڷܵÄСÁý°ü 2026-04-06 6/300 2026-04-07 15:05 by Ö½º×555
ÐÅÏ¢Ìáʾ
ÇëÌî´¦ÀíÒâ¼û