Discussion :

[Truth]

Bonjour,

j'ai un programme fortran qui contient une boucle, cette boucle change une variable avec chaque itération. je veux acceder depuis un autre programme(non fortran) a la valeur de cette variable ( qui change) , comment faire ?

j'ai essayer de créer a chaque itération de la boucle un fichier et ecrire dans ce fichier la valeur de la variable en question, puis acceder a ce fichier depuis l'autre programme, mais ça ne marche pas car le fichier ne sera pas crée avec chaque itération mais il sera crée une fois que toutes les itérations términées.

y'a t'il une autre méthode qui marche ?

[FR119492]

Salut !
En principe, ton approche est correcte, mais il doit y avoir un petit détail qui bloque. Fais-nous comme exemple un petit programme Fortran avec seulement ta boucle et les diverses instructions touchant ton fichier. Indique-nous aussi comment tu t'y prends pour synchroniser tes deux programmes, afin d'éviter que l'exécution de ton programme Fortran ne soit pas terminée avant que l'autre ne commence.
Jean-Marc Blanc

[Truth]

Bonjour,
pour la question que le le fichier ne se crée que a la fin de toutes les itérations, je l'ai réglé en ouvrant et fermant le fichier à l'exterieur de la boucle avec que l'écriture dans ce fichier se fait a l'interieur de la boucle càd chaque itération.
il me reste le problème de synchronistation que je ne trouve pas la solution, c'est pour ça que j'ai renoncé a cette approche.
merci de votre réponse Jean-Marc.

[FR119492]

Salut !
Essaie d'ouvrir et de fermer le fichier à l'intérieur de la boucle.
Jean-Marc Blanc

[Ehouarn]

Bonjour,

Je ne suis pas certain de comprendre ce que tu cherches à faire, mais s'il s'agit de synchroniser une série de séquences de travail de deux programmes entre eux (c.-à-d: le premier travaille, donne un résultat, puis le deuxième prends ce résultat, travaille, puis donne un résultat (qui devra éventuellement être repris par le premier, etc.) alors une façon de faire est que le(s) programme(s) se lance(nt) et relance(nt) l'un l'autre au fur et à mesure des besoins.
En Fortran 90, il y a la routine intrinsèque 'system' qui permet de lancer une instruction système au shell parent, par exemple l'ordre d'exécuter un autre programme.

Dans un cas où tu as deux programmes 'prog1' et 'prog2' qui "communiquent" comme dans ton exemple en écrivant les données à partager dans des fichiers, on aurait quelque chose du genre:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
program prog1
implicit none
character(len=124) :: instruction ! la ligne de commande pour l'appel système
!
! déclarations et instructions diverses
!
 
!
! on a écrit les données nécessaires à 'prog2' dans un fichier,
! et on appelle 'prog2' (qui se trouve dans le même répertoire que prog1)
instruction="./prog2"
call system(instruction)
! on ne récupère la main qu'une fois que l'exécution de 'prog2' s'est terminée
! puis on continue de travailler, en commençant par lire les données générées par prog2
!
 
!
end program prog1

Bonne continuation.

[Truth]

grand merci à Ehouran, c'est tout à fait ce que je voulais.