The TELEMAC-MASCARET system
trunk
|
Go to the source code of this file.
Functions/Subroutines | |
subroutine | suspension_flux_mixte (TAUP, FDM, NPOIN, CHARR, XMVE, XMVS, VCE, GRAV, XWC, ZERO, PARTHENIADES, FLUER_SABLE, FLUER_VASE, ZREF, AC, CSTAEQ, QSC, ICQ, DEBUG, AVAIL, NSICLA, ES, TOCE_VASE, TOCE_SABLE, NOMBLAY, DT, TOCE_MIXTE, MS_SABLE, MS_VASE) |
subroutine suspension_flux_mixte | ( | type (bief_obj), intent(in) | TAUP, |
double precision, intent(in) | FDM, | ||
integer, intent(in) | NPOIN, | ||
logical, intent(in) | CHARR, | ||
double precision, intent(in) | XMVE, | ||
double precision, intent(in) | XMVS, | ||
double precision, intent(in) | VCE, | ||
double precision, intent(in) | GRAV, | ||
double precision, intent(in) | XWC, | ||
double precision, intent(in) | ZERO, | ||
double precision, intent(in) | PARTHENIADES, | ||
type (bief_obj), intent(inout) | FLUER_SABLE, | ||
type (bief_obj), intent(inout) | FLUER_VASE, | ||
type (bief_obj), intent(in) | ZREF, | ||
double precision, intent(inout) | AC, | ||
type (bief_obj), intent(inout) | CSTAEQ, | ||
type(bief_obj), intent(in) | QSC, | ||
integer, intent(in) | ICQ, | ||
integer, intent(in) | DEBUG, | ||
double precision, dimension(npoin,nomblay,nsicla), intent(inout) | AVAIL, | ||
integer, intent(in) | NSICLA, | ||
double precision, dimension(npoin,nomblay), intent(inout) | ES, | ||
double precision, dimension(nomblay), intent(in) | TOCE_VASE, | ||
double precision, intent(in) | TOCE_SABLE, | ||
integer, intent(in) | NOMBLAY, | ||
double precision, intent(in) | DT, | ||
double precision, dimension(npoin,nomblay), intent(inout) | TOCE_MIXTE, | ||
double precision, dimension(npoin,nomblay), intent(inout) | MS_SABLE, | ||
double precision, dimension(npoin,nomblay), intent(inout) | MS_VASE | ||
) |
[in] | taup | [in, out] AC Critical shields parameter |
[in] | FDM | Diameter dm for each class |
[in,out] | AVAIL | Volume percent of each class |
[in] | CHARR | Bedload |
[in,out] | CS | Concentration at time n |
[in,out] | CSTAEQ | Equilibrium concentration |
[in] | DEBUG | Flag for debugging |
[in] | DT | Time step |
[in,out] | ES | Layer thicknesses as double precision |
[in,out] | FLUER_SABLE | Erosion flux for mixed sediments |
[in,out] | FLUER_VASE | Erosion flux for mixed sediments |
[in] | GRAV | Acceleration of gravity |
[in] | ICQ | Reference concentration formula |
[in,out] | MS_SABLE | Mass of sand per layer (kg/m2) |
[in,out] | MS_VASE | Mass of mud per layer (kg/m2) |
[in] | NOMBLAY | Number of layers for consolidation |
[in] | NPOIN | Number of points |
[in] | NSICLA | Number of size classes for bed materials |
[in] | PARTHENIADES | Constant of the krone and partheniades erosion law (kg/m2/s) |
[in,out] | QSC | Bedload transport rate |
[in] | TAUP | Critical shear stress |
[in,out] | TOCE_MIXTE | Critical shear stress for mixed sediments |
[in,out] | TOCE_SABLE | Critical shear stress for sand |
[in,out] | TOCE_VASE | Critical erosion shear stress of the mud per layer (n/m2) |
[in] | VCE | Flow viscosity |
[in] | XMVE | Fluid density |
[in] | XMVS | Water density |
[in] | XWC | Settling velocities |
[in] | ZERO | Zero |
[in,out] | ZREF | Reference elevation |
Definition at line 10 of file suspension_flux_mixte.f.