±±¾©Ê¯ÓÍ»¯¹¤Ñ§Ôº2026ÄêÑо¿ÉúÕÐÉú½ÓÊÕµ÷¼Á¹«¸æ
²é¿´: 804  |  »Ø¸´: 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 µÄÖ÷Ìâ¸üÐÂ
×î¾ßÈËÆøÈÈÌûÍÆ¼ö [²é¿´È«²¿] ×÷Õß »Ø/¿´ ×îºó·¢±í
[¿¼ÑÐ] 071000ÉúÎïѧµ÷¼Á +3 ÖªÕÑÂû 2026-04-02 3/150 2026-04-02 11:48 by youngjohn
[¿¼ÑÐ] 0805Çóµ÷¼Á +8 ÊÇË®·Ö 2026-03-31 8/400 2026-04-02 10:46 by guanxin1001
[¿¼ÑÐ] 385·Ö ÉúÎïѧ£¨071000£©Çóµ÷¼Á +6 qf626 2026-04-01 6/300 2026-04-02 10:39 by guoweigw
[¿¼ÑÐ] 0710ÉúÎïѧÇóµ÷¼Á +9 manman511 2026-04-01 9/450 2026-04-02 10:00 by zxl830724
[¿¼ÑÐ] Ò»Ö¾Ô¸°²»Õ´óѧ¼ÆËã»ú¿ÆÑ§Óë¼¼Êõѧ˶£¬331·ÖÇóµ÷¼Á +5 ½¯²ýÅôqtj 2026-04-01 5/250 2026-04-02 08:10 by fxue1114
[¿¼ÑÐ] 291Çóµ÷¼Á +20 Y-cap 2026-03-29 25/1250 2026-04-01 23:49 by ÐÀϲ777
[¿¼ÑÐ] 085600£¬320·ÖÇóµ÷¼Á +5 ´ó²öС×Ó 2026-04-01 6/300 2026-04-01 19:40 by ÌÆãå¶ù
[¿¼ÑÐ] 085600 Ò»Ö¾Ô¸9 ×Ü·Ö351 Çóµ÷¼ÁѧУ +7 czhcz 2026-03-31 9/450 2026-04-01 19:24 by Î޼ʵIJÝÔ­
[¿¼ÑÐ] ºÏ·ÊÇøÓòÐÔÖØµãÒ»±¾ÕÐÊÕµ÷¼Á +4 6266jl 2026-03-30 8/400 2026-03-31 18:43 by 6266jl
[¿¼²©] ²ÄÁÏרҵÉ격 +5 ¶ÅÓêæÃdyt 2026-03-29 5/250 2026-03-31 11:19 by oooqiao
[¿¼ÑÐ] 276Çóµ÷¼Á +3 ÕԾûª 2026-03-29 3/150 2026-03-31 10:06 by cal0306
[¿¼ÑÐ] 083000»·¾³¿ÆÑ§Ó빤³Ìµ÷¼Á£¬×Ü·Ö281 +4 ³È×Ó£¨Ê¤Ò⣩ 2026-03-30 4/200 2026-03-31 00:44 by Linzejun
[¿¼ÑÐ] 085602»¯¹¤Çóµ÷¼Á£¨331·Ö£© +8 111@127 2026-03-30 8/400 2026-03-30 21:23 by Ñо¿É®µ¼µ¼
[¿¼ÑÐ] 281Çóµ÷¼Á +5 ÑÇ¿ËÎ÷good 2026-03-26 7/350 2026-03-30 20:42 by dophin1985
[¿¼ÑÐ] µ÷¼Á +4 GK72 2026-03-30 4/200 2026-03-30 20:32 by dick_runner
[¿¼ÑÐ] 279Çóµ÷¼Á +12 jµÄÁ¢·½ 2026-03-29 12/600 2026-03-30 20:30 by dick_runner
[¿¼ÑÐ] 0703 »¯Ñ§ Çóµ÷¼Á£¬Ò»Ö¾Ô¸É½¶«´óѧ 342 ·Ö +7 Shern¡ª- 2026-03-28 7/350 2026-03-30 16:31 by nothingͶ¸åÖÐ
[¿¼ÑÐ] 279Çóµ÷¼Á +4 µûÎèÇáÈÆ 2026-03-29 4/200 2026-03-29 09:45 by laoshidan
[¿¼ÑÐ] Çóµ÷¼Á +7 ÕùÈ¡¾Åµã˯ 2026-03-28 8/400 2026-03-28 21:07 by ÕùÈ¡¾Åµã˯
[¿¼ÑÐ] 0856µ÷¼Á +5 ÇóÇóÈÃÎÒÓÐÊé¶Á° 2026-03-26 6/300 2026-03-27 15:12 by caszguilin
ÐÅÏ¢Ìáʾ
ÇëÌî´¦ÀíÒâ¼û