请问双双精度变量赋值时后缀加什么？

shrine · 发表于 2017-8-13 10:08:37

本帖最后由 shrine 于 2017-8-13 10:30 编辑

双精度变量赋值时，后缀加d
real(8)::a=16.d0

请问双双精度赋值时后缀加什么
real(16)::b

不加后缀的话会出现如下错误

[Fortran] 纯文本查看 复制代码

      program main
      implicit none
      real(16)::a
      real(8)::b
      real(8)::c
      
      a=1.2d0
      b=1.2d0
      c=1.2
      
      write(*,*)a
      write(*,*)b
      write(*,*)c
      end

shrine · 发表于 2017-8-13 15:41:51

本帖最后由 shrine 于 2017-8-13 15:43 编辑

刚刚在intel的论坛得到了答案，应该是

[Fortran] 纯文本查看 复制代码

real(16)::a
a=1.2_16

好像看不清，就是数值后面加个下划线
谢谢楼上

shrine · 发表于 2017-8-13 16:00:21

本帖最后由 shrine 于 2017-8-13 16:02 编辑

chiangtp 发表于 2017-8-13 15:49
"下划线"後的number名為kind number, "literal"形式的kind number是compiler dependent, 不建議使用 ...

推荐使用先定义个常量selected_real_kind，然后下划线后面跟一个常量？

shrine · 发表于 2017-8-13 19:05:19

vvt 发表于 2017-8-13 16:24
是的，就像这样
Real , parameter :: QP = Selected_real_kind( 18 )
Real(Kind=QP) :: a = 3.14_QP ...

谢谢！！！！！

shrine · 发表于 2017-8-14 07:04:51

本帖最后由 shrine 于 2017-8-14 08:05 编辑

vvt 发表于 2017-8-13 16:24
是的，就像这样
Real , parameter :: QP = Selected_real_kind( 18 )
Real(Kind=QP) :: a = 3.14_QP ...

Integer , parameter :: QP = Selected_real_kind( 18 )
Real(Kind=QP) :: a = 3.14_QP ...

笔误
相应的，dsqrt应该写成什么？

shrine · 发表于 2017-10-25 11:06:17

vvt 发表于 2017-8-14 08:23
的确是笔误，应该是
Integer , parameter :: QP = Selected_real_kind( 18 )
Real(Kind=QP) :: a = 3.14_QP ...

整数转化成QP精度的实数用什么符号？

比如i是整数
dble（i）是双精度

把i转成QP精度呢？

shrine · 发表于 2017-11-9 13:48:55

本帖最后由 shrine 于 2017-11-9 14:21 编辑

kyra 发表于 2017-10-25 11:18
dble 这个函数我从来不用。
转换成浮点数（不管精度是多少），都可以用 real 函数。

感谢一直以来的帮助
再请教一个语法问题，行向量和矩阵中的一列相乘难道不是一个数么
为何这段代码说c的形状不对呢

[Fortran] 纯文本查看 复制代码

       
 program main
      implicit none
      integer::a(2,2),b(1,2),c
      a(1,1)=1
      a(2,1)=2
      a(1,2)=5
      a(2,2)=6
      b(1,1)=3
      b(1,2)=4
      c=matmul(b,a(:,1))
      end

shrine · 发表于 2017-11-9 15:35:45

vvt 发表于 2017-11-9 15:06
向量，矩阵，是数学概念。
编程里只有一维数组，二维数组的概念。

我还是老实点用dot_product吧，谢谢

[数值问题] 请问双双精度变量赋值时后缀加什么？