²é¿´: 2392  |  »Ø¸´: 9
µ±Ç°Ö»ÏÔʾÂú×ãÖ¸¶¨Ìõ¼þµÄ»ØÌû£¬µã»÷ÕâÀï²é¿´±¾»°ÌâµÄËùÓлØÌû

black2982

½ð³æ (СÓÐÃûÆø)


[½»Á÷] Fortran ±àÒëÎÊÌâ

ÎÒ´ÓÍøÉÏ£¨http://leroy.uwaterloo.ca/programs.html£©ÏÂÁËÒ»¸öfortranµÄ³ÌÐòRKR1, ÊÇÓÃÀ´¼ÆËã·Ö×Ó¹âÆ×³£ÊýµÄÃâ·Ñ³ÌÐò, µ«ÊÇÖ»ÓгÌÐòÔ´´úÂë, ²¢ÇÒÊÇÓÃÓʼþ¸ñʽ·¢¹ýÀ´µÄ, ÎÒÊÔ×ŰѳÌÐòÔ´´úÂ뿽³öÀ´×÷³ÉÎı¾Îļþ, ²¢ÇÒת»»³Éfortran¸ñʽ£¬ÓÃÒ»¸öÍøÉϱàÒëÆ÷½øÐÐÁ˱àÒ룬ȻºóÓÃËü·¢¹ýÀ´µÄsampleÎļþ(ͬÑùÊÇÓʼþ·¢ËÍ)ÔËÐвâÊÔ£¬³ÌÐò¸ø³öÒ»¸ö´íÎó¡°At line 86 of file ZERTh1fI.f Fortran runtime error: Bad  integer for item 1 in list input¡°

ÏëÎÊÒ»ÏÂÕâÈË´íÎóÎÒ¸ÃÔõô½â¾öÄØ£¿»¹ÓУ¬ÓÉÓÚÎÒ¶ÔÓÚ³ÌÐòµÄÁ˽âÌ«ÉÙ£¬²»ÖªµÀÓÐûÓÐÈËÔ¸Òâ°ïÎÒ½â¾öһϣ¬ÎÒ»á°ÑÔ´³ÌÐòºÍsampleÎļþ·¢¹ýÀ´¡£
»Ø¸´´ËÂ¥

» ²ÂÄãϲ»¶

» ±¾Ö÷ÌâÏà¹ØÉ̼ÒÍÆ¼ö: (ÎÒÒ²ÒªÔÚÕâÀïÍÆ¹ã)

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

» ÇÀ½ð±ÒÀ²£¡»ØÌû¾Í¿ÉÒԵõ½:

²é¿´È«²¿É¢½ðÌù

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

black2982

½ð³æ (СÓÐÃûÆø)


ÒýÓûØÌû:
3Â¥: Originally posted by lurencyj at 2012-02-20 17:18:33:
ÄǸö´íÎóÐÅϢ˵sampleÎļþÀïÃæµÄµÚÒ»¸öÊäÈë²ÎÊýÓ¦¸ÃÊÇÕûÊý£¬µ«Êµ¼ÊÉϲ»ÊǸöÕûÊý¡£

лл, ¿ÉÊÇÎÒµÄsampleÎļþµÚÒ»¸öÊäÈë²ÎÊýÊÇÕûÊý

³ÌÐòµÚ86ÐÐ:
   2 READ(5,*,END=99) IAN1, IMN1, IAN2, IMN2, CHARGE, NDEGv, NDEBv


SampleÎļþ:
  11 23  11 23  0  1  1                 % IAN1 IMN1 IAN2 IMN2 CHARGE NDEGv NDEBv
'(iii) Liu et al. JCP 111, 3494 (1999) NDE functions for Na2:  VEXT = 0'
6  1  1 1  3 2   61.41d0  4.4867d-2   % NLR ITYPE IZP0 IZQ0 NP0 NQ0 VD XCN0
0.436636d0  -3.529d-3  1.54d-5
4.8d-2  1.366d-2
3  1 0  7 0  3.0921d-3                % ITYPB IZP1 IZQ1 NP1 NQ1 XCN1
0.1341d0  -1.6863d-2  9.2d-4  -2.810837d-5  4.924d-7  -4.61952d-9  1.8d-11
1  2   0.d0                           % Kaiser NSV VEXT
  -0.4d0  0.2d0  1.6d0                 %(1) V1 DV V2
   1.d0   1.0d0 61.d0                  %(2) V1 DV V2
4Â¥2012-02-21 09:42:39
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
²é¿´È«²¿ 10 ¸ö»Ø´ð

lijie169

Í­³æ (ÖøÃûдÊÖ)


¡ï
black2982(½ð±Ò+1):лл²ÎÓë
Äã²»¶®Fortranô£¿Õâ¸öÊÇÔËÐдíÎó....
2Â¥2012-02-20 12:24:07
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

lurencyj

ľ³æ (ÖøÃûдÊÖ)


¡ï
black2982(½ð±Ò+1):лл²ÎÓë
ÄǸö´íÎóÐÅϢ˵sampleÎļþÀïÃæµÄµÚÒ»¸öÊäÈë²ÎÊýÓ¦¸ÃÊÇÕûÊý£¬µ«Êµ¼ÊÉϲ»ÊǸöÕûÊý¡£
3Â¥2012-02-20 17:18:33
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

black2982

½ð³æ (СÓÐÃûÆø)


