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

Go to the source code of this file.

Functions/Subroutines

subroutine mt14tt (T, XM, LEGO, XMUL, SW, W, H, X, Y, IKLE, NELEM, NELMAX, NPLAN, NPOIN2)
 

Function/Subroutine Documentation

◆ mt14tt()

subroutine mt14tt ( double precision, dimension(nelmax,4), intent(inout)  T,
double precision, dimension(12,nelmax), intent(inout)  XM,
logical, intent(in)  LEGO,
double precision, intent(in)  XMUL,
type(bief_obj), intent(in)  SW,
double precision, dimension(*), intent(in)  W,
double precision, dimension(nelmax,4), intent(in)  H,
double precision, dimension(*), intent(in)  X,
double precision, dimension(*), intent(in)  Y,
integer, dimension(nelmax,4), intent(in)  IKLE,
integer, intent(in)  NELEM,
integer, intent(in)  NELMAX,
integer, intent(in)  NPLAN,
integer, intent(in)  NPOIN2 
)
Parameters
[in]nelemH Function used in the formula
[in]IKLEConnectivity table
[in]LEGOLogical. if yes result assembled.
[in]NELEMNumber of elements
[in]NELEM2Number of triangles in the underlying 2d mesh
[in]NELMAXMaximum number of elements
[in]NPLANNumber of planes in the mesh
[in]NPOIN2Number of points in the underlying 2d mesh
[in]SWBief_obj structure of w
[in,out]TWork array for element by element diagonal
[in]WFunction used in the formula
[in]XAbscissae of points in the mesh
[in]YOrdinates of points in the mesh
[in,out]XMOff-diagonal terms
[in]XMULCoefficient for multiplication
[in]nelmaxH Function used in the formula
[in]IKLEConnectivity table
[in]LEGOLogical. if yes result assembled.
[in]NELEMNumber of elements
[in]NELEM2Number of triangles in the underlying 2d mesh
[in]NELMAXMaximum number of elements
[in]NPLANNumber of planes in the mesh
[in]NPOIN2Number of points in the underlying 2d mesh
[in]SWBief_obj structure of w
[in,out]TWork array for element by element diagonal
[in]WFunction used in the formula
[in]XAbscissae of points in the mesh
[in]YOrdinates of points in the mesh
[in,out]XMOff-diagonal terms
[in]XMULCoefficient for multiplication
[in]nplanH Function used in the formula
[in]IKLEConnectivity table
[in]LEGOLogical. if yes result assembled.
[in]NELEMNumber of elements
[in]NELEM2Number of triangles in the underlying 2d mesh
[in]NELMAXMaximum number of elements
[in]NPLANNumber of planes in the mesh
[in]NPOIN2Number of points in the underlying 2d mesh
[in]SWBief_obj structure of w
[in,out]TWork array for element by element diagonal
[in]WFunction used in the formula
[in]XAbscissae of points in the mesh
[in]YOrdinates of points in the mesh
[in,out]XMOff-diagonal terms
[in]XMULCoefficient for multiplication
[in]npoin2H Function used in the formula
[in]IKLEConnectivity table
[in]LEGOLogical. if yes result assembled.
[in]NELEMNumber of elements
[in]NELEM2Number of triangles in the underlying 2d mesh
[in]NELMAXMaximum number of elements
[in]NPLANNumber of planes in the mesh
[in]NPOIN2Number of points in the underlying 2d mesh
[in]SWBief_obj structure of w
[in,out]TWork array for element by element diagonal
[in]WFunction used in the formula
[in]XAbscissae of points in the mesh
[in]YOrdinates of points in the mesh
[in,out]XMOff-diagonal terms
[in]XMULCoefficient for multiplication

Definition at line 8 of file mt14tt.f.

+ Here is the caller graph for this function: