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

yuankanxue

½ð³æ (ÖøÃûдÊÖ)

·Ö×ÓÍæ¼Ò

[½»Á÷] ¡¾ÇóÖú¡¿³ÌÐòÔËÐкó³öÏֵĴíÎó access violation ÒÑÓÐ3È˲ÎÓë

forrtl: severe (157): Program Exception - access violation
Image              PC        Routine            Line        Source
mean square.exe    0040173D  Unknown               Unknown  Unknown
mean square.exe    00401438  Unknown               Unknown  Unknown
mean square.exe    00443859  Unknown               Unknown  Unknown
mean square.exe    00427EF9  Unknown               Unknown  Unknown
kernel32.dll       7C817077  Unknown               Unknown  Unknown

Incrementally linked image--PC correlation disabled.

Íí±²³õÓÃfortran²»¾Ã£¬»¹ÇëÄÜÕßÌáÌá²Î¿¼Òâ¼û£¡
»Ø¸´´ËÂ¥

» ²ÂÄãϲ»¶

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

ÓÐÖ¾Õßʾ¹³É£¬ÃÎÏë¸øÎÒ·½Ïò£¬·½·¨ÊÇЧÂÊ£¬Å¬Á¦Êǽݾ¶£¬Ê§°ÜÊÇÀÏʦ¡£
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

snoopyzhao

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

·¢³öÀ´¿´¿´°É£¬Ö»Òª±ðÌ«³¤£¬±ðÉæ¼°±£ÃܵÈÊÂÒ˾ͺ㬺Ǻǡ­¡­
4Â¥2010-07-04 09:06:20
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
²é¿´È«²¿ 16 ¸ö»Ø´ð

snoopyzhao

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

¡ï
yuankanxue(½ð±Ò+1):лл²ÎÓë
¿ÉÒÔ¿´¿´ÏÂÃæ
http://software.intel.com/en-us/forums/showthread.php?t=60219

ÁíÍ⣬ûÓдúÂëÖ»ÄÜÊÇϹ²ÂÁË¡­¡­
2Â¥2010-07-04 07:29:33
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

yuankanxue

½ð³æ (ÖøÃûдÊÖ)

·Ö×ÓÍæ¼Ò

ÒýÓûØÌû:
Originally posted by snoopyzhao at 2010-07-04 07:29:33:
¿ÉÒÔ¿´¿´ÏÂÃæ
http://software.intel.com/en-us/forums/showthread.php?t=60219

ÁíÍ⣬ûÓдúÂëÖ»ÄÜÊÇϹ²ÂÁË¡­¡­

¿´²»Ã÷°×£¬ÎÒÏëÏÈ¿´¿´Êé¡£Èç¹ûÄãÓпÕÓÖÔ¸Òâ¿´¿´ÎҵĴúÂ루²»³¤£©£¬ÎҾͷ¢¹ýÀ´¡£
ÓÐÖ¾Õßʾ¹³É£¬ÃÎÏë¸øÎÒ·½Ïò£¬·½·¨ÊÇЧÂÊ£¬Å¬Á¦Êǽݾ¶£¬Ê§°ÜÊÇÀÏʦ¡£
3Â¥2010-07-04 08:45:41
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

yuankanxue

½ð³æ (ÖøÃûдÊÖ)

·Ö×ÓÍæ¼Ò

ÒýÓûØÌû:
Originally posted by snoopyzhao at 2010-07-04 09:06:20:
·¢³öÀ´¿´¿´°É£¬Ö»Òª±ðÌ«³¤£¬±ðÉæ¼°±£ÃܵÈÊÂÒ˾ͺ㬺Ǻǡ­¡­

