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

Go to the source code of this file.

Functions/Subroutines

subroutine suspension_bilan_coh (MESH, CST, HN, MASKEL, IELMT, ITRA, LT, NIT, DT, XMVS, MS_VASE, NOMBLAY, NPOIN, MASSOU, MASED0, MSK, ENTET, MASTEN, MASTOU, MASINI, T1, T2, T3, MASFIN, MASDEPT, MASDEP, AGGLOT, VOLU2D, NUMLIQ, NFRLIQ, NPTFR, FLBORTRA, SEDCO)
 

Function/Subroutine Documentation

◆ suspension_bilan_coh()

subroutine suspension_bilan_coh ( type(bief_mesh), intent(inout)  MESH,
type(bief_obj), intent(in)  CST,
type(bief_obj), intent(in)  HN,
type(bief_obj), intent(in)  MASKEL,
integer, intent(in)  IELMT,
integer, intent(in)  ITRA,
integer, intent(in)  LT,
integer, intent(in)  NIT,
double precision, intent(in)  DT,
double precision, intent(in)  XMVS,
double precision, dimension(npoin, nomblay), intent(in)  MS_VASE,
integer, intent(in)  NOMBLAY,
integer, intent(in)  NPOIN,
double precision, intent(in)  MASSOU,
double precision, intent(in)  MASED0,
logical, intent(in)  MSK,
logical, intent(in)  ENTET,
double precision, intent(inout)  MASTEN,
double precision, intent(inout)  MASTOU,
double precision, intent(inout)  MASINI,
type(bief_obj), intent(inout)  T1,
type(bief_obj), intent(inout)  T2,
type(bief_obj), intent(inout)  T3,
double precision, intent(inout)  MASFIN,
double precision, intent(inout)  MASDEPT,
double precision, intent(inout)  MASDEP,
double precision, intent(in)  AGGLOT,
type(bief_obj), intent(in)  VOLU2D,
integer, dimension(nptfr), intent(in)  NUMLIQ,
integer, intent(in)  NFRLIQ,
integer, intent(in)  NPTFR,
type(bief_obj), intent(in)  FLBORTRA,
logical, intent(in)  SEDCO 
)
Parameters
[in,out]mesh[in] AGGLOT Coefficient of mass-lumping
[in,out]CSTConcentration at time t(n+1)
[in]DTTime step in seconds
[in,out]ENTETLogical, if yes information is given on mass conservation
[in,out]FLBORTRAFluxes at boundaries tracer
[in]HNWater depth
[in]IELMTNumber of elements
[in]ITRATracer index
[in]LTIteration
[out]MASDEPTotal deposited mass
[out]MASDEPTDeposited mass during the time step
[in,out]MASED0Suspended mass balance
[out]MASFINMass at the end
[in,out]MASINIInitial mass
[in]MASKELMasking of elements
[out]MASSOUMass of tracer added by source term
[in,out]MASTENMass entered through liquid boundary
[in,out]MASTOUMass created by source term
[in,out]MESHMesh structure
[in,out]MS_VASEMass of mud per layer (kg/m2)
[in]MSKIf yes, there is masked elements
[in]NFRLIQNumber of liquid boundaries
[in]NITTotal number of iterations
[in]NOMBLAYNumber of vertical bed layers
[in]NPTFRNumber of boundary points
[in]NUMLIQLiquid boundary number of boundary points
[in,out]T1Work bief_obj structure
[in,out]T2Work bief_obj structure
[in,out]T3Work bief_obj structure
[in]VOLU2DIntegral of bases
[in]XMVSSolid density

Definition at line 11 of file suspension_bilan_coh.f.

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