[Tech] Fortran77 e comando FORMAT

[Carlo Baffa]

On Thu, 5 Feb 2009, Christian wrote:

> Ciao, spero che anche questa volta qualcuno possa aiutarmi.
> Ecco il codice...
>
>      PT1=PT1*DZ
>      PT2=PT2*DZ
>      PT=PT1+PT2
>      OPEN(99,FILE= 'PROD',STATUS='NEW')
>      WRITE(99,*) PT
> 99    FORMAT(F1.3) <------ ???
>      CLOSE(99)
>
> Il valore di PT che vado a scrivere nel file PROD
> vorrei fosse nella seguente forma: 0.543
>

Se ricordo bene la sintassi del fortran stai facendo confusione tra l'unita' 
logica (specificata nello open) e la label del format (l'etichetta 
dell'istruzione format). Non e' che dovresti scrivere WRITE(99,99) ?
E comunque se scrivi

         WRITE(99,199) PT
  199    FORMAT(F1.3)

E' meglio

ciao
Carlo

----
  Carlo Baffa                   INAF - Osservatorio Astrofisico di Arcetri
  baffa@arcetri.astro.it               Largo Fermi 5
  http://www.arcetri.astro.it/~baffa/  I-50125-Firenze ITALY
-------------------------------------------------------------------------
  http://www.skysoft.org  The new Astronomical Software Directory