有限元程序HYPLAS2.0编译失败

ft_eason · 发表于 2023-7-1 00:20:13

《Computational Methods for Plasticity: Theory and Applications》这本书的配套Fortran程序Hyplas2.0我按照README文档的提示尝试编译，但一直不成功。

开发环境是Windows11， Visual Studio 2022，使用oneAPI 2022的编译器。

报错信息如下图(未完全显示)：

错误都是6634，实参和虚参形状不匹配

对于第一个报错信息：
F:\Code\HYPLAS_v2.0\src\MATERIALS\matisu.f(95): error #6634: The shape matching rules of actual arguments and dummy arguments have been violated. [RALGVA] 1( RALGVA ,IPROPS ,LALGVA ,NTYPE ,RPROPS ,----------^

我找到 matisu.f 源文件，第95行，调用suvmps子程序时报错，

[Fortran] syntaxhighlighter_viewsource syntaxhighlighter_copycode

CALL SUVMPS
1( RALGVA ,IPROPS ,LALGVA ,NTYPE ,RPROPS ,
2 RSTAVA ,STRAT ,STRES )

suvmps函数的声明如下：

[Fortran] syntaxhighlighter_viewsource syntaxhighlighter_copycode

      SUBROUTINE SUVMPS
     1(   DGAMA      ,IPROPS     ,LALGVA     ,NTYPE      ,RPROPS     ,
     2    RSTAVA     ,STRAT      ,STRES      )

形参 DGAMA 在suvmps 内部用作一个标量，因此产生形参和实参的冲突

附件为软件源码

请大佬帮忙解答

fcode · 发表于 2023-7-5 14:32:20

尝试关闭接口检查。工程属性，Fortran，Diagnostics，Check Routine Interfaces 改为 No

[求助] 有限元程序HYPLAS2.0编译失败

美女勋章

热心勋章

星光勋章

新人勋章

贡献勋章

管理勋章

帅哥勋章

爱心勋章

规矩勋章

元老勋章

水王勋章