Go to the source code of this file.
|
subroutine | crsl11 (NEWSL, OLDSL, ZF, IKLE, NELEM, NELMAX) |
|
◆ crsl11()
subroutine crsl11 |
( |
double precision, dimension(nelmax,3), intent(inout) |
NEWSL, |
|
|
double precision, dimension(*), intent(in) |
OLDSL, |
|
|
double precision, dimension(*), intent(in) |
ZF, |
|
|
integer, dimension(nelmax,3), intent(in) |
IKLE, |
|
|
integer, intent(in) |
NELEM, |
|
|
integer, intent(in) |
NELMAX |
|
) |
| |
- Parameters
-
[in] | nelem | IKLE Connectivity table |
[in] | NELEM | Number of elements |
[in] | NELMAX | Maximum number of elements |
[in,out] | NEWSL | Modified free surface, per element |
[in] | OLDSL | Real free surface, per point |
[in] | ZF | Bathymetry |
[in] | nelmax | IKLE Connectivity table |
[in] | NELEM | Number of elements |
[in] | NELMAX | Maximum number of elements |
[in,out] | NEWSL | Modified free surface, per element |
[in] | OLDSL | Real free surface, per point |
[in] | ZF | Bathymetry |
Definition at line 7 of file crsl11.f.