 |
 |
 |
 |
 |
 |
||
 |
 |
 |
 |
 |
| 5 | 1/1 | 返回列表 |
| 查看: 482 | 回復: 2 | |||
| 當前只顯示滿足指定條件的回帖，點擊這里查看本話題的所有回帖 | |||
[交流]
【求助】為什么兩種寫法得到的值不一樣？
|
|||
|
為什么把if語句放到不同的位置，結(jié)果就不一樣了呢？請大家?guī)兔Ψ治鲆幌�，多謝。 寫法一（判斷語句為h0(t)/=0）： t0=0 do ntel=1, npoints neworig = .false. if (t0.eq.0) then neworig = .true. elseif (ntel-time0(t0).eq.it0)then neworig = .true. endif if (neworig) then t0 = t0 + 1 ! update number of t=0 time0(t0) = ntel ! store the time of t=0 h0(t0) = h(ntel) endif do t=1, t0 ! update tcf for t=0 delt=ntel-time0(t)+1 ! actual time minus t=0 if(h0(t)/=0.and.(delt.lt.npoints)) then ntime(delt) = ntime(delt)+1d0 tcf(delt)=tcf(delt)+h(ntel)*h0(t) tcf0(delt)=tcf0(delt)+h0(t)*h0(t) endif enddo enddo 寫法二（判斷語句為if (h(ntel)/=0) then） t0=0 do ntel=1, npoints neworig = .false. if (h(ntel)/=0) then if (t0.eq.0) then neworig = .true. elseif (ntel-time0(t0).eq.it0)then neworig = .true. endif endif if (neworig) then t0 = t0 + 1 ! update number of t=0 time0(t0) = ntel ! store the time of t=0 h0(t0) = h(ntel) endif do t=1, t0 ! update tcf for t=0 delt=ntel-time0(t)+1 ! actual time minus t=0 if（delt.lt.npoints) then ntime(delt) = ntime(delt)+1d0 tcf(delt)=tcf(delt)+h(ntel)*h0(t) tcf0(delt)=tcf0(delt)+h0(t)*h0(t) endif enddo enddo |
回復此樓» 猜你喜歡
環(huán)境285分，過六級，求調(diào)劑
已經(jīng)有4人回復
-
學碩化學工程與技術，一志愿中國海洋大學320+求調(diào)劑
已經(jīng)有3人回復
-
能源動力 調(diào)劑
已經(jīng)有3人回復
-
348求調(diào)劑
已經(jīng)有4人回復
-
材料化工340求調(diào)劑
已經(jīng)有5人回復
-
08工科求調(diào)劑290分
已經(jīng)有6人回復
-
材料調(diào)劑
已經(jīng)有3人回復
-
372分材料與化工（085600）一志愿湖南大學求調(diào)劑
已經(jīng)有4人回復
-
283分材料與化工求調(diào)劑
已經(jīng)有4人回復
-
一志愿華東理工大學，080500學碩，317分，求調(diào)劑
已經(jīng)有12人回復
» 搶金幣啦！回帖就可以得到:
-
2026級藥學學碩調(diào)劑招生
+1/284
-
雙一流南京醫(yī)科大學招計算機、生物信息等方向調(diào)劑
+1/89
-
東北石油大學PCAFM實驗室研究生調(diào)劑招生（化學化工、材料等相關專業(yè)）
+1/87
-
廣東醫(yī)科大學 陳勝昔教授團隊（國家級人才；AI醫(yī)藥創(chuàng)新研發(fā)平臺）高薪聘請博士后
+1/84
-
化學，材料方向研究生調(diào)劑
+2/52
-
五邑大學招收大量藥學、生物與醫(yī)藥調(diào)劑生
+1/42
-
三峽大學材化學院李東升校長團隊接收化學類碩士調(diào)劑
+1/17
-
【哈工程】核學院某課題組招收全日制調(diào)劑研究生
+1/17
-
吉林工程技術師范學院 交叉學科研究院 調(diào)劑招生
+1/17
-
招聘科研助理——儲能方向（儲能、流體傳熱、CFD模擬）
+1/10
-
西安工程大學環(huán)境與化學工程學院能源環(huán)境催化與先進材料課題組招生
+1/9
-
博士科研人員（化學過程工藝與硬件系統(tǒng)工程）
+1/8
-
中科院動物所和北京工商大學招收2026博士（化學背景）
+1/8
-
哈工大化工學院李蒙剛課題組招收2026年秋季入學博士生
+1/8
-
韓國慶熙大學 Yu Taekyung 教授招2026年博士研究生
+1/7
-
滁州學院0860生物與醫(yī)藥專業(yè)調(diào)劑57人
+1/6
-
☆ ☆ 中山大學附屬第七醫(yī)院肖芷潔課題組誠招分子醫(yī)學方向碩士生（調(diào)劑生） ☆ ☆
+1/4
-
武漢工程大學化學與環(huán)境工程學院 2026 年碩士研究生調(diào)劑公告
+1/2
-
F4/80分選磁珠如何實現(xiàn)巨噬細胞精準分離？
+1/2
-
中國民航飛行學院先進連接團隊招收航空宇航、航空機械專業(yè)碩士研究生（學碩專碩均可）
+1/1
snoopyzhao
至尊木蟲 (職業(yè)作家)
- 程序強帖: 16
- 應助: 157 (高中生)
- 貴賓: 0.02
- 金幣: 18844.7
- 帖子: 3803
- 在線: 1422.4小時
- 蟲號: 183750
3樓2011-02-13 10:24:20
2樓2011-02-13 10:18:59
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 材料調(diào)劑 +8 | 一樣YWY 2026-04-02 | 8/400 |
|
|---|---|---|---|---|
|
[考研] 311求調(diào)劑 +14 | 藍月亮亮 2026-03-30 | 14/700 |
|
|
|
[考研] 271求調(diào)劑 +15 | 勒布朗@ 2026-03-31 | 20/1000 |
|
|
|
[考研] 266分，一志愿電氣工程，本科材料，求材料專業(yè)調(diào)劑 +3 | 哇呼哼呼哼 2026-04-02 | 3/150 |
|
|
|
[考研] 求調(diào)劑，一志愿 南京航空航天大學 ，080500材料科學與工程學碩，總分289分 +11 | @taotao 2026-03-29 | 11/550 |
|
|
|
[考研] 367求調(diào)劑 +8 | 芋泥啵�！� 2026-03-28 | 8/400 |
|
|
|
[考研] 086502化學工程342求調(diào)劑 +7 | 阿姨復古不過 2026-03-27 | 7/350 |
|
|
|
[考研] 求調(diào)劑 +4 | 圖鑒212 2026-03-30 | 5/250 |
|
|
|
[考研] 08工科，295，接受跨專業(yè)調(diào)劑 +6 | lmnlzy 2026-03-31 | 6/300 |
|
|
|
[考研] 求0861交通運輸專碩or材料專碩調(diào)劑 +4 | 勒布朗@ 2026-03-31 | 4/200 |
|
|
|
[考研] 346求調(diào)劑 一志愿070303有機化學 +11 | 蘿卜燉青菜 2026-03-28 | 12/600 |
|
|
|
[考研] 本科211生物醫(yī)學工程085409求調(diào)劑339分 +7 | 里子木yy 2026-03-29 | 7/350 |
|
|
|
[考研] 081200-11408-276學碩求調(diào)劑 +4 | 崔wj 2026-03-31 | 4/200 |
|
|
|
[考研]
 一志愿大連理工大學材料求調(diào)劑
+6
|
Gymno 2026-03-30 | 6/300 |
|
|
|
[考研] 本科211總分289，08工學真心求調(diào)劑 +3 | utopiaE 2026-03-30 | 3/150 |
|
|
|
[有機交流] 考研調(diào)劑 +8 | watb 2026-03-26 | 8/400 |
|
|
|
[考研] 303求調(diào)劑 +7 | DLkz1314. 2026-03-30 | 7/350 |
|
|
|
[考研] 283求調(diào)劑（080500） +14 | A child 2026-03-27 | 14/700 |
|
|
|
[考研] 296求調(diào)劑 +10 | 彼岸t 2026-03-29 | 10/500 |
|
|
|
[考研] 298調(diào)劑 +3 | jiyingjie123 2026-03-27 | 3/150 |
|