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

Go to the source code of this file.

Functions/Subroutines

subroutine cpik13 (IKLE, IKLBOR, ELTSEG, NBOR, NELBOR, NULONE, NELEM, NELMAX, NPOIN, NPTFR, NELEB, NELEBX)
 

Function/Subroutine Documentation

◆ cpik13()

subroutine cpik13 ( integer, dimension(nelmax,6), intent(inout)  IKLE,
integer, dimension(nelebx,3), intent(inout)  IKLBOR,
integer, dimension(nelmax,3), intent(in)  ELTSEG,
integer, dimension(*), intent(inout)  NBOR,
integer, dimension(nelebx), intent(in)  NELBOR,
integer, dimension(nelebx), intent(in)  NULONE,
integer, intent(in)  NELEM,
integer, intent(in)  NELMAX,
integer, intent(in)  NPOIN,
integer, intent(in)  NPTFR,
integer, intent(in)  NELEB,
integer, intent(in)  NELEBX 
)
Parameters
[in]nelemELTSEG Segments numbers in every element
[in]IKLBORConnectivity table of boundary elements
[in,out]IKLEConnectivity table
[in]NBORGlobal numbers of boundary points
[in]NELBORBoundary element that contains segment k
[in]NELEBNumber of boundary segments
[in]NELEBXMaximum number of boundary segments
[in]NULONELocal number of k in element nelbor
[in]NELEMNumber of elements
[in]NELMAXMaximum number of elements
[in]NPOINNumber of points in the mesh
[in]NPTFRNumber of boundary points
[in]nelmaxELTSEG Segments numbers in every element
[in]IKLBORConnectivity table of boundary elements
[in,out]IKLEConnectivity table
[in]NBORGlobal numbers of boundary points
[in]NELBORBoundary element that contains segment k
[in]NELEBNumber of boundary segments
[in]NELEBXMaximum number of boundary segments
[in]NULONELocal number of k in element nelbor
[in]NELEMNumber of elements
[in]NELMAXMaximum number of elements
[in]NPOINNumber of points in the mesh
[in]NPTFRNumber of boundary points
[in]npoinELTSEG Segments numbers in every element
[in]IKLBORConnectivity table of boundary elements
[in,out]IKLEConnectivity table
[in]NBORGlobal numbers of boundary points
[in]NELBORBoundary element that contains segment k
[in]NELEBNumber of boundary segments
[in]NELEBXMaximum number of boundary segments
[in]NULONELocal number of k in element nelbor
[in]NELEMNumber of elements
[in]NELMAXMaximum number of elements
[in]NPOINNumber of points in the mesh
[in]NPTFRNumber of boundary points
[in]nptfrELTSEG Segments numbers in every element
[in]IKLBORConnectivity table of boundary elements
[in,out]IKLEConnectivity table
[in]NBORGlobal numbers of boundary points
[in]NELBORBoundary element that contains segment k
[in]NELEBNumber of boundary segments
[in]NELEBXMaximum number of boundary segments
[in]NULONELocal number of k in element nelbor
[in]NELEMNumber of elements
[in]NELMAXMaximum number of elements
[in]NPOINNumber of points in the mesh
[in]NPTFRNumber of boundary points
[in]nelebELTSEG Segments numbers in every element
[in]IKLBORConnectivity table of boundary elements
[in,out]IKLEConnectivity table
[in]NBORGlobal numbers of boundary points
[in]NELBORBoundary element that contains segment k
[in]NELEBNumber of boundary segments
[in]NELEBXMaximum number of boundary segments
[in]NULONELocal number of k in element nelbor
[in]NELEMNumber of elements
[in]NELMAXMaximum number of elements
[in]NPOINNumber of points in the mesh
[in]NPTFRNumber of boundary points
[in]nelebxELTSEG Segments numbers in every element
[in]IKLBORConnectivity table of boundary elements
[in,out]IKLEConnectivity table
[in]NBORGlobal numbers of boundary points
[in]NELBORBoundary element that contains segment k
[in]NELEBNumber of boundary segments
[in]NELEBXMaximum number of boundary segments
[in]NULONELocal number of k in element nelbor
[in]NELEMNumber of elements
[in]NELMAXMaximum number of elements
[in]NPOINNumber of points in the mesh
[in]NPTFRNumber of boundary points

Definition at line 8 of file cpik13.f.

+ Here is the caller graph for this function: