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

Go to the source code of this file.

Functions/Subroutines

subroutine vc04aa (XMUL, SU, SV, U, V, XEL, YEL, IKLE1, IKLE2, IKLE3, NELEM, NELMAX, W1, W2, W3, SPECAD)
 

Function/Subroutine Documentation

◆ vc04aa()

subroutine vc04aa ( double precision, intent(in)  XMUL,
type(bief_obj), intent(in)  SU,
type(bief_obj), intent(in)  SV,
double precision, dimension(*), intent(in)  U,
double precision, dimension(*), intent(in)  V,
double precision, dimension(nelmax,*), intent(in)  XEL,
double precision, dimension(nelmax,*), intent(in)  YEL,
integer, dimension(nelmax), intent(in)  IKLE1,
integer, dimension(nelmax), intent(in)  IKLE2,
integer, dimension(nelmax), intent(in)  IKLE3,
integer, intent(in)  NELEM,
integer, intent(in)  NELMAX,
double precision, dimension(nelmax), intent(inout)  W1,
double precision, dimension(nelmax), intent(inout)  W2,
double precision, dimension(nelmax), intent(inout)  W3,
logical, intent(in)  SPECAD 
)
Parameters
[in]nelemIKLE1 First point of triangles
[in]IKLE2Second point of triangles
[in]IKLE3Third point of triangles
[in]NELEMNumber of elements
[in]NELMAXMaximum number of elements
[in]SPECADIf yes, special advection field, see above
[in]SUBief_obj structure of u
[in]SVBief_obj structure of v
[in]SURFACArea of triangles
[in]UFunction used in the vector formula
[in]VFunction used in the vector formula
[out]W1Result in non assembled form
[out]W2Result in non assembled form
[out]W3Result in non assembled form
[in]XELAbscissae of points in the mesh, per element
[in]XMULMultiplication coefficient
[in]YELOrdinates of points in the mesh, per element
[in]nelmaxIKLE1 First point of triangles
[in]IKLE2Second point of triangles
[in]IKLE3Third point of triangles
[in]NELEMNumber of elements
[in]NELMAXMaximum number of elements
[in]SPECADIf yes, special advection field, see above
[in]SUBief_obj structure of u
[in]SVBief_obj structure of v
[in]SURFACArea of triangles
[in]UFunction used in the vector formula
[in]VFunction used in the vector formula
[out]W1Result in non assembled form
[out]W2Result in non assembled form
[out]W3Result in non assembled form
[in]XELAbscissae of points in the mesh, per element
[in]XMULMultiplication coefficient
[in]YELOrdinates of points in the mesh, per element

Definition at line 8 of file vc04aa.f.

+ Here is the caller graph for this function: