²é¿´: 990  |  »Ø¸´: 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µÄ»ØÌû

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µÄ»ØÌû
²é¿´È«²¿ 5 ¸ö»Ø´ð

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µÄ»ØÌû
×î¾ßÈËÆøÈÈÌûÍÆ¼ö [²é¿´È«²¿] ×÷Õß »Ø/¿´ ×îºó·¢±í
[˶²©¼ÒÔ°] ÊÛSCIÒ»ÇøT0PÎÄÕ£¬ÎÒ:8.O.55.1.O.54,¿ÆÄ¿ÆëÈ«,¿É+¼± +3 LIbGuocjEEYw 2026-08-26 4/200 2026-08-27 02:01 by Ie9AyIAvGbvs
[»ù½ðÉêÇë] »ù½ð²»ÖУ¬¹²Ãã +5 eulota 2026-08-26 5/250 2026-08-26 23:33 by young90
[»ù½ðÉêÇë] ¿´°åÉÏÕâô¶àÖеģ¬ÓеãÏñ50ÈËȺÀï49¸öÈ˶¼ÊÇÆ­×ÓµÄÄÇÖָоõ¡­¡­ +3 a089 2026-08-26 3/150 2026-08-26 23:21 by young90
[»ù½ðÉêÇë] 2026¹ú×ÔÈ»º¯ÆÀ·Ñµ½ÕË +22 ÑòÑü°å 2026-08-21 25/1250 2026-08-26 15:00 by zuocuiping
[»ù½ðÉêÇë] ÄÜ·ñÍ˳ö²ÎÓëµÄÃæÉÏÏîÄ¿½â³ýÏÞÏî +23 koalala 2026-08-24 26/1300 2026-08-26 14:29 by ±¦±´³æ×Ó
[»ù½ðÉêÇë] ³öÀ´ÁË +9 trojank 2026-08-26 9/450 2026-08-26 14:25 by ±¦±´³æ×Ó
[»ù½ðÉêÇë] Ôõô¿´Çà»ùÖÐÁËûÓа¡ +4 Ò¶¾Å΢ 2026-08-26 4/200 2026-08-26 10:52 by xiacongxu
[»ù½ðÉêÇë] ¹úºÏ¿É²éÁË +3 paperzjh 2026-08-26 3/150 2026-08-26 10:41 by LemmonTr
[Ö°³¡ÈËÉú] ѧÉúײ¼û¸¨µ¼Ô±ËÍÍâÂô£¬µÚ¶þÌìÈ«°à¶¼³ÁĬÁË +3 ¾¨ÓãÈÚ½ð_Õã½­_É 2026-08-22 3/150 2026-08-26 09:01 by zzuzxg
[»ù½ðÉêÇë] ¹úºÏÏÖÔڲ鲻µ½ÁËÂ𣿠+10 chengyan1220 2026-08-24 20/1000 2026-08-26 08:57 by peasantsprig
[»ù½ðÉêÇë] Ã÷ÌìÓ¦¸Ã¿É²éÁË£¡£¿ +6 chengyan1220 2026-08-23 6/300 2026-08-25 19:45 by zfd97
[»ù½ðÉêÇë] ijЩ»ú¹¹£¬ÒÔЧÂʵÍΪÈÙ£¬ÒÔЧÂʵÍ×÷Ϊ´æÔڸР+9 yuleib84 2026-08-25 10/500 2026-08-25 17:14 by alexon
[»ù½ðÉêÇë] Èç¹û´Ë¿ÌÄãÕýÔÚΪ¹ú»ù¸Ðµ½½¹ÂÇ£¬²»·ÁÀ´ÌýÌýÕâÊס¶»ù½ðÖ®Íâ¡· +8 scalable 2026-08-24 8/400 2026-08-25 12:52 by jnhyjjm
[»ù½ðÉêÇë] ûÓÐÈκÎÏûÏ¢-ÊDz»ÊǾÍÁ¹ÁË +9 ͼÀ²Í¼À² 2026-08-24 10/500 2026-08-25 11:59 by ÄϺ£Ð¡¸ç
[»ù½ðÉêÇë] ÈËÆø²»ÐÐÁË +11 fansofjerry 2026-08-21 11/550 2026-08-25 11:04 by ¹Â¶ÀµÄÓ¢ÐÛ6
[»ù½ðÉêÇë] ÈÃÎÒÖÐÒ»¸öÃæÉϰɣ¡ +13 ´óƼ1987 2026-08-20 16/800 2026-08-24 10:23 by ̫ɵÁË
[½Ìʦ֮¼Ò] Ìø²ÛºóÔÚÑÐÏîÄ¿Ôõô°ì£¿ +5 ¼òµ¥»¯xn 2026-08-22 10/500 2026-08-23 12:38 by ¼òµ¥»¯xn
[»ù½ðÉêÇë] ʱ¼ä´ÁÓÖ±äÁË +13 wuchongjun 2026-08-20 19/950 2026-08-21 17:21 by ×Ïɼ´¼
[»ù½ðÉêÇë] Ó¦¸ÃÊÇÏÂÖÜÈý26ÈÕ¹«²¼Á˰ɣ¿ +4 ¹þ¹þ¸ò£¿ 2026-08-21 4/200 2026-08-21 10:58 by Vivilian
[»ù½ðÉêÇë] »ù½ð°¡»ù½ð +4 longfie172 2026-08-20 4/200 2026-08-21 08:58 by mark mao
ÐÅÏ¢Ìáʾ
ÇëÌî´¦ÀíÒâ¼û