Fortran 中 单精度的变量和双精度的变量可以共同运算吗?在计算过程中二者可以通过什么命令转化吗?
1个回答
展开全部
可以共同运算,编译器会自动转换。
如果你要手动转换,可以用 real 函数。
Program Baidu_Thlws
Implicit None
Real( Kind = 4 ) :: rD
Real( Kind = 8 ) :: rS
rS = 1.0D0
rD = real( rS , kind = 4 )
write( * , * ) rD
rD = 3.0
rS = real( rD , kind = 8 )
write( * , * ) rS
End Program Baidu_Thlws
如果你要手动转换,可以用 real 函数。
Program Baidu_Thlws
Implicit None
Real( Kind = 4 ) :: rD
Real( Kind = 8 ) :: rS
rS = 1.0D0
rD = real( rS , kind = 4 )
write( * , * ) rD
rD = 3.0
rS = real( rD , kind = 8 )
write( * , * ) rS
End Program Baidu_Thlws
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询