Bonjour,

J'ai recherche rapidement dans les cours propose et sur la toile mais je pense que je m'y prend mal.

Ma question est simple :

J'ai tout cela comme variable dans ma subroutine :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
      parameter (ncode=5,nidtmax=600,mxindx=10000)
      integer idtbl(ncode,nidtmax),ifl1tbl(nidtmax),nlinex(ncode)
      integer ifl2tbl(nidtmax),ifl3tbl(nidtmax),jspintbl(nidtmax)
      integer chrgtbl(nidtmax),nlidtbl(mxindx),nidtmxx(ncode)
      real amtbl(nidtmax)
      character line*110
      character (len=50) :: nametbl(nidtmax)
Et je veux en mettre beaucoup dans un common, aucun souci je fais donc :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
      common/cidt/idtbl(ncode,nidtmax),ifl1tbl(nidtmax),
     *ifl2tbl(nidtmax),ifl3tbl(nidtmax),jspintbl(nidtmax),
     *chrgtbl(nidtmax),amtbl(nidtmax),nlidtbl(mxindx),
     *nametbl(nidtmax),nidtmxx(ncode),nlinex(ncode),nidtbl
Mais le probleme est que je ne sais pas comment dire que mon tableau nametbl est un tableau contenant des character, egalement est-ce qu'il sait que amtbl est un real et non un entier ?

Merci d'avance,