The TELEMAC-MASCARET system  trunk
Functions/Subroutines
init_sediment.f File Reference

Go to the source code of this file.

Functions/Subroutines

subroutine init_sediment (NSICLA, ELAY, ZF, ZR, NPOIN, AVAIL, FRACSED_GF, AVA0, LGRAFED, CALWC, XMVS, XMVE, GRAV, VCE, XWC, FDM, CALAC, AC, SEDCO, ES, ES_SABLE, ES_VASE, NOMBLAY, CONC_VASE, MS_SABLE, MS_VASE, ACLADM, UNLADM, TOCE_SABLE, CONC, DEBU, MIXTE)
 

Function/Subroutine Documentation

◆ init_sediment()

subroutine init_sediment ( integer, intent(in)  NSICLA,
type(bief_obj), intent(inout)  ELAY,
type(bief_obj), intent(inout)  ZF,
type(bief_obj), intent(inout)  ZR,
integer, intent(in)  NPOIN,
double precision, dimension(npoin,nomblay,nsicla), intent(inout)  AVAIL,
double precision, dimension(nsicla), intent(inout)  FRACSED_GF,
double precision, dimension(nsicla), intent(inout)  AVA0,
logical, intent(in)  LGRAFED,
logical, intent(in)  CALWC,
double precision, intent(in)  XMVS,
double precision, intent(in)  XMVE,
double precision, intent(in)  GRAV,
double precision, intent(in)  VCE,
double precision, dimension(nsicla), intent(inout)  XWC,
double precision, dimension(nsicla), intent(inout)  FDM,
logical, intent(in)  CALAC,
double precision, dimension(nsicla), intent(inout)  AC,
logical, dimension(nsicla), intent(in)  SEDCO,
double precision, dimension(npoin,nomblay), intent(inout)  ES,
double precision, dimension(npoin,nomblay), intent(inout)  ES_SABLE,
double precision, dimension(npoin,nomblay), intent(inout)  ES_VASE,
integer, intent(in)  NOMBLAY,
double precision, dimension(nomblay), intent(in)  CONC_VASE,
type(bief_obj), intent(inout)  MS_SABLE,
type(bief_obj), intent(inout)  MS_VASE,
type(bief_obj), intent(inout)  ACLADM,
type(bief_obj), intent(inout)  UNLADM,
double precision, intent(inout)  TOCE_SABLE,
double precision, dimension(npoin,nomblay), intent(inout)  CONC,
logical, intent(in)  DEBU,
logical, intent(in)  MIXTE 
)
Parameters
[in]nsicla[in, out] MS_SABLE Mass of sand per layer (kg/m2)
[in,out]MS_VASEMass of mud per layer (kg/m2)
[in,out]ES_SABLEThickness of sand layer (m)
[in,out]ES_VASEThickness of mud layer (m)
[in,out]MIXTESediment mixte (sable /vase)
[in]NOMBLAYNumber of bed layers
[in]NPOINNumber of points
[in]NSICLANumber of sediment classes
[in]SEDCOLogical, sediment cohesive or not
[in]UNLADMMean diameter of active stratum layer
[in]VCEWater viscosity
[in]XMVEFluid density
[in]XMVSWater density
[in]XWCSettling velocity
[in]ZFElevation of bottom
[in]ZRNon erodable bed
[in,out]CONCConcentration of bed layer
[in]DEBUFlag, restart on sedimentological file
[in]npoin[in, out] MS_SABLE Mass of sand per layer (kg/m2)
[in,out]MS_VASEMass of mud per layer (kg/m2)
[in,out]ES_SABLEThickness of sand layer (m)
[in,out]ES_VASEThickness of mud layer (m)
[in,out]MIXTESediment mixte (sable /vase)
[in]NOMBLAYNumber of bed layers
[in]NPOINNumber of points
[in]NSICLANumber of sediment classes
[in]SEDCOLogical, sediment cohesive or not
[in]UNLADMMean diameter of active stratum layer
[in]VCEWater viscosity
[in]XMVEFluid density
[in]XMVSWater density
[in]XWCSettling velocity
[in]ZFElevation of bottom
[in]ZRNon erodable bed
[in,out]CONCConcentration of bed layer
[in]DEBUFlag, restart on sedimentological file
[in]nomblay[in, out] MS_SABLE Mass of sand per layer (kg/m2)
[in,out]MS_VASEMass of mud per layer (kg/m2)
[in,out]ES_SABLEThickness of sand layer (m)
[in,out]ES_VASEThickness of mud layer (m)
[in,out]MIXTESediment mixte (sable /vase)
[in]NOMBLAYNumber of bed layers
[in]NPOINNumber of points
[in]NSICLANumber of sediment classes
[in]SEDCOLogical, sediment cohesive or not
[in]UNLADMMean diameter of active stratum layer
[in]VCEWater viscosity
[in]XMVEFluid density
[in]XMVSWater density
[in]XWCSettling velocity
[in]ZFElevation of bottom
[in]ZRNon erodable bed
[in,out]CONCConcentration of bed layer
[in]DEBUFlag, restart on sedimentological file

Definition at line 11 of file init_sediment.f.

+ Here is the call graph for this function:
+ Here is the caller graph for this function: