How to Avoid Leading Whitespace When Writing to a Text File in FORTRAN?

[Saladsamurai]

I am writing to a text file and a do not want any leading whitespace on each line. I have been trying the Write(*,'(a)') statement. This works just fine:

Program MyTest

Open(2,File = 'testFile.inp')

Write(2,'(a)')'DIAG'
Write(2,'(a)')'REAC C2H4F2 2.00000000000'

Close(2)
End

However, the value written is not always 2.00000000000 and hence I would like something like:

Program MyTest
Double Precision PHI

PHI = 2.0

Open(2,File = 'testFile2.inp')

Write(2,'(a)')'DIAG'
Write(2,'(a)')'REAC C2H4F2 ', [B]PHI[/B]

Close(2)
End

I am trying to avoid statement labels if possible.

However the latter produces nonsense in the file for PHI.

 

[Saladsamurai]

If I could find a way to convert a type Real to a string I could do this. Anyone know how to do that?

 

[Mark44]

Something like this?

WRITE(17, FMT= '('REAC C2H4F2', 1X, F13.10)') PHI