Discussion :

[nh-ben]

Salam,

J'utilise le programme suivant qui a pour rôle de lire l'ensemble des valeurs disposées sur chaque lignes du fichier xxx, et afficher après compilation 24 valeurs (d,e,f......zz,aa) sur chaque ligne.

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
real a,b,c,d,e,f,g,h,ii,jj,kk,ll,mm,nn,oo,pp,qq,rr,ss,tt,uu,vv,ww,xx,yy,zz,aa
               integer i
	       open(unit=2,status='unknown', file='xxx')	       
	       do i=1,251
               read(2,*)  a,b,c
	       read(2,*)  d,e,f,g,h,ii
               read(2,*)  jj,kk,ll,mm,nn,oo
               read(2,*)  pp,qq,rr,ss,tt,uu
               read(2,*)  vv,ww,xx,yy,zz,aa
	       write(4,10) i,d,e,f,g,h,ii,jj,kk,ll,mm,nn,oo,pp,qq,rr,ss,tt,uu,vv,ww,xx,yy,zz,aa
10             format(3x,i3,3x,200(f12.2,4x)) 	       
 
 
       	       end do
 
                 end

Le problème qui se pose c'est que après l’exécution du programme, il n'affiche que 17 valeurs sur chaque ligne!!!!! Je ne sais pas pourquoi les autres valeurs (uu,vv........zz,aa) ne s'affichent pas.

[fred1599]

Ne serait-il pas plus adapté de lire une ligne dans un tableau

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

real, dimension(24) :: array

et de faire une lecture

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

read(2,*) array

?

[Sylvain Bergeron]

Comment as-tu vérifié qu'il n'y avait que 17 variables dans le fichier ? Si tu as ouvert le fichier avec un éditeur, il est possible qu'il te permette de voir uniquement les 255 premières colonnes et qu'il ignore ce qui se trouve à droite de cette limite. Si c'est le cas, tu devrais ouvrir le fichier avec un autre éditeur.

Tu peux aussi valider la taille du fichier = 251 x ( 3 + 3 + 3 + 24 x ( 12 + 4 ) + 1 (Linux) ou 2 (Windows)), soit 98 894 ou 99 145 octets.

[nh-ben]

Salam,
Merci pour vos réponses. c'est très gentil. J'ai essayé la proposition de fred1599 en utilisant "array" et sa a porté ces fruits. Sinon pour la deuxième proposition de Sylvain Bergeron j'ai pas compris qu'est ce que vous voulez dire par " valider la taille du fichier = 251 x ( 3 + 3 + 3 + 24 x ( 12 + 4 ) + 1 (Linux) ou 2 (Windows)), soit 98 894 ou 99 145 octets" ni comment le faire.
merci encore.