Discussion :

[latex_man]

Bonjour,
Après avoir fait une recherche sur les sujets concernés*, je me permets d'ouvrir ce sujet.
Mon souci est le suivant :
J'utilise la commande write pour concaténer des chaines de caractères :

Code :

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

1
2
 
write(chaine,'(A,A,A)') toto, " ", tata

Sachant que toto et tata ont été saisi au clavier auparavant.
Lorsque j'exécute mon programme, si je saisi des noms sans chiffres dedans tout se passe bien. Exemple : jean, bernard
Le programme plante quand je mixe avec des chiffres. Exemple : jean01, bernard02

Faut-il spécifier un format en particulier ?
Mon but étant que quand je saisie 14 comme Nom, ça ne pose pas de problème...


* : les sujets consultés sont :

• "mettre dans un character un entier signé"
• Conversion Integer en caractère

[DaZumba]

Lorsque j'exécute mon programme, si je saisi des noms sans chiffres dedans tout se passe bien. Exemple : jean, bernard. Le programme plante quand je mixe avec des chiffres. Exemple : jean01, bernard02

Si les chiffres font partie de la chaine de caractere, il n'y a aucun probleme -- ce sont des caracteres comme les autres apres tout.
Par exemple:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
program strcat
implicit none
 
character(len=10) :: titi
character(len=12) :: tutu
 
character(len=30) :: chaine
 
titi = 'string 1'
tutu = 'string 2'
 
write(chaine, '(A,A,A)') titi, " ", tutu
 
print *, chaine
 
end program strcat

(note qu'il faudrait utiliser trim() sur titi et tutu afin de ne pas avoir d'espaces non voulus.)

Ton probleme doit etre a la creation des chaines toto et tata, dans ton exemple.

[latex_man]

D'accord, je vais vérifier mes déclarations des deux chaines de caractères.
Pourtant, comment ça se fait que ça marche avec des strings sans chiffres ?
C'est une question de taille ?

[Edit] C'est une question de taille effectivement : j'ai pas mis les trim et les deux noms étaient plus grands que l'argument ... Merci