Discussion :

[bil31]

bonjour,

je suis eleve ingenieur en stage.
j'aimerais connaitre l'indicateur de fin de fichier en fortran
ou la maniere de savoir si un fichier a été entierement lu

merci d'avance

[Sylvain Bergeron]

2 solutions :

• Mettre un branchement de fin dans le « read »
• Tester le statut du « read »

Exemple avec branchement :

Code :

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

1
2
3
4
5
6
7
8
 
...
do
  read(NumeroFichier,'(a)',end=10) Variable
  ...
enddo
10 continue
...

Exemple avec test du statut :

Code :

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

1
2
3
4
5
6
7
8
 
...
do
  read(NumeroFichier,'(a)',ioStat=k) Variable
  if (k < 0) exit ! sort de la boucle do
  ...
enddo
...

La première méthode est utilisée systématiquement en F77 alors que la deuxième me semble plus populaire en F95 (mais c'est un jugement personnel)...

[bil31]

merci pour cette aide precieuse ca marche mai tu ne connaitre pas la commande pour lire la derniere ligne d'un fichier


merci

[Sylvain Bergeron]

Je n'ai jamais essayé, mais la séquence suivante devrait fonctionner :

Code :

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

1
2
3
open(NumeroFichier,...,position='append',...)
backspace(NumeroFichier)
read(NumeroFichier,...)...

[bil31]

j'ai essayer ca marche mais il y a pas besoin du backspace il se direct sur la derniere ligne du fichier merci encor a+