How do I output a real number to file

[marrisa]

Dear Members,

I am trying to write a real(8) variable to a text file. The number is of the form -1.2E-03. I am using the edit descriptor, F7.4 because I want to write it in the form,-0.0012. I am getting an iostat error 61 and I think this means that I am using the incorrect descriptor. How do I write the variable to the file in the form that I require?

Thanks so much for your help

Regards
Marrisa

 

[xwb]

Does the following work?

      program pfloat
      real x
      x = -1.2E-3
      print *, 'Using inline format'
      print '(F7.4)', x
      print *, 'Using Format Stmt'
      print 100, x
100   format (1X, F7.4)
      stop
      end

If it does, then it could possibly be your open statement. How have you opened the file: formatted or unformatted?

 

[marrisa]

Yes it does, thanks alot...My error was that I was using an incorrect descriptor for the seperator space between numbers in the file, I was using 'A1' instead of '1X', your usage of '1X' actually reminded of this...thanks again...