Go to the source code of this file.
|
subroutine | source_icover (NPOIN, FU, FV, H, U, V, T1, T2, T3, GRAV, KARMAN, CHESTR, DT, AT) |
|
◆ source_icover()
subroutine source_icover |
( |
integer, intent(in) |
NPOIN, |
|
|
type(bief_obj), intent(inout) |
FU, |
|
|
type(bief_obj), intent(inout) |
FV, |
|
|
type(bief_obj), intent(in) |
H, |
|
|
type(bief_obj), intent(in) |
U, |
|
|
type(bief_obj), intent(in) |
V, |
|
|
type(bief_obj), intent(inout) |
T1, |
|
|
type(bief_obj), intent(inout) |
T2, |
|
|
type(bief_obj), intent(inout) |
T3, |
|
|
double precision, intent(in) |
GRAV, |
|
|
double precision, intent(in) |
KARMAN, |
|
|
type(bief_obj), intent(in) |
CHESTR, |
|
|
double precision, intent(in) |
DT, |
|
|
double precision, intent(in) |
AT |
|
) |
| |
- Parameters
-
[in] | npoin | AT Time in seconds |
[in] | CHESTR | Friction coefficient |
[in] | DT | Time step |
[in,out] | FU | Source terms on velocity u |
[in,out] | FV | Source terms on velocity v |
[in] | GRAV | Gravity |
[in] | H | Water depth |
[in] | KARMAN | Von karman's constant |
[in] | NPOIN | Number of nodes in the mesh |
[in,out] | T1 | Working array |
[in,out] | T2 | Working array |
[in,out] | T3 | Working array |
[in] | U | X component of the velocity |
[in] | V | Y component of the velocity |
[in,out] | WINDX | First component of wind velocity |
[in,out] | WINDY | Second component of wind velocity |
Definition at line 6 of file source_icover.f.