fortran f90如何定义双精度？

"以定义一个双精度 s 为例

方法1：

DOUBLE PRECISION :: s

方法2：

Real(8) :: s

方法3：

Real( Kind = 8 ) :: s

但方法2，和方法3，并不能保证所有编译器都能够认可 8，不同编译器，对 8 的定义不同。

因此，最好的办法是方法4：

Integer , parameter :: NP = SELECTED_REAL_KIND(8)

Real( Kind = NP ) :: s

其中，SELECTED_REAL_KIND(8) 表示自动选择一种精度，使之能够精确到小数点后 8 位。这个精度叫 NP，然后定义一个 NP 精度的变量，叫 s

（在32位编译器上，NP 表示双精度）"