Go to the source code of this file.
|
subroutine | divise (X, Y, IKLE, NCOLOR, NPOIN, NELEM, NELMAX, NSOM2, SOM2, INDICP, INDICE, SHP, ELT, NPMAX, CORR, LEVEL) |
|
◆ divise()
subroutine divise |
( |
double precision, dimension(*), intent(inout) |
X, |
|
|
double precision, dimension(*), intent(inout) |
Y, |
|
|
integer, dimension(nelmax,*), intent(inout) |
IKLE, |
|
|
integer, dimension(*), intent(inout) |
NCOLOR, |
|
|
integer, intent(inout) |
NPOIN, |
|
|
integer, intent(inout) |
NELEM, |
|
|
integer, intent(in) |
NELMAX, |
|
|
integer, intent(in) |
NSOM2, |
|
|
double precision, dimension(10,2), intent(in) |
SOM2, |
|
|
integer, dimension(*), intent(inout) |
INDICP, |
|
|
integer, dimension(*), intent(inout) |
INDICE, |
|
|
double precision, dimension(npmax,3), intent(inout) |
SHP, |
|
|
integer, dimension(npmax), intent(inout) |
ELT, |
|
|
integer, intent(in) |
NPMAX, |
|
|
integer, dimension(nelmax,*), intent(inout), optional |
CORR, |
|
|
integer, intent(in), optional |
LEVEL |
|
) |
| |
- Parameters
-
[in] | nsom2 | [<–>] IKLE Numeros globaux des noeuds de chaque element |
| | |
Definition at line 8 of file divise.f.