No leading zero in real output

No leading zero in real output

How can I produce no leading zero in real output using VF 6.6A compiler?

I am porting a code from RS/6000 that does not report leading zeroes in real output.

4 posts / 0 new
Last post
For more complete information about compiler optimizations, see our Optimization Notice.

According to the Visual Fortran Language Reference Manual, the F edit descriptor requires that output values have at least one digit to the left of the decimal point. With the E and D descriptors, though, a zero to the left of the decimal point is optional. It seems that changing your FORMAT statements to write out values in exponential notation with an appropriate field width would suppress leading zeros.

Another option is to write the values to a character field as an internal file and then to scan the field and manually remove leading zeros.

I don't know if there's a compiler option to control this.


You can try PowerStation compatibility /fpscomp I believe it didn't use leading zeros.


No, there's no option for this - sorry.


Retired 12/31/2016

Leave a Comment

Please sign in to add a comment. Not a member? Join today