bonsoir,
à ma connaissance (en f90, je ne connais pas bien les autres normes), il n'y a pas de possibilité en standard de faire ce que tu demandes.
si je devais faire ceci, je ferai appel à un call system avec une commande Unix/DOS qui fasse un liste des noms de fichiers dans lesquels tu dois écrire et qui écrive cette liste dans un fichier dont tu connais le nom.
par exemple:
call system("ls *A_ouvrir*.txt > .tmp")
ensuite il suffit de lire ce fichier et de réaliser ton traitement:
1 2 3 4 5 6 7 8 9
| open(unit=10,file='.tmp',status='old')
do while .true.
read(10,*,iostat=stat)nom_fichier
if (stat/=0) then
close(10,status='delete')
exit
end if
!traitement
end do |
Partager