Discussion :

[jkepler]

Salut

Je suis en train de lire des données à partir d'un fichier ascii, dans un nombre de simple précision - le programme original lit en double.

Le code de lecture est comme ça:

Code :

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

1
2
3
4
 
DOUBLE PRECISION  DB(3000), DB2Z/-99999999.d0/
...
READ (*,*,IOSTAT =IN) (DB(K),K=1,NCOEFF)

Les chiffres ont en effet 15 décimales (en ascii). Dois-je définir DB comme REAL ou comment puis-je formater le paramètre de lecture?

Plus tard, les données sont écrites dans un fichier:

Code :

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

1
2
 
WRITE (12,REC=NROUT+2,IOSTAT=OUT) (DB(K),K=1,NCOEFF)

Je dois formater à nouveau DB - REAL(DB(K)? Et qu'est-ce que cela signifie REC=NROUT+2 dans le code?

Je vous serais reconnaissant beaucoup pour un peu d'aide.

JKepler

[Sylvain Bergeron]

Le fichier 12 est un fichier binaire (il n'y a pas de format) en accès direct (REC=...). L'argument REC = défini à compter de quel « record » se fait l'écriture. Voir aussi le RECL = du open(12) pour la largeur de chaque record.

Un tel fichier doit être lu par un programme (lui-même ou un autre). Tu ne peux pas passer de DOUBLE PRECISION à REAL (simple) sans modifier le RECL du fichier ainsi que le programme qui lit éventuellement ce fichier.

De plus, puisque ton input à 15 décimales, pourquoi voudrais-tu utiliser des simples précisions ?