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

Go to the source code of this file.

Functions/Subroutines

subroutine as3_1212_q (XM, NSEG11, NSEG12, XMT, NELMAX, NELEM, ELTSEG1, ELTSEG2, ELTSEG3, ELTSEG4, ELTSEG5, ELTSEG6, ORISEG1, ORISEG2, ORISEG3)
 

Function/Subroutine Documentation

◆ as3_1212_q()

subroutine as3_1212_q ( double precision, dimension(nseg12*2), intent(inout)  XM,
integer, intent(in)  NSEG11,
integer, intent(in)  NSEG12,
double precision, dimension(nelmax,*), intent(in)  XMT,
integer, intent(in)  NELMAX,
integer, intent(in)  NELEM,
integer, dimension(nelmax), intent(in)  ELTSEG1,
integer, dimension(nelmax), intent(in)  ELTSEG2,
integer, dimension(nelmax), intent(in)  ELTSEG3,
integer, dimension(nelmax), intent(in)  ELTSEG4,
integer, dimension(nelmax), intent(in)  ELTSEG5,
integer, dimension(nelmax), intent(in)  ELTSEG6,
integer, dimension(nelmax), intent(in)  ORISEG1,
integer, dimension(nelmax), intent(in)  ORISEG2,
integer, dimension(nelmax), intent(in)  ORISEG3 
)
Parameters
[in]nelmaxELTSEG1 First segment of a triangle
[in]ELTSEG2Second segment of a triangle
[in]ELTSEG3Third segment of a triangle
[in]ELTSEG4Fourth segment of a quadratic triangle
[in]ELTSEG5Fifth segment of a quadratic triangle
[in]ELTSEG6Sixth segment of a quadratic triangle
[in]NELEMNumber of elements in the mesh
[in]NELMAXFirst dimension of ikle and w.
[in]NSEG11Number of segments (here joining linear points)
[in]NSEG12Number of segments (here quadratic)
[in]ORISEG1Orientation of segment 1 of triangle
[in]ORISEG2Orientation of segment 2 of triangle
[in]ORISEG3Orientation of segment 3 of triangle
[out]XMAssembled off-diagonal terms xa12,23,31
[in]XMTElement by element storage of matrix
[in]nelemELTSEG1 First segment of a triangle
[in]ELTSEG2Second segment of a triangle
[in]ELTSEG3Third segment of a triangle
[in]ELTSEG4Fourth segment of a quadratic triangle
[in]ELTSEG5Fifth segment of a quadratic triangle
[in]ELTSEG6Sixth segment of a quadratic triangle
[in]NELEMNumber of elements in the mesh
[in]NELMAXFirst dimension of ikle and w.
[in]NSEG11Number of segments (here joining linear points)
[in]NSEG12Number of segments (here quadratic)
[in]ORISEG1Orientation of segment 1 of triangle
[in]ORISEG2Orientation of segment 2 of triangle
[in]ORISEG3Orientation of segment 3 of triangle
[out]XMAssembled off-diagonal terms xa12,23,31
[in]XMTElement by element storage of matrix
[in]nseg11ELTSEG1 First segment of a triangle
[in]ELTSEG2Second segment of a triangle
[in]ELTSEG3Third segment of a triangle
[in]ELTSEG4Fourth segment of a quadratic triangle
[in]ELTSEG5Fifth segment of a quadratic triangle
[in]ELTSEG6Sixth segment of a quadratic triangle
[in]NELEMNumber of elements in the mesh
[in]NELMAXFirst dimension of ikle and w.
[in]NSEG11Number of segments (here joining linear points)
[in]NSEG12Number of segments (here quadratic)
[in]ORISEG1Orientation of segment 1 of triangle
[in]ORISEG2Orientation of segment 2 of triangle
[in]ORISEG3Orientation of segment 3 of triangle
[out]XMAssembled off-diagonal terms xa12,23,31
[in]XMTElement by element storage of matrix
[in]nseg12ELTSEG1 First segment of a triangle
[in]ELTSEG2Second segment of a triangle
[in]ELTSEG3Third segment of a triangle
[in]ELTSEG4Fourth segment of a quadratic triangle
[in]ELTSEG5Fifth segment of a quadratic triangle
[in]ELTSEG6Sixth segment of a quadratic triangle
[in]NELEMNumber of elements in the mesh
[in]NELMAXFirst dimension of ikle and w.
[in]NSEG11Number of segments (here joining linear points)
[in]NSEG12Number of segments (here quadratic)
[in]ORISEG1Orientation of segment 1 of triangle
[in]ORISEG2Orientation of segment 2 of triangle
[in]ORISEG3Orientation of segment 3 of triangle
[out]XMAssembled off-diagonal terms xa12,23,31
[in]XMTElement by element storage of matrix

Definition at line 9 of file as3_1212_q.f.

+ Here is the caller graph for this function: