版塊導(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í)熱門版塊排行榜

返回列表

周小睿晶

新蟲 (小有名氣)

應(yīng)助: 0 (幼兒園)
金幣: 599
紅花: 2
帖子: 86
在線: 19.2小時(shí)
蟲號(hào): 2849459
注冊(cè): 2013-12-05
性別: MM
專業(yè): 金屬材料表面科學(xué)與工程

[求助] 請(qǐng)問frotran編譯出錯(cuò)命令是怎么回事啊？

請(qǐng)問fortran編譯后，出現(xiàn)圖中的錯(cuò)誤是怎么回事��？我的對(duì)應(yīng)程序是這樣的
         if (t.lt.2000 .and. mod(t,20).eq.0)  then
   write(888,'(A3, 3X, F15.7, 3X, F20.10, 3X, F15.1, 3X, F15.13, 3X, F15.13, 3X, F15.13)')&
&    't2',t2,sum,num,defra,pftin,pfaln
      end if
if (t.lt.200000 .and. mod(t,4000).eq.0)  then
   write(888,'(A3, 3X, F15.7, 3X, F20.10, 3X, F15.1, 3X, F15.13, 3X, F15.13, 3X, F15.13)')&
&    't2',t2,sum,num,defra,pftin,pfaln
      end if
if (t.lt.2000000 .and. mod(t,200000).eq.0) then
   write(888,'(A3, 3X, F15.7, 3X, F20.10, 3X, F15.1, 3X, F15.13, 3X, F15.13, 3X, F15.13)')&
&    't2',t2,sum,num,defra,pftin,pfaln
      end if
if (t.lt.20000000 .and. mod(t,2000000.eq.0) then
   write(888,'(A3, 3X, F15.7, 3X, F20.10, 3X, F15.1, 3X, F15.13, 3X, F15.13, 3X, F15.13)')&
&    't2',t2,sum,num,defra,pftin,pfaln
      end if

1.png

回復(fù)此樓

» 猜你喜歡

5年內(nèi)！藥企無法掌握對(duì)元素雜質(zhì)工藝將面臨淘汰（2025藥典0861、0862新規(guī)）已經(jīng)有0人回復(fù)
從爆炸廢墟到安全防線：鉭材料將改寫化工反應(yīng)釜的命運(yùn) 已經(jīng)有0人回復(fù)
金屬材料論文潤色/翻譯怎么收費(fèi)? 已經(jīng)有219人回復(fù)
罕見病藥小批量生產(chǎn)，高腐蝕工況下鉭襯里是否最優(yōu)解？已經(jīng)有0人回復(fù)
國家杰青低維材料與器件力學(xué)團(tuán)隊(duì)2026年招收博士研究生已經(jīng)有10人回復(fù)
冶金新晉博導(dǎo)招生已經(jīng)有0人回復(fù)
求調(diào)劑已經(jīng)有3人回復(fù)

1樓 2015-05-23 19:26:58

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

智能機(jī)器人

Robot (super robot)

我們都愛小木蟲

找到一些相關(guān)的精華帖子，希望有用哦~

fortran出錯(cuò)了 error LNK2001: unresolved external symbol _ELEMENT@192 已經(jīng)有5人回復(fù)
Fortran 聲明變量已經(jīng)有5人回復(fù)
ifort和gfortran無格式輸出的區(qū)別已經(jīng)有5人回復(fù)
【求助成功】Vasp 5.2.11編譯出錯(cuò) 已經(jīng)有10人回復(fù)

點(diǎn)擊這里搜索更多相關(guān)資源

科研從小木蟲開始，人人為我，我為人人

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