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

有限元程序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.      1(   RALGVA   ,IPROPS   ,LALGVA   ,NTYPE      ,RPROPS   ,----------^

我找到 matisu.f 源文件，第95行，调用suvmps子程序时报错，
CALL SUVMPS
1( RALGVA ,IPROPS ,LALGVA ,NTYPE ,RPROPS ,
2 RSTAVA ,STRAT ,STRES )

suvmps函数的声明如下：
      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
页: [1]
查看完整版本: 有限元程序HYPLAS2.0编译失败