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

zhouzh2011

Òø³æ (³õÈëÎÄ̳)

[ÇóÖú] Ë­ÄܰïÎÒ¿´¿´Õâ¶ÎFortran³ÌÐò£¬²»Ê¤¸Ð¼¤

Ë­ÄܰïÎÒ¿´¿´Õâ¶ÎFortran³ÌÐò£¬ÓëµÚÒ»ÐÔÔ­Àí¼ÆËãÓйص쬲»Ê¤¸Ð¼¤£¡
»Ø¸´´ËÂ¥

» ±¾Ìû¸½¼þ×ÊÔ´Áбí

  • »¶Ó­¼à¶½ºÍ·´À¡£ºÐ¡Ä¾³æ½öÌṩ½»Á÷ƽ̨£¬²»¶Ô¸ÃÄÚÈݸºÔð¡£
    ±¾ÄÚÈÝÓÉÓû§×ÔÖ÷·¢²¼£¬Èç¹ûÆäÄÚÈÝÉæ¼°µ½ÖªÊ¶²úȨÎÊÌ⣬ÆäÔðÈÎÔÚÓÚÓû§±¾ÈË£¬Èç¶Ô°æÈ¨ÓÐÒìÒ飬ÇëÁªÏµÓÊÏ䣺xiaomuchong@tal.com
  • ¸½¼þ 1 : fmg.f
  • 2012-04-12 17:24:39, 7.18 K

» ²ÂÄãϲ»¶

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

ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

snoopyzhao

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

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

¡ï
¸Ðл²ÎÓ룬ӦÖúÖ¸Êý +1
zhouzh2011: ½ð±Ò+1 2012-04-12 19:45:11
ɶÎÊÌâÄØ£¿Õâ¶¼²»Ëµ±ðÈËÔõô¿´£¿
2Â¥2012-04-12 18:46:36
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

zhouzh2011

Òø³æ (³õÈëÎÄ̳)

ÒýÓûØÌû:
2Â¥: Originally posted by snoopyzhao at 2012-04-12 18:46:36:
ɶÎÊÌâÄØ£¿Õâ¶¼²»Ëµ±ðÈËÔõô¿´£¿

ºÇºÇ£¬Óи½¼þ£¬ÎÒ¶Ôfortran»ù±¾²»¶®£¬ÎÒÏëÖªµÀÕâ¸öÎļþÖ´ÐÐʱÊÇÔõôÊäÈ룬Êä³öµÄ£¿Ð»Ð»ÁË~
3Â¥2012-04-12 19:46:19
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

snoopyzhao

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

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

xzhdty: , »¶Ó­³£À´³ÌÐòÓïÑÔ 2012-04-12 21:42:35
Ó÷¨ÔÚÎļþÖв»ÊÇÓÐÂ𣿵±È»£¬³ýÁËÕâ¸öÖ®Í⣬ÎÒÒ²¿´²»¶®£¬ºÇºÇ¡­¡­
CODE:
c---------------------------------------------------------------------
c     Utility program which handle the data in the file used
c     by 'cpa91' such that rearrangement of the records,
c     including the chnage in the number of the component atoms
c     and reversing of the spin direction, becomes possible.
c     Input data cards have a form like the following:
c
c     file1  1  2  3  4
c     file2  1  2 -1 -2
c
c     In this case 4 data named respectively 1, 2, 3, and 4 of
c     inout file will be output in the sequence of 1, 2, 1, 2 and
c     further the spin direction for the last two data is reversed.
c     Another example:
c
c     file1  1  2
c     file1  1  2  1  2
c
c     In this case both the input and the output files is file1, and
c     for the input only 2 data, 1 and 2, are assumed to recorded but
c     to be expanded up to 4 data in the output.
c     See inside for further detail.
c     The program uses some routines provided by 'cpasub91'.
c     coded by H. Akai, 27 aug. 1991 in Juelich
c---------------------------------------------------------------------

4Â¥2012-04-12 20:00:19
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

zhouzh2011

Òø³æ (³õÈëÎÄ̳)

ÒýÓûØÌû:
4Â¥: Originally posted by snoopyzhao at 2012-04-12 20:00:19:
Ó÷¨ÔÚÎļþÖв»ÊÇÓÐÂ𣿵±È»£¬³ýÁËÕâ¸öÖ®Í⣬ÎÒÒ²¿´²»¶®£¬ºÇºÇ¡­¡­


c---------------------------------------------------------------------
c     Utility program which handle the data in the file u ...

ºÇºÇ£¬¾ÍÊDz»ÊǺܶ®£¬ÄÜÚ¹ÊÍһϾͺÃÁË
5Â¥2012-04-12 21:06:19
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

q1036210267

ľ³æ (ÕýʽдÊÖ)

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

¸Ðл²ÎÓ룬ӦÖúÖ¸Êý +1
¿´¹ýÁË¡£°ï¶¥Ï¡£
ÎÒÏÖÔÚ×öµÄÊÇ·Ö×ÓÄ£Äâ¼ÆËã¡£¶ÔÓÚÄãµÄÁ¿»¯¼ÆË㣬ÎÒ±íʾѹÁ¦ºÜ´ó¡£¡£
Éú»îÖмá³Ö¿ìÀÖµÄÔ­Ôò²»¸Ä±ä£¬Ñ§Ï°¹¤×÷ÖÐ̤ʵÉϽø£¡`~`
6Â¥2012-04-14 11:48:09
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

zhouzh2011

Òø³æ (³õÈëÎÄ̳)

