 |
 |
 |
 |
 |
 |
||
 |
 |
 |
 |
 |
| 10 | 1/1 | 返回列表 |
| 查看: 4137 | 回復(fù): 9 | |||
fish8900金蟲(chóng) (小有名氣)
|
[求助]
fortran中運(yùn)行中出現(xiàn)無(wú)窮大的數(shù)怎么處理
|
|
在計(jì)算的過(guò)程中出現(xiàn)了無(wú)窮大的數(shù)（然后程序終止），我想進(jìn)行以下幾種嘗試，不知如何進(jìn)行 1、當(dāng)A變得無(wú)窮大后，我想對(duì)它進(jìn)行賦值，令A(yù)=1.0E+10 2、當(dāng)A變得無(wú)窮大后，想用一個(gè)判據(jù)來(lái)進(jìn)行后來(lái)的其他計(jì)算，這個(gè)判據(jù)該怎么設(shè)置 3、如何判斷A變得無(wú)窮大了 |
回復(fù)此樓» 收錄本帖的淘帖專(zhuān)輯推薦
 北大科研分享 |
» 猜你喜歡
材料與化工（0856）304求B區(qū)調(diào)劑
已經(jīng)有7人回復(fù)
-
085600材料與化工調(diào)劑
已經(jīng)有8人回復(fù)
-
285求調(diào)劑
已經(jīng)有7人回復(fù)
-
317求調(diào)劑
已經(jīng)有7人回復(fù)
-
一志愿華中師范化學(xué)332分求調(diào)劑
已經(jīng)有3人回復(fù)
-
一志愿北京化工大學(xué)材料與化工（085600）296求調(diào)劑
已經(jīng)有25人回復(fù)
-
一志愿南昌大學(xué)324求調(diào)劑
已經(jīng)有9人回復(fù)
-
材料科學(xué)與工程 317求調(diào)劑
已經(jīng)有7人回復(fù)
-
085701環(huán)境工程求調(diào)劑
已經(jīng)有11人回復(fù)
-
286分調(diào)劑
已經(jīng)有10人回復(fù)
» 本主題相關(guān)價(jià)值貼推薦，對(duì)您同樣有幫助:
- fortran中Idint函數(shù)是什么意思？
已經(jīng)有4人回復(fù)
- 如何歐諾個(gè)fortran語(yǔ)言提取出我想要的部分?jǐn)?shù)據(jù)
已經(jīng)有6人回復(fù)
- 求助：關(guān)于fortran建數(shù)組問(wèn)題，謝謝！
已經(jīng)有4人回復(fù)
- 使用Multiwfn繪制原子軌道圖形、研究原子殼層結(jié)構(gòu)及相對(duì)論效應(yīng)的影響
已經(jīng)有17人回復(fù)
- fortran中計(jì)算數(shù)據(jù)寫(xiě)入文本為 NAN的問(wèn)題
已經(jīng)有4人回復(fù)
- Fortran中數(shù)組的使用
已經(jīng)有4人回復(fù)
- fortran中如何處理字符和數(shù)據(jù)混合的文件
已經(jīng)有6人回復(fù)
- Fortran數(shù)據(jù)讀入格式的修改
已經(jīng)有5人回復(fù)
- fortran中到底該如何比較兩個(gè)實(shí)數(shù)是否相等
已經(jīng)有8人回復(fù)
- Fortran中子程序與函數(shù)的區(qū)別
已經(jīng)有7人回復(fù)
- Fortran中關(guān)于數(shù)組的變化
已經(jīng)有5人回復(fù)
- 【求助】讀文本數(shù)據(jù)出現(xiàn)段錯(cuò)誤[fortran]
已經(jīng)有14人回復(fù)
- 請(qǐng)教fortran導(dǎo)txt數(shù)據(jù)進(jìn)origin問(wèn)題
已經(jīng)有1人回復(fù)
- 【求助】ASPEN運(yùn)行中出現(xiàn)FORTRAN or Internal Error!
已經(jīng)有7人回復(fù)
- 【求助】fortran計(jì)算時(shí)出現(xiàn)NaN
已經(jīng)有11人回復(fù)
mechaniclmw
木蟲(chóng) (小有名氣)
- 應(yīng)助: 9 (幼兒園)
- 金幣: 2548
- 散金: 197
- 紅花: 2
- 帖子: 292
- 在線: 205.8小時(shí)
- 蟲(chóng)號(hào): 2001977
- 注冊(cè): 2012-09-15
- 性別: GG
- 專(zhuān)業(yè): 動(dòng)力學(xué)與控制
2樓2013-03-03 14:28:58
zeppe
金蟲(chóng) (小有名氣)
- 應(yīng)助: 15 (小學(xué)生)
- 金幣: 3901.3
- 散金: 58
- 紅花: 4
- 帖子: 205
- 在線: 254.1小時(shí)
- 蟲(chóng)號(hào): 573594
- 注冊(cè): 2008-06-14
- 性別: GG
- 專(zhuān)業(yè): 理論和計(jì)算化學(xué)
【答案】應(yīng)助回帖
★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★
fish8900: 金幣+30, ★★★很有幫助 2013-04-07 11:14:16
fish8900: 金幣+30, ★★★很有幫助 2013-04-07 11:14:16
|
您好，這是根據(jù)要求寫(xiě)的一點(diǎn)代碼，希望對(duì)您有幫助。 LOGICAL ISLARGE !邏輯變量，是否是大數(shù) REAL LARGENUM, A PARAMETER(LARGENUM=1.0E10) !也可按需求設(shè)為其他大數(shù) ISLARGE=.FALSE. !判斷A是否是大數(shù)，只考慮了正數(shù)情況， IF(A.GE.LARGENUM) !如果還要考慮負(fù)數(shù)情況則改為IF(ABS(A).GE.LARGENUM) A=1.0E10 !是大數(shù)則設(shè)定值為1.0E10 ISLARGE=.TRUE. ENDIF IF(ISLARGE) PRINT 'A is very large' !輸出信息，判斷A為大數(shù)之后的后續(xù)操作 ENDIF |
3樓2013-04-03 15:37:00
fish8900
金蟲(chóng) (小有名氣)
- 應(yīng)助: 0 (幼兒園)
- 金幣: 701.9
- 散金: 103
- 帖子: 105
- 在線: 34小時(shí)
- 蟲(chóng)號(hào): 1496643
- 注冊(cè): 2011-11-17
- 性別: GG
- 專(zhuān)業(yè): 零件加工制造
4樓2013-04-07 11:20:51
zeppe
金蟲(chóng) (小有名氣)
- 應(yīng)助: 15 (小學(xué)生)
- 金幣: 3901.3
- 散金: 58
- 紅花: 4
- 帖子: 205
- 在線: 254.1小時(shí)
- 蟲(chóng)號(hào): 573594
- 注冊(cè): 2008-06-14
- 性別: GG
- 專(zhuān)業(yè): 理論和計(jì)算化學(xué)
5樓2013-04-07 13:29:49
fish8900
金蟲(chóng) (小有名氣)
- 應(yīng)助: 0 (幼兒園)
- 金幣: 701.9
- 散金: 103
- 帖子: 105
- 在線: 34小時(shí)
- 蟲(chóng)號(hào): 1496643
- 注冊(cè): 2011-11-17
- 性別: GG
- 專(zhuān)業(yè): 零件加工制造
送紅花一朵 |
1、您說(shuō)的誤差隨步長(zhǎng)增加而增長(zhǎng)了是什么意思呢？我在寫(xiě)程序過(guò)程中是規(guī)定了當(dāng)前后的計(jì)算值（T-T1）/T<=1.0e-03時(shí)，認(rèn)定計(jì)算結(jié)果達(dá)到收斂。而且我在調(diào)試過(guò)程中是將某些數(shù)值調(diào)大一點(diǎn)后才出現(xiàn)無(wú)窮大的情況。 2、當(dāng)A的相關(guān)變量變得不合理時(shí)，我試著將它變成一個(gè)可以接受的值，但是發(fā)現(xiàn)還是會(huì)出現(xiàn)計(jì)算停止的現(xiàn)象（結(jié)果顯示也還是出現(xiàn)sqrt的問(wèn)題），想問(wèn)一下您猜測(cè)原因可能是什么？ （可能有點(diǎn)憑空說(shuō)了，不好意思哈，沒(méi)具體程序給你看） |
6樓2013-04-08 09:23:28
zeppe
金蟲(chóng) (小有名氣)
- 應(yīng)助: 15 (小學(xué)生)
- 金幣: 3901.3
- 散金: 58
- 紅花: 4
- 帖子: 205
- 在線: 254.1小時(shí)
- 蟲(chóng)號(hào): 573594
- 注冊(cè): 2008-06-14
- 性別: GG
- 專(zhuān)業(yè): 理論和計(jì)算化學(xué)
|
之前我猜測(cè)可能的原因之一是算法數(shù)值不穩(wěn)定導(dǎo)致誤差隨步長(zhǎng)增加而增長(zhǎng)（有類(lèi)似大數(shù)吃小數(shù),相近數(shù)相減等情況導(dǎo)致數(shù)值誤差），但不一定就是你的情況。 既然不能貼出具體代碼，就得靠你自己調(diào)試找錯(cuò)了。 調(diào)試的時(shí)候可以看看相關(guān)變量的值在調(diào)函數(shù)和子程序之前和之后的變化情況是否合理，還可以試試用Excel按程序里的步驟代入算一遍，看是否得到相同的結(jié)果。 |
» 本帖已獲得的紅花（最新10朵）
7樓2013-04-08 13:10:39
fish8900
金蟲(chóng) (小有名氣)
- 應(yīng)助: 0 (幼兒園)
- 金幣: 701.9
- 散金: 103
- 帖子: 105
- 在線: 34小時(shí)
- 蟲(chóng)號(hào): 1496643
- 注冊(cè): 2011-11-17
- 性別: GG
- 專(zhuān)業(yè): 零件加工制造
8樓2013-04-09 09:24:36
dfj2015
新蟲(chóng) (初入文壇)
- 應(yīng)助: 0 (幼兒園)
- 金幣: 1.5
- 帖子: 1
- 在線: 1.2小時(shí)
- 蟲(chóng)號(hào): 3968836
- 注冊(cè): 2015-07-13
9樓2015-07-13 20:44:25
安靖
銀蟲(chóng) (正式寫(xiě)手)
- 應(yīng)助: 38 (小學(xué)生)
- 金幣: 1862.3
- 紅花: 3
- 帖子: 314
- 在線: 134.1小時(shí)
- 蟲(chóng)號(hào): 1938424
- 注冊(cè): 2012-08-14
- 專(zhuān)業(yè): 流體力學(xué)
10樓2015-07-15 10:51:11
相關(guān)版塊跳轉(zhuǎn)
我要訂閱樓主 fish8900 的主題更新
| 10 | 1/1 | 返回列表 |
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 303求調(diào)劑 +5 | DLkz1314. 2026-03-30 | 5/250 |
|
|---|---|---|---|---|
|
|
[考研] 0703化學(xué)求調(diào)劑 +6 | 丹青奶蓋 2026-03-26 | 8/400 |
|
|
|
[考研] 293求調(diào)劑 +3 | 末未mm 2026-03-30 | 5/250 |
|
|
|
[考研] 303求調(diào)劑 +7 | DLkz1314. 2026-03-30 | 7/350 |
|
|
[考研] 求調(diào)劑 +7 | 研研，接電話 2026-03-24 | 8/400 |
|
|
|
[考研] 求調(diào)劑 +7 | 青春裁為三截 2026-03-29 | 7/350 |
|
|
|
[考研] 085701求調(diào)劑初試286分 +5 | secret0328 2026-03-28 | 5/250 |
|
|
|
[考研] 085602 化學(xué)工程專(zhuān)碩 340分求調(diào)劑 +4 | qianbai11 2026-03-29 | 4/200 |
|
|
|
[考研] 一志愿雙一流機(jī)械285分求調(diào)劑 +4 | 幸運(yùn)的三木 2026-03-29 | 5/250 |
|
|
|
[考研] 343求調(diào)劑 +6 | 愛(ài)羈絆 2026-03-29 | 6/300 |
|
|
|
[考研] 332求92調(diào)劑 +8 | 蕉蕉123 2026-03-28 | 8/400 |
|
|
|
[考研] 學(xué)碩274求調(diào)劑 +9 | Li李魚(yú) 2026-03-26 | 9/450 |
|
|
|
[考研] 一志愿北化085600材料專(zhuān)碩275|有文章專(zhuān)利｜求調(diào)劑 +7 | Micky11223 2026-03-25 | 7/350 |
|
|
|
[考研] 070300求調(diào)劑306分 +4 | 26要上岸 2026-03-27 | 4/200 |
|
|
|
[材料工程] 一志愿C9材料與化工專(zhuān)業(yè)總分300求調(diào)劑 +8 | 曼111 2026-03-24 | 9/450 |
|
|
|
[考研] 272求調(diào)劑 +7 | 腳滑的守法公民 2026-03-27 | 7/350 |
|
|
|
[考研] 0703化學(xué)338求調(diào)劑！ +6 | Zuhui0306 2026-03-26 | 7/350 |
|
|
|
[考研] 309求調(diào)劑 +4 | gajsj 2026-03-25 | 5/250 |
|
|
|
[考研] 網(wǎng)絡(luò)空間安全0839招調(diào)劑 +4 | w320357296 2026-03-25 | 6/300 |
|
|
|
[考研] 求調(diào)劑 +3 | 李李不服輸 2026-03-25 | 3/150 |
|