- Als neu kennzeichnen
- Lesezeichen
- Abonnieren
- Stummschalten
- RSS-Feed abonnieren
- Kennzeichnen
- Anstößigen Inhalt melden
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.
I am porting a code from RS/6000 that does not report leading zeroes in real output.
Link kopiert
3 Antworten
- Als neu kennzeichnen
- Lesezeichen
- Abonnieren
- Stummschalten
- RSS-Feed abonnieren
- Kennzeichnen
- Anstößigen Inhalt melden
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.
Mike
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.
Mike
- Als neu kennzeichnen
- Lesezeichen
- Abonnieren
- Stummschalten
- RSS-Feed abonnieren
- Kennzeichnen
- Anstößigen Inhalt melden
You can try PowerStation compatibility /fpscomp I believe it didn't use leading zeros.
James
James
- Als neu kennzeichnen
- Lesezeichen
- Abonnieren
- Stummschalten
- RSS-Feed abonnieren
- Kennzeichnen
- Anstößigen Inhalt melden
No, there's no option for this - sorry.
Steve
Steve

Antworten
Themen-Optionen
- RSS-Feed abonnieren
- Thema als neu kennzeichnen
- Thema als gelesen kennzeichnen
- Diesen Thema für aktuellen Benutzer floaten
- Lesezeichen
- Abonnieren
- Drucker-Anzeigeseite