Supprimer les espaces de tête

C     Cette routine supprime les espaces de tête dans le texte de la variable.

C     

C     Appel :

C     CALL P2H026 (TEXTVAR,IRET)

C     

C     La variable suivante doit être définie au préalable :

C     

C     TEXTVAR : Variable avec le texte à modifier. Après l'appel de

C               la routine, la variable contient le texte corrigé

C     

C     NOTE : La variable de texte TEXTVAR doit être déclarée dans l'en-tête du

C              programme !

C     CHARACTER *80 TEXTVAR

C     

C     Exemple :

C     ----------------------------

C     Supprimer les espaces de tête

C     ----------------------------

      TEXTVAR = "    Exemple"

C     

      CALL P2H026 (TEXTVAR,IRET)

C     

C     Le contenu de la variable TEXTVAR est désormais "Exemple"