Equivalent 'append' f77

Bonjour,

Je travaille en Fortran 77 (je n'ai pas le choix, et ne peux pas me mettre en f90).
Je cherche à lire deux fichiers de données (.dat) et à les écrire dans un troisième fichier, l'un à la suite de l'autre.

Code:

---

1 2 3 4 5

lire fichier1 écrire fichier1 dans fichier3 lire fichier2 écrire fichier2 dans fichier3 à la suite de fichier1

---

Malheureusement, WRITE écrase le fichier de sortie (fichier3) lors de l'écriture de fichier2 dans fichier3.

Une idée pour éviter ça ?

Merci !

A mon sens, il suffit de :

- Ouvrir fichier 1
- Lire fichier 1
- Fermer fichier 1
- Ouvrir fichier 3
- Ecrire la lecture de 1 dans 3
- Ouvrir fichier 2 sans fermer ni réinitialiser 3
- Lire 2
- Fermer 2
- Ecrire 2 dans 3
- Fermer 3

Je pense que quelque pars tu dois fermer le fichier 3. Or, si tu le fermes, tu réinitialise la position de ton pointeur dans le fichier (ici à la première 'case'). Du coup, il te suffit de maintenir l'unité d'ouverture de 3 ouverte pour que ça marche.

En espérant avoir répondu à ta question,

Marlan

Salut!
C'est beaucoup plus simple:

1. Ouvrir fichier1
2. Ouvrir fichier2
3. Ouvrir fichier3
4. Copier fichier1 sur fichier3
5. Copier fichier2 sur fichier3

Si tu réutilise un des fichiers dans le même programme, il faut le fermer puis le réouvrir.
Jean-Marc Blanc

Un petit REWIND de trop se baladait dans mon code.
Merci à tous deux !