版塊導(dǎo)航: 正在加載中...

應(yīng)《網(wǎng)絡(luò)安全法》要求，自2017年10月1日起，未進(jìn)行實(shí)名認(rèn)證將不得使用互聯(lián)網(wǎng)跟帖服務(wù)。為保障您的帳號(hào)能夠正常使用，請(qǐng)盡快對(duì)帳號(hào)進(jìn)行手機(jī)號(hào)驗(yàn)證，感謝您的理解與支持！

24小時(shí)熱門版塊排行榜

北京石油化工學(xué)院2026年研究生招生接收調(diào)劑公告

返回列表

下一頁(yè)

wuluo1213

木蟲 (小有名氣)

應(yīng)助: 5 (幼兒園)
金幣: 2291.6
散金: 10
帖子: 275
在線: 59.5小時(shí)
蟲號(hào): 940174
注冊(cè): 2010-01-10
專業(yè): 制造系統(tǒng)與自動(dòng)化

[求助] 有會(huì)看fortran程序的，能幫忙看看這個(gè)程序嗎？

這個(gè)程序是李尚健的《金屬塑性成形過程模擬》上的，但是，怎么也運(yùn)行不出來，希望大家能過多讀指點(diǎn)�。≈x謝。也歡迎大家一起探討啊！

回復(fù)此樓

» 猜你喜歡

085600，材料與化工321分，求調(diào)劑已經(jīng)有13人回復(fù)
311求調(diào)劑已經(jīng)有8人回復(fù)
348求調(diào)劑已經(jīng)有3人回復(fù)
0805求調(diào)劑已經(jīng)有8人回復(fù)
266分，一志愿電氣工程，本科材料，求材料專業(yè)調(diào)劑已經(jīng)有3人回復(fù)
385分生物學(xué)（071000）求調(diào)劑已經(jīng)有6人回復(fù)
材料調(diào)劑已經(jīng)有3人回復(fù)
一志愿北交大材料工程總分358 已經(jīng)有9人回復(fù)
311求調(diào)劑已經(jīng)有12人回復(fù)
319求調(diào)劑已經(jīng)有11人回復(fù)

» 本主題相關(guān)價(jià)值貼推薦，對(duì)您同樣有幫助:

怎能讓fortran調(diào)用c的fopen和fileio函數(shù) 已經(jīng)有3人回復(fù)
在linux下編FORTRAN程序已經(jīng)有14人回復(fù)
我編的Simpson積分法fortran程序給不出結(jié)果，大俠們看看哪里出了問題？已經(jīng)有4人回復(fù)
求助計(jì)算機(jī)高人，編寫個(gè)Fortran程序已經(jīng)有13人回復(fù)
請(qǐng)教一個(gè)fortran小程序編譯出錯(cuò)的問題，謝謝已經(jīng)有9人回復(fù)
有關(guān)fortran的一次而問題，希望大家能幫幫忙，謝謝已經(jīng)有4人回復(fù)
寫了一個(gè)fortran90的小程序，編譯通不過，請(qǐng)大俠幫忙已經(jīng)有59人回復(fù)
【求助】如何寫FORTRAN程序?qū)崿F(xiàn)求平均最近鄰距離已經(jīng)有34人回復(fù)
【求助】用fortran怎么描述下面這樣的情況，我是新手，請(qǐng)大家?guī)兔?/a> 已經(jīng)有8人回復(fù)

【求助】初學(xué)fortran，已經(jīng)有15人回復(fù)
【求助】Fortran程序，如何讓exe文件可以單獨(dú)運(yùn)行？已經(jīng)有6人回復(fù)
【求助】請(qǐng)問有擬合分子力場(chǎng)參數(shù)的FORTRAN程序嗎？已經(jīng)有13人回復(fù)

沒什么好與不好。

1樓 2011-10-31 21:54:27

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

zuoyh09

金蟲 (正式寫手)

應(yīng)助: 0 (幼兒園)
金幣: 3645.9
散金: 190
紅花: 1
帖子: 588
在線: 114.5小時(shí)
蟲號(hào): 850387
注冊(cè): 2009-09-17
性別: GG
專業(yè): 核技術(shù)及其應(yīng)用

【答案】應(yīng)助回帖

★ ★
jjdg(金幣+2): 辛苦了 2011-11-01 00:30:00

提示數(shù)組的下標(biāo)溢出，結(jié)果如下
forrtl: severe (10): cannot overwrite existing file, unit 1, file D:\try\pcurve.
dat
Image             PC       Routine          Line       Source
EDFEM.exe       004220D9  Unknown             Unknown  Unknown
EDFEM.exe       00421F0B  Unknown             Unknown  Unknown
EDFEM.exe       00421114  Unknown             Unknown  Unknown
EDFEM.exe       00421549  Unknown             Unknown  Unknown
EDFEM.exe       00416874  Unknown             Unknown  Unknown
EDFEM.exe       00401363  Unknown             Unknown  Unknown
EDFEM.exe       0044D739  Unknown             Unknown  Unknown
EDFEM.exe       0043FB24  Unknown             Unknown  Unknown
kernel32.dll    7C817077  Unknown             Unknown  Unknown

Incrementally linked image--PC correlation disabled.
Press any key to continue

你可以試著用F11單步執(zhí)行看看，找到是什么地方緯度溢出了

贊一下(1人)

回復(fù)此樓

2樓2011-10-31 22:55:23

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

mystar

金蟲 (文壇精英)

應(yīng)助: 0 (幼兒園)
貴賓: 1.2
金幣: 1534.1
散金: 1520
紅花: 2
沙發(fā): 1
帖子: 10236
在線: 667.3小時(shí)
蟲號(hào): 91402
注冊(cè): 2005-09-05

★
jjdg(金幣+1): 感謝參與 2011-11-01 00:29:43

cannot overwrite existing file

大概是沒有close

贊一下(1人)

回復(fù)此樓

不要使自己麻木于制度化當(dāng)中，而拋棄了從前的美好事物和希望。

3樓2011-10-31 23:18:33

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

wuluo1213

木蟲 (小有名氣)

應(yīng)助: 5 (幼兒園)
金幣: 2291.6
散金: 10
帖子: 275
在線: 59.5小時(shí)
蟲號(hào): 940174
注冊(cè): 2010-01-10
專業(yè): 制造系統(tǒng)與自動(dòng)化

是的里面有：
open(1,fiLe='pcurve.dat',status='new')
open(2,fiLe='femdat.dat',status='oLd')
open(3,fiLe='femsoL.dat',status='new')
open(4,fiLe='messag.dat',status='new')
open(7,fiLe='midat.dat',status='new')
這個(gè)幾個(gè)打開的文件。先試試 zuoyh09的方法看。多謝大家��！

贊一下

回復(fù)此樓

沒什么好與不好。

4樓2011-11-01 09:10:43

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

snoopyzhao

至尊木蟲 (職業(yè)作家)

程序強(qiáng)帖: 16
應(yīng)助: 157 (高中生)
貴賓: 0.02
金幣: 18844.7
紅花: 29
帖子: 3803
在線: 1422.4小時(shí)
蟲號(hào): 183750
注冊(cè): 2006-02-13
專業(yè): 污染生態(tài)化學(xué)

【答案】應(yīng)助回帖

★ ★
xzhdty(金幣+2): 謝謝參與 2011-11-01 12:00:07

先把下面編譯 log 中的warning都消除了，再看結(jié)果是否是正確的吧……

我用的編譯方式是：

gfortran -Wall -Wextra -O2 -ffixed-line-length-80 EDFEM.for >& z1.log

CODE:

EDFEM.for:52.3:

100     write(*,3000)                                                           

   1

Warning: Label 100 at (1) defined but not used

EDFEM.for:154.14:

110     ieL(m,3)=ieL(m,k2)+1                                                    

              1

Warning: Array reference at (1) is out of bounds (3 > 1) in dimension 2

EDFEM.for:544.21:

        r12=rr(1)-rr(2)                                                         

                     1

Warning: Array reference at (1) is out of bounds (2 > 1) in dimension 1

EDFEM.for:545.21:

        r13=rr(1)-rr(3)                                                         

                     1

Warning: Array reference at (1) is out of bounds (3 > 1) in dimension 1

EDFEM.for:546.21:

        r14=rr(1)-rr(4)                                                         

                     1

Warning: Array reference at (1) is out of bounds (4 > 1) in dimension 1

EDFEM.for:547.21:

        r23=rr(2)-rr(3)                                                         

                     1

Warning: Array reference at (1) is out of bounds (3 > 1) in dimension 1

EDFEM.for:547.15:

        r23=rr(2)-rr(3)                                                         

               1

Warning: Array reference at (1) is out of bounds (2 > 1) in dimension 1

EDFEM.for:548.21:

        r24=rr(2)-rr(4)                                                         

                     1

Warning: Array reference at (1) is out of bounds (4 > 1) in dimension 1

EDFEM.for:548.15:

        r24=rr(2)-rr(4)                                                         

               1

Warning: Array reference at (1) is out of bounds (2 > 1) in dimension 1

EDFEM.for:549.21:

        r34=rr(3)-rr(4)                                                         

                     1

Warning: Array reference at (1) is out of bounds (4 > 1) in dimension 1

EDFEM.for:549.15:

        r34=rr(3)-rr(4)                                                         

               1

Warning: Array reference at (1) is out of bounds (3 > 1) in dimension 1

EDFEM.for:550.21:

        z12=zz(1)-zz(2)                                                         

                     1

Warning: Array reference at (1) is out of bounds (2 > 1) in dimension 1

EDFEM.for:551.21:

        z13=zz(1)-zz(3)                                                         

                     1

Warning: Array reference at (1) is out of bounds (3 > 1) in dimension 1

EDFEM.for:552.21:

        z14=zz(1)-zz(4)                                                         

                     1

Warning: Array reference at (1) is out of bounds (4 > 1) in dimension 1

EDFEM.for:553.21:

        z23=zz(2)-zz(3)                                                         

                     1

Warning: Array reference at (1) is out of bounds (3 > 1) in dimension 1

EDFEM.for:553.15:

        z23=zz(2)-zz(3)                                                         

               1

Warning: Array reference at (1) is out of bounds (2 > 1) in dimension 1

EDFEM.for:554.21:

        z24=zz(2)-zz(4)                                                         

                     1

Warning: Array reference at (1) is out of bounds (4 > 1) in dimension 1

EDFEM.for:554.15:

        z24=zz(2)-zz(4)                                                         

               1

Warning: Array reference at (1) is out of bounds (2 > 1) in dimension 1

EDFEM.for:555.21:

        z34=zz(3)-zz(4)                                                         

                     1

Warning: Array reference at (1) is out of bounds (4 > 1) in dimension 1

EDFEM.for:555.15:

        z34=zz(3)-zz(4)                                                         

               1

Warning: Array reference at (1) is out of bounds (3 > 1) in dimension 1

EDFEM.for:588.12:

        b(1,3)=y2                                                               

            1

Warning: Array reference at (1) is out of bounds (3 > 1) in dimension 2

EDFEM.for:589.12:

        b(1,5)=y3                                                               

            1

Warning: Array reference at (1) is out of bounds (5 > 1) in dimension 2

EDFEM.for:590.12:

        b(1,7)=y4                                                               

            1

Warning: Array reference at (1) is out of bounds (7 > 1) in dimension 2

EDFEM.for:591.12:

        b(2,2)=x1                                                               

            1

Warning: Array reference at (1) is out of bounds (2 > 1) in dimension 2

EDFEM.for:592.12:

        b(2,4)=x2                                                               

            1

Warning: Array reference at (1) is out of bounds (4 > 1) in dimension 2

EDFEM.for:593.12:

        b(2,6)=x3                                                               

            1

Warning: Array reference at (1) is out of bounds (6 > 1) in dimension 2

EDFEM.for:594.12:

        b(2,8)=x4                                                               

            1

Warning: Array reference at (1) is out of bounds (8 > 1) in dimension 2

EDFEM.for:596.12:

        b(3,3)=g(2)                                                             

            1

Warning: Array reference at (1) is out of bounds (3 > 1) in dimension 2

EDFEM.for:597.12:

        b(3,5)=g(3)                                                             

            1

Warning: Array reference at (1) is out of bounds (5 > 1) in dimension 2

EDFEM.for:598.12:

        b(3,7)=g(4)                                                             

            1

Warning: Array reference at (1) is out of bounds (7 > 1) in dimension 2

EDFEM.for:600.12:

        b(4,2)=y1/sqrt2                                                         

            1

Warning: Array reference at (1) is out of bounds (2 > 1) in dimension 2

EDFEM.for:601.12:

        b(4,3)=x2/sqrt2                                                         

            1

Warning: Array reference at (1) is out of bounds (3 > 1) in dimension 2

EDFEM.for:602.12:

        b(4,4)=y2/sqrt2                                                         

            1

Warning: Array reference at (1) is out of bounds (4 > 1) in dimension 2

EDFEM.for:603.12:

        b(4,5)=x3/sqrt2                                                         

            1

Warning: Array reference at (1) is out of bounds (5 > 1) in dimension 2

EDFEM.for:604.12:

        b(4,6)=y3/sqrt2                                                         

            1

Warning: Array reference at (1) is out of bounds (6 > 1) in dimension 2

EDFEM.for:605.12:

        b(4,7)=x4/sqrt2                                                         

            1

Warning: Array reference at (1) is out of bounds (7 > 1) in dimension 2

EDFEM.for:606.12:

        b(4,8)=y4/sqrt2                                                         

            1

Warning: Array reference at (1) is out of bounds (8 > 1) in dimension 2

EDFEM.for:608.10:

        q(2)=x1                                                                 

          1

Warning: Array reference at (1) is out of bounds (2 > 1) in dimension 1

EDFEM.for:609.10:

        q(3)=y2+g(2)                                                            

          1

Warning: Array reference at (1) is out of bounds (3 > 1) in dimension 1

EDFEM.for:610.10:

        q(4)=x2                                                                 

          1

Warning: Array reference at (1) is out of bounds (4 > 1) in dimension 1

EDFEM.for:611.10:

        q(5)=y3+g(3)                                                            

          1

Warning: Array reference at (1) is out of bounds (5 > 1) in dimension 1

EDFEM.for:612.10:

        q(6)=x3                                                                 

          1

Warning: Array reference at (1) is out of bounds (6 > 1) in dimension 1

EDFEM.for:613.10:

        q(7)=y4+g(4)                                                            

          1

Warning: Array reference at (1) is out of bounds (7 > 1) in dimension 1

EDFEM.for:614.10:

        q(8)=x4                                                                 

          1

Warning: Array reference at (1) is out of bounds (8 > 1) in dimension 1

EDFEM.for:929.3:

200     continue                                                                

   1

Warning: Label 200 at (1) defined but not used

EDFEM.for:1301.2:

75      write(4,1000)i,no,rn,zn,ra,za,aLp(i)                                    

  1

Warning: Label 75 at (1) defined but not used

EDFEM.for: In function 'codrz':

EDFEM.for:127:0: warning: 'dr' may be used uninitialized in this function

EDFEM.for:128:0: warning: 'dz' may be used uninitialized in this function

EDFEM.for: In function 'decert':

EDFEM.for:937:0: warning: 'ueror1' may be used uninitialized in this function

EDFEM.for:940:0: warning: 'ueror2' may be used uninitialized in this function

EDFEM.for: In function 'mintm':

EDFEM.for:1078:0: warning: 'u1' may be used uninitialized in this function

贊一下(1人)

回復(fù)此樓

5樓2011-11-01 09:40:05

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

snoopyzhao

至尊木蟲 (職業(yè)作家)

程序強(qiáng)帖: 16
應(yīng)助: 157 (高中生)
貴賓: 0.02
金幣: 18844.7
紅花: 29
帖子: 3803
在線: 1422.4小時(shí)
蟲號(hào): 183750
注冊(cè): 2006-02-13
專業(yè): 污染生態(tài)化學(xué)

★
余澤成(金幣+1): 謝謝參與應(yīng)助！ 2011-11-02 10:37:39

上面 log 中，行號(hào)大于 909 的錯(cuò)誤信息，給出的行號(hào)所對(duì)應(yīng)的代碼在你的原始代碼中應(yīng)該是行號(hào)減一所在的行。因?yàn)?09行超過了72列，所以我折了行，導(dǎo)致后面的行號(hào)與你原始代碼之行號(hào)相差1。

贊一下(1人)

回復(fù)此樓

6樓2011-11-01 09:46:14

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

wuluo1213

木蟲 (小有名氣)

應(yīng)助: 5 (幼兒園)
金幣: 2291.6
散金: 10
帖子: 275
在線: 59.5小時(shí)
蟲號(hào): 940174
注冊(cè): 2010-01-10
專業(yè): 制造系統(tǒng)與自動(dòng)化

我在子程序!!!!!!!!!!!!!!!!!! 子程序 BANSOL !!!!!!!!!!!!!!加入了顯示語(yǔ)句，發(fā)現(xiàn)啊矩陣的值為很驚人啊
SUBROUTINE BANSOL(a,b,neq,mband) print*,'%……………bansoL…………………%^'
   write(*,*)a(n,1)

一下就是a矩陣的值：
1.660169824622443E+068
%……………bansoL…………………%^
  6.762579132058774E+069
%……………bansoL…………………%^
  2.754686649467159E+071
%……………bansoL…………………%^
  1.122101255832913E+073
%……………bansoL…………………%^
  4.570796568042873E+074
%……………bansoL…………………%^
  1.861880214270383E+076
%……………bansoL…………………%^
  7.584231502509986E+077
%……………bansoL…………………%^
  3.089380672440602E+079
%……………bansoL…………………%^
  1.258436393468591E+081
%……………bansoL…………………%^
  5.126147679156506E+082
%……………bansoL…………………%^
  2.088098386609277E+084
%……………bansoL…………………%^
  8.505714515188760E+085
%……………bansoL…………………%^
  3.464739970005556E+087
%……………bansoL…………………%^
  1.411336230285845E+089
%……………bansoL…………………%^
  5.748973868634262E+090
%……………bansoL…………………%^
  2.341802033633450E+092
%……………bansoL…………………%^
  9.539157578450715E+093
%……………bansoL…………………%^
  3.885705367047124E+095
%……………bansoL…………………%^
  1.582813374800237E+097
%……………bansoL…………………%^
  6.447473348578595E+098
%……………bansoL…………………%^
  2.626330636476820E+100
%……………bansoL…………………%^
  1.069816382198366E+102
%……………bansoL…………………%^
  4.357817997947655E+103
