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

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

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


ÒýÓûØÌû:
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µÄ»ØÌû

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µÄ»ØÌû

ygl820

ÖÁ×ðľ³æ (ÖªÃû×÷¼Ò)


¡ï
black2982(½ð±Ò+1):лл²ÎÓë
¶ÁÈëµÄÊý¾ÝÎļþ¸ñʽ²»¶Ô£¬Ó¦¸ÃÊÇÕûÊýintger£¬¼ì²éÊý¾ÝÎļþ¡° 11...¡±ÕâÒ»ÐÐÓÐûÓзǷ¨×Ö·û¡£
6Â¥2012-02-21 10:06:49
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

black2982

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


ÒýÓûØÌû:
6Â¥: Originally posted by ygl820 at 2012-02-21 10:06:49:
¶ÁÈëµÄÊý¾ÝÎļþ¸ñʽ²»¶Ô£¬Ó¦¸ÃÊÇÕûÊýintger£¬¼ì²éÊý¾ÝÎļþ¡° 11...¡±ÕâÒ»ÐÐÓÐûÓзǷ¨×Ö·û¡£

ºÃµÄ, лл
7Â¥2012-02-21 20:00:23
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

emanlee

ľ³æ (СÓÐÃûÆø)


¡ï
black2982(½ð±Ò+1):лл²ÎÓë
SampleÎļþ:
  11 23  11 23  0  1  1                 % IAN1 IMN1 IAN2 IMN2 CHARGE NDEGv NDEBv
=================================================
SampleÎļþÖУ¬¼ì²é¡°11¡±Ç°ÃæÊÇ·ñÓпոñ£¬Èç¹ûÓеϰɾµô¿Õ¸ñ¡£
°Ñ % ¼°ºóÃæµÄÄÚÈݶ¼É¾³ý£¬ÔÙÊÔÒ»ÊÔ¡£
8Â¥2012-02-21 22:45:07
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
¡ï
black2982(½ð±Ò+1):лл²ÎÓë
ÓàÔó³É(½ð±Ò+2): лл²ÎÓëÓ¦Öú£¡ 2012-02-25 04:37:49
ÎÒ²âÊÔÁËÒ»ÏÂËùÌù³öÀ´µÄ 86 ¾äÒÔ¼°ÄǸöÊý¾ÝÐУ¬´úÂëûÓÐʲôÎÊÌ⣬ËùÒÔÎÊÌâÔÚÓÚÆäËüµÄÎÊÌâ

LZ ¿ÉÒÔ³¢ÊÔ×ÅÔÚ
2 READ(5,*,END=99) IAN1, IMN1, IAN2, IMN2, CHARGE, NDEGv, NDEBv
Ö®ºó¼ÓÒ»ÐÐ
write(*,*) IAN1, IMN1, IAN2, IMN2, CHARGE, NDEGv, NDEBv

¿´¿´Êä³öÊÇ·ñÕý³£¡­¡­
9Â¥2012-02-23 14:03:20
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

18766315007

гæ (ÖøÃûдÊÖ)


¡ï
black2982(½ð±Ò+1): лл²ÎÓë
ÇëÎÊÂ¥Ö÷£¬½â¾öÁËÂð£¿

