±±¾©Ê¯ÓÍ»¯¹¤Ñ§Ôº2026ÄêÑо¿ÉúÕÐÉú½ÓÊÕµ÷¼Á¹«¸æ
²é¿´: 1251  |  »Ø¸´: 10
µ±Ç°Ö»ÏÔʾÂú×ãÖ¸¶¨Ìõ¼þµÄ»ØÌû£¬µã»÷ÕâÀï²é¿´±¾»°ÌâµÄËùÓлØÌû

li_clifff

Òø³æ (ÕýʽдÊÖ)

[ÇóÖú] ÔÚHP Fortran 90µÄÒ»¸ö±àÒëÎÊÌâ:incomplete statement, лл

ÔÚHP Fortran 90ϽøÐбàÒ룬³öÏÖÎÊÌ⣺
function WN
error 707 at£¨73£ºmain.f£© incomplete statement
ÆäÖÐ, ÎÒµÄfunction WNÊÇÕâÑùдµÄ£º
! ============== WN
        function WN
        implicit none
        real*8 WN
        real mkrand(12)
        integer i
        call RANDOM_NUMBER(mkrand)
        WN=0.D0; do i=1,12; WN=WN+mkrand(i); enddo; WN=WN-6.D0
        return
        end
Ϊʲô˵Îҵĺ¯ÊýWNÊÇ incomplete statement, û¿´³öÀ´£¬Çë°ï棬лл
»Ø¸´´ËÂ¥

» ²ÂÄãϲ»¶

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

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

li_clifff

Òø³æ (ÕýʽдÊÖ)

ÒýÓûØÌû:
4Â¥: Originally posted by cean at 2012-02-11 12:59:05:
µÚ73ÐÐÊÇÄǾ䣿ÊÇÕâÒ»¾ä²»ÍêÕû¡£²é²é¡£

µÚ73ÐоÍÊÇ

function WN
5Â¥2012-02-11 13:03:44
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
²é¿´È«²¿ 11 ¸ö»Ø´ð

snoopyzhao

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

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

¸Ðл²ÎÓ룬ӦÖúÖ¸Êý +1
li_clifff(½ð±Ò+10): ¡ïÓаïÖú 2012-02-11 13:37:49
ben_ladeng(½ð±Ò+2, ר¼Ò¿¼ºË): 2012-02-11 14:16:07
°Ñ function WN ¸Ä³É function WN() ¿´¿´¡­¡­

ÊÖͷûÓÐ HP Fortran£¬Ã»Óа취ÑéÖ¤¡­¡­
2Â¥2012-02-11 12:16:57
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

li_clifff

Òø³æ (ÕýʽдÊÖ)

ÒýÓûØÌû:
Â¥: Originally posted by snoopyzhao at 2012-02-11 12:16:57:
°Ñ function WN ¸Ä³É function WN() ¿´¿´¡­¡­

ÊÖͷûÓÐ HP Fortran£¬Ã»Óа취ÑéÖ¤¡­¡­

¶÷£¬¼ÓÁË£¨£©»áÓÐÓÃÂð£¿ÎÒÊÔÊÔ¿´
3Â¥2012-02-11 12:55:20
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

cean

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

ŒÅÉþÒ»Ìõ

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

