The TELEMAC-MASCARET system  trunk
Functions/Subroutines
dico.f File Reference

Go to the source code of this file.

Functions/Subroutines

subroutine dico (ITYP, NUMERO, ILONG, CHAINE, MOTCLE, MOTPRO, LONPRO, SIZE, UTINDX, LANGUE, AIDLNG, MOTIGN, NIGN, LUIGN, TYPIGN, LONIGN, NFICDA, NBLANG, NMAXR)
 

Function/Subroutine Documentation

◆ dico()

subroutine dico ( integer  ITYP,
integer  NUMERO,
integer  ILONG,
character(len=*)  CHAINE,
character(len=*), dimension(4,*)  MOTCLE,
character(len=*), dimension(*)  MOTPRO,
integer, dimension(15)  LONPRO,
integer, dimension(4,*)  SIZE,
logical, dimension(4,*)  UTINDX,
logical  LANGUE,
logical  AIDLNG,
character(len=72), dimension(100)  MOTIGN,
integer  NIGN,
logical  LUIGN,
integer, dimension(100)  TYPIGN,
integer, dimension(100)  LONIGN,
integer  NFICDA,
integer  NBLANG,
integer, dimension(4)  NMAXR 
)
Parameters
[out]sizeAIDLNG Logique .true. si l'aide est celle de lng
[in]CHAINEChaine a analyser
[in]ILONGLongueur de la chaine a analyser
[out]ITYPType du mot-cle : 1 entier 2 REEL 3 LOGIQUE 4 CARACTERES 5 MOT RESERVE 0 MOT INCONNU
[out]LANGUELogique=.true. si la chaine est reconnue
[in]LONIGNTableau des longueurs des mots de motign
[in]LONPROLongueurs des mots cles de motpro
[in]LUIGNLogique pour les mots a ne pas classer
[in]MOTCLETableau des mots cles actifs
[in]MOTIGNTableau des mots cles dus a edamox a ignorer
[in]MOTPROTableau des mots cles reserves au programme
[in]NBLANGNombre de langues connues
[in]NFICDANumero de canal du fichier des donnees
[in]NIGNNombre de mots cles dus a edamox a ignorer
[in]NMAXRTableau des index maximum reels par types
[out]NUMEROOrdre du mot-cle parmi ceux de son type
[in]SIZETableau des longueurs des mots cles
[in]TYPIGNTableau des types des mots edamox a ignorer
[in]UTINDXTableau de logiques d'utilisation des index
[out]itypAIDLNG Logique .true. si l'aide est celle de lng
[in]CHAINEChaine a analyser
[in]ILONGLongueur de la chaine a analyser
[out]ITYPType du mot-cle : 1 entier 2 REEL 3 LOGIQUE 4 CARACTERES 5 MOT RESERVE 0 MOT INCONNU
[out]LANGUELogique=.true. si la chaine est reconnue
[in]LONIGNTableau des longueurs des mots de motign
[in]LONPROLongueurs des mots cles de motpro
[in]LUIGNLogique pour les mots a ne pas classer
[in]MOTCLETableau des mots cles actifs
[in]MOTIGNTableau des mots cles dus a edamox a ignorer
[in]MOTPROTableau des mots cles reserves au programme
[in]NBLANGNombre de langues connues
[in]NFICDANumero de canal du fichier des donnees
[in]NIGNNombre de mots cles dus a edamox a ignorer
[in]NMAXRTableau des index maximum reels par types
[out]NUMEROOrdre du mot-cle parmi ceux de son type
[in]SIZETableau des longueurs des mots cles
[in]TYPIGNTableau des types des mots edamox a ignorer
[in]UTINDXTableau de logiques d'utilisation des index
[out]numeroAIDLNG Logique .true. si l'aide est celle de lng
[in]CHAINEChaine a analyser
[in]ILONGLongueur de la chaine a analyser
[out]ITYPType du mot-cle : 1 entier 2 REEL 3 LOGIQUE 4 CARACTERES 5 MOT RESERVE 0 MOT INCONNU
[out]LANGUELogique=.true. si la chaine est reconnue
[in]LONIGNTableau des longueurs des mots de motign
[in]LONPROLongueurs des mots cles de motpro
[in]LUIGNLogique pour les mots a ne pas classer
[in]MOTCLETableau des mots cles actifs
[in]MOTIGNTableau des mots cles dus a edamox a ignorer
[in]MOTPROTableau des mots cles reserves au programme
[in]NBLANGNombre de langues connues
[in]NFICDANumero de canal du fichier des donnees
[in]NIGNNombre de mots cles dus a edamox a ignorer
[in]NMAXRTableau des index maximum reels par types
[out]NUMEROOrdre du mot-cle parmi ceux de son type
[in]SIZETableau des longueurs des mots cles
[in]TYPIGNTableau des types des mots edamox a ignorer
[in]UTINDXTableau de logiques d'utilisation des index
[out]ilongAIDLNG Logique .true. si l'aide est celle de lng
[in]CHAINEChaine a analyser
[in]ILONGLongueur de la chaine a analyser
[out]ITYPType du mot-cle : 1 entier 2 REEL 3 LOGIQUE 4 CARACTERES 5 MOT RESERVE 0 MOT INCONNU
[out]LANGUELogique=.true. si la chaine est reconnue
[in]LONIGNTableau des longueurs des mots de motign
[in]LONPROLongueurs des mots cles de motpro
[in]LUIGNLogique pour les mots a ne pas classer
[in]MOTCLETableau des mots cles actifs
[in]MOTIGNTableau des mots cles dus a edamox a ignorer
[in]MOTPROTableau des mots cles reserves au programme
[in]NBLANGNombre de langues connues
[in]NFICDANumero de canal du fichier des donnees
[in]NIGNNombre de mots cles dus a edamox a ignorer
[in]NMAXRTableau des index maximum reels par types
[out]NUMEROOrdre du mot-cle parmi ceux de son type
[in]SIZETableau des longueurs des mots cles
[in]TYPIGNTableau des types des mots edamox a ignorer
[in]UTINDXTableau de logiques d'utilisation des index
[out]nblangAIDLNG Logique .true. si l'aide est celle de lng
[in]CHAINEChaine a analyser
[in]ILONGLongueur de la chaine a analyser
[out]ITYPType du mot-cle : 1 entier 2 REEL 3 LOGIQUE 4 CARACTERES 5 MOT RESERVE 0 MOT INCONNU
[out]LANGUELogique=.true. si la chaine est reconnue
[in]LONIGNTableau des longueurs des mots de motign
[in]LONPROLongueurs des mots cles de motpro
[in]LUIGNLogique pour les mots a ne pas classer
[in]MOTCLETableau des mots cles actifs
[in]MOTIGNTableau des mots cles dus a edamox a ignorer
[in]MOTPROTableau des mots cles reserves au programme
[in]NBLANGNombre de langues connues
[in]NFICDANumero de canal du fichier des donnees
[in]NIGNNombre de mots cles dus a edamox a ignorer
[in]NMAXRTableau des index maximum reels par types
[out]NUMEROOrdre du mot-cle parmi ceux de son type
[in]SIZETableau des longueurs des mots cles
[in]TYPIGNTableau des types des mots edamox a ignorer
[in]UTINDXTableau de logiques d'utilisation des index
[out]nmaxrAIDLNG Logique .true. si l'aide est celle de lng
[in]CHAINEChaine a analyser
[in]ILONGLongueur de la chaine a analyser
[out]ITYPType du mot-cle : 1 entier 2 REEL 3 LOGIQUE 4 CARACTERES 5 MOT RESERVE 0 MOT INCONNU
[out]LANGUELogique=.true. si la chaine est reconnue
[in]LONIGNTableau des longueurs des mots de motign
[in]LONPROLongueurs des mots cles de motpro
[in]LUIGNLogique pour les mots a ne pas classer
[in]MOTCLETableau des mots cles actifs
[in]MOTIGNTableau des mots cles dus a edamox a ignorer
[in]MOTPROTableau des mots cles reserves au programme
[in]NBLANGNombre de langues connues
[in]NFICDANumero de canal du fichier des donnees
[in]NIGNNombre de mots cles dus a edamox a ignorer
[in]NMAXRTableau des index maximum reels par types
[out]NUMEROOrdre du mot-cle parmi ceux de son type
[in]SIZETableau des longueurs des mots cles
[in]TYPIGNTableau des types des mots edamox a ignorer
[in]UTINDXTableau de logiques d'utilisation des index

Definition at line 9 of file dico.f.

+ Here is the caller graph for this function: