很抱歉问了这么基本的问题。我正在研究一些 FOTRAN77 代码并尝试从 Python 调用它。但是,我发现从函数返回两个或多个值时存在一些问题。
下面是代码。它有四个输入(APPRAT、APPNUM、APSPAC、KOC),我想返回三个参数值(APPTOT、KD、TDEGF),它们存储在 GENEEC3 中。我的编译代码在只返回一个参数时运行良好,但当我请求它返回三个参数时不起作用。
所以请给我一些建议,谢谢大家的帮助!
Function GENEEC3 (APPRAT,APPNUM,APSPAC,KOC)
REAL GENEEC3(3)
CHARACTER*1 METHOD,AGAIN,WETTED,ADSORP,AIRFLG,GRNFLG,ORCFLG,GRSIZE
Cf2py intent(in) APPRAT,APPNUM,APSPAC,KOC,METHAF,WETTED,METHOD,AIRFLG
Cf2py intent(in) YLOCEN,GRNFLG,ORCFLG,INCORP,SOL,METHAP,HYDHAP,FOTHAP
Cf2py intent(out) GENEEC3(3)
C
APPTOT=APPRAT*APPNUM
TDEGF = APPNUM * APSPAC
KD = 0.0116 * KOC
C
GENEEC3(1)=APPTOT
GENEEC3(2)=KD
GENEEC3(3)=TDEGF
C
RETURN
END Function GENEEC3