%……………bansoL…………………%^
  1.775124967166119E+105
%……………bansoL…………………%^
  7.230840412657281E+106
%……………bansoL…………………%^
  2.945429422740173E+108
%……………bansoL…………………%^
  1.199798915373284E+110
%……………bansoL…………………%^
  4.887292244102407E+111
%……………bansoL…………………%^
  1.990802389734800E+113
%……………bansoL…………………%^
  8.109386459867174E+114
%……………bansoL…………………%^
  3.303298664627251E+116
%……………bansoL…………………%^
  1.345574307221623E+118
%……………bansoL…………………%^
  5.481097533332661E+119
%……………bansoL…………………%^
  2.232684587441163E+121
%……………bansoL…………………%^
  9.094675722667480E+122
%……………bansoL…………………%^
  3.704648966797105E+124
%……………bansoL…………………%^
  1.509061387750664E+126
%……………bansoL…………………%^
  6.147050077915465E+127
%……………bansoL…………………%^
  2.503955436612350E+129
%……………bansoL…………………%^
  1.019967748606125E+131
%……………bansoL…………………%^
  4.154763271682408E+132
%……………bansoL…………………%^
  1.692412124531507E+134
%……………bansoL…………………%^
  6.893915758770564E+135
%……………bansoL…………………%^
  2.808185654081228E+137
%……………bansoL…………………%^
  1.143893680127295E+139
%……………bansoL…………………%^
  4.659566398444817E+140
%……………bansoL…………………%^
  1.898039948878805E+142
%……………bansoL…………………%^
  7.731525510060875E+143
%……………bansoL…………………%^
  3.149379798250967E+145
%……………bansoL…………………%^
  1.282876594111271E+147
%……………bansoL…………………%^
  5.225703030903187E+148
%……………bansoL…………………%^
  2.128651523657168E+150
%……………bansoL…………………%^
  8.670904723004972E+151
%……………bansoL…………………%^
  3.532028980782053E+153
%……………bansoL…………………%^
  1.438745911713918E+155
%……………bansoL…………………%^
  5.860625180983600E+156
%……………bansoL…………………%^
  2.387282370871378E+158
%……………bansoL…………………%^
  9.724418372233754E+159
%……………bansoL…………………%^
  3.961169982741530E+161
%……………bansoL…………………%^
  1.613553328492618E+163
%……………bansoL…………………%^
  6.572690278965716E+164
%……………bansoL…………………%^
  2.677336828003579E+166
%……………bansoL…………………%^
  1.090593377497814E+168
%……………bansoL…………………%^
  4.442451553355687E+169
%……………bansoL…………………%^
  1.809599820713373E+171
%……………bansoL…………………%^
  7.371271181679637E+172
%……………bansoL…………………%^
  3.002632859039560E+174
%……………bansoL…………………%^
  1.223100312547411E+176
%……………bansoL…………………%^
  4.982208764051443E+177
%……………bansoL…………………%^
  2.029465932920266E+179
%……………bansoL…………………%^
  8.266879546682521E+180
%……………bansoL…………………%^
  3.367452310028147E+182
%……………bansoL…………………%^
  1.371706820727116E+184
%……………bansoL…………………%^
  5.587546396502839E+185
%……………bansoL…………………%^
  2.276045745440148E+187
%……………bansoL…………………%^
  9.271304196379515E+188
%……………bansoL…………………%^
  3.776597270683669E+190
%……………bansoL…………………%^
  1.538368997805614E+192
%……………bansoL…………………%^
  6.266432462312912E+193
%……………bansoL…………………%^
  2.552584968934153E+195
%……………bansoL…………………%^
  1.039776629336504E+197
%……………bansoL…………………%^
  4.235453283914842E+198
%……………bansoL…………………%^
  1.725280604899937E+200
%……………bansoL…………………%^
  7.027803085323180E+201
%……………bansoL…………………%^
  2.862723667431625E+203
%……………bansoL…………………%^
  1.166109336954525E+205
%……………bansoL…………………%^
  4.750060235302118E+206
%……………bansoL…………………%^
  1.934901944780356E+208
%……………bansoL…………………%^
  7.881680127108294E+209
%……………bansoL…………………%^
  3.210544172206388E+211
%……………bansoL…………………%^
  1.307791449977322E+213
%……………bansoL…………………%^
  5.327191855636118E+214
%……………bansoL…………………%^
  2.169992246642069E+216
%……………bansoL…………………%^
  8.839303103951022E+217
%……………bansoL…………………%^
  3.600624817181935E+219
%……………bansoL…………………%^
  1.466687918905228E+221
%……………bansoL…………………%^
  5.974444883002793E+222
%……………bansoL…………………%^
  2.433645985621886E+224
