[Fortran 90] Problème fonction format

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:

---

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

---

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

Citation:

---

N=132

---

Dans mon cas, je pensais utiliser:

Code:

---

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:

---

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

---

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

Citation:

---

N=form_trucmuch

---

Que faire ???
Merci par avance.

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

Code:

---

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:

---

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:

---

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

---

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.