Go to the source code of this file.
|
| subroutine | stoseg31 (NPOIN, NELEM, NELEB, NELMAX, IELM, MXELVS, IKLE, IKLBOR, NBOR, NPTFR, GLOSEG, MAXSEG, GLOSEGBOR, MAXSEGBOR, NSEG, NSEGBOR, ELTSEG, ELTSEGBOR, ORISEG, ORISEGBOR, KNOLG, NDS) |
| |
◆ stoseg31()
| subroutine stoseg31 |
( |
integer, intent(in) |
NPOIN, |
|
|
integer, intent(in) |
NELEM, |
|
|
integer, intent(in) |
NELEB, |
|
|
integer, intent(in) |
NELMAX, |
|
|
integer, intent(in) |
IELM, |
|
|
integer, intent(in) |
MXELVS, |
|
|
integer, dimension(nelmax,4), intent(in) |
IKLE, |
|
|
integer, dimension(neleb,3), intent(in) |
IKLBOR, |
|
|
integer, dimension(nptfr), intent(in) |
NBOR, |
|
|
integer, intent(in) |
NPTFR, |
|
|
integer, dimension(maxseg,2), intent(inout) |
GLOSEG, |
|
|
integer, intent(in) |
MAXSEG, |
|
|
integer, dimension(maxsegbor,2), intent(inout) |
GLOSEGBOR, |
|
|
integer, intent(in) |
MAXSEGBOR, |
|
|
integer, intent(inout) |
NSEG, |
|
|
integer, intent(inout) |
NSEGBOR, |
|
|
integer, dimension(nelmax,6), intent(inout) |
ELTSEG, |
|
|
integer, dimension(neleb,3), intent(inout) |
ELTSEGBOR, |
|
|
integer, dimension(nelmax,6), intent(inout) |
ORISEG, |
|
|
integer, dimension(neleb,3), intent(inout) |
ORISEGBOR, |
|
|
integer, dimension(npoin), intent(in) |
KNOLG, |
|
|
integer, dimension(0:81,7), intent(inout) |
NDS |
|
) |
| |
- Parameters
-
| [in] | nelmax | [out] ELTSEG Segments of every triangle |
| [out] | GLOSEG | Global numbers of points of segments |
| [in] | IELM | 31: tetrahedron |
| [in] | MXELVS | Maximum number of neighbouring elements |
| [in] | IKLE | Connectivity table |
| [in] | NBOR | Global numbers of boundary points |
| [in] | NPTFR | Number of boundary points |
| [in] | KNOLG | Global number of a local point in parallel |
| [out] | MAXSEG | Maximum number of segments (internals + externals) |
| [out] | MAXSEGBOR | Maximum number of segments (externals) |
| [in] | NPOIN | Number of points |
| [in] | NELEM | Number of elements in the mesh |
| [in] | NELMAX | Maximum number of elements in 3d |
| [out] | NSEG | Number of segments of the mesh |
| [out] | NSEGBOR | Number of border segments of the mesh |
| [out] | ORISEG | Orientation of segments of every triangle |
| [in] | ielm | [out] ELTSEG Segments of every triangle |
| [out] | GLOSEG | Global numbers of points of segments |
| [in] | IELM | 31: tetrahedron |
| [in] | MXELVS | Maximum number of neighbouring elements |
| [in] | IKLE | Connectivity table |
| [in] | NBOR | Global numbers of boundary points |
| [in] | NPTFR | Number of boundary points |
| [in] | KNOLG | Global number of a local point in parallel |
| [out] | MAXSEG | Maximum number of segments (internals + externals) |
| [out] | MAXSEGBOR | Maximum number of segments (externals) |
| [in] | NPOIN | Number of points |
| [in] | NELEM | Number of elements in the mesh |
| [in] | NELMAX | Maximum number of elements in 3d |
| [out] | NSEG | Number of segments of the mesh |
| [out] | NSEGBOR | Number of border segments of the mesh |
| [out] | ORISEG | Orientation of segments of every triangle |
Definition at line 11 of file stoseg31.f.
1.8.13