The TELEMAC-MASCARET system  trunk
vc17aa.f File Reference

Go to the source code of this file.

## Functions/Subroutines

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

## ◆ vc17aa()

 subroutine vc17aa ( 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, 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, 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 )
Parameters
 [in] nelem IKLE1 First point of triangles [in] IKLE2 Second point of triangles [in] IKLE3 Third point of triangles [in] NELEM Number of elements [in] NELMAX Maximum number of elements [in] SU Bief_obj structure of u [in] SV Bief_obj structure of v [in] SURFAC Area of triangles [in] U Function used in the vector formula [in] V Function used in the vector formula [out] W1 Result in non assembled form [out] W2 Result in non assembled form [out] W3 Result in non assembled form [in] XEL Abscissae of points in the mesh, per element [in] XMUL Multiplication coefficient [in] YEL Ordinates of points in the mesh, per element [in] nelmax IKLE1 First point of triangles [in] IKLE2 Second point of triangles [in] IKLE3 Third point of triangles [in] NELEM Number of elements [in] NELMAX Maximum number of elements [in] SU Bief_obj structure of u [in] SV Bief_obj structure of v [in] SURFAC Area of triangles [in] U Function used in the vector formula [in] V Function used in the vector formula [out] W1 Result in non assembled form [out] W2 Result in non assembled form [out] W3 Result in non assembled form [in] XEL Abscissae of points in the mesh, per element [in] XMUL Multiplication coefficient [in] YEL Ordinates of points in the mesh, per element

Definition at line 8 of file vc17aa.f.

Here is the caller graph for this function: