Discussion :

[Ladgalen]

Bonjour

Au cours d'un programme fortran, je souhaite imprimer une chaine de charactere. Donc je fais l'impression avec un format du genre

write(*,"(a40)") "tout un tas de truc"//variable

Normalement ce que j'imprime a une longueur inférieure à 40 et j'aimerais que les blancs soient placés après l'impression et non avant. En clair je voudrais aligner à gauche et pas à droite.

Merci pour votre aide

[yogitetradim]

Bonjour,

avec un format '(a)' au lieu de '(a40)' ça devrait être mieux.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
 
program Test
    character (len=30)::phrase="tout un tas de truc"
    character (len=10)::Variable="test"
 
!ancienne version
    write(*,"(a40)") "tout un tas de truc"//variable
! à comparer à 
    write(*,"(a)") "tout un tas de truc"//variable
!voire un poil mieux 
    write(*,"(a)") "tout un tas de truc"//" "//variable
 
  end program Test

le format a s'adapte à la longueur de la chaîne...c'est très pratique !

[Ladgalen]

Merci

effectivement ça a résolue le problème ! mais comme la longueur de ma chaine était de 80 ça ne m'allait pas non plus...

Par contre j'utilisait la fonction trim qui supprime les blancs ! Et si j'enlève trim ça marche ! même si je spécifie a30 ...