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

Go to the source code of this file.

Functions/Subroutines

subroutine vc00ff (XMUL, X, Y, Z, IKLE1, IKLE2, IKLE3, IKLE4, NBOR, NELEB, NELEBX, W1, W2, W3, W4, NELBOR, NULONE, NELMAX)
 

Function/Subroutine Documentation

◆ vc00ff()

subroutine vc00ff ( double precision, intent(in)  XMUL,
double precision, dimension(nelmax,6), intent(in)  X,
double precision, dimension(nelmax,6), intent(in)  Y,
double precision, dimension(*), intent(in)  Z,
integer, dimension(nelebx), intent(in)  IKLE1,
integer, dimension(nelebx), intent(in)  IKLE2,
integer, dimension(nelebx), intent(in)  IKLE3,
integer, dimension(nelebx), intent(in)  IKLE4,
integer, dimension(*), intent(in)  NBOR,
integer, intent(in)  NELEB,
integer, intent(in)  NELEBX,
double precision, dimension(nelebx), intent(inout)  W1,
double precision, dimension(nelebx), intent(inout)  W2,
double precision, dimension(nelebx), intent(inout)  W3,
double precision, dimension(nelebx), intent(inout)  W4,
integer, dimension(nelebx), intent(in)  NELBOR,
integer, dimension(nelebx,4), intent(in)  NULONE,
integer, intent(in)  NELMAX 
)
Parameters
[in]nelebIKLE1 First point of quadrilateral
[in]IKLE2Second point of quadrilateral
[in]IKLE3Third point of quadrilateral
[in]IKLE4Fourth point of quadrilateral
[in]NBORGlobal number of boundary points
[in]NELBORAdjacent element number
[in]NELEMNumber of elements
[in]NELMAXMaximum number of elements
[in]NULONELocal numbering of boundary element in adjacent ELEMENT.
[out]W1Result in non assembled form
[out]W2Result in non assembled form
[out]W3Result in non assembled form
[out]W4Result in non assembled form
[in]XAbscissae of points in the mesh, per element
[in]XMULMultiplication coefficient
[in]YOrdinates of points in the mesh, per element
[in]ZElevations of points in the mesh, per point !!
[in]nelebxIKLE1 First point of quadrilateral
[in]IKLE2Second point of quadrilateral
[in]IKLE3Third point of quadrilateral
[in]IKLE4Fourth point of quadrilateral
[in]NBORGlobal number of boundary points
[in]NELBORAdjacent element number
[in]NELEMNumber of elements
[in]NELMAXMaximum number of elements
[in]NULONELocal numbering of boundary element in adjacent ELEMENT.
[out]W1Result in non assembled form
[out]W2Result in non assembled form
[out]W3Result in non assembled form
[out]W4Result in non assembled form
[in]XAbscissae of points in the mesh, per element
[in]XMULMultiplication coefficient
[in]YOrdinates of points in the mesh, per element
[in]ZElevations of points in the mesh, per point !!
[in]nelmaxIKLE1 First point of quadrilateral
[in]IKLE2Second point of quadrilateral
[in]IKLE3Third point of quadrilateral
[in]IKLE4Fourth point of quadrilateral
[in]NBORGlobal number of boundary points
[in]NELBORAdjacent element number
[in]NELEMNumber of elements
[in]NELMAXMaximum number of elements
[in]NULONELocal numbering of boundary element in adjacent ELEMENT.
[out]W1Result in non assembled form
[out]W2Result in non assembled form
[out]W3Result in non assembled form
[out]W4Result in non assembled form
[in]XAbscissae of points in the mesh, per element
[in]XMULMultiplication coefficient
[in]YOrdinates of points in the mesh, per element
[in]ZElevations of points in the mesh, per point !!

Definition at line 8 of file vc00ff.f.

+ Here is the caller graph for this function: