Pergunta

Alguém knwow o que o postfix " d + 0 " meios nas atribuições para M1, M2 e M4 abaixo ou existe algum recurso na web ou um livro onde um é muito provável encontrar esta informação?


      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
Foi útil?

Solução

Isso significa "precisão dupla" e as +0 meios 10 para o poder zeroth (zero é o expoente).

Aqui está uma citação de eu poderia encontrar:

Um número armazenado em um computador é limitada em magnitude e precisão. Os limites dependem do nomeadamente computador. Assim, um número real tem apenas um certo número de significativa dígitos. Se mais dígitos significativos são requerido para um cálculo, então números de precisão dupla deve ser utilizado. Um DUPLO DE PRECISÃO constante é escrito da mesma forma exponencial como um constante precisão real único, exceto com um D em vez de um E separando a mantissa do expoente.

E aqui está uma citação de uma referência melhor, www.fortran.com , especificamente o padrão F77.

4.5.2 precisão dupla Constant.

As formas de precisão dupla constante são:

  1. constante verdadeira Básico seguido por uma dupla precisão expoente
  2. Integer constante seguido por uma precisão dupla expoente

O valor de uma dupla precisão constante é a produto da constante que precede a D e a potência de dez indicado pelo número inteiro seguinte A a D. número inteiro parte constante de forma (2) pode ser escrito com mais dígitos que um processador irá utilizar para aproximar a valor da constante.

Licenciado em: CC-BY-SA com atribuição
Não afiliado a StackOverflow
scroll top