 |
 |
 |
 |
 |
 |
||
 |
 |
 |
 |
 |
| 5 | 1/1 | 返回列表 |
| 查看: 1361 | 回復(fù): 4 | ||
391566986新蟲 (初入文壇)
|
[求助]
FORTRAN 賦值錯(cuò)亂問題，求大神解答~~~~急。。５５５
|
|
我在一個(gè)子程序POWELL里對(duì)S(I,K)數(shù)值，像下面這樣。 subroutine powell(nn_h,x,x0,x3,xx,s,ss,e1,ep,wh,th1,th2,hrh,obj_f, xq0,r,f0) implicit real*8(a-h,o-z) dimension s(nn_h,nn_h+1),ss(nn_h) dimension x(nn_h),x0(nn_h),x3(nn_h) dimension th1(nn_h) ITE=0 DO 10 I1=1,nn_h DO 20 K=1,nn_h+1 20 S(I1,K)=0. 10 S(I1,I1)=1. 在調(diào)用這個(gè)子程序前，我的X數(shù)組已經(jīng)給它賦了確定的值，調(diào)用到POWELL里面來的時(shí)候，X值還是對(duì)的，但是在我對(duì)S數(shù)組賦值的時(shí)候，程序卻自動(dòng)的把S數(shù)組的值賦給X數(shù)組了。 像下面這樣。我對(duì)S(I1,K)中的I1從１到５賦值里，X（I）里１到５的值也相應(yīng)的改變了，這個(gè)問題是什么原因造成的呢？ 我不知道到底是哪里出了問題，希望大神可以伸出援助之手。謝謝您~ 在線等~~~ |
回復(fù)此樓» 猜你喜歡
一志愿重慶大學(xué)085700資源與環(huán)境總分308求調(diào)劑
已經(jīng)有6人回復(fù)
-
268求調(diào)劑
已經(jīng)有7人回復(fù)
-
302求調(diào)劑
已經(jīng)有11人回復(fù)
-
306求調(diào)劑
已經(jīng)有4人回復(fù)
-
材料學(xué)學(xué)碩080502 337求調(diào)劑-一志愿華中科技大學(xué)
已經(jīng)有4人回復(fù)
-
求調(diào)劑
已經(jīng)有6人回復(fù)
-
313求調(diào)劑
已經(jīng)有3人回復(fù)
-
南昌大學(xué)材料專碩311分求調(diào)劑
已經(jīng)有6人回復(fù)
-
316求調(diào)劑
已經(jīng)有6人回復(fù)
-
346求調(diào)劑[0856]
已經(jīng)有7人回復(fù)
» 本主題相關(guān)價(jià)值貼推薦，對(duì)您同樣有幫助:
- 求大神。Fortran軟件
已經(jīng)有13人回復(fù)
- 【求助】Fortran語言賦值問題？
已經(jīng)有3人回復(fù)
391566986
新蟲 (初入文壇)
- 應(yīng)助: 0 (幼兒園)
- 金幣: 2
- 帖子: 3
- 在線: 2.7小時(shí)
- 蟲號(hào): 1760024
- 注冊(cè): 2012-04-17
- 專業(yè): 工程熱物理相關(guān)交叉領(lǐng)域
2樓2012-09-26 21:32:23
391566986
新蟲 (初入文壇)
- 應(yīng)助: 0 (幼兒園)
- 金幣: 2
- 帖子: 3
- 在線: 2.7小時(shí)
- 蟲號(hào): 1760024
- 注冊(cè): 2012-04-17
- 專業(yè): 工程熱物理相關(guān)交叉領(lǐng)域
3樓2012-09-26 21:33:10
chembetsey
木蟲 (小有名氣)
- 應(yīng)助: 125 (高中生)
- 金幣: 3820.1
- 散金: 5
- 紅花: 9
- 帖子: 262
- 在線: 281.8小時(shí)
- 蟲號(hào): 1781694
- 注冊(cè): 2012-04-27
- 專業(yè): 理論和計(jì)算化學(xué)
4樓2012-09-26 22:50:07
dingxb
金蟲 (正式寫手)
迷途書蟲
- 應(yīng)助: 12 (小學(xué)生)
- 金幣: 1674.5
- 帖子: 482
- 在線: 59.5小時(shí)
- 蟲號(hào): 34085
- 注冊(cè): 2004-01-06
- 性別: GG
- 專業(yè): 原子和分子物理
5樓2012-09-29 12:16:35
相關(guān)版塊跳轉(zhuǎn)
我要訂閱樓主 391566986 的主題更新
| 5 | 1/1 | 返回列表 |
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 一志愿重慶大學(xué)085700資源與環(huán)境總分308求調(diào)劑 +6 | 墨墨漠 2026-03-20 | 6/300 |
|
|---|---|---|---|---|
|
[考研] 求調(diào)劑 +6 | Mqqqqqq 2026-03-19 | 6/300 |
|
|
|
[考研] 346求調(diào)劑[0856] +4 | WayneLim327 2026-03-16 | 7/350 |
|
|
|
[考研] 332求調(diào)劑 +4 | ydfyh 2026-03-17 | 4/200 |
|
|
|
[考研] 材料 336 求調(diào)劑 +3 | An@. 2026-03-18 | 4/200 |
|
|
|
[考研] 一志愿武理材料305分求調(diào)劑 +6 | 想上岸的鯉魚 2026-03-18 | 7/350 |
|
|
|
[考研] 295求調(diào)劑 +4 | 一志愿京區(qū)211 2026-03-18 | 6/300 |
|
|
|
[考研] 287求調(diào)劑 +7 | 晨昏線與星海 2026-03-19 | 8/400 |
|
|
|
[考研] 一志愿中南化學(xué)（0703）總分337求調(diào)劑 +8 | niko- 2026-03-19 | 9/450 |
|
|
|
[考研] 265求調(diào)劑 +12 | 梁梁校校 2026-03-19 | 13/650 |
|
|
|
[考研] 0703化學(xué)調(diào)劑 ，六級(jí)已過，有科研經(jīng)歷 +13 | 曦熙兮 2026-03-15 | 13/650 |
|
|
|
[考研] 298-一志愿中國(guó)農(nóng)業(yè)大學(xué)-求調(diào)劑 +9 | 手機(jī)用戶 2026-03-17 | 9/450 |
|
|
|
[考研] 288求調(diào)劑，一志愿華南理工大學(xué)071005 +5 | ioodiiij 2026-03-17 | 5/250 |
|
|
|
[考研] 梁成偉老師課題組歡迎你的加入 +9 | 一鴨鴨喲 2026-03-14 | 11/550 |
|
|
|
[考研] 266求調(diào)劑 +5 | 陽陽哇塞 2026-03-14 | 10/500 |
|
|
|
[考研] 生物學(xué)071000 329分求調(diào)劑 +3 | 我愛生物生物愛?/a> 2026-03-17 | 3/150 |
|
|
|
[考研] 277調(diào)劑 +5 | 自由煎餅果子 2026-03-16 | 6/300 |
|
|
|
[考研] 268求調(diào)劑 +8 | 一定有學(xué)上- 2026-03-14 | 9/450 |
|
|
|
[考研] 085601求調(diào)劑 +4 | Du.11 2026-03-16 | 4/200 |
|
|
|
[考研] 304求調(diào)劑 +5 | 素年祭語 2026-03-15 | 5/250 |
|