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

Go to the source code of this file.

Functions/Subroutines

subroutine damocle (ADRESS, DIMENS, NMAX, DOC, LLNG, LLU, MOTINT, MOTREA, MOTLOG, MOTCAR, MOTCLE, TROUVE, NFICMO, NFICDA, GESTD, MOTATT)
 

Function/Subroutine Documentation

◆ damocle()

subroutine damocle ( integer, dimension(4,*), intent(out)  ADRESS,
integer, dimension(4,*), intent(out)  DIMENS,
integer, intent(in)  NMAX,
logical, intent(in)  DOC,
integer, intent(inout)  LLNG,
integer, intent(in)  LLU,
integer, dimension(*), intent(out)  MOTINT,
double precision, dimension(*), intent(inout)  MOTREA,
logical, dimension(*), intent(out)  MOTLOG,
character(len=path_len), dimension(*), intent(out)  MOTCAR,
character(len=72), dimension(4,*), intent(out)  MOTCLE,
integer, dimension(4,*), intent(out)  TROUVE,
integer, intent(in)  NFICMO,
integer, intent(in)  NFICDA,
logical, intent(in)  GESTD,
character(len=path_len), dimension(4,nmax)  MOTATT 
)
Parameters
[in]nmax[out] ADRESS Tableau des adresses des mots cles
[out]DIMENSTableau des dimensions des mots cles
[in]DOCLogique de documentation de la sortie = VRAI : IMPRIME L'AIDE (FICHIER RESULTAT) = FAUX : N'IMPRIME PAS L'AIDE
[in]GESTDLogique d'appel par le gestionnaire d'etudes
[in]LLNGNumero de la langue de decodage
[in]LLUNumero de l'unite logique des sorties
[out]MOTATTTableau des submits
[out]MOTCARTableau des valeurs caracteres
[out]MOTCLETableau des mots cles actifs
[out]MOTINTTableau des valeurs entieres
[out]MOTLOGTableau des valeurs logiques
[out]MOTREATableau des valeurs reelles
[in]NFICDANumero de canal du fichier des donnees
[in]NFICMONumero de canal du fichier des mots-cles
[in]NMAXTaille maximale autorisee pour les tableaux
[out]TROUVEIndicateur d'etat des mots cles = 0 : AUCUNE VALEUR TROUVEE = 1 : VALEUR PAR DEFAUT TROUVEE = 2 : VALEUR TROUVEE (FICHIER DE DONNEES) = 3 : AUCUNE VALEUR TROUVEE (OPTIONNELLE) = 5 : TABLEAU DE MOTS A SUBMIT COMPACTE = 6 : MOT CLE A SUBMIT FORCE NON AFFECTE = 7 : MOT CLE A SUBMIT FORCE AFFECTE (DICO) = 8 : MOT CLE A SUBMIT FORCE AFFECTE (CAS) = 9 : FICHIER DICO : SUBMIT + VALEUR LANCEUR =10 : FICHIER CAS : SUBMIT + VALEUR LANCEUR
[in]llu[out] ADRESS Tableau des adresses des mots cles
[out]DIMENSTableau des dimensions des mots cles
[in]DOCLogique de documentation de la sortie = VRAI : IMPRIME L'AIDE (FICHIER RESULTAT) = FAUX : N'IMPRIME PAS L'AIDE
[in]GESTDLogique d'appel par le gestionnaire d'etudes
[in]LLNGNumero de la langue de decodage
[in]LLUNumero de l'unite logique des sorties
[out]MOTATTTableau des submits
[out]MOTCARTableau des valeurs caracteres
[out]MOTCLETableau des mots cles actifs
[out]MOTINTTableau des valeurs entieres
[out]MOTLOGTableau des valeurs logiques
[out]MOTREATableau des valeurs reelles
[in]NFICDANumero de canal du fichier des donnees
[in]NFICMONumero de canal du fichier des mots-cles
[in]NMAXTaille maximale autorisee pour les tableaux
[out]TROUVEIndicateur d'etat des mots cles = 0 : AUCUNE VALEUR TROUVEE = 1 : VALEUR PAR DEFAUT TROUVEE = 2 : VALEUR TROUVEE (FICHIER DE DONNEES) = 3 : AUCUNE VALEUR TROUVEE (OPTIONNELLE) = 5 : TABLEAU DE MOTS A SUBMIT COMPACTE = 6 : MOT CLE A SUBMIT FORCE NON AFFECTE = 7 : MOT CLE A SUBMIT FORCE AFFECTE (DICO) = 8 : MOT CLE A SUBMIT FORCE AFFECTE (CAS) = 9 : FICHIER DICO : SUBMIT + VALEUR LANCEUR =10 : FICHIER CAS : SUBMIT + VALEUR LANCEUR
[in]nficmo[out] ADRESS Tableau des adresses des mots cles
[out]DIMENSTableau des dimensions des mots cles
[in]DOCLogique de documentation de la sortie = VRAI : IMPRIME L'AIDE (FICHIER RESULTAT) = FAUX : N'IMPRIME PAS L'AIDE
[in]GESTDLogique d'appel par le gestionnaire d'etudes
[in]LLNGNumero de la langue de decodage
[in]LLUNumero de l'unite logique des sorties
[out]MOTATTTableau des submits
[out]MOTCARTableau des valeurs caracteres
[out]MOTCLETableau des mots cles actifs
[out]MOTINTTableau des valeurs entieres
[out]MOTLOGTableau des valeurs logiques
[out]MOTREATableau des valeurs reelles
[in]NFICDANumero de canal du fichier des donnees
[in]NFICMONumero de canal du fichier des mots-cles
[in]NMAXTaille maximale autorisee pour les tableaux
[out]TROUVEIndicateur d'etat des mots cles = 0 : AUCUNE VALEUR TROUVEE = 1 : VALEUR PAR DEFAUT TROUVEE = 2 : VALEUR TROUVEE (FICHIER DE DONNEES) = 3 : AUCUNE VALEUR TROUVEE (OPTIONNELLE) = 5 : TABLEAU DE MOTS A SUBMIT COMPACTE = 6 : MOT CLE A SUBMIT FORCE NON AFFECTE = 7 : MOT CLE A SUBMIT FORCE AFFECTE (DICO) = 8 : MOT CLE A SUBMIT FORCE AFFECTE (CAS) = 9 : FICHIER DICO : SUBMIT + VALEUR LANCEUR =10 : FICHIER CAS : SUBMIT + VALEUR LANCEUR
[in]nficda[out] ADRESS Tableau des adresses des mots cles
[out]DIMENSTableau des dimensions des mots cles
[in]DOCLogique de documentation de la sortie = VRAI : IMPRIME L'AIDE (FICHIER RESULTAT) = FAUX : N'IMPRIME PAS L'AIDE
[in]GESTDLogique d'appel par le gestionnaire d'etudes
[in]LLNGNumero de la langue de decodage
[in]LLUNumero de l'unite logique des sorties
[out]MOTATTTableau des submits
[out]MOTCARTableau des valeurs caracteres
[out]MOTCLETableau des mots cles actifs
[out]MOTINTTableau des valeurs entieres
[out]MOTLOGTableau des valeurs logiques
[out]MOTREATableau des valeurs reelles
[in]NFICDANumero de canal du fichier des donnees
[in]NFICMONumero de canal du fichier des mots-cles
[in]NMAXTaille maximale autorisee pour les tableaux
[out]TROUVEIndicateur d'etat des mots cles = 0 : AUCUNE VALEUR TROUVEE = 1 : VALEUR PAR DEFAUT TROUVEE = 2 : VALEUR TROUVEE (FICHIER DE DONNEES) = 3 : AUCUNE VALEUR TROUVEE (OPTIONNELLE) = 5 : TABLEAU DE MOTS A SUBMIT COMPACTE = 6 : MOT CLE A SUBMIT FORCE NON AFFECTE = 7 : MOT CLE A SUBMIT FORCE AFFECTE (DICO) = 8 : MOT CLE A SUBMIT FORCE AFFECTE (CAS) = 9 : FICHIER DICO : SUBMIT + VALEUR LANCEUR =10 : FICHIER CAS : SUBMIT + VALEUR LANCEUR

Definition at line 9 of file damocle.f.

+ Here is the call graph for this function:
+ Here is the caller graph for this function: