Fortran Coder

标题: 有限元程序HYPLAS2.0编译失败 [打印本页]

作者: ft_eason 时间: 2023-7-1 00:20
标题: 有限元程序HYPLAS2.0编译失败
《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] 纯文本查看 复制代码

CALL SUVMPS

1( RALGVA ,IPROPS ,LALGVA ,NTYPE ,RPROPS ,

2 RSTAVA ,STRAT ,STRES )

suvmps函数的声明如下：

[Fortran] 纯文本查看 复制代码

      SUBROUTINE SUVMPS

     1(   DGAMA      ,IPROPS     ,LALGVA     ,NTYPE      ,RPROPS     ,

     2    RSTAVA     ,STRAT      ,STRES      )

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

附件为软件源码

请大佬帮忙解答

HYPLAS_v2.0.zip

207.21 KB, 下载次数: 7

作者: fcode 时间: 2023-7-5 14:32
尝试关闭接口检查。工程属性，Fortran，Diagnostics，Check Routine Interfaces 改为 No

欢迎光临 Fortran Coder (http://bbs.fcode.cn/)