·¢×ÔСľ³æAndroid¿Í»§¶Ë
10Â¥2016-10-19 15:28:13
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
Ïà¹Ø°æ¿éÌø×ª ÎÒÒª¶©ÔÄÂ¥Ö÷ black2982 µÄÖ÷Ìâ¸üÐÂ
×î¾ßÈËÆøÈÈÌûÍÆ¼ö [²é¿´È«²¿] ×÷Õß »Ø/¿´ ×îºó·¢±í
[¿¼ÑÐ] 274Çóµ÷¼Á +5 S.H1 2026-03-18 5/250 2026-03-18 21:27 by guosr9609
[¿¼ÑÐ] 281Çóµ÷¼Á£¨0805£© +6 ÑÌÏ«Ò亣 2026-03-16 15/750 2026-03-18 21:12 by Gaodh_82
[¿¼ÑÐ] ²ÄÁÏרҵÇóµ÷¼Á +5 hanamiko 2026-03-18 5/250 2026-03-18 20:19 by ÐÇ¿ÕÐÇÔÂ
[¿¼ÑÐ] Ò»Ö¾Ô¸985£¬±¾¿Æ211£¬0817»¯Ñ§¹¤³ÌÓë¼¼Êõ319Çóµ÷¼Á +7 Liwangman 2026-03-15 7/350 2026-03-18 20:08 by walc
[¿¼ÑÐ] Ò»Ö¾Ô¸Ìì´ó²ÄÁÏÓ뻯¹¤£¨085600£©×Ü·Ö338 +3 ²Ì´óÃÀÅ® 2026-03-13 3/150 2026-03-18 15:53 by jhhcooi
[¿¼ÑÐ] 286Çóµ÷¼Á +6 lemonzzn 2026-03-16 9/450 2026-03-18 15:31 by vgtyfty
[¿¼ÑÐ] »¯Ñ§¹¤³Ì321·ÖÇóµ÷¼Á +15 ´óÃ×·¹£¡ 2026-03-15 18/900 2026-03-18 14:52 by haxia
[¿¼ÑÐ] 304Çóµ÷¼Á +12 СÐÜjoy 2026-03-14 13/650 2026-03-18 12:34 by Linda Hu
[¿¼ÑÐ] 299Çóµ÷¼Á +5 ¡÷С͸Ã÷* 2026-03-17 5/250 2026-03-18 11:49 by ¾¡Ë´Ò¢1
[¿¼ÑÐ] 303Çóµ÷¼Á +4 î£08 2026-03-17 6/300 2026-03-18 11:01 by Iveryant
[¿¼ÑÐ] 0703»¯Ñ§µ÷¼Á +3 ÄÝÄÝninicgb 2026-03-17 3/150 2026-03-18 10:29 by macy2011
[¿¼ÑÐ] »·¾³¹¤³Ìµ÷¼Á +8 ´ó¿Édigkids 2026-03-16 8/400 2026-03-18 09:36 by zhukairuo
[¿¼ÑÐ] 268Çóµ÷¼Á +7 ºÃÔËÁ¬Ã಻¾ø 2026-03-12 8/400 2026-03-17 20:28 by xilongliang
[¿¼ÑÐ] ÖпÆÔº²ÄÁÏ273Çóµ÷¼Á +4 yzydy 2026-03-15 4/200 2026-03-16 15:59 by Gaodh_82
[¿¼ÑÐ] 0703 ÎïÀí»¯Ñ§µ÷¼Á +3 ÎÒ¿ÉÒÔÉϰ¶µÄ¶Ô 2026-03-13 5/250 2026-03-16 10:50 by ÎÒ¿ÉÒÔÉϰ¶µÄ¶ÔÂ
[¿¼ÑÐ] 26¿¼ÑÐÒ»Ö¾Ô¸ÖйúʯÓÍ´óѧ(»ª¶«)305·ÖÇóµ÷¼Á +3 ¼ÎÄêÐÂ³Ì 2026-03-15 3/150 2026-03-15 13:58 by ¹þ¹þ¹þ¹þºÙºÙºÙ
[¿¼ÑÐ] 289Çóµ÷¼Á +4 ÕâôÃû×ÖÕ¦Ñù 2026-03-14 6/300 2026-03-14 18:58 by userper
[¿¼ÑÐ] 26µ÷¼Á/²ÄÁÏ¿ÆÑ§Ó빤³Ì/×Ü·Ö295/ÇóÊÕÁô +9 2026µ÷¼ÁÏÀ 2026-03-12 9/450 2026-03-13 20:46 by 18595523086
[¿¼ÑÐ] 0817»¯Ñ§¹¤³ÌÓë¼¼Êõ¿¼ÑÐ312·Öµ÷¼Á +3 T123 tt 2026-03-12 3/150 2026-03-13 10:49 by houyaoxu
[¿¼ÑÐ] 321Çóµ÷¼Á£¨Ê³Æ·/ר˶£© +3 xc321 2026-03-12 6/300 2026-03-13 08:45 by xc321
ÐÅÏ¢Ìáʾ
ÇëÌî´¦ÀíÒâ¼û