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

bian890

Í­³æ (³õÈëÎÄ̳)

[½»Á÷] ¡¾ÇóÖú¡¿INDX = IARGC() CALL GETARG(1,CMONT) ÒÑÓÐ2È˲ÎÓë

СŮ×Ó¶ÔÓÚFortranÓï·¨²»ÊÇÌ«Á˽â ÇëÎÊ1¡¢
INDX = IARGC()
      IF (INDX.NE.1) THEN
         NERRS = 1
         WRITE (0,'(A)') 'Just one command line argument allowed'
         CALL ERROR ('DEFCON',5)
      ENDIF
ÖÐINDX = IARGC()ÊÇʲôÒâ˼£¿ NERRSÊÇFORTRAN×Ô´øµÄÒ»¸ö±äÁ¿É¶µÄÂð£¿
2¡¢
CALL GETARG(1,CMONT)   Õâ¾äµÄÒâ˼ÊÇɶ£¿ÓÈÆäÊÇGETARG ÊÇʲôÒâË¼ÄØ£¿
ллºÃÐÄÈËÊ¿   ÍûÖªÇéÕ߸úÌû  Ð»Ð»
¼±
»Ø¸´´ËÂ¥

» ÊÕ¼±¾ÌûµÄÌÔÌûר¼­ÍƼö

fortranÏà¹Ø

» ²ÂÄãϲ»¶

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

snoopyzhao

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

¡ï ¡ï ¡ï
Сľ³æ(½ð±Ò+0.5):¸ø¸öºì°ü£¬Ð»Ð»»ØÌû½»Á÷
ÓàÔó³É(½ð±Ò+2):лл²ÎÓëÓ¦Öú£¡ 2010-07-16 15:43:58
INDX = IARGC()  ½« IARGC() Õâ¸öº¯ÊýµÄ½á¹û¸³¸ø INDX

NERRS Ö»ÊÇÒ»¸öÆÕͨµÄ±äÁ¿¶øÒÑ£¬²»ÊÇ Fortran ×Ô´øµÄ±äÁ¿¡£

GETARG ºÍÇ°ÃæµÄ IARGC ¶¼ÊÇϵͳµÄº¯Êý£¬Ç°Ò»¸öÊÇ»ñµÃ³ÌÐòºóÃæµÄ²ÎÊý£¬µÚ¶þ¸öÓ¦¸ÃÊÇ»ñµÃ²ÎÊýµÄ¸öÊý£¬¾ßÌå¼Ç²»ÇåÁË¡£

Èç¹ûÔÚ Linux Ï£¬¿ÉÒÔͨ¹ý man À´»ñµÃËüÃÇ µÄÊÖ²áÒ³¡£

µ±È»£¬ÄãÒ²¿ÉÒÔ¿´ÄãËùÓÃµÄ Fortran ϵͳµÄÊֲᣬÀïÃæÓÐÏêϸµÄ½éÉܵġ£
2Â¥2010-07-16 13:55:59
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

bian890

Í­³æ (³õÈëÎÄ̳)

лл ÎÒÔÚ²éÒ»ÏÂFortranµÄÊÖ²á

