Bonjour,

Je cherche à écrire un tableau dans un fichier avec description du format. Cela fonctionne très bien, mais j'ai observé qu'au-delà d'une certaine taille par ligne, mon output se divise en deux lignes (comme si un nombre de caractères maximum était atteint).

Ex. de programme (structure similaire au programme initial) :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 
	PROGRAM output_probl
	IMPLICIT NONE
	INTEGER, PARAMETER :: alen=110
	DOUBLE PRECISION, DIMENSION(alen)::a
	INTEGER :: i,j
 
	OPEN(1,file='output.dat')
2	format(I5,1x,110(e14.6e3,1x))
 
	DO i=1,15
	 DO j=1,alen
	  a(j)=(i*j**2)*0.0123456789
	 ENDDO
	 write(1,2)i,(a(j),j=1,alen)
	ENDDO
 
	END PROGRAM output_probl

A noter que l'output se passe très bien si je change le format pour l'écriture, par ex en passant de 14 à 8 caractères - ce qui n'est évidemment pas une solution satisfaisante. Tout se passe donc comme si une taille maximale de caractères par ligne était atteinte.
Un détail pas trop compliqué doit m'échapper, mais je cherche sans succès depuis quelque temps.

Quelqu'un voit-il une solution à mon problème (sans changer le format d'output) ?

Merci beaucoup pour votre aide.

m.