Lire une nombre de données variable
Bonjour,
J'essaie de lire un ficher formatté dont les lignes ont des longueurs differents.
Une ligne est constitué de la façon suivante :
nombre_variables variable1 variable2 ...
J'essaie de lire la ligne avec :
Code:
read(1,*,iostat=error) nombre_variables, (tmp_liste(i), i=1, nombre_variables)
Le nombre de variable étant en premier lieu récupéré, il sert à la boucle implicite qui suit.
En affichant les variables récupérées, je me rends compte que seul une ligne sur deux est lue.
J'ai essayé de séparer la récupération du nombre de variables :
Code:
1
2
3
4
5
6
|
read(1,*,iostat=error) nombre_variables
if(nombre_variables .ne. 0) then
backspace(1)
read(1,*,iostat=error) dummy, (tmp_liste(i), i=1, nombre_variables)
end |
mais cela ne change rien.
Quelqu'un aurait-il une piste pour résoudre ce problème ?
Merci