ÒýÓûØÌû:
2Â¥: Originally posted by lijie169 at 2012-02-20 12:24:07:
Äã²»¶®Fortranô£¿Õâ¸öÊÇÔËÐдíÎó....

ÊǵÄ, ²»¶®, ÇëÎÊÓ¦¸ÃÔõô½â¾öÄØ?лл
5Â¥2012-02-21 09:52:17
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
×î¾ßÈËÆøÈÈÌûÍÆ¼ö [²é¿´È«²¿] ×÷Õß »Ø/¿´ ×îºó·¢±í
[¿¼ÑÐ] 311Çóµ÷¼Á +9 ¶¬Ê®Èý 2026-03-15 10/500 2026-03-17 22:53 by lbsjt
[¿¼ÑÐ] ÄÜÔ´²ÄÁÏ»¯Ñ§¿ÎÌâ×éÕÐÊÕ˶ʿÑо¿Éú8-10Ãû +3 ÍÑÓ±¶ø³ö 2026-03-16 6/300 2026-03-17 21:19 by z1z2z3879
[¿¼ÑÐ] 277µ÷¼Á +5 ×ÔÓɼå±ý¹û×Ó 2026-03-16 6/300 2026-03-17 19:26 by Àîleezz
[¿¼ÑÐ] 070300»¯Ñ§319Çóµ÷¼Á +4 ½õÀð0909 2026-03-17 4/200 2026-03-17 18:21 by ÖØ¿ÆÐ¡°ÔÍõ
[¿¼ÑÐ] 211±¾£¬11408Ò»Ö¾Ô¸ÖпÆÔº277·Ö£¬ÔøÔÚÖпÆÔº×Ô¶¯»¯Ëùʵϰ +6 Losir 2026-03-12 7/350 2026-03-17 12:09 by danranxie
[¿¼ÑÐ] 275Çóµ÷¼Á +4 Ì«Ñô»¨ÌìÌ쿪ÐÄ 2026-03-16 4/200 2026-03-17 10:53 by ¹¦·ò·è¿ñ
[¿¼ÑÐ] 070300»¯Ñ§Ñ§Ë¶Çóµ÷¼Á +6 Ì«Ïë½ø²½ÁË0608 2026-03-16 6/300 2026-03-16 16:13 by kykm678
[¿¼ÑÐ] 285Çóµ÷¼Á +6 ytter 2026-03-12 6/300 2026-03-16 15:05 by njzyff
[¿¼ÑÐ] 0703 ÎïÀí»¯Ñ§µ÷¼Á +3 ÎÒ¿ÉÒÔÉϰ¶µÄ¶Ô 2026-03-13 5/250 2026-03-16 10:50 by ÎÒ¿ÉÒÔÉϰ¶µÄ¶ÔÂ
[¿¼ÑÐ] 085601²ÄÁϹ¤³Ì315·ÖÇóµ÷¼Á +3 yang_0104 2026-03-15 3/150 2026-03-15 10:58 by peike
[¿¼ÑÐ] 288Çóµ÷¼Á +4 Ææµã0314 2026-03-14 4/200 2026-03-14 23:04 by JourneyLucky
[¿¼ÑÐ] ¸´ÊÔµ÷¼Á +4 z1z2z3879 2026-03-14 5/250 2026-03-14 16:30 by JourneyLucky
[¿¼ÑÐ] 297Çóµ÷¼Á +4 ѧº£Æ¯²´ 2026-03-13 4/200 2026-03-14 11:51 by ÈÈÇéɳĮ
[¿¼ÑÐ] ÕÐÊÕ0805£¨²ÄÁÏ£©µ÷¼Á +3 18595523086 2026-03-13 3/150 2026-03-14 00:33 by 123%¡¢
[¿¼ÑÐ] ²ÄÁÏÓ뻯¹¤£¨0856£©304ÇóBÇøµ÷¼Á +6 Çñgl 2026-03-12 7/350 2026-03-13 23:24 by Çñgl
[¿¼ÑÐ] £Û0860£Ý321·ÖÇóµ÷¼Á£¬abÇø½Ô¿É +4 ±¦¹óÈÈ 2026-03-13 4/200 2026-03-13 22:01 by ÐÇ¿ÕÐÇÔÂ
[¿¼ÑÐ] ²ÄÁÏÓ뻯¹¤085600µ÷¼ÁÇóÀÏʦÊÕÁô +9 jiaanl 2026-03-11 9/450 2026-03-13 20:22 by JourneyLucky
[¿¼ÑÐ] 0703»¯Ñ§Çóµ÷¼Á +7 Â̶¹ÇÛ²ËÌÀ 2026-03-12 7/350 2026-03-13 17:25 by njzyff
[¿¼ÑÐ] ÍÁľµÚÒ»Ö¾Ô¸276Çóµ÷¼Á£¬¿ÆÑкͼ¼ÄÜÊ®·Ö·á¸»£¬ÇóÐÂÐË·½ÏòµÄµ¼Ê¦ÊÕÁô +3 ÍÁľСÌì²Å 2026-03-12 3/150 2026-03-13 15:01 by JourneyLucky
[¿¼ÑÐ] 308Çóµ÷¼Á +3 ÊÇLupa°¡ 2026-03-12 3/150 2026-03-13 14:30 by Çóµ÷¼Ázz
ÐÅÏ¢Ìáʾ
ÇëÌî´¦ÀíÒâ¼û