gpt4 book ai didi

compiler-errors - 英特尔 Fortran 错误 #6633 : The type of the actual argument differs from the type of the dummy argument

转载 作者:行者123 更新时间:2023-12-02 03:34:08 24 4
gpt4 key购买 nike

抱歉,我可能在这里问了这样一个基本问题,我是使用英特尔 Fortran 编程的新手,所以我认为在这种情况下我不知道有一些缺失或组织错误。如果有人可以在这方面帮助我,我将不胜感激。

问题是我在编译代码时看到以下错误,而我相信我已经声明了派生类型变量 crme正确。

error #6633: The type of the actual argument differs from the type of the dummy argument.   [CR]

error #6633: The type of the actual argument differs from the type of the dummy argument. [ME]

我的代码包含一个名为 InputData 的模块其中包含派生类型的定义 grid和派生类型变量的声明 crme类型 grid .我使用 USE 在主程序中使用这些定义。陈述。错误是指主程序中的一行 CALLs使用 cr 的内部子程序和“我”作为输入参数( INTENT(IN))。令人惊讶的是,我使用完全相同的方式来声明派生类型变量 ls类型 Levelset在模块 OutputData 中定义使用 USE在主程序中声明,并且在同一子程序中对该变量没有错误。添加 USE InputData子程序的语句 ComputeLS也没有解决这个问题。程序单元的结构如下:
MODULE InputData
TYPE grid
REAL, DIMENSION(:,:), POINTER :: nodes
INTEGER, DIMENSION(:,:), POINTER :: connectivity
END TYPE grid
TYPE(grid) :: cr, me

CONTAINS

END MODULE InputData

MODULE OutputData
TYPE levelset
REAL, DIMENSION(:), POINTER :: f, g
END TYPE levelset

TYPE(levelset) :: ls

CONTAINS

END MODULE OutputData

PROGRAM Main
USE InputData
USE OutputData
USE Timing
IMPLICIT NONE

INTEGER, DIMENSION(:,:), POINTER :: ed


CALL ComputeLS(me, cr, ed, ls) <========= error #6633 refers to this line


CONTAINS

! INTERNAL PROCEDURES
SUBROUTINE ComputeLS(me, cr, ed, ls)

USE MathCalc
IMPLICIT NONE

TYPE(grid), INTENT(IN) :: me, cr
INTEGER, DIMENSION(:,:), INTENT(IN) :: ed

TYPE(levelset), INTENT(OUT) :: ls


END SUBROUTINE ComputeLS

END PROGRAM Main

我试图删除所有模块并将所有类型定义和变量声明包含在主程序中,而不是在单独的模块中。但不幸的是,错误仍然存​​在。

最佳答案

我认为这是一个已知的编译器错误,ID DPD200250382,已为我们即将发布的 15.0 版本修复,但您的部分示例与问题描述略有不同。您是否使用我们的 Windows 编译器并启用了诊断 > 检查例程接口(interface)?如果是这样,请尝试将该选项设置为否,看看会发生什么。

如果这没有帮助,我希望看到一个完整的测试用例。

关于compiler-errors - 英特尔 Fortran 错误 #6633 : The type of the actual argument differs from the type of the dummy argument,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/24853820/

24 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com