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

Go to the source code of this file.

Functions/Subroutines

subroutine coupev (AT, Z, U, V, W, SHP, IMSEG, X2DV, Y2DV, DISTOR, IKLES, ELEM, NC2DV, NPOIN2, NELEM2, NCOU, FFORMAT, IM, JM, TITCAS, NVA3, TAB, TEXTLU, IENRE)
 

Function/Subroutine Documentation

◆ coupev()

subroutine coupev ( double precision, intent(in)  AT,
double precision, dimension(npoin2,jm), intent(in)  Z,
double precision, dimension(npoin2,jm), intent(in)  U,
double precision, dimension(npoin2,jm), intent(in)  V,
double precision, dimension(npoin2,jm), intent(in)  W,
double precision, dimension(im,3,nc2dv), intent(inout)  SHP,
integer, dimension(49,nc2dv), intent(in)  IMSEG,
double precision, dimension(50,nc2dv), intent(in)  X2DV,
double precision, dimension(50,nc2dv), intent(in)  Y2DV,
double precision, dimension(nc2dv), intent(in)  DISTOR,
integer, dimension(3,nelem2), intent(in)  IKLES,
integer, dimension(im,nc2dv), intent(in)  ELEM,
integer, intent(in)  NC2DV,
integer, intent(in)  NPOIN2,
integer, intent(in)  NELEM2,
integer, dimension(nc2dv), intent(inout)  NCOU,
character(len=8), intent(inout)  FFORMAT,
integer, intent(in)  IM,
integer, intent(in)  JM,
character(len=72), intent(in)  TITCAS,
integer, intent(inout)  NVA3,
type (bief_obj), intent(inout)  TAB,
character(len=32), dimension(100), intent(in)  TEXTLU,
integer, intent(in)  IENRE 
)
Parameters
[in]npoin2Y AUDOUIN (LNHE) 25/05/2015 V7P0 Modification to comply with the hermes module
[in]nelem2Y AUDOUIN (LNHE) 25/05/2015 V7P0 Modification to comply with the hermes module
[in]imY AUDOUIN (LNHE) 25/05/2015 V7P0 Modification to comply with the hermes module
[in]jmY AUDOUIN (LNHE) 25/05/2015 V7P0 Modification to comply with the hermes module
[in]nc2dvY AUDOUIN (LNHE) 25/05/2015 V7P0 Modification to comply with the hermes module

Definition at line 10 of file coupev.f.

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