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

Go to the source code of this file.

Functions/Subroutines

subroutine renum (X, Y, W, IKLE, NBOR, TRAV1, TRAV2, TAB, NCOLOR, COLOR, NPTFR)
 

Function/Subroutine Documentation

◆ renum()

subroutine renum ( double precision, dimension(*), intent(inout)  X,
double precision, dimension(*), intent(inout)  Y,
double precision, dimension(*), intent(inout)  W,
integer, dimension(nelmax,3), intent(inout)  IKLE,
integer, dimension(*), intent(inout)  NBOR,
integer, dimension(*), intent(inout)  TRAV1,
integer, dimension(*), intent(inout)  TRAV2,
integer, dimension(*), intent(inout)  TAB,
integer, dimension(*), intent(inout)  NCOLOR,
logical, intent(in)  COLOR,
integer, intent(in)  NPTFR 
)
Parameters
[in,out]x[in, out] TAB Tableau de travail
[in,out]NCOLORTableau des couleurs des points
[in,out]COLORStockage couleurs des noeuds sur fichier geo
[in]NPOINNombre total de noeuds du maillage
[in]NELEMNombre total d'elements du maillage
[in]NELMAXDimension effective des tableaux concernant LES ELEMENTS (NELMAX = NELEM + 0.2*NELEM)
[in,out]y[in, out] TAB Tableau de travail
[in,out]NCOLORTableau des couleurs des points
[in,out]COLORStockage couleurs des noeuds sur fichier geo
[in]NPOINNombre total de noeuds du maillage
[in]NELEMNombre total d'elements du maillage
[in]NELMAXDimension effective des tableaux concernant LES ELEMENTS (NELMAX = NELEM + 0.2*NELEM)
[in,out]w[in, out] TAB Tableau de travail
[in,out]NCOLORTableau des couleurs des points
[in,out]COLORStockage couleurs des noeuds sur fichier geo
[in]NPOINNombre total de noeuds du maillage
[in]NELEMNombre total d'elements du maillage
[in]NELMAXDimension effective des tableaux concernant LES ELEMENTS (NELMAX = NELEM + 0.2*NELEM)

Definition at line 7 of file renum.f.

+ Here is the caller graph for this function: