fortran - 现代等效于 DCMPLX？

Question

使用众所周知的DCMPLX内在函数，gfortran -g -std=f2008 -Wall -Wextra -O2 返回 Warning: (1) 处的内在 'dcmplx' 不包含在所选标准中，而是 GNU Fortran 扩展并且“dcmplx”将被视为声明为 EXTERNAL。使用适当的 -std=* 选项或定义 -fall-intrinsics 以允许此内在。是否有一种现代的交叉编译器方式来处理 double 复数？

Answer 1

如果你想转换成 double 类型，不管它有什么类型的数字，使用

cmplx(real_part, imaginary_part, kind=kind(1.0d0))

通常您应该将种类编号存储在命名常量中。如果您实际上不想要 double ，而是需要固定的存储大小，请使用模块 iso_fortran_env 中的命名常量，或者使用 selected_real_kind() 指定精度的旧方法。