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

Go to the source code of this file.

Functions/Subroutines

subroutine ecrsel (VAINIT, IKINIT, NPINIT, NEINIT, SHP, ELT, NPOIN, NPOIN1, NPMAX, W, X, ZF, NSFOND, NCOLOR, COLOR, VAR, NVARIN, NVAROU, NVAR2, STD, FUSION, NRES, NGEO, NFO1, MAILLE, TEXTE)
 

Function/Subroutine Documentation

◆ ecrsel()

subroutine ecrsel ( double precision, dimension(npinit), intent(inout)  VAINIT,
integer, dimension(neinit,3), intent(in)  IKINIT,
integer, intent(in)  NPINIT,
integer, intent(in)  NEINIT,
double precision, dimension(npmax,3), intent(in)  SHP,
integer, dimension(npoin), intent(in)  ELT,
integer, intent(in)  NPOIN,
integer, intent(in)  NPOIN1,
integer, intent(in)  NPMAX,
real, dimension(*), intent(inout)  W,
double precision, dimension(npoin), intent(inout)  X,
double precision, dimension(npoin), intent(in)  ZF,
integer, intent(in)  NSFOND,
integer, dimension(npoin), intent(in)  NCOLOR,
logical, intent(in)  COLOR,
double precision, dimension(npoin), intent(inout)  VAR,
integer, intent(in)  NVARIN,
integer, intent(in)  NVAROU,
integer, intent(in)  NVAR2,
character(len=3), intent(in)  STD,
logical, intent(in)  FUSION,
integer, intent(in)  NRES,
integer, intent(in)  NGEO,
integer, intent(in)  NFO1,
character(len=9), intent(in)  MAILLE,
character(len=32), dimension(nvarin), intent(in)  TEXTE 
)
Parameters
[in]npinit[–> ] NRES Numero du canal du fichier de serafin

Definition at line 9 of file ecrsel.f.

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