La fonction trim

Bonjour

J'ai une incompréhension avec la fonction trim(). Elle est sensée supprimer les blancs avant et après un character.

Par exemple

trim(" plop ") renvoie "plop"

En fait c'est ce que je pensais mais je viens de m'apercevoir qu'elle supprime les blancs avant et après sauf un devant le string !!!

En fait dans mon cas trim(" plop ") renvoie " plop" . Est ce que vous avez une explication ?

De manière plus précise j'ai le code suivant :

Code:

---

1 2 3 4 5 6 7 8

read(ligne(k1:k2),"(a)")string   .....   write(*,"(a)")","//trim(string)//","   ....

---

et j'obtiens

Code:

---

, plop,

---

Comme le décalage est systématique je m'en suis sortie en faisant ça :

Code:

---

1 2 3 4

read(ligne(k1:k2),"(a)")bid bid = trim(bid) string = bid(2:)

---

bid est aussi un character de la meme taille que string

Là ça marche mais je trouve ça pas très rigoureux !

trim() n'enlève que les espaces après le dernier caractère qui n'est pas un espace, donc le comportement que tu observes est normal. Le Fortran 95 a introduit les fonctions ADJUSTL() et ADJUSTR() (i.e. adjust left et right, respectivement) pour enlever les espaces de début et de fin, donc tu peux les combiner pour faire ce que tu veux.

Merci