ºÃµÄ
program main !SAWÁ´±ê¶ÈϵÊýµÄÊýÖµ¼ÆËã
        IMPLICIT NONE
        real*8 RK,RE,SUMM(1:2),DIF
        INTEGER :: X(0:1000200,1:2)
        INTEGER I,J,ITN,YES
        X(0,=0
        SUMM(1:2)=0
        DO I=1,1000200  !SAW×Ô±ÜÐÐ×ß
11        CALL RANDOM_NUMBER(RK)
        ITN=int(4*RK)
        IF(ITN==0) THEN
        X(I,1)=X(I-1,1)+1
      X(I,2)=X(I-1,2)
      ELSEIF(ITN==1)THEN
        X(I,1)=X(I-1,1)-1
        x(I,2)=X(I-1,2)
        ELSEIF(ITN==2)THEN
        X(I,2)=X(I-1,2)+1
        X(I,1)=X(I-1,1)
        ELSEIF(ITN==3)THEN
        X(I,2)=X(I-1,2)-1
        X(I,1)=X(I-1,1)
        ENDIF
    !  ÅųýÌå»ý¼ìÑé
        CALL BIOTEST(I,X,YES)         
        IF(YES==1)THEN
        GOTO 11           
        ENDIF
        END DO
        DO I=1,2
        DO J=1,1000000
        SUMM(I)=SUMM(I)+(X(J+50*I,1)-X(J,1))**2+(X(J+50*I,2)-X(J,2))**2  
          END DO
        END DO
        DIF=LOG(SUMM(2)/1000000.0)-LOG(SUMM(1)/1000000.0)
        PRINT*,DIF/(LOG(100.0)-LOG(50.0))
        END PROGRAM MAIN


      SUBROUTINE BIOTEST(I,X,YES)
        IMPLICIT NONE
        INTEGER :: I,X(0:10000200,1:2),J,YES
        DO J=0,I-1
        IF(X(J,1)==X(I,1).AND.X(J,2)==X(I,2))THEN
        YES=1
        EXIT
        END IF
        END DO
        YES=0
        END SUBROUTINE BIOTEST
ÏÈ¿´¿´ÀýÐÐ×Ó³ÌÐò²ÎÊýÓÐûÓÐÎÊÌâ
ÓÐÖ¾Õßʾ¹³É£¬ÃÎÏë¸øÎÒ·½Ïò£¬·½·¨ÊÇЧÂÊ£¬Å¬Á¦Êǽݾ¶£¬Ê§°ÜÊÇÀÏʦ¡£
5Â¥2010-07-04 09:20:07
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
×î¾ßÈËÆøÈÈÌûÍÆ¼ö [²é¿´È«²¿] ×÷Õß »Ø/¿´ ×îºó·¢±í
[»ù½ðÉêÇë] ͶƱ:  ÓжàÉÙÈËÊǽñÌì²éϵͳ֪µÀ½á¹ûµÄ£¿ +15 °®¿´ÊéµÄ¿ÉÀÖ 2026-08-26 17/850 2026-08-27 07:12 by xxniao123
[»ù½ðÉêÇë] ¹ú×ÔÈ»ÃæÉϸ´ÅÌ~»¶Ó­ÌÖÂÛ +5 ÇçÌì¼ÓÓÍ 2026-08-26 6/300 2026-08-27 04:49 by littlezl
[˶²©¼ÒÔ°] ÊÛSCIÒ»ÇøT0PÎÄÕ£¬ÎÒ:8.O.55.1.O.54,¿ÆÄ¿ÆëÈ«,¿É+¼± +3 LIbGuocjEEYw 2026-08-26 4/200 2026-08-27 02:01 by Ie9AyIAvGbvs
[»ù½ðÉêÇë] ÎÒ²»Àí½â£¡ +15 Edward_pc 2026-08-26 23/1150 2026-08-26 20:34 by zzuzxg
[»ù½ðÉêÇë] ϵͳ²é²»µ½ +10 ¶­°Ëǧ 2026-08-26 10/500 2026-08-26 16:30 by Equinoxhua
[»ù½ðÉêÇë] 2026Äê8ÔÂ25ÈÕ¹ú×ÔÈ»·Å°ñǰͻȻÊÕµ½ÁÐÈëÆÀÉóר¼ÒÓʼþ£¬ÓйØÏµÂ𣿠+25 ľˮ˼¶¹ 2026-08-25 28/1400 2026-08-26 14:53 by draco1987
[»ù½ðÉêÇë] ÄÜ·ñÍ˳ö²ÎÓëµÄÃæÉÏÏîÄ¿½â³ýÏÞÏî +23 koalala 2026-08-24 26/1300 2026-08-26 14:29 by ±¦±´³æ×Ó
[»ù½ðÉêÇë] ³öÀ´ÁË +9 trojank 2026-08-26 9/450 2026-08-26 14:25 by ±¦±´³æ×Ó
[»ù½ðÉêÇë] ϵͳ½ø²»È¥ +4 yanglien 2026-08-26 5/250 2026-08-26 11:10 by wenfengw83
[»ù½ðÉêÇë] ÏîÄ¿ÐÅÏ¢ºÍ¾­·ÑÐÅÏ¢ÔÚϵͳÀï¶¼¿ÉÒÔ¿´µ½ÁË +6 wittyboy 2026-08-26 14/700 2026-08-26 10:55 by wittyboy
[»ù½ðÉêÇë] Ôõô¿´Çà»ùÖÐÁËûÓа¡ +4 Ò¶¾Å΢ 2026-08-26 4/200 2026-08-26 10:52 by xiacongxu
[Ö°³¡ÈËÉú] ѧÉúײ¼û¸¨µ¼Ô±ËÍÍâÂô£¬µÚ¶þÌìÈ«°à¶¼³ÁĬÁË +3 ¾¨ÓãÈÚ½ð_Õã½­_É 2026-08-22 3/150 2026-08-26 09:01 by zzuzxg
[»ù½ðÉêÇë] ¹úºÏÏÖÔڲ鲻µ½ÁËÂ𣿠+10 chengyan1220 2026-08-24 20/1000 2026-08-26 08:57 by peasantsprig
[»ù½ðÉêÇë] Èç¹û´Ë¿ÌÄãÕýÔÚΪ¹ú»ù¸Ðµ½½¹ÂÇ£¬²»·ÁÀ´ÌýÌýÕâÊס¶»ù½ðÖ®Íâ¡· +8 scalable 2026-08-24 8/400 2026-08-25 12:52 by jnhyjjm
[»ù½ðÉêÇë] ûÓÐÈκÎÏûÏ¢-ÊDz»ÊǾÍÁ¹ÁË +9 ͼÀ²Í¼À² 2026-08-24 10/500 2026-08-25 11:59 by ÄϺ£Ð¡¸ç
[»ù½ðÉêÇë] ÈËÆø²»ÐÐÁË +11 fansofjerry 2026-08-21 11/550 2026-08-25 11:04 by ¹Â¶ÀµÄÓ¢ÐÛ6
[»ù½ðÉêÇë] ÎÒÃæÉÏÍêµ°ÁË +13 ÇÒÌý»¢Ð¥ 2026-08-20 14/700 2026-08-25 09:10 by mrkang
[»ù½ðÉêÇë] ½¨Òé»ù½ð·¢²¼Ìáǰ¸ø³öÃ÷È·µÄʱ¼äµã +13 kulium 2026-08-21 16/800 2026-08-24 16:27 by superceng
[»ù½ðÉêÇë] ʱ¼ä´Á½ñÌ죬20ºÅ±äÁË +5 archvillain 2026-08-20 5/250 2026-08-22 06:12 by hui_daxiao
[»ù½ðÉêÇë] Ó¦¸ÃÊÇÏÂÖÜÈý26ÈÕ¹«²¼Á˰ɣ¿ +4 ¹þ¹þ¸ò£¿ 2026-08-21 4/200 2026-08-21 10:58 by Vivilian
ÐÅÏ¢Ìáʾ
ÇëÌî´¦ÀíÒâ¼û