fortran中变量后边加个(*)是什么意思 10
原函数调用出:CALLCHKWUB(FILRNX(1,IFL),OBSTIM(1),1MAXSLP,RMSL5,MINOBS,SLPMIN,SLPOUT,IPOLY,2N...
原函数调用出:CALL CHKWUB(FILRNX(1,IFL),OBSTIM(1),
1 MAXSLP,RMSL5,MINOBS,SLPMIN,SLPOUT,IPOLY,
2 NOBA(IARC),SVN,LINTIM(IS),LINOBS(IS),
3 LINFLG(IS),NBAD(IARC),ARCOFF(IARC,5),
3 ARCRMS(IARC,5),NSLIP(IARC),SLPTIM(1,IARC),
4 SLPCYC(1,IARC,5))
函数实现处:CHKWUB(FILRNX,OBSTIM,MAXSLP,RMSMAX,MINOBS,SLPMIN,
1 SLPOUT,IPOLY ,NOBS ,SVN ,LINTIM,LINOBS,
2 LINFLG,NBAD ,ARCOFF,ARCRMS,NSLIP ,SLPTIM,
3 SLPCYC)
REAL*8 LINTIM(*),LINOBS(*)
在函数实现中 LINTIM(*),LINOBS(*)这种什么意思?从实参看应该是传一个值,为啥进来函数内,变成数组? 展开
1 MAXSLP,RMSL5,MINOBS,SLPMIN,SLPOUT,IPOLY,
2 NOBA(IARC),SVN,LINTIM(IS),LINOBS(IS),
3 LINFLG(IS),NBAD(IARC),ARCOFF(IARC,5),
3 ARCRMS(IARC,5),NSLIP(IARC),SLPTIM(1,IARC),
4 SLPCYC(1,IARC,5))
函数实现处:CHKWUB(FILRNX,OBSTIM,MAXSLP,RMSMAX,MINOBS,SLPMIN,
1 SLPOUT,IPOLY ,NOBS ,SVN ,LINTIM,LINOBS,
2 LINFLG,NBAD ,ARCOFF,ARCRMS,NSLIP ,SLPTIM,
3 SLPCYC)
REAL*8 LINTIM(*),LINOBS(*)
在函数实现中 LINTIM(*),LINOBS(*)这种什么意思?从实参看应该是传一个值,为啥进来函数内,变成数组? 展开
1个回答
展开全部
F90程序中的数据都有三个特征:类型、种别、属性,由类型说明语句来定义说明。其一般形式是:类型说明[(种别说明)][,属性说明表] :: 变量名表[=初值]例:REAL(KIND=2), DIMENSION(1:10):: X,Y说明变量X,Y都是实型,种别是2,属性是一维数组。这样X、Y实际上是两个种别参数为2的一维实型数组,各具有10个元素。在某些场合下,种别说明与属性说明可以省略,此时它的一般形式是最基本形式:类型说明:: 变量名表这个符号是在定义数据类型时所用的符号,具体没有什么意思,我想你应该明白了吧
追问
我在主函数已经定义了 传进来实参是一个real 为啥进了函数体变成(*),而且在函数体内确实当数组用了 这是什么意思
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询