fortran 中的% DO iKey=1,inpKey%nKeys IF (inpKey%status /= myStatus_Run) EXITIF (keyWord == inpKey%keys(iKey)%name) found = .TRUE.END DO

分类: 作业答案 • 2021-12-18 16:44:58

问题描述：

fortran 中的%
DO iKey=1,inpKey%nKeys
IF (inpKey%status /= myStatus_Run) EXIT
IF (keyWord == inpKey%keys(iKey)%name) found = .TRUE.
END DO

答

比如 a%b 表示结构体变量 a 的 b 成员
类似于 C 语言的 a.b,结构体（struct）
inpKey%nKeys
inpKey 是一个结构体,你可以搜索一下 Type inpKey 找到它的定义
nKeys 是它的一个结构体成员.就这样