| 5 | 1/1 | 返回列表 |
| 查看: 2257 | 回復: 13 | ||
| 當前只顯示滿足指定條件的回帖,點擊這里查看本話題的所有回帖 | ||
575406210銀蟲 (初入文壇)
|
[求助]
使用全局變量做實參,導致實參與虛參類型不一致
|
|
|
我把我遇到的問題簡化一下,大概意思就是(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),& (調試后顯示這一行有兩個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,& (調試后顯示這一行有一個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 (調試后出現(xiàn)的錯誤是ACCC,BB,DD這三個變量引起的,這里聲明的是復型,但是被調用為實參時使用的是全局變量,而全局變量并沒有聲明類型) 這種問題我該怎么解決呢?請大家?guī)蛶臀。謝謝了。 |
銀蟲 (初入文壇)
銀蟲 (初入文壇)
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 311求調劑 +6 | 冬十三 2026-03-18 | 6/300 |
|
|---|---|---|---|---|
|
[考研] 289材料與化工(085600)B區(qū)求調劑 +3 | 這么名字咋樣 2026-03-22 | 4/200 |
|
|
[考研] 一志愿華中農(nóng)業(yè)071010,總分320求調劑 +5 | 困困困困坤坤 2026-03-20 | 6/300 |
|
|
[考研] 311求調劑 +3 | 26研0 2026-03-20 | 3/150 |
|
|
[考研] 303求調劑 +5 | 安憶靈 2026-03-22 | 6/300 |
|
|
[考研] 廣西大學材料導師推薦 +3 | 夏夏夏小正 2026-03-17 | 5/250 |
|
|
[考研] 工科0856求調劑 +3 | 沐析汀汀 2026-03-21 | 3/150 |
|
|
[考研] 0703化學297求調劑 +3 | Daisy☆ 2026-03-20 | 3/150 |
|
|
[考研] 336求調劑 +5 | rmc8866 2026-03-21 | 5/250 |
|
|
[考研] 化學求調劑 +4 | 臨澤境llllll 2026-03-17 | 5/250 |
|
|
[考研] 一志愿中國石油大學(華東) 本科齊魯工業(yè)大學 +3 | 石能偉 2026-03-17 | 3/150 |
|
|
[考研] 329求調劑 +9 | 想上學吖吖 2026-03-19 | 9/450 |
|
|
[考研] A區(qū)線材料學調劑 +5 | 周周無極 2026-03-20 | 5/250 |
|
|
[考研] 材料學求調劑 +4 | Stella_Yao 2026-03-20 | 4/200 |
|
|
[考研] 一志愿西安交通大學 學碩 354求調劑211或者雙一流 +3 | 我想要讀研究生 2026-03-20 | 3/150 |
|
|
[考研] 085410人工智能專碩317求調劑(0854都可以) +4 | xbxudjdn 2026-03-18 | 4/200 |
|
|
[考博] 26博士申請 +3 | 1042136743 2026-03-17 | 3/150 |
|
|
[考研] 301求調劑 +4 | A_JiXing 2026-03-16 | 4/200 |
|
|
[考博] 26申博 +4 | 八6八68 2026-03-16 | 4/200 |
|
|
[考研] 考研調劑 +3 | 淇ya_~ 2026-03-17 | 5/250 |
|