Discussion :

[yann_m]

Salut, en deux mots un problème inextricable.

J'ai une variable form_trucmuche qui est une chaîne de caractères
form_trucmuche=(i3) ou (i5) ou (f5.2) suivant le contexte...

En f90, pour définir un format, on utilise bien :
Ex:
Dans le prog:

Code :

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

1
2
write (*, 500) nbp
500 format ('N=', i3)

A l'écran: (dans le cas où nbp est un entier valant 132)

N=132

Dans mon cas, je pensais utiliser:

Code :

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

1
2
write (*, 500) nbp
500 format ('N=', form_trucmuch)

mais là, c'est le drame! Erreur, je ne connais pas form_trucmuch...

J'essaie d'ajouter des guillemets :

Code :

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

1
2
write (*, 500) nbp
500 format ('N=', 'form_trucmuch')

mais là forcément à l'écran, on obtient:

N=form_trucmuch

Que faire ???
Merci par avance.

[Sylvain Bergeron]

En Fortran 90, la tendance est ne plus utiliser la forme :

Code :

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

1
2
3
 
write (*, 500) nbp
500 format ('N=', i3)

pour 2 raisons : les étiquettes, et l'alignement du code. Ce n'est pas « beau ».

La forme plus « moderne » est d'utiliser :

Code :

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

1
2
 
write (*, "('N=', i3)") nbp

Dans cette forme, le format est une variable caractère. De là, tu peux donc faire ce que tu veux... Par exemple :

Code :

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

1
2
3
4
5
6
7
8
9
 
character (len=80) FormatComplet
...
FormatComplet = "('N='," // trim(form_trucmuch) // ")"
write (*, FormatComplet ) nbp
 
ou directement :
 
write (*, "('N='," // trim(form_trucmuch) // ")" ) nbp

[yann_m]

Salut,

désolé de répondre si tard après mon premier post mais j'étais indisponible ces derniers temps...
Merci pour ta réponse Sylvain un résolu au titre pointe maintenant l'objet de ma question.

A bientôt,
Yann.