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

Go to the source code of this file.

Functions/Subroutines

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

Function/Subroutine Documentation

◆ vc01ff()

subroutine vc01ff ( double precision, intent(in)  XMUL,
type(bief_obj), intent(in)  SF,
double precision, dimension(*), intent(in)  F,
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]nelebF Function used in the vector formula
[in]IKLE1First 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.
[in]SFBief_obj structure of f
[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
[in]XMULMultiplication coefficient
[in]YOrdinates of points in the mesh
[in]ZElevations of points in the mesh
[in]nelebxF Function used in the vector formula
[in]IKLE1First 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.
[in]SFBief_obj structure of f
[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
[in]XMULMultiplication coefficient
[in]YOrdinates of points in the mesh
[in]ZElevations of points in the mesh
[in]nelmaxF Function used in the vector formula
[in]IKLE1First 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.
[in]SFBief_obj structure of f
[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
[in]XMULMultiplication coefficient
[in]YOrdinates of points in the mesh
[in]ZElevations of points in the mesh

Definition at line 9 of file vc01ff.f.

+ Here is the caller graph for this function: