±±¾©Ê¯ÓÍ»¯¹¤Ñ§Ôº2026ÄêÑо¿ÉúÕÐÉú½ÓÊÕµ÷¼Á¹«¸æ
²é¿´: 880  |  »Ø¸´: 4

qishiyy

Òø³æ (СÓÐÃûÆø)

[ÇóÖú] molpro µÄSAPT Öгö´í

ÕâÊÇÊäÈëÎļþ
basis=aug-cc-pvtz

ca=2101.2
cb=2102.2

dist=[2.4,2.5,2.6,2.7,2.8,2.9,3.0,3.1,3.2,3.3] ang

do i=1,#dist
   r=dist(i)

   hf
   edm=energy

   dummy,Ne
   {hf; save,$ca}
   ema=energy
   sapt;monomerA

   dummy,Ar
   {hf; start,atdens; save,$cb}
   emb=energy
   sapt;monomerB

   sapt,SAPT_LEVEL=3;intermol,ca=$ca,cb=$cb

   eint_hf=(edm-ema-emb)*1000. mH
   delta_hf=eint_hf-e1pol-e1ex-e2ind-e2exind

   elst(i)=E1pol; exch(i)=E1ex
   ind(i)=E2ind; exind(i)=E2exind
   disp(i)=E2disp; exdisp(i)=E2exdisp
   etot(i)=E12tot;eint_sapt(i)=eint_hf+e2disp+e2exdisp

   data,truncate,$ca
enddo

{table,dist,elst,exch,ind,exind,disp,exdisp,etot,eint_sapt
ftyp,d,d,d,d,d,d,d,d,d,d
plot}

´íÎóÐÅÏ¢
i=1 ËãÍêºó£¬Ëãi=2 ʱ£¬³öÏÖ
?DUMP RECORD  2101.2 CORRESPONDS TO DIFFERENT BASIS OR MOLECULE
»Ø¸´´ËÂ¥
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

fmklz

ľ³æ (ÕýʽдÊÖ)

¸ãµçÆ÷¹¤Òµ»¯µÄ»¯Ñ§´ò¹¤×Ð

¡¾´ð°¸¡¿Ó¦Öú»ØÌû

¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï
cenwanglai: ½ð±Ò+2, лл»Ø¸´~ 2012-11-07 15:58:25
qishiyy: ½ð±Ò+10, ¡ï¡ï¡ïºÜÓаïÖú 2012-11-07 19:26:53
µ±i=2ʱ£¬{hf; save,$ca}ÕâÊǵØÖ·»áĬÈÏ´Ó×î½ü¼ÆËãÕÒ£¬¼´Éϲ½µÄ$cb£¬½¨Òé
{hf£»save£¬$ca+i£»start£¬$ca+i-1£»}
»òÕßÄã²»Ïë¼Ì³Ð¡¤£¬¿ÉÒÔÀàËÆ{hf; start,atdens; save,$cb}£¬ÓÃstart,atdens;ÕâÑùÿ¸öÑ­»·¶¼×Ô¼º²Â
ÄþÔÚһ˼½ø£¬ÄªÔÚһ˼ͣ
2Â¥2012-11-07 11:20:01
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

qishiyy

Òø³æ (СÓÐÃûÆø)

ÒýÓûØÌû:
2Â¥: Originally posted by fmklz at 2012-11-07 11:20:01
µ±i=2ʱ£¬{hf; save,$ca}ÕâÊǵØÖ·»áĬÈÏ´Ó×î½ü¼ÆËãÕÒ£¬¼´Éϲ½µÄ$cb£¬½¨Òé
{hf£»save£¬$ca+i£»start£¬$ca+i-1£»}
»òÕßÄã²»Ïë¼Ì³Ð¡¤£¬¿ÉÒÔÀàËÆ{hf; start,atdens; save,$cb}£¬ÓÃstart,atdens;ÕâÑùÿ¸öÑ­»·¶¼×Ô¼º²Â

Èç¹ûÁ½¸öµ¥Ìå¶¼ÊÇÓжà¸öÔ­×ӵķÖ×Ó£¬É趨 r Êǵ¥ÌåAÖеÄÒ»¸öÔ­×Ӻ͵¥ÌåBÖеÄÒ»¸öÔ­×ӵľàÀë¡£¸ø¶¨r²»Í¬µÄÖµ£¬ÈÃÁ½¸öµ¥ÌåÖ𽥿¿½ü£¬ÄÇôµ¥ÌåÖÐÆäËüµÄÔ­×Ó»á×Ô¶¯Æ½Òƶø±£³Öµ¥ÌåµÄ¹¹ÐͲ»·¢Éú±ä»¯Âð£¿
3Â¥2012-11-07 19:25:59
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

fmklz

ľ³æ (ÕýʽдÊÖ)

¸ãµçÆ÷¹¤Òµ»¯µÄ»¯Ñ§´ò¹¤×Ð

¡¾´ð°¸¡¿Ó¦Öú»ØÌû

¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï
qishiyy: ½ð±Ò+20, ¡ï¡ï¡ï¡ï¡ï×î¼Ñ´ð°¸ 2012-11-10 14:48:11
ÎÒûÓÐÍêÈ«Ã÷°×ÄãµÄÒâ˼¡£¼òµ¥ËµÁ½¾ä°É
1.ÄãÒªÊÇÏë´ïµ½Õâ¸öÄ¿µÄÄØ£¿-----ÄÇÖ»ÉèRΪ±äÁ¿¼´¿É£¬ÆäËûΪ³£Êý£¬¾Í¿ÉÒÔÁË¡£
2.¸öÈ˾õµÃʵ¼ÊÇé¿ö£¬R½ÏԶʱ£¬¹¹Ðͱ仯²»´ó£¬µ«½Ï½üʱ£¬¹¹ÐͿ϶¨ÓÐЩ±ä»¯£¬Ôڹ̶¨rֵʱ£¬ÓÅ»¯ÆäËû²ÎÊý£¬À´¹Û²ìÆäËûÊÇ·ñ±ä»¯£¬Èô±ä»¯£¬±ã˵Ã÷µ¥Ìå¹¹ÐÍÒª±ä¡£
¶ÔÓÚ2Çé¿ö£¬ÄãÒªÏë±£³Öhf²¨º­Á¬ÐøÐÔ£¬ÓøöforÑ­»·¡£¼ÙÉèÿһ¸öR¶ÔÓ¦ÆäËû²ÎÊý£¨¹Ì¶¨RÓÅ»¯ºó£©ÓÐr2£¬r3£¬alpha1£¬alpha2µÈµÈ¡£
R=[,,,,,,,,]
distance1=[,,,,,,,]
distance2=[,,,,,,,,]
angle1=[,,,,,,,,]
angle2=[,,,,,,,]                            !ÕâÏÂÃæ¼¸¸öÊý×éÓëÏàÓ¦µÄR±£³ÖÒ»Ò»¶ÔÓ¦
i=0;
do ith=1,#R
i=i+1
r1(i)=R(ith)
r2(i)=distance1(ith)
r3(i)=distance2(ith)
alpha1(i)=angle1(ith)
alpha2(i)=angle2(ith)
.......

enddo

ÕâÑù¾Í°Ñ²»Í¬rµÄÒÆ¶¯Ð´ÈëÒ»¸öÎļþ£¬ÔÙÓÃstart£¬save²¨º­£¬À´¼Ì³ÐÉÏÒ»¸ö¹¹Ð͵IJ¨º­¡£
ÄþÔÚһ˼½ø£¬ÄªÔÚһ˼ͣ
4Â¥2012-11-07 21:41:52
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

qishiyy

Òø³æ (СÓÐÃûÆø)

ÒýÓûØÌû:
4Â¥: Originally posted by fmklz at 2012-11-07 21:41:52
ÎÒûÓÐÍêÈ«Ã÷°×ÄãµÄÒâ˼¡£¼òµ¥ËµÁ½¾ä°É
1.ÄãÒªÊÇÏë´ïµ½Õâ¸öÄ¿µÄÄØ£¿-----ÄÇÖ»ÉèRΪ±äÁ¿¼´¿É£¬ÆäËûΪ³£Êý£¬¾Í¿ÉÒÔÁË¡£
2.¸öÈ˾õµÃʵ¼ÊÇé¿ö£¬R½ÏԶʱ£¬¹¹Ðͱ仯²»´ó£¬µ«½Ï½üʱ£¬¹¹ÐͿ϶¨ÓÐЩ±ä»¯£¬Ôڹ̶¨rֵʱ£¬ÓÅ»¯ ...

¸ÐлÄãµÄ°ïÖú£¬ÎÊÌâ½â¾öÁË
5Â¥2012-11-10 14:50:01
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
Ïà¹Ø°æ¿éÌø×ª ÎÒÒª¶©ÔÄÂ¥Ö÷ qishiyy µÄÖ÷Ìâ¸üÐÂ
×î¾ßÈËÆøÈÈÌûÍÆ¼ö [²é¿´È«²¿] ×÷Õß »Ø/¿´ ×îºó·¢±í
[¿¼ÑÐ] 291Çóµ÷¼Á +13 hhhhxn.. 2026-03-23 19/950 2026-03-28 04:12 by fmesaito
[¿¼ÑÐ] Çóµ÷¼Á +8 ÕÅzz111 2026-03-27 9/450 2026-03-28 03:41 by fmesaito
[¿¼ÑÐ] 0856²ÄÁÏ»¯¹¤µ÷¼Á ×Ü·Ö330 +10 zhubinhao 2026-03-27 10/500 2026-03-28 03:34 by fmesaito
[¿¼ÑÐ] һ־Ը̫ԭÀí¹¤°²È«¹¤³Ì300·Ö£¬Çóµ÷¼Á +4 0857Çóµ÷¼Á. 2026-03-24 4/200 2026-03-27 14:03 by ¾²¾²¾²¾²¾²¾²¾²¾
[¿¼ÑÐ] 0703»¯Ñ§Ò»Ö¾Ô¸ÄϾ©Ê¦·¶´óѧ303Çóµ÷¼Á +3 zzffylgg 2026-03-24 3/150 2026-03-27 10:42 by shangxh
[¿¼ÑÐ] 324Çóµ÷¼Á +5 hanamiko 2026-03-26 5/250 2026-03-27 10:33 by wangjy2002
[¿¼ÑÐ] Çóµ÷¼Á323²ÄÁÏÓ뻯¹¤ +7 1124361 2026-03-24 7/350 2026-03-27 10:22 by wangjy2002
[¿¼ÑÐ] 359Çóµ÷¼Á +4 ÍõÁ˸öéª 2026-03-25 4/200 2026-03-27 08:43 by ²»³Ôô~µÄ؈
[¿¼ÑÐ] 351Çóµ÷¼Á +4 Âó¿Ë°¢ÀÚ 2026-03-24 4/200 2026-03-27 00:32 by wxiongid
[¿¼ÑÐ] 321Çóµ÷¼Á +5 ²ÄÁÏcailiao 2026-03-21 5/250 2026-03-26 20:41 by fmesaito
[¿¼ÑÐ] Ò»Ö¾Ô¸ÖÐÄÏ´óѧ»¯Ñ§Ñ§Ë¶0703×Ü·Ö337Çóµ÷¼Á +7 niko- 2026-03-22 7/350 2026-03-25 20:14 by qingfeng258
[¿¼ÑÐ] 311Çóµ÷¼Á +3 ¶¬Ê®Èý 2026-03-24 3/150 2026-03-24 21:31 by peike
[¿¼ÑÐ] 0703»¯Ñ§µ÷¼Á£¬Çóµ¼Ê¦ÊÕ +7 ÌìÌìºÃÔËÀ´Éϰ¶° 2026-03-24 7/350 2026-03-24 20:26 by peike
[¿¼ÑÐ] 292Çóµ÷¼Á +4 ¶ì¶ì¶ì¶î¶î¶î¶î¶ 2026-03-24 4/200 2026-03-24 16:41 by peike
[¿¼ÑÐ] 080500Çóµ÷¼Á +3 zzzzfan 2026-03-24 3/150 2026-03-24 16:38 by barlinike
[¿¼ÑÐ] 307Çóµ÷¼Á +3 ÓàÒâÇä 2026-03-21 6/300 2026-03-24 15:03 by ÓàÒâÇä
[¿¼ÑÐ] Çóµ÷¼ÁÒ»Ö¾Ô¸Î人Àí¹¤´óѧ²ÄÁϹ¤³Ì£¨085601£© +5 WW.' 2026-03-23 7/350 2026-03-24 14:50 by sprinining
[¿¼ÑÐ] һ־Ըɽ¶«´óѧҩѧѧ˶Çóµ÷¼Á +3 ¿ª¿ªÐÄÐÄû·³ÄÕ 2026-03-23 4/200 2026-03-24 00:06 by ¿ª¿ªÐÄÐÄû·³ÄÕ
[¿¼ÑÐ] 333Çóµ÷¼Á +3 ALULU4408 2026-03-23 3/150 2026-03-23 19:04 by macy2011
[¿¼ÑÐ] ¹¤¿Æ0856Çóµ÷¼Á +5 ãåÎö͡͡ 2026-03-21 5/250 2026-03-23 17:56 by º£ÉªÞ±-
ÐÅÏ¢Ìáʾ
ÇëÌî´¦ÀíÒâ¼û