ÒýÓûØÌû:
6Â¥: Originally posted by q1036210267 at 2012-04-14 11:48:09:
¿´¹ýÁË¡£°ï¶¥Ï¡£
ÎÒÏÖÔÚ×öµÄÊÇ·Ö×ÓÄ£Äâ¼ÆËã¡£¶ÔÓÚÄãµÄÁ¿»¯¼ÆË㣬ÎÒ±íʾѹÁ¦ºÜ´ó¡£¡£

ºÇºÇ£¬Ð»Ð»¡£ÄãÄÜ¿´¶® ÎÒÆäʵ²»ÖªµÀÕâ¸ö³ÌÐòµ½µ×ÊÇÔõÑùʵÏÖthe chnage in the number of the component atoms
and reversing of the spin directionµÄ£¬ÊäÈëÖеÄ1 2 3 4ÓÖÊǺÎÒâÒ壿
7Â¥2012-04-14 12:50:34
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
Ïà¹Ø°æ¿éÌø×ª ÎÒÒª¶©ÔÄÂ¥Ö÷ zhouzh2011 µÄÖ÷Ìâ¸üÐÂ
×î¾ßÈËÆøÈÈÌûÍÆ¼ö [²é¿´È«²¿] ×÷Õß »Ø/¿´ ×îºó·¢±í
[¿¼ÑÐ] 309Çóµ÷¼Á +11 ´ô¹½²»ÊÇ´÷·ò 2026-04-02 11/550 2026-04-02 22:48 by ¿ÆÑÐСר¼Ò
[¿¼ÑÐ] »·¾³¿ÆÑ§Ó빤³Ì334·ÖÇóµ÷¼Á +7 ÍõÒ»Ò»ÒÀÒÀ 2026-03-30 9/450 2026-04-02 21:15 by 1104338198
[¿¼ÑÐ] Çóµ÷¼Á +7 Aniyaio 2026-04-02 7/350 2026-04-02 16:42 by zzsw+
[¿¼ÑÐ] µ÷¼Á +3 ºÃºÃ¶ÁÊé¡£ 2026-04-01 6/300 2026-04-02 15:49 by liumengping
[¿¼ÑÐ] Ò»Ö¾Ô¸Äϲý´óѧ324Çóµ÷¼Á +12 hanamiko 2026-04-01 12/600 2026-04-02 14:51 by 5896
[¿¼ÑÐ] 311Çóµ÷¼Á +14 À¶ÔÂÁÁÁÁ 2026-03-30 14/700 2026-04-02 12:18 by 1753564080
[¿¼ÑÐ] Ò»Ö¾Ô¸±±¾©Àí¹¤´óѧ±¾¿Æ211²ÄÁϹ¤³Ì294Çóµ÷¼Á +8 mikasaµÄΧ½í 2026-03-28 9/450 2026-04-02 12:09 by ms629
[¿¼ÑÐ] 266·Ö£¬Ò»Ö¾Ô¸µçÆø¹¤³Ì£¬±¾¿Æ²ÄÁÏ£¬Çó²ÄÁÏרҵµ÷¼Á +10 ÍÛºôºßºôºß 2026-04-01 11/550 2026-04-01 21:48 by chyhaha
[¿¼ÑÐ] Çóµ÷¼Á0703 +5 ÖܼÎÒ¢ 2026-03-31 8/400 2026-04-01 20:32 by ltltkkk
[¿¼ÑÐ] 085600 Ò»Ö¾Ô¸9 ×Ü·Ö351 Çóµ÷¼ÁѧУ +7 czhcz 2026-03-31 9/450 2026-04-01 19:24 by Î޼ʵIJÝÔ­
[¿¼ÑÐ] 086000ÉúÎïÓëÒ½Ò© ³õÊÔ274Çóµ÷¼Á +5 С¶£µ±À´ÁË 2026-03-30 6/300 2026-04-01 14:25 by mxj1203
[¿¼ÑÐ] »¯Ñ§0703 µ÷¼Á 306·Ö Ò»Ö¾Ô¸211 +12 26ÒªÉϰ¶ 2026-03-28 12/600 2026-04-01 11:10 by chemdavid
[¿¼ÑÐ] 289Çóµ÷¼Á +7 BrightLL 2026-03-29 7/350 2026-03-31 22:05 by 544594351
[¿¼ÑÐ] 0856 335·Ö +9 cccchenso 2026-03-29 9/450 2026-03-31 16:37 by lishahe
[¿¼ÑÐ] Ò»Ö¾Ô¸Î÷µç085401ÊýÒ»Ó¢Ò»299Çóµ÷¼Á Áù¼¶521 +4 °®³Ô´óѼÀæ 2026-03-31 4/200 2026-03-31 11:51 by ²«»÷518
[¿¼ÑÐ] 269Çóµ÷¼Á +4 ÎÒÏë¶ÁÑÐ11 2026-03-31 4/200 2026-03-31 10:04 by cal0306
[¿¼ÑÐ] 296Çóµ÷¼Á +10 ±Ë°¶t 2026-03-29 10/500 2026-03-30 10:50 by ̽123
[¿¼ÑÐ] 305Çóµ÷¼Á +8 RuiFairyrui 2026-03-28 8/400 2026-03-29 08:22 by fmesaito
[¿¼ÑÐ] µ÷¼Á¿¼ÑÐ +3 Íõ½ÜÒ» 2026-03-29 3/150 2026-03-29 08:09 by fmesaito
[¿¼ÑÐ] 081200-314 +3 LILIQQ 2026-03-27 4/200 2026-03-28 09:41 by ±£»¤µØÇòÄãÎÒ×öÆ
ÐÅÏ¢Ìáʾ
ÇëÌî´¦ÀíÒâ¼û