лл ÎÒÔÚ²éÒ»ÏÂFortranµÄÊÖ²á
3Â¥2010-07-19 12:57:42
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
Ïà¹Ø°æ¿éÌø×ª ÎÒÒª¶©ÔÄÂ¥Ö÷ bian890 µÄÖ÷Ìâ¸üÐÂ
×î¾ßÈËÆøÈÈÌûÍÆ¼ö [²é¿´È«²¿] ×÷Õß »Ø/¿´ ×îºó·¢±í
[¿¼ÑÐ] 291Çóµ÷¼Á +3 Y-cap 2026-03-29 3/150 2026-03-29 07:34 by Î޼ʵIJÝÔ­
[¿¼ÑÐ] 0856Çóµ÷¼Á +6 —öèñ 2026-03-28 6/300 2026-03-29 00:31 by 544594351
[¿¼ÑÐ] ±¾¿ÆÐÂÄÜÔ´¿ÆÑ§Ó빤³Ì£¬Ò»Ö¾Ô¸»ªÀíÄܶ¯285Çóµ÷¼Á +7 AZMK 2026-03-28 11/550 2026-03-28 21:01 by xxxsssccc
[¿¼ÑÐ] Ò»Ö¾Ô¸±±»¯085600²ÄÁÏר˶275|ÓÐÎÄÕÂרÀû£üÇóµ÷¼Á +7 Micky11223 2026-03-25 7/350 2026-03-28 18:34 by Î޼ʵIJÝÔ­
[¿¼ÑÐ] ±¾¿ÆÐÂÄÜÔ´¿ÆÑ§Ó빤³Ì£¬Ò»Ö¾Ô¸»ªÀíÄܶ¯285Çóµ÷¼Á +3 AZMK 2026-03-27 5/250 2026-03-28 16:19 by xxxsssccc
[¿¼ÑÐ] ¸´ÊÔµ÷¼Á +3 raojunqi0129 2026-03-28 3/150 2026-03-28 15:27 by ÂäÉ˼
[¿¼ÑÐ] 070300»¯Ñ§Çóµ÷¼Á +4 Æð¸öÃûÕ¦ÕâôÄÑ 2026-03-27 4/200 2026-03-27 21:39 by 83503ËïÀÏʦ
[¿¼ÑÐ] 086000µ÷¼Á +3 7901117076 2026-03-26 3/150 2026-03-27 21:34 by Jianing_Mi
[¿¼ÑÐ] 266·ÖÇó²ÄÁÏ»¯¹¤Ò±½ð¿óÒµµÈרҵµÄµ÷¼Á +4 ÍÛºôºßºôºß 2026-03-26 4/200 2026-03-27 17:02 by zhyzzh
[¿¼ÑÐ] 0856µ÷¼Á +5 ÇóÇóÈÃÎÒÓÐÊé¶Á° 2026-03-26 6/300 2026-03-27 15:12 by caszguilin
[¿¼ÑÐ] »¯Ñ§308·ÖÇóµ÷¼Á +8 ÄãºÃÃ÷ÌìÄãºÃ 2026-03-23 9/450 2026-03-27 14:01 by Ñî¹âÓÚÇàÔÆ
[¿¼ÑÐ] ¡¾Ë«Ò»Á÷ԺУÐÂÄÜÔ´¡¢»·¾³²ÄÁÏ£¬²ÄÁϼӹ¤ÓëÄ£ÄâÕÐÊÕ´óÁ¿µ÷¼Á¡¿ +4 Higraduate 2026-03-22 8/400 2026-03-26 20:34 by Higraduate
[¿¼ÑÐ] ÉúÎïѧ 296 Çóµ÷¼Á +4 ¶ä¶ä- 2026-03-26 6/300 2026-03-26 19:01 by ²»³Ôô~µÄ؈
[¿¼ÑÐ] Ò»Ö¾Ô¸ÉϺ£½»´óÉúÎïÓëҽҩר˶324·Ö£¬Çóµ÷¼Á +6 jiajunX 2026-03-22 6/300 2026-03-25 23:05 by licg0208
[¿¼ÑÐ] ¸÷λÀÏʦÄúºÃ£º±¾È˳õÊÔ372·Ö +5 jjÓ¿77 2026-03-25 6/300 2026-03-25 14:15 by mapenggao
[¿¼ÑÐ] µ÷¼Á +4 13853210211 2026-03-24 4/200 2026-03-24 19:44 by ms629
[Óлú½»Á÷] ÓлúºÏ³ÉÇóÖú 20+3 FENGSHUJEI 2026-03-23 5/250 2026-03-24 19:31 by 88817753
[¿¼ÑÐ] ²ÄÁÏר˶ÕÒµ÷¼Á +5 ¹þ¹þ¹þºðºðºð¹þ 2026-03-23 5/250 2026-03-24 19:07 by ÁËÁËÁËÁË¡£¡£
[¿¼ÑÐ] Çóµ÷¼Á +6 ÑÐÑУ¬½Óµç»° 2026-03-24 7/350 2026-03-24 17:01 by barlinike
[¿¼ÑÐ] һ־Ըɽ¶«´óѧҩѧѧ˶Çóµ÷¼Á +3 ¿ª¿ªÐÄÐÄû·³ÄÕ 2026-03-23 4/200 2026-03-24 00:06 by ¿ª¿ªÐÄÐÄû·³ÄÕ
ÐÅÏ¢Ìáʾ
ÇëÌî´¦ÀíÒâ¼û