Discussion :

[rolli2313]

je suis desole de vous deranger. Mais je code actuellement un programme fortran pour modeliser en volumes finis un echangeur thermique en flux croise. Ce qui complique c'est que j'ai plusieurs rangee de tubes.

Mon probleme est pour ecrire et lire dans un fichier. Je m'explique j'ai decompose un tube en 50 elements et pour chaque element je veux ecrire la pression et le temperature de sortie. Je souhaite ecrire un fichier comme un tableau avec en colonne les elements et en ligne les differents tubes. Mais je peux pas declarer la variable comme tableau pour des problemes de memoire. En plus j'ai besoin de pouvoir faire lire ces valeurs par le code fortran, puisque j'utilise les valeurs precedemment ecrites comme conditions initiales de la 2eme rangee.

Je ne sais pas si je me suis fait comprendre. Mais la ca fait quelques temps que je cherche sur le net ou dans des bouquins mais je ne trouve pas.

Merci d'avance,

PS : je m'excuse pour les accents mais je travaille sur clavier qwerty

[FR119492]

Salut!
Je ne suis pas sur d'avoir bien compris ton problème, mais regarde du côté de

Code :

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

Open ( ... ,Access='Direct')

Jean-Marc Blanc

[rolli2313]

Merci pour votre reponse. Oui en effet, j'ai deja commence a regarder du cote de l'acces direct, mais je n'ai pas compris comment indiquer un numero de ligne ou de colonne.

Encore merci, je vais essayer de creuser un peu plus.

[rolli2313]

ok petit a petit je vais y arriver. Pour ecrire dans une colonne (cf : http://www.developpez.net/forums/d10...-acces-direct/)

on doit ouvrir un fichier en acces direct et lui donner une taille d'ecriture si j'ai bien compris.

INTEGER n_unit
n_unit = 17
OPEN(unit=n_unit, file='toto.dat', form='unformatted', access='direct', recl=8)

Donc la j'ouvre mon fichier toto.dat, auquel j'attribue une valeur de stockage disque n_unit. Le fait d'ouvrir en acces direct me permettra de choisir mes colonnes par la suite. Enfin recl=8 est la taille de l'enregistrement.

Jusque la c'est bon.

Une fois le fichier ouvert, DA ZUMBA ecrit dedans comme ceci:

Code :
DOUBLE PRECISION var_double
INTEGER n_rec
...
var_double = 78.98d0
...
n_rec = 1
...
WRITE(17, rec=n_rec) var_double

Donc la, il ecrit la variable var_double, dans la colonne (rec) numero n_rec.
Jusque la j'ai compris.
--------------------------------------------------------------------------

Mais maintenant la question que je me pose est : comment choisir la ligne de l'enregistrement.

Merci d'avance pour l'aide

[rolli2313]

bon suite des problemes. l'acces direct oblige a avoir une format unformatted. Comment on peut faire alors pour lire les donnees?
Merci

[john stedd]

et en définissant un fichier pour chaque tube?