¸Ðл²ÎÓ룬ӦÖúÖ¸Êý +1
µÚ73ÐÐÊÇÄǾ䣿ÊÇÕâÒ»¾ä²»ÍêÕû¡£²é²é¡£
To do great work, you have to have a pure mind.
4Â¥2012-02-11 12:59:05
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
×î¾ßÈËÆøÈÈÌûÍÆ¼ö [²é¿´È«²¿] ×÷Õß »Ø/¿´ ×îºó·¢±í
[¿¼ÑÐ] Ò»Ö¾Ô¸»ªÀí£¬ÊýÒ»Ó¢Ò»285ÇóAÇøµ÷¼Á +8 AZMK 2026-03-25 12/600 2026-03-28 18:15 by AZMK
[¿¼ÑÐ] Çó»¯Ñ§µ÷¼Á +4 wulanna 2026-03-28 4/200 2026-03-28 13:37 by ÌÆãå¶ù
[¿¼ÑÐ] 0703»¯Ñ§Çóµ÷¼Á +9 ÄÌÓͲÝÝ®. 2026-03-22 10/500 2026-03-28 13:30 by ÌÆãå¶ù
[¿¼ÑÐ] 0856£¬²ÄÁÏÓ뻯¹¤321·ÖÇóµ÷¼Á +12 ´ó²öС×Ó 2026-03-27 13/650 2026-03-28 10:56 by self2008
[¿¼ÑÐ] 339Çóµ÷¼Á£¬Ïëµ÷»Ø½­ËÕ +6 ¿¾ÂóÑ¿ 2026-03-27 8/400 2026-03-28 10:40 by ¿¾ÂóÑ¿
[¿¼ÑÐ] 081200-314 +3 LILIQQ 2026-03-27 4/200 2026-03-28 09:41 by ±£»¤µØÇòÄãÎÒ×öÆ
[¿¼ÑÐ] 292Çóµ÷¼Á +14 ¶ì¶ì¶ì¶î¶î¶î¶î¶ 2026-03-25 15/750 2026-03-28 08:45 by WYUMater
[¿¼ÑÐ] 311Çóµ÷¼Á +3 Ï£ÍûÉϰ¶°¢Ð¡Ñî 2026-03-23 3/150 2026-03-28 07:57 by ÈÈÇéɳĮ
[¿¼ÑÐ] ²ÄÁÏÇóµ÷¼Á Ò»Ö¾Ô¸¹þ¹¤´ó×Ü·Ö298·Ö£¬Ç°Èý¿Æ223·Ö +5 dongfang59 2026-03-27 5/250 2026-03-28 04:53 by wxiongid
[¿¼ÑÐ] 085600²ÄÁÏÓ뻯¹¤µ÷¼Á +10 A-¶ßÀ²ZÃÎ 2026-03-23 16/800 2026-03-27 15:13 by caszguilin
[¿¼ÑÐ] Ò»Ö¾Ô¸»ª¶«Àí¹¤´óѧ081700£¬³õÊÔ·ÖÊý271 +6 kotoko_ik 2026-03-23 7/350 2026-03-27 12:29 by »ÝÖÝÅíÓÚêÌ
[¿¼ÑÐ] 271Çóµ÷¼Á +6 ÉúÈçÏÄ»¨¡­ 2026-03-22 6/300 2026-03-26 16:48 by ÕÅ¿­Ê®°ËºÅ
[¿¼ÑÐ] ×Ü·Ö293Çóµ÷¼Á +6 ¼ÓÒ»Ò»¾Å 2026-03-25 8/400 2026-03-26 13:30 by yujianx
[¿¼ÑÐ] 07»¯Ñ§303Çóµ÷¼Á +5 î£08 2026-03-25 5/250 2026-03-25 22:46 by 418490947
[¿¼ÑÐ] Ò»Ö¾Ô¸ÄϺ½ 335·Ö | 0856²ÄÁÏ»¯¹¤ | GPA 4.07 | ÓпÆÑо­Àú +6 cccchenso 2026-03-23 6/300 2026-03-25 22:25 by 544594351
[¿¼ÑÐ] 284Çóµ÷¼Á +15 Zhao anqi 2026-03-22 15/750 2026-03-25 12:51 by wht0531
[¿¼ÑÐ] 282Çóµ÷¼Á +3 wcq131415 2026-03-24 3/150 2026-03-25 12:16 by userper
[¿¼ÑÐ] ÉúÎïѧѧ˶Çóµ÷¼Á +7 СÑò˯×ÅÁË? 2026-03-23 10/500 2026-03-25 02:24 by Çå·ç·÷Ñï¡£ m
[¿¼ÑÐ] 300·Ö£¬²ÄÁÏ£¬Çóµ÷¼Á£¬Ó¢Ò»Êý¶þ +5 ³¬ÔÞµÄ 2026-03-24 5/250 2026-03-24 21:07 by ÐÇ¿ÕÐÇÔÂ
[¿¼ÑÐ] 341Çóµ÷¼Á(Ò»Ö¾Ô¸ºþÄÏ´óѧ070300) +5 ·¬ÇÑÍ·--- 2026-03-22 6/300 2026-03-23 23:45 by Txy@872106
ÐÅÏ¢Ìáʾ
ÇëÌî´¦ÀíÒâ¼û