Discussion :

[MadScientifik]

Bonjour a tous,

Je souhaiterai lire une ligne d'un fichier qui contient d'abord 32 caracteres puis ensuite 400000 donnees separees par des virgules.
La partie chaine de caractere ne m'interresse pas,ce sont les donnees que je voudrai mettre dans une variable.

Voici le code que j'ai ecris :
real*8 x
character string*2000000

read(10,'(a)')string
string=string(32:)
read(string,*)x
print *,x

Mais en sortie je n'obtiens qu'un 0, qui correspond a la premiere valeur des donnees et je n'arrive pas a lui faire afficher toutes les donnees presentes.

Le nombre de donnees n'est egalement pas fixe (autour de 400000). Comment puis-je connaitre le nombre exact ?

Merci pour votre aide !

Antoine

[Marlan]

Sauf erreur de ma pars, FORTRAN lit les espaces, virgules, tabulations et slash comme des séparateurs de chaîne de caractères. De fait, pour pouvoir lire ta ligne de fichier, il est nécessaire de définir un tableau de caractères plutôt qu'un simple caractère.

Exemple en reprenant ton code :

Code :

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

1
2
3
4
5
6
7
8
9
10
REAL(KIND=8) :: X
character(99),dimension(N) :: CHAINE !N doit être égal au nombre de colonnes dans le fichier
 
read(10,*) ! On saute la première ligne
read(10,'(a)')CHAINE ! On lit la totalité de la ligne stockée dans le tableau
 
DO I=1,N
READ(CHAINE(I),*)X
PRINT*,X
END DO

Nota : je ne connais pas le F77, je t'ai transposé le programme en F90

En espérant avoir pu t'aider,

Marlan

[MadScientifik]

Oula !

Desole pour cette reponse tardive, je croyais recevoir une notification lors d'une reponse.

Merci pour ton aide, c'est effectivement la definition de ma variable qui etait mauvaise. apres changement en tableau de reel ca marche nickel !

Merci encore

Antoine