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

Go to the source code of this file.

Functions/Subroutines

subroutine vc00pp (XMUL, Z, SURFAC, IKLE1, IKLE2, IKLE3, IKLE4, IKLE5, IKLE6, NELEM, NELMAX, W1, W2, W3, W4, W5, W6, FORMUL)
 

Function/Subroutine Documentation

◆ vc00pp()

subroutine vc00pp ( double precision, intent(in)  XMUL,
double precision, dimension(*), intent(in)  Z,
double precision, dimension(nelmax), intent(in)  SURFAC,
integer, dimension(nelmax), intent(in)  IKLE1,
integer, dimension(nelmax), intent(in)  IKLE2,
integer, dimension(nelmax), intent(in)  IKLE3,
integer, dimension(nelmax), intent(in)  IKLE4,
integer, dimension(nelmax), intent(in)  IKLE5,
integer, dimension(nelmax), intent(in)  IKLE6,
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,
double precision, dimension(nelmax), intent(inout)  W4,
double precision, dimension(nelmax), intent(inout)  W5,
double precision, dimension(nelmax), intent(inout)  W6,
character(len=16), intent(in)  FORMUL 
)
Parameters
[in]nelemFORMUL String with the formula describing the vector
[in]IKLE1First point of prisms
[in]IKLE2Second point of prisms
[in]IKLE3Third point of prisms
[in]IKLE4Fourth point of prisms
[in]IKLE5Fifth point of prisms
[in]IKLE6Sixth point of prisms
[in]NELEMNumber of elements
[in]NELMAXMaximum number of elements
[in]SURFACArea of triangles
[out]W1Result in non assembled form
[out]W2Result in non assembled form
[out]W3Result in non assembled form
[out]W4Result in non assembled form
[out]W5Result in non assembled form
[out]W6Result in non assembled form
[in]XMULMultiplication coefficient
[in]ZElevations of points
[in]nelmaxFORMUL String with the formula describing the vector
[in]IKLE1First point of prisms
[in]IKLE2Second point of prisms
[in]IKLE3Third point of prisms
[in]IKLE4Fourth point of prisms
[in]IKLE5Fifth point of prisms
[in]IKLE6Sixth point of prisms
[in]NELEMNumber of elements
[in]NELMAXMaximum number of elements
[in]SURFACArea of triangles
[out]W1Result in non assembled form
[out]W2Result in non assembled form
[out]W3Result in non assembled form
[out]W4Result in non assembled form
[out]W5Result in non assembled form
[out]W6Result in non assembled form
[in]XMULMultiplication coefficient
[in]ZElevations of points

Definition at line 8 of file vc00pp.f.

+ Here is the caller graph for this function: