| ²é¿´: 2658 | »Ø¸´: 2 | ||
| ±¾Ìû²úÉú 1 ¸ö ²©Ñ§EPI £¬µã»÷ÕâÀï½øÐв鿴 | ||
yanbaojun½ð³æ (ÖøÃûдÊÖ)
|
[ÇóÖú]
ÇóÖú~»°ëµ¼ÌåºÍ¾øÔµÌåÄÜ´øÍ¼
|
|
|
²ôÂÁµÄÑõ»¯Ð¿²ÄÁÏ£¨AZO£©ºÍÑõ»¯Ã¾²ÄÁϽáºÏÔÚÒ»Æð£¬ËüÃǵÄÄÜ´øÍ¼ÈçºÎ»£¿ Çë²ÄÁÏ¡¢ÎïÀíµÈרҵµÄ¸ßÊÖÖ¸µã£¬Ð»Ð»£¡ |
» ²ÂÄãϲ»¶
±¾¿ÆÄÏ·½Ò½¿Æ´óѧ Ò»Ö¾Ô¸985 ҩѧѧ˶284·Ö Çóµ÷¼Á
ÒѾÓÐ5È˻ظ´
295·ÖÇóµ÷¼Á
ÒѾÓÐ12È˻ظ´
µ÷¼ÁÇóÊÕÁô
ÒѾÓÐ25È˻ظ´
272·Ö²ÄÁÏ×ÓÇóµ÷¼Á
ÒѾÓÐ49È˻ظ´
211±¾¿Æ²ÄÁÏ»¯¹¤Çóµ÷¼Á
ÒѾÓÐ16È˻ظ´
279ѧ˶ʳƷרҵÇóµ÷¼ÁԺУ
ÒѾÓÐ12È˻ظ´
һ־Ը˫·Ç085400µç×ÓÐÅÏ¢344 Çóµ÷¼Á£¬¶Ô²ÄÁϺͻ¯Ñ§·½ÏòÒ²¸ÐÐËȤ
ÒѾÓÐ11È˻ظ´
279Çóµ÷¼Á
ÒѾÓÐ8È˻ظ´
277Çóµ÷¼Á
ÒѾÓÐ21È˻ظ´
290Çóµ÷¼Á
ÒѾÓÐ15È˻ظ´
» ±¾Ö÷ÌâÏà¹Ø¼ÛÖµÌùÍÆ¼ö£¬¶ÔÄúͬÑùÓаïÖú:
°ëµ¼ÌåÖеÄÄÜ´øÎÊÌâ
ÒѾÓÐ4È˻ظ´
ÄÜ´ø½á¹¹ºÍ̬ÃܶȷÖÎö·½ÃæÊé¼®
ÒѾÓÐ6È˻ظ´
£Ã£Á£Ó£Ô£Å£ÐÄÜ´øµÄÊä³ö
ÒѾÓÐ12È˻ظ´
°ëµ¼Ìå½û´ø¿í¶È
ÒѾÓÐ10È˻ظ´
½ðÊôºÍ°ë½ðÊô °ëµ¼Ìå
ÒѾÓÐ6È˻ظ´
°ëµ¼Ìå¸÷ÖÖ²ÎÊýµÄ²éѯ
ÒѾÓÐ12È˻ظ´
ʯīÄÜ´øÍ¼£¬Ë«¼«ÊÇʲôÒâ˼£¿ÍØÆË¾øÔµÌå
ÒѾÓÐ10È˻ظ´
¹ØÓڵõ½µÄÄÜ´ø½á¹¹Í¼·ÖÎö£¬Í¬Ò»ÖÖÎïÖÊΪʲô»á³öÏÖÁ½ÖÖͼ£¿
ÒѾÓÐ8È˻ظ´
ÄÜ´ø½á¹¹Í¼ ½ô¼±ÇóÖú
ÒѾÓÐ20È˻ظ´
²ÄÁϹâѧ²ÎÊý±í----°üº¬¾ø´ó¶àÊý½ðÊô¡¢²¿·Ö°ëµ¼Ìå¼°Æä³£¼û¾øÔµÌå
ÒѾÓÐ42È˻ظ´
ÓÃCASTEP×ö³öÀ´µÄÒ»¸öÄÜ´øÍ¼£¬´ó¼Ò°ïæ¿´¿´ËüµÄµ¼µçÐÔ
ÒѾÓÐ21È˻ظ´
¡¾ÇóÖú¡¿µ½µ×ʲôÊǰ뵼Ìå
ÒѾÓÐ20È˻ظ´
¡¾ÇóÖú¡¿·ÑÃ×Äܼ¶²»ÔÚµ¼´øºÍ¼Û´øÖмä
ÒѾÓÐ13È˻ظ´
¡¾ÇóÖú¡¿°ëµ¼ÌåÒìÖʽáÄÜ´øÒƶ¯
ÒѾÓÐ6È˻ظ´
¡¾ÌÖÂÛ¡¿¾øÔµÌåµÄ¿Õ´øÄÜ·ñ½ÓÊܵç×Ó£¿
ÒѾÓÐ8È˻ظ´
¡¾ÇóÖú¡¿siesta ¼ÆËãDOSÓ¦¸Ã×¢ÒâʲôÎÊÌâ
ÒѾÓÐ3È˻ظ´
¡¾·ÖÏí¡¿ÄÜ´ø·ÖÎöÀ´¿´½ðÊô¡¢°ëµ¼Ì廹ÊǾøÔµÌå
ÒѾÓÐ7È˻ظ´
¡¾ÇóÖú¡¿ÔõÑùÖ¤Ã÷Ò»¸ö²ÄÁÏÊǰ뵼ÌåÄØ
ÒѾÓÐ27È˻ظ´

qfw_68
°æÖ÷ (ÎÄ̳¾«Ó¢)
ÓÐβ°ÍµÄÇàÍÜ
- ²©Ñ§EPI: 2910
- Ó¦Öú: 120 (¸ßÖÐÉú)
- ¹ó±ö: 0.414
- ½ð±Ò: 85720.6
- É¢½ð: 3020
- ºì»¨: 212
- ɳ·¢: 7684
- Ìû×Ó: 39484
- ÔÚÏß: 4852.6Сʱ
- ³æºÅ: 797958
- ×¢²á: 2009-06-24
- ÐÔ±ð: GG
- רҵ: ×ÔÈ»ÓïÑÔÀí½âÓë»úÆ÷·Òë
- ¹ÜϽ: Óн±ÎÊ´ð
¡¾´ð°¸¡¿Ó¦Öú»ØÌû
¡ï ¡ï ¡ï ¡ï ¡ï
yanbaojun: ½ð±Ò+5, ²©Ñ§EPI+1, ¡ï¡ï¡ïºÜÓаïÖú 2014-04-10 20:36:03
yanbaojun: ½ð±Ò+5, ²©Ñ§EPI+1, ¡ï¡ï¡ïºÜÓаïÖú 2014-04-10 20:36:03
|
Õâ¸öÎÊÌâÐèÒªÖªµÀ»ò²éÕÒµ½ÕâЩÊý¾Ý£º 1¡¢AZOµÄ·ÑÃ×Äܼ¶Ïà¶ÔÓÚÕæ¿ÕÄܼ¶µÄλÖã¨AZOµÄ·ÑÃ×Äܼ¶Ò»°ã½øÈëµ½ZnOµÄµ¼´øÖУ¬ÆäλÖÃÓëAlµÄ²ôÔÓÁ¿µÈÓйأ©£» 2¡¢MgOµÄµ¼´ø¡¢¼Û´øÏà¶ÔÓÚÕæ¿ÕÄܼ¶µÄλÖá£Èç¹ûMgOÊDZ¾Õ÷µÄ£¨i-MgO£©£¬ÔòÆä·ÑÃ×Äܼ¶ÔÚ½û´øÖÐÑ룻·ñÔòÆä·ÑÃ×Äܼ¶Óë²ôÔÓˮƽµÈÓйأ¨ÐèÈ·ÈÏ»ò²éÕÒ£©¡£ ½áºÏÉÏÊöÊý¾Ý£¬ÔÙ¿´¿´¡°°ëµ¼ÌåÎïÀí¡±Ò»ÊéÖС°½ðÊô-°ëµ¼Ìå½Ó´¥¡±Õ½ڵÄ֪ʶ¾ÍÍêÈ«¿ÉÒÔ»³öÀ´ÁË¡££¨·ÑÃ×Äܼ¶µÄ֪ʶÔÚ¡°°ëµ¼ÌåÎïÀí¡±Ò»ÊéÖÐÒ²ÓУ© |

3Â¥2014-04-10 19:37:52
Á¶ÓüÖ®»ð
ÖÁ×ðľ³æ (ÖªÃû×÷¼Ò)
ÄæË®ÐÐÖÛ£¬²»½øÔòÍË
- ²©Ñ§EPI: 52
- Ó¦Öú: 258 (´óѧÉú)
- ¹ó±ö: 0.228
- ½ð±Ò: 13217.6
- É¢½ð: 1402
- ºì»¨: 44
- ɳ·¢: 4
- Ìû×Ó: 6185
- ÔÚÏß: 787.9Сʱ
- ³æºÅ: 2862838
- ×¢²á: 2013-12-11
- רҵ: ´ß»¯»¯Ñ§
¡¾´ð°¸¡¿Ó¦Öú»ØÌû
|
²ÉÓÃVASPÈí¼þ¼ÆËã³öÏàÓ¦µÄÄÜ´øºó£¬ÄǾÍÓÃorigin£¬ºÃ¶àÁÐÓò»Í¬µÄy¾Í¿ÉÒÔÁ˰¡£¬²»½öÊÇÄÜ´ø¼ÆË㣬´ø×ÔÐýµÄ̬ÃܶȼÆËãҲͬÑù´¦Àí¡£ Ò»¸ö´¦ÀíÄÜ´øÊý¾ÝµÄ´úÂ룬ÏȱàÒëÒ»ÏÂÉú³ÉÒ»¸ö¿ÉÖ´ÐгÌÐò£¬È»ºóÔÚÄãµÄvasp¼ÆËãĿ¼ÏÂÃæÔËÐÐÉú³ÉµÄ¿ÉÖ´ÐгÌÐò¼´¿ÉµÃµ½Ò»¸ö¿ÉÒÔÓÃorigin´¦ÀíµÄÄÜ´øÊý¾Ý Èç¹ûûÓп¼ÂÇ×ÔÐýת£¬Éú³ÉµÄÎļþÃûÊÇbnd.dat ¿¼ÂÇÁË×ÔÑ¡£¬ÔòÉú³ÉÁ½¸öÎļþbndup.datºÍbnddn.dat£¬Ò»¸ö×ÔÐýÏòÉÏ£¬ÁíÒ»¸öÊÇ×ÔÐýÏòÏ ³ÌÐòÖ´Ðйý³ÌÖлáÒªÄãÊäÈë·ÑÃ×Äܼ¶£¨µ¥Î»ÊÇeV£©¡£ bnd.datÎļþÖУ¬µÚÒ»ÁÐÊÇx×ø±ê£¨Ã»ÓÐÒâÒ壬»Í¼µÄʱºòÒª°ÑËüµÄ±ê¶ÈÒþµô£¬²¢Ð´Éϸ߶ԳƵ㣩£¬Ëü°´KPOINTSÖеĸ߶Եã˳ÐòÒÀ´ÎÅÅ¿ª¡£ ³ÌÐò´ÓÍøÉÏÕҵģ¬×Ô¼ºÏàÓ¦¸ÄÒ»ÏÂ.......°æÈ¨²»ÊôÓÚÎÒ......ºÇºÇ program prog real, allocatable :: e(:, ,eup(:, ,edn(:, real, allocatable :: k(:, ,dk( ,x(![]() real, dimension(3) ::k0,a real, dimension(6) ::xxxx character(len=32):: xx, yy ,nosence write(6,*) 'fermi level (eV)' read(5,*) ef open(10,file='EIGENVAL', status='old') read(10,*) iii, iii, iii, ispin read(10,*) (xxxx(i),i=1,5) read(10,*) xxxx(6) read(10,*) xx read(10,*) yy read(10,*) nn,nk,nbands allocate(e(nk,nbands)) allocate(eup(nk,nbands)) allocate(edn(nk,nbands)) allocate(k(nk,3)) allocate(dk(0:nk)) allocate(x(1:nk)) wtk=0.2500000E-01 if(ispin.eq.2) then open(13,file='bndup.dat') open(14,file='bnddn.dat') do i=1,nk read(10,*) read(10,*) (k(i,j),j=1,3),wtk do j=1,nbands read(10,*) jj,eup(i,j),edn(i,j) enddo enddo do n=1,nk dk(0)=0 if (n.eq.1) then k0=k(n, endif a=k(n, -k0 dk(n)=dk(n-1)+sqrt(dot_product(a,a)) x(n)=dk(n) k0=k(n, enddo do i=1,nk write(13,9030) x(i), ((eup(i,j)-ef),j=1,nbands) write(14,9030) x(i), ((edn(i,j)-ef),j=1,nbands) enddo else open(11,file='bnd.dat') do i=1,nk read(10,*) read(10,*) nosence,nosence,nosence,(k(i,j),j=1,3) read(10,*) do j=1,nbands read(10,*) jj,e(i,j) enddo enddo do n=1,nk dk(0)=0 if (n.eq.1) then k0=k(n, endif a=k(n, -k0 dk(n)=dk(n-1)+sqrt(dot_product(a,a)) x(n)=dk(n) k0=k(n, enddo do i=1,nk write(11,9030) x(i),((e(i,j)-ef),j=1,nbands) enddo endif 9030 format (1x,f9.4,2x ,2000(f12.6,2x)) stop end program prog ѧϰһÏ¡« |

2Â¥2014-04-10 17:52:20













»Ø¸´´ËÂ¥
,eup(:,
5