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

Go to the source code of this file.

Functions/Subroutines

subroutine fm3sel (X, Y, NPOIN, NBOR, NFIC, STD, NVAR, TEXTE, TEXTLU, VARCLA, NVARCL, TITRE, SORLEO, NSOR, W, IKLE, IKLES, ITRAV, NELEM, NPTFR, NDP, MXPTVS, MXELVS, DATE, TIME, DEBU, SUIT, ECRI, LISTIN, IPARAM, IPOBO, X_ORIG, Y_ORIG)
 

Function/Subroutine Documentation

◆ fm3sel()

subroutine fm3sel ( double precision, dimension(*), intent(in)  X,
double precision, dimension(*), intent(in)  Y,
integer, intent(inout)  NPOIN,
integer, dimension(*), intent(in)  NBOR,
integer, intent(in)  NFIC,
character(len=3), intent(in)  STD,
integer, intent(inout)  NVAR,
character(len=32), dimension(*), intent(in)  TEXTE,
character(len=32), dimension(*), intent(inout)  TEXTLU,
character(len=32), dimension(nvarcl), intent(in)  VARCLA,
integer, intent(in)  NVARCL,
character(len=72), intent(in)  TITRE,
logical, dimension(*), intent(in)  SORLEO,
integer, intent(in)  NSOR,
real, dimension(*), intent(inout)  W,
integer, dimension(*), intent(inout)  IKLE,
integer, dimension(*), intent(inout)  IKLES,
integer, dimension(*), intent(inout)  ITRAV,
integer, intent(inout)  NELEM,
integer, intent(inout)  NPTFR,
integer, intent(inout)  NDP,
integer, intent(inout)  MXPTVS,
integer, intent(inout)  MXELVS,
integer, dimension(3), intent(inout)  DATE,
integer, dimension(3), intent(inout)  TIME,
logical, intent(in)  DEBU,
logical, intent(in)  SUIT,
logical, intent(in)  ECRI,
logical, intent(in)  LISTIN,
integer, dimension(10), intent(in)  IPARAM,
integer, dimension(*), intent(in)  IPOBO,
integer, intent(in)  X_ORIG,
integer, intent(in)  Y_ORIG 
)
Parameters
[in]x[<–>] NPOIN Nombre de points du maillage.
[in]NBORNumerotaion globale des points de bord.
[in]NFICNumero de canal du fichier a lire ou ecrire.
[in]STANDNon utilise
[in]STDBinaire du fichier (std, ibm, i3e)

Definition at line 10 of file fm3sel.f.

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