±±¾©Ê¯ÓÍ»¯¹¤Ñ§Ôº2026ÄêÑо¿ÉúÕÐÉú½ÓÊÕµ÷¼Á¹«¸æ
²é¿´: 876  |  »Ø¸´: 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 µÄÖ÷Ìâ¸üÐÂ
×î¾ßÈËÆøÈÈÌûÍÆ¼ö [²é¿´È«²¿] ×÷Õß »Ø/¿´ ×îºó·¢±í
[¿¼ÑÐ] 086000µ÷¼Á +3 7901117076 2026-03-26 3/150 2026-03-27 21:34 by Jianing_Mi
[Óлú½»Á÷] ¸ßθßѹ·´Ó¦ÇóÖú 10+4 chibby 2026-03-25 4/200 2026-03-27 21:08 by BT20230424
[¿¼ÑÐ] 265Çóµ÷¼Á11408 +3 ÁõС¹lu 2026-03-27 3/150 2026-03-27 20:53 by nihaoar
[¿¼ÑÐ] ¿¼Ñе÷¼Á +4 Sanmu-124 2026-03-26 4/200 2026-03-27 17:49 by kiokin
[¿¼ÑÐ] Ò»Ö¾Ô¸Äϲý´óѧ324Çóµ÷¼Á +3 hanamiko 2026-03-27 3/150 2026-03-27 17:08 by lbsjt
[¿¼ÑÐ] 266·ÖÇó²ÄÁÏ»¯¹¤Ò±½ð¿óÒµµÈרҵµÄµ÷¼Á +4 ÍÛºôºßºôºß 2026-03-26 4/200 2026-03-27 17:02 by zhyzzh
[¿¼ÑÐ] 0856µ÷¼Á +5 ÇóÇóÈÃÎÒÓÐÊé¶Á° 2026-03-26 6/300 2026-03-27 15:12 by caszguilin
[¿¼ÑÐ] 311Çóµ÷¼Á +7 lin0039 2026-03-26 7/350 2026-03-27 12:42 by ¹û¹ûÂèßä
[¿¼ÑÐ] 334Çóµ÷¼Á +3 ÓêÇåÌìÇç 2026-03-21 3/150 2026-03-27 11:30 by ²»³Ôô~µÄ؈
[¿¼ÑÐ] 0703»¯Ñ§Ò»Ö¾Ô¸ÄϾ©Ê¦·¶´óѧ303Çóµ÷¼Á +3 zzffylgg 2026-03-24 3/150 2026-03-27 10:42 by shangxh
[¿¼ÑÐ] 333Çóµ÷¼Á +7 87639 2026-03-21 12/600 2026-03-26 22:08 by ²»³Ôô~µÄ؈
[¿¼ÑÐ] Ò»Ö¾Ô¸±±»¯Çóµ÷¼Á +3 Jsman 2026-03-22 3/150 2026-03-26 21:06 by ajpv·çÀ×
[¿¼ÑÐ] »¯Ñ§¹¤³Ì085602 305·ÖÇóµ÷¼Á +17 RichLi_ 2026-03-25 17/850 2026-03-26 19:44 by plmuchong
[¿¼ÑÐ] 334·Ö Ò»Ö¾Ô¸ÎäÀí ²ÄÁÏÇóµ÷¼Á +4 ÀîÀî²»·þÊä 2026-03-26 4/200 2026-03-26 16:00 by ²»³Ôô~µÄ؈
[¿¼ÑÐ] 085600 ²ÄÁÏÓ뻯¹¤ 329·ÖÇóµ÷¼Á +9 Mr. Z 2026-03-25 9/450 2026-03-26 10:36 by baoball
[¿¼ÑÐ] Ò»Ö¾Ô¸ÉϺ£½»´óÉúÎïÓëҽҩר˶324·Ö£¬Çóµ÷¼Á +6 jiajunX 2026-03-22 6/300 2026-03-25 23:05 by licg0208
[¿¼ÑÐ] 26¿¼ÑÐ-291·Ö-ÏÃÃÅ´óѧ£¨085601£©-ÈáÐÔµç×ÓѧԺ²ÄÁϹ¤³ÌרҵÇóµ÷¼Á +3 min3 2026-03-24 4/200 2026-03-25 18:22 by xcjcqu
[¿¼ÑÐ] ÉϺ£µçÁ¦´óѧ²ÄÁÏ·À»¤ÓëвÄÁÏÖØµãʵÑéÊÒÕÐÊÕµ÷¼ÁÑо¿Éú£¨²ÄÁÏ¡¢»¯Ñ§¡¢µç»¯Ñ§£¬»·¾³£© +4 ÎÒ°®Ñ§µç³Ø 2026-03-23 4/200 2026-03-25 00:59 by 1027_324
[¿¼ÑÐ] »·¾³Ñ§Ë¶288Çóµ÷¼Á +8 ƤƤƤ123456 2026-03-22 8/400 2026-03-23 23:47 by ÈÈÇéɳĮ
[¿¼ÑÐ] Çóµ÷¼ÁԺУÐÅÏ¢ +6 CX 330 2026-03-21 6/300 2026-03-22 15:25 by ÎÞи¿É»÷111
ÐÅÏ¢Ìáʾ
ÇëÌî´¦ÀíÒâ¼û