Непонятная двойная точность в Фортране
Напомните мне сейчас этот животрепещущий вопрос: каков «принятый» способ объявить двойную точность реальной в современном Фортране? В порядке от самого старого до самого нового, история выглядит так:DOUBLE PRECISION
, тогдаREAL(kind=8)
, тогдаINTEGER, PARAMETER :: dp=kind(1.d0)
с участиемREAL(kind=dp)
- теперь Меткалф говоритdp=kind(0.d0)
--и сейчасfloat32=selected_real_kind(6,37)
или жеfloat64=selected_real_kind(15,307)
, Так...
kind
избыточный вREAL(kind=dp)
?Существуют ли какие-либо специальные флаги, необходимые во время компиляции, чтобы вызвать двойную точность сgfortran
или жеifort
?