3

以下の M1、M2、および M4 への割り当てで接尾辞「d+0」が何を意味するか知っている人はいますか? または、この情報を見つける可能性が非常に高い Web または本にリソースがありますか?


      subroutine plot( t, x, p, q, nga, nt, wron, 
     &                 ngq, gq, ngaq1, ngaq2, gaq, rwh, iwh )
        implicit none

        integer*4 nga, nt, ngq, ngaq1, ngaq2, iwh(*)

        real*8 t, x(*), p(*), q(*), wron(nga,*),
     &         gq(ngq,*), gaq(ngaq1,ngaq2,*), rwh(*)

        real*8 M1, M2, M3, M4, mr, mst, h3, Tc
        integer*8 iflag

c       DISCRETIZE1( Tc, rwh, iwh )

        M1 = 0.1362d+0
        M2 = 0.09806d+0
        M3 = M1 + M2
        M4 = 0.236d+0

        mr = M1*x(1) + M2*x(2) + M3*x(3) + M4*x(4)
        mst =  M1*q(1) + M2*q(2) + M4*q(3)

        call mess3( t, x, h3, p, q, rwh, iwh, iflag )

        write (10,100) t, x(1), x(2), x(3), x(4), Tc, h3, mr-mst
100     format( e20.10, 7(1x,e20.10) ) 

  end
4

1 に答える 1

9

これは「倍精度」を意味し、+ 0は10の0乗を意味します(ゼロは指数です)。

これが私が見つけた最初の参考文献からの引用です:

コンピュータに保存される数は、大きさと精度に制限があります。制限は特定のコンピューターによって異なります。したがって、REAL番号には、特定の有効桁数しかありません。計算に有効数字がさらに必要な場合は、倍精度数を使用する必要があります。DOUBLE PRECISION定数は、仮数を指数から分離するEの代わりにDを使用することを除いて、単精度REAL定数と同じ指数形式で記述されます。

そして、ここに、より良いリファレンス、www.fortran.com、特にF77標準からの引用があります。

4.5.2倍精度定数。

倍精度定数の形式は次のとおりです。

  1. 基本的な実定数とそれに続く倍精度指数
  2. 整数定数とそれに続く倍精度指数

倍精度定数の値は、Dの前の定数と、Dの後に続く整数で示される10の累乗の積です。形式(2)の整数定数部分は、プロセッサが使用するよりも多くの桁で書き込むことができます。定数の値を概算します。

于 2009-05-27T03:36:45.690 に答える