Discussion :

[bouabid_hanen]

salut
SVP j'ai une problème, lorsque j'écris l’instruction print j'aurai un résultat
mais juste après je fait l’instruction open j'aurai aucun résultat et dans le fichier s'affiche des: ***
expemple :

Code :

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

print,* CF3

ça marche et j'aurai le résultat
mais avec :

Code :

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

1
2
3
OPEN (UNIT=8, FILE = 'CF3.txt',FORM ='formatted')
write (8,'(F20.16)'),CF3
close(8)

non, et il m'affiche:*****

[Ehouarn]

Bonjour,

C'est certainement à cause du format que tu imposes lors de l'écriture du fichier:

write (8,'(F20.16)'),CF3

Parcequ'en Fortran, si on impose un format d'écriture inadapté, le comportement par défaut est de mettre des étoiles à la place.
Si tu veux que s'affiche la même chose que lors de ton

print,* CF3

Alors il faut également employer le format libre:

Code :

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

1
2
 
write(8,*) CF3

[bobbyboy]

Bonjour,
c'est ton format qui est mal construit :

tu demande F20.16 = 20 caractères et une précision sur 16 chiffres. Ce qui est impossible étant donné qu'il doit réservé de la place pour la mentisse ...

Essaye le format suivant :

'(F20.13)', ca devrait marcher ou si tu veux vraiment une précision de 16 :
'(F23.16)'

[genteur slayer]

je trouve bizarre aussi la virgule après la parenthèse, moi j'écrit:

Code :

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

write(8,'(F20.13)')CS3

et d'une manière générale gfortran remplace par des * lorsque le nombre n'est pas affichable dans le format donné.
autre exemple:

Code :

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

1
2
3
 
i=10000
write(*,'(I4)')I

cela te donnera: **** car tu essaye d'afficher un nombre à 5 caractères dans un format qui n'en autorise que 4