 |
 |
 |
 |
 |
 |
||
 |
 |
 |
 |
 |
| 查看: 2267 | 回復(fù): 13 | |||
575406210銀蟲 (初入文壇)
|
[求助]
使用全局變量做實參，導(dǎo)致實參與虛參類型不一致
|
||
|
我把我遇到的問題簡化一下，大概意思就是（XX是全局變量） SUBROUTINE FIELD（MTYPE,GMAX,G,GN,XL,XLN,DEP,EST,PO,DENS,H,S,INV,& & BB,KOUT,KPOINT,RR,TSTIF,STRN,XX,NF,LAYER,NHORZ,NVERT,INPT,DW,& & DT,NOUT,KDISP,TOTFR,NOPT,RATIO,DAMP,KSTRN,NAVAIL,GTYPE,DTYPE,& & KST,ND,U2GMAX,FGG,FLMD,IUSE） IMPLICIT REAL*8 (A-H,O-Z) DIMENSION XX(*) COMPLEX*16 FLMD COMPLEX*16 RR,BB,TSTIF,STRN COMPLEX*16 OLSTRN COMPLEX*16 GSTAR COMPLEX*16 ALOAD COMPLEX*16 P1,P10 COMPLEX*16 FGG REAL*8 NHORZ,NVERT REAL*8 KOUT,KBASE REAL*4 TIM1,TIM2 ...... IF (INPTB .NE. NF) CALL MOTION (XX(K01),XX(K02),XX(K03),XX(K04),XX(K04),XX(K05),& (調(diào)試后顯示這一行有兩個XX實參與虛參類型不一致) & XX(K06),XX(K07),XX(K08),XX(K09),XX(K10),XX(K11),XX(K12),& & XX(K13),XX(K14),XX(K15),DEP,DEP,KBASE,NBASE,DAMP,BB,INV,& (調(diào)試后顯示這一行有一個XX實參與虛參類型不一致) & S,MCUT,U2GMAX,NDP,KST,NBBA,KKEY,KKP,NMBR) SUBROUTINE MOTION (TIME1,DD,W2,ACC,ACCC,ACCMAX,TT,FR,RD,PRV,PAA, . SA,SV,T,FOUAM,AAAC,XORD,YORD,KEYSPC,KOUTP,DAMP,BB,INV,S, . NCUT,U2GMAX,NDP,KST,NBLKCM,KEY,NOUT,NMBR) IMPLICIT REAL*8 (A-H,O-Z) DIMENSION IDEN(:,  ALLOCATABLE IDEN REAL*8 KEYSPC REAL*4 TIM1,TIM2 COMPLEX*16 ACCC,AAAC,BB,DD （調(diào)試后出現(xiàn)的錯誤是ACCC,BB,DD這三個變量引起的，這里聲明的是復(fù)型，但是被調(diào)用為實參時使用的是全局變量，而全局變量并沒有聲明類型） 這種問題我該怎么解決呢？請大家?guī)蛶臀�。謝謝了。 |
回復(fù)此樓» 猜你喜歡
284求調(diào)劑
已經(jīng)有3人回復(fù)
-
085601一志愿中山大學(xué)深圳材料工程330求調(diào)劑
已經(jīng)有3人回復(fù)
-
一志愿北化085600材料專碩275|有文章專利｜求調(diào)劑
已經(jīng)有12人回復(fù)
-
材料專業(yè)申博
已經(jīng)有4人回復(fù)
-
311求調(diào)劑一志愿合肥工業(yè)大學(xué)
已經(jīng)有5人回復(fù)
-
070300化學(xué)279求調(diào)劑
已經(jīng)有6人回復(fù)
-
材料與化工（0856）304求B區(qū)調(diào)劑
已經(jīng)有9人回復(fù)
-
085601 329分調(diào)劑
已經(jīng)有3人回復(fù)
-
本2一志愿C9-333分，材料科學(xué)與工程，求調(diào)劑
已經(jīng)有3人回復(fù)
-
一志愿大連理工大學(xué)材料求調(diào)劑
已經(jīng)有5人回復(fù)
575406210
銀蟲 (初入文壇)
- 應(yīng)助: 0 (幼兒園)
- 金幣: 907.2
- 帖子: 43
- 在線: 3.6小時
- 蟲號: 3655819
- 注冊: 2015-01-21
- 性別: GG
- 專業(yè): 自然語言理解與機器翻譯
2樓2015-09-04 09:01:02
57540621012樓2015-09-07 22:26:40
575406210
銀蟲 (初入文壇)
- 應(yīng)助: 0 (幼兒園)
- 金幣: 907.2
- 帖子: 43
- 在線: 3.6小時
- 蟲號: 3655819
- 注冊: 2015-01-21
- 性別: GG
- 專業(yè): 自然語言理解與機器翻譯
3樓2015-09-05 10:14:27
4樓2015-09-05 13:28:51
575406210
銀蟲 (初入文壇)
- 應(yīng)助: 0 (幼兒園)
- 金幣: 907.2
- 帖子: 43
- 在線: 3.6小時
- 蟲號: 3655819
- 注冊: 2015-01-21
- 性別: GG
- 專業(yè): 自然語言理解與機器翻譯
5樓2015-09-05 14:59:19
6樓2015-09-05 17:08:55
7樓2015-09-05 17:12:05
575406210
銀蟲 (初入文壇)
- 應(yīng)助: 0 (幼兒園)
- 金幣: 907.2
- 帖子: 43
- 在線: 3.6小時
- 蟲號: 3655819
- 注冊: 2015-01-21
- 性別: GG
- 專業(yè): 自然語言理解與機器翻譯
|
program flushp implicit real*8 (a-h,o-z) character*80 iname,bname character*11 fm,uf,sc,uk,bi,cdate character*9 char,ctime real*4 time1,time2 integer idat,idayno,isd1,isd2 external idat,idayno,maxfiles dimension xx( allocatable xx data fm,uf,sc,uk/'formatted','unformatted','scratch','unknown'/ .......... 以上是主程序，只是對XX聲明了是可變數(shù)組，但是類型并未聲明 |
8樓2015-09-06 10:15:49
9樓2015-09-06 11:43:39
10樓2015-09-06 11:46:34
相關(guān)版塊跳轉(zhuǎn)
我要訂閱樓主 575406210 的主題更新
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 085701環(huán)境工程求調(diào)劑 +11 | 多久上課 2026-03-27 | 12/600 |
|
|---|---|---|---|---|
|
|
[考研] 調(diào)劑 +4 | GK72 2026-03-30 | 4/200 |
|
|
|
[考研] 279求調(diào)劑 +12 | j的立方 2026-03-29 | 12/600 |
|
|
[考研] 0703化學(xué)求調(diào)劑 +6 | 丹青奶蓋 2026-03-26 | 8/400 |
|
|
|
[考研] 292求調(diào)劑 +13 | 是妍子也是研子 2026-03-30 | 13/650 |
|
|
|
[碩博家園] 求調(diào)劑 有機化學(xué)考研356分 +10 | Nadiums 2026-03-25 | 11/550 |
|
|
|
[考研] 0856求調(diào)劑 +8 | 楒桉 2026-03-28 | 8/400 |
|
|
|
[考研]
 一志愿武漢理工，總分321，英一數(shù)二，求老師收留。
+11
|
nnnnnnn5 2026-03-25 | 11/550 |
|
|
|
[考研] 調(diào)劑求院校招收 +6 | 鶴鯨鴿 2026-03-28 | 6/300 |
|
|
|
[考研] 320分，材料與化工專業(yè)，求調(diào)劑 +9 | 一定上岸aaa 2026-03-27 | 13/650 |
|
|
|
[考研] 347求調(diào)劑 +3 | 山頂見α 2026-03-25 | 3/150 |
|
|
|
[考研] 材料求調(diào)劑一志愿哈工大324 +7 | 閆旭東 2026-03-28 | 9/450 |
|
|
|
[考研] 266分求材料化工冶金礦業(yè)等專業(yè)的調(diào)劑 +4 | 哇呼哼呼哼 2026-03-26 | 4/200 |
|
|
|
[考研] 085601 材料工程 313分 求調(diào)劑 +5 | Ong3 2026-03-27 | 5/250 |
|
|
|
[考研] 298調(diào)劑 +3 | jiyingjie123 2026-03-27 | 3/150 |
|
|
|
[考研] 一志愿鄭大085600，310分求調(diào)劑 +5 | 李瀟可 2026-03-26 | 5/250 |
|
|
|
[考研] 一志愿吉大071010，316分求調(diào)劑 +3 | xgbiknn 2026-03-27 | 3/150 |
|
|
|
[考研] 0703化學(xué)338求調(diào)劑！ +6 | Zuhui0306 2026-03-26 | 7/350 |
|
|
|
[考研] 281求調(diào)劑 +6 | Koxui 2026-03-24 | 7/350 |
|
|
|
[考研] 各位老師您好：本人初試372分 +5 | jj涌77 2026-03-25 | 6/300 |
|