Go to the source code of this file.
|
subroutine | circul (IKLE, ITEST1, IELEM, I1, I2, I3, X, Y, NNELMAX) |
|
◆ circul()
subroutine circul |
( |
integer, dimension(nnelmax,4), intent(inout) |
IKLE, |
|
|
integer, intent(inout) |
ITEST1, |
|
|
integer, intent(in) |
IELEM, |
|
|
integer, intent(in) |
I1, |
|
|
integer, intent(in) |
I2, |
|
|
integer, intent(in) |
I3, |
|
|
double precision, dimension(*), intent(in) |
X, |
|
|
double precision, dimension(*), intent(in) |
Y, |
|
|
integer, intent(in) |
NNELMAX |
|
) |
| |
- Parameters
-
[in] | nnelmax | NDP Nombre de noeuds par elements |
[in] | NPOIN | Nombre total de noeuds du maillage |
[in] | NELEM | Nombre total d'elements du maillage |
[in] | NPMAX | Dimension effective des tableaux x et y (NPMAX = NPOIN + 0.1*NELEM) |
[in] | NNELMAX | Dimension effective des tableaux concernant LES ELEMENTS (NNELMAX = NELEM + 0.2*NELEM) |
| | |
Definition at line 7 of file circul.f.