Go to the source code of this file.
|
subroutine | lecfas (X, Y, IKLE, NCOLOR, TFAST1, TFAST2, ADDFAS, NGEO, NFO1) |
|
◆ lecfas()
subroutine lecfas |
( |
double precision, dimension(*), intent(inout) |
X, |
|
|
double precision, dimension(*), intent(inout) |
Y, |
|
|
integer, dimension(nelmax,4), intent(inout) |
IKLE, |
|
|
integer, dimension(*), intent(inout) |
NCOLOR, |
|
|
integer, dimension(*), intent(inout) |
TFAST1, |
|
|
integer, dimension(*), intent(inout) |
TFAST2, |
|
|
logical, intent(in) |
ADDFAS, |
|
|
integer, intent(in) |
NGEO, |
|
|
integer, intent(in) |
NFO1 |
|
) |
| |
- Parameters
-
[in] | ngeo | ADDFAS Indicateur utilisation des c.l. (fasttabs) |
[in] | nfo1 | ADDFAS Indicateur utilisation des c.l. (fasttabs) |
Definition at line 8 of file lecfas.f.