在无效操作中返回 NaN (gfortran)

问题描述

有没有办法在无效操作中返回 nan 值而不是错误（编译或运行时），例如：'sqrt(-1.)' 或 '1./0.'？ （我的意思是没有 'if' 条件和 -finit-real 标志） 我试过这个例子

Program test
use,intrinsic :: ieee_features
use,intrinsic :: ieee_arithmetic
use,intrinsic :: ieee_exceptions
implicit none
real:: a 
a = 1./0.
print*,a

end program test

，我得到这个错误：

4 | a = 1./0。 | 1 错误：在 (1) 处被零除 （我是这个主题的新手，可能我犯了一些错误）

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）