Suppression des sauts de ligne dans les instructions d'écriture Fortran 95

Question

Je voudrais écrire sur la sortie standard dans fortran sans ajouter de saut de ligne. Autrement dit, je veux faire quelque chose comme ceci:

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

Est-il possible d'utiliser une sorte de déclaration de format pour supress le saut de ligne à 101, de sorte que les sorties de code « certains de chaîne et d'une autre chaîne » la même ligne de sortie? Notez qu'il est important que les deux instructions d'écriture soient séparées, car le code entre est effectivement utilisé pour générer la deuxième chaîne.

Answer 1

Vous pouvez utiliser l'option advance='no':

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

Cela supprime le saut de ligne.