%……………bansoL…………………%^
  9.913277131710299E+225
%……………bansoL…………………%^
  4.038100203180456E+227
%……………bansoL…………………%^
  1.644890285450215E+229
%……………bansoL…………………%^
  6.700339058048820E+230
%……………bansoL…………………%^
  2.729333615130853E+232
%……………bansoL…………………%^
  1.111773884596897E+234
%……………bansoL…………………%^
  4.528728784269251E+235
%……………bansoL…………………%^
  1.844744213334806E+237
%……………bansoL…………………%^
  7.514429268657054E+238
%……………bansoL…………………%^
  3.060947248159306E+240
%……………bansoL…………………%^
  1.246854248145513E+242
%……………bansoL…………………%^
  5.078968665838310E+243
%……………bansoL…………………%^
  2.068880364079002E+245
%……………bansoL…………………%^
  8.427431320183550E+246
%……………bansoL…………………%^
  3.432851888853765E+248
%……………bansoL…………………%^
  1.398346856008575E+250
%……………bansoL…………………%^
  5.696062612133168E+251
%……………bansoL…………………%^
  2.320249024190775E+253
%……………bansoL…………………%^
  9.451362986759914E+254
%……………bansoL…………………%^
  3.849942888722903E+256
%……………bansoL…………………%^
  1.568245793457701E+258
%……………bansoL…………………%^
  6.388133382190512E+259
%……………bansoL…………………%^
  2.602158939555126E+261
%……………bansoL…………………%^
  1.059970220030813E+263
%……………bansoL…………………%^
  4.317710383764082E+264
%……………bansoL…………………%^
  1.758787426831882E+266
%……………bansoL…………………%^
  7.164290649075946E+267
%……………bansoL…………………%^
  2.918320868195703E+269
%……………bansoL…………………%^
  1.188756445949746E+271
%……………bansoL…………………%^
  4.842311560691296E+272
%……………bansoL…………………%^
  1.972479840651550E+274
%……………bansoL…………………%^
  8.034750909793432E+275
%……………bansoL…………………%^
  3.272896424690547E+277
%……………bansoL…………………%^
  1.333190179386353E+279
%……………bansoL…………………%^
  5.430651703499197E+280
%……………bansoL…………………%^
  2.212135851337687E+282
%……………bansoL…………………%^
  9.010971964231102E+283
%……………bansoL…………………%^
  3.670552859177180E+285
%……………bansoL…………………%^
  1.495172590203859E+287
%……………bansoL…………………%^
  6.090475087172707E+288
%……………bansoL…………………%^
  2.480910032092939E+290
%……………bansoL…………………%^
  1.010580373327920E+292
%……………bansoL…………………%^
  4.116524491998747E+293
%……………bansoL…………………%^
  1.676835840124402E+295
%……………bansoL…………………%^
  6.830466914969016E+296
%……………bansoL…………………%^
  2.782340236300357E+298
%……………bansoL…………………%^
  1.133365740132721E+300
%……………bansoL…………………%^
  4.616681612650646E+301
%……………bansoL…………………%^
  1.880571148205932E+303
%……………bansoL…………………%^
  7.660367641064344E+304
run-time error M6104: MATH
- floating-point error: overflow
Press any key to continue

贊一下

回復(fù)此樓

沒什么好與不好。

7樓2011-11-01 10:45:02

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

snoopyzhao

至尊木蟲 (職業(yè)作家)

程序強(qiáng)帖: 16
應(yīng)助: 157 (高中生)
貴賓: 0.02
金幣: 18844.7
紅花: 29
帖子: 3803
在線: 1422.4小時(shí)
蟲號(hào): 183750
注冊(cè): 2006-02-13
專業(yè): 污染生態(tài)化學(xué)

【答案】應(yīng)助回帖

★
wuluo1213(金幣+1): 哦，好的。謝謝啊，我現(xiàn)在就去改改。 2011-11-01 15:35:47
余澤成(金幣+1): 謝謝參與應(yīng)助！ 2011-11-02 10:37:59

我這里顯示的全是 NaN，呵呵……其實(shí)多半是因?yàn)闆]有賦初值，或者數(shù)組越界啥的造成的……

所以，你要仔細(xì)修改你的程序，保證前面我給出的那些個(gè) warning 都不存在了，然后再找問題（或許那時(shí)就沒有問題了……）

贊一下(1人)

回復(fù)此樓

8樓2011-11-01 11:47:40

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

wuluo1213

木蟲 (小有名氣)

應(yīng)助: 5 (幼兒園)
金幣: 2291.6
散金: 10
帖子: 275
在線: 59.5小時(shí)
蟲號(hào): 940174
注冊(cè): 2010-01-10
專業(yè): 制造系統(tǒng)與自動(dòng)化

引用回帖:

8樓: Originally posted by snoopyzhao at 2011-11-01 11:47:40:
我這里顯示的全是 NaN，呵呵……其實(shí)多半是因?yàn)闆]有賦初值，或者數(shù)組越界啥的造成的……

所以，你要仔細(xì)修改你的程序，保證前面我給出的那些個(gè) warning 都不存在了，然后再找問題（或許那時(shí)就沒有問題了……）

你好，我已經(jīng)按照你給的那個(gè)要求改過了，但是結(jié)果還是一樣的��？奇怪啦。請(qǐng)問你用的是那個(gè)版本��？我用的是Microsoft Developer Studio，還是不會(huì)出現(xiàn)你給的那種信息，我傳了文件，里面是兩本書上的源程序，能否幫忙看看，都還有哪些錯(cuò)誤的信息�。恐x謝

贊一下

回復(fù)此樓

沒什么好與不好。

9樓2011-11-01 17:27:04

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

snoopyzhao

至尊木蟲 (職業(yè)作家)

程序強(qiáng)帖: 16
應(yīng)助: 157 (高中生)
貴賓: 0.02
金幣: 18844.7
紅花: 29
帖子: 3803
在線: 1422.4小時(shí)
蟲號(hào): 183750
注冊(cè): 2006-02-13
專業(yè): 污染生態(tài)化學(xué)

【答案】應(yīng)助回帖

★ ★
jjdg(金幣+2): 感謝參與 2011-11-02 01:39:34

引用回帖:

9樓: Originally posted by wuluo1213 at 2011-11-01 17:27:04:
你好，我已經(jīng)按照你給的那個(gè)要求改過了，但是結(jié)果還是一樣的�。科婀掷�。請(qǐng)問你用的是那個(gè)版本��？我用的是Microsoft Developer Studio，還是不會(huì)出現(xiàn)你給的那種信息，我傳了文件，里面是兩本書上的源程序，能否 ...

1 里面的程序沒有問題了，但結(jié)果似乎還是不對(duì)

2 里面的程序除了一些錯(cuò)誤，比如把 x 寫成 z，把 1 寫成 l 以外，還有以下的一些警告：

CODE:

rigid.for:179.4:

3000    format(5i5)                                                     

    1

Warning: Label 3000 at (1) defined but not used

rigid.for:525.4:

5011    format(i7,9x,2f14.4,f17.3)                                      

    1

Warning: Label 5011 at (1) defined but not used

rigid.for:550.72:

        character*3 step                                                

                                                                        1

Warning: Line truncated at (1)

rigid.for:711.3:

200     continue                                                        

   1

Warning: Label 200 at (1) defined but not used

rigid.for:1044.4:

1008    format('ABC')                                                   

    1

Warning: Label 1008 at (1) defined but not used

rigid.for:1276.3:

100     continue                                                        

   1

Warning: Label 100 at (1) defined but not used

rigid.for:1320.4:

2000    format(2i6,5f12.8)                                              

    1

Warning: Label 2000 at (1) defined but not used

rigid.for:1434.2:

75      write(4,2000)i,no,r(no),rn,z(no),zn,alp(i)                      

  1

Warning: Label 75 at (1) defined but not used

rigid.for:1764.51:

        r=h(1)*rr(1)+h(2)*rr(2)+h(3)*rr(3)+h(4)*rr(4)                   

                                                   1

Warning: Array reference at (1) is out of bounds (4 > 1) in dimension 1

rigid.for:1764.40:

        r=h(1)*rr(1)+h(2)*rr(2)+h(3)*rr(3)+h(4)*rr(4)                   

                                        1

Warning: Array reference at (1) is out of bounds (3 > 1) in dimension 1

rigid.for:1764.29:

        r=h(1)*rr(1)+h(2)*rr(2)+h(3)*rr(3)+h(4)*rr(4)                   

                             1

Warning: Array reference at (1) is out of bounds (2 > 1) in dimension 1

rigid.for:1872.72:

        SUBROUTINE MODIFY(code,uz,a,b,numnp,neq,mband,niter)            

                                                                        1

Warning: Line truncated at (1)

rigid.for:2120.4:

1110    format('layer'/,'new'/,i1,/'color'/,i1,/i1,/'set'/,i1)          

    1

Warning: Label 1110 at (1) defined but not used

rigid.for: In function 'touch':

rigid.for:384:0: warning: 'x2' may be used uninitialized in this function

rigid.for:385:0: warning: 'y1' may be used uninitialized in this function

rigid.for:386:0: warning: 'y2' may be used uninitialized in this function

rigid.for: In function 'writer':

rigid.for:865:0: warning: 'n' may be used uninitialized in this function

rigid.for: In function 'graphs':

rigid.for:964:0: warning: 'nunism' may be used uninitialized in this function

rigid.for: In function 'grarcl':

rigid.for:1030:0: warning: 'j' may be used uninitialized in this function

rigid.for: In function 'mintm':

rigid.for:1246:0: warning: 'u1' may be used uninitialized in this function

rigid.for: In function 'element':

rigid.for:2201:0: warning: 'nuni' may be used uninitialized in this function

C:\Temp\cclFXeHC.o:rigid.for:(.text+0x9166): undefined reference to `alp_'

C:\Temp\cclFXeHC.o:rigid.for:(.text+0x918f): undefined reference to `alp_'

collect2: ld returned 1 exit status

贊一下(1人)

回復(fù)此樓

10樓2011-11-01 20:22:50

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

相關(guān)版塊跳轉(zhuǎn) 我要訂閱樓主 wuluo1213 的主題更新

返回列表

下一頁(yè)

最具人氣熱帖推薦 [查看全部]		作者	回/看	最后發(fā)表

[考研] 材料調(diào)劑 +4	一樣YWY 2026-04-02	4/200	2026-04-02 10:32 by 氯化亞硝酰
[考研] 261求B區(qū)調(diào)劑 +4	明仔· 2026-04-01	6/300	2026-04-02 09:13 by 6781022
[考研] 303求調(diào)劑 +8	DLkz1314. 2026-03-30	8/400	2026-04-02 09:08 by sanrepian
[考研] 求調(diào)劑推薦材料 304 +21	荷包蛋hyj 2026-03-26	21/1050	2026-04-01 21:09 by lijunpoly
[考研] 285求調(diào)劑 +7	AZMK 2026-03-30	13/650	2026-04-01 17:00 by 七度不信任
[考研] 英一數(shù)二生物信息學(xué)287分，本科生物科學(xué)，求調(diào)劑 +3	碧水xyz 2026-03-29	4/200	2026-04-01 15:35 by plum
[考研] 一志愿中國(guó)科學(xué)院大學(xué)265求調(diào)劑 +8	恬淡ye 2026-03-31	9/450	2026-04-01 14:34 by 逆水乘風(fēng)
[考研] 330分求調(diào)劑 +11	qzenlc 2026-03-29	11/550	2026-04-01 14:32 by chenqifeng666
[考研] 材料專碩322分 +9	哈哈哈吼吼吼哈 2026-04-01	9/450	2026-04-01 14:30 by 無(wú)際的草原
[考研] 安徽大學(xué)專碩生物與醫(yī)藥專業(yè)(086000)324分，英語(yǔ)已過四六級(jí)，六級(jí)521，求調(diào)劑 +10	美味可樂雞翅 2026-03-26	12/600	2026-04-01 11:17 by syh9288
[考研] 318求調(diào)劑 +8	七憶77 2026-04-01	8/400	2026-04-01 10:37 by Jaylen.
[考研] 生物考研337分求調(diào)劑 +4	cgxin 2026-03-30	6/300	2026-03-31 14:18 by 記事本2026
[考研] 313求調(diào)劑 +6	賣個(gè)關(guān)子吧 2026-03-31	6/300	2026-03-31 10:58 by Jaylen.
[考研] 085600，專業(yè)課化工原理，320分求調(diào)劑 +6	大饞小子 2026-03-29	6/300	2026-03-31 10:03 by 氯化亞硝酰
[考研] 282求調(diào)劑 +3	呼吸都是減肥 2026-03-31	3/150	2026-03-31 10:00 by wangjy2002
[考研] 22408 359分調(diào)劑 +4	Qshers 2026-03-27	8/400	2026-03-31 08:53 by Qshers
[考研] 08工科求調(diào)劑286 +5	tgs_001 2026-03-28	5/250	2026-03-31 08:18 by 一只好果子?
[考研] 調(diào)劑 +4	GK72 2026-03-30	4/200	2026-03-30 20:32 by dick_runner
[考研] 085600，專業(yè)課化工原理，321分求調(diào)劑 +5	大饞小子 2026-03-28	5/250	2026-03-29 08:56 by qingfeng258
[考研] 070300化學(xué)求調(diào)劑 +4	起個(gè)名咋這么難 2026-03-27	4/200	2026-03-27 21:39 by 83503孫老師

24小時(shí)熱門版塊排行榜

[求助] 有會(huì)看fortran程序的，能幫忙看看這個(gè)程序嗎？

» 猜你喜歡

» 本主題相關(guān)價(jià)值貼推薦，對(duì)您同樣有幫助:

【答案】應(yīng)助回帖

【答案】應(yīng)助回帖

【答案】應(yīng)助回帖

【答案】應(yīng)助回帖

[求助] 有會(huì)看fortran程序的，能幫忙看看這個(gè)程序嗎？