FORTRAN 1.0D0，D0需要或编译失败

Question

[注：包含前一个问题的重复，但作为单独的问题分别转贴]

我编译这是已知使用gfortran ifort编译程序。但是编译器就行了

IF (IANG.NE.0) IANG=IANG*SIGN(1.0,XX(4)) 

与编译错误失败：

make: *** [main_file.o] Error 1 

更改此行（注意D0）

IF (IANG.NE.0) IANG=IANG*SIGN(1.0D0,XX(4)) 

解决问题

编译器标志是：

gfortran -fno-automatic -mcmodel=medium -O2 -ffast-math main_file.o -o main_file 

即使对此行为的解释，将不胜感激。

干杯，

德里克

Answer 1

编译错误的原因很可能是类型+种1.0和XX(4)之间的失配，Fortran标准要​​求，在这两个种类的参数SIGN匹配并键入。由于您未向我们展示阵列XX的声明，因此我有信心声称它可能被声明为real与kind=kind(1.0d0)。