| 查看: 2245 | 回复: 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 (调试后出现的错误是ACCC,BB,DD这三个变量引起的,这里声明的是复型,但是被调用为实参时使用的是全局变量,而全局变量并没有声明类型) 这种问题我该怎么解决呢?请大家帮帮我。谢谢了。 |
» 猜你喜欢
【考研调剂】化学专业 281分,一志愿四川大学,诚心求调剂
已经有4人回复
317求调剂
已经有5人回复
0817 化学工程 299分求调剂 有科研经历 有二区文章
已经有10人回复
一志愿 西北大学 ,070300化学学硕,总分287,双非一本,求调剂。
已经有3人回复
一志愿福大288有机化学,求调剂
已经有3人回复
085600材料与化工求调剂
已经有6人回复
一志愿西安交通大学材料工程专业 282分求调剂
已经有6人回复
085600材料与化工调剂 324分
已经有10人回复
294求调剂材料与化工专硕
已经有11人回复
一志愿南昌大学,327分,材料与化工085600
已经有3人回复
575406210
银虫 (初入文坛)
- 应助: 0 (幼儿园)
- 金币: 907.2
- 帖子: 43
- 在线: 3.6小时
- 虫号: 3655819
- 注册: 2015-01-21
- 性别: GG
- 专业: 自然语言理解与机器翻译
5楼2015-09-05 14:59:19
575406210
银虫 (初入文坛)
- 应助: 0 (幼儿园)
- 金币: 907.2
- 帖子: 43
- 在线: 3.6小时
- 虫号: 3655819
- 注册: 2015-01-21
- 性别: GG
- 专业: 自然语言理解与机器翻译
2楼2015-09-04 09:01:02
4楼2015-09-05 13:28:51
6楼2015-09-05 17:08:55














回复此楼