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

Go to the source code of this file.

Functions/Subroutines

subroutine vc01tt (XMUL, SF, F, X, Y, Z, IKLE1, IKLE2, IKLE3, IKLE4, NELEM, NELMAX, W1, W2, W3, W4)
 

Function/Subroutine Documentation

◆ vc01tt()

subroutine vc01tt ( double precision, intent(in)  XMUL,
type(bief_obj), intent(in)  SF,
double precision, dimension(*), intent(in)  F,
double precision, dimension(*), intent(in)  X,
double precision, dimension(*), intent(in)  Y,
double precision, dimension(*), intent(in)  Z,
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, 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 
)
Parameters
[in]nelemF Function used in the vector formula
[in]IKLE1First point of tetrahedra
[in]IKLE2Second point of tetrahedra
[in]IKLE3Third point of tetrahedra
[in]IKLE4Fourth point of tetrahedra
[in]NELEMNumber of elements
[in]NELMAXMaximum number of elements
[in]SFBief_obj structure of f
[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
[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 tetrahedra
[in]IKLE2Second point of tetrahedra
[in]IKLE3Third point of tetrahedra
[in]IKLE4Fourth point of tetrahedra
[in]NELEMNumber of elements
[in]NELMAXMaximum number of elements
[in]SFBief_obj structure of f
[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
[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 8 of file vc01tt.f.

+ Here is the caller graph for this function: