Unterdrücken von Zeilenumbrüchen in Fortran 95 write statements

Question

Ich möchte auf die Standardausgabe in Fortran schreiben, ohne einen Zeilenumbruch hinzuzufügen. Das heißt, ich so etwas wie dies tun will:

a='some string and ' 
b='some other string' 
write(*,101) a 
... 
write(*,102) b 
... 
101 format(a,...) 
102 format(a) 

Ist es möglich, eine Art von Format-Anweisung zu verwenden, um den Zeilenumbruch in 101, so dass der Code gibt „einige String und einige andere Zeichenfolge“ auf supress die gleiche Ausgangsleitung?

Beachten Sie, dass es wichtig ist, dass die beiden write-Anweisungen getrennt sind, da der Code dazwischen tatsächlich zum Generieren der zweiten Zeichenfolge verwendet wird.

Answer 1

Sie können die advance='no' Option:

a='some string and ' 
b='some other string' 
write(*,101,advance='no') a 
... 
write(*,102) b 
... 
101 format(a) 
102 format(a) 

Dies wird die Zeilenumbrüche unterdrücken.