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

Go to the source code of this file.

Functions/Subroutines

subroutine bedload_solvs_fe (MESH, S, EBOR, MASKEL, MASK, QSX, QSY, IELMT, NPOIN, NPTFR, KENT, KDIR, KDDL, LIMTEC, DT, MSK, ENTET, T1, T2, T3, T4, T8, ZFCL, HZ, HZN, GLOSEG, DIMGLO, FLODEL, FLULIM, NSEG, UNSV2D, CSF_SABLE, ICLA, FLBCLA, AVA, LIQBOR, QBOR, MAXADV)
 

Function/Subroutine Documentation

◆ bedload_solvs_fe()

subroutine bedload_solvs_fe ( type(bief_mesh), intent(inout)  MESH,
type(bief_obj), intent(in)  S,
type(bief_obj), intent(inout)  EBOR,
type(bief_obj), intent(in)  MASKEL,
type(bief_obj), intent(in)  MASK,
type(bief_obj), intent(in)  QSX,
type(bief_obj), intent(in)  QSY,
integer, intent(in)  IELMT,
integer, intent(in)  NPOIN,
integer, intent(in)  NPTFR,
integer, intent(in)  KENT,
integer, intent(in)  KDIR,
integer, intent(in)  KDDL,
type(bief_obj), intent(inout)  LIMTEC,
double precision, intent(in)  DT,
logical, intent(in)  MSK,
logical, intent(in)  ENTET,
type(bief_obj), intent(inout)  T1,
type(bief_obj), intent(inout)  T2,
type(bief_obj), intent(inout)  T3,
type(bief_obj), intent(inout)  T4,
type(bief_obj), intent(inout)  T8,
type(bief_obj), intent(inout)  ZFCL,
type(bief_obj), intent(inout)  HZ,
type(bief_obj), intent(in)  HZN,
integer, dimension(dimglo,2), intent(in)  GLOSEG,
integer, intent(in)  DIMGLO,
type(bief_obj), intent(inout)  FLODEL,
double precision, dimension(nseg), intent(inout)  FLULIM,
integer, intent(in)  NSEG,
type(bief_obj), intent(in)  UNSV2D,
double precision, intent(in)  CSF_SABLE,
integer, intent(in)  ICLA,
type(bief_obj), intent(inout)  FLBCLA,
double precision, dimension(npoin), intent(in)  AVA,
type(bief_obj), intent(in)  LIQBOR,
type(bief_obj), intent(in)  QBOR,
integer, intent(in)  MAXADV 
)
Parameters
[in,out]mesh[in] DIMGLO First dimension of gloseg
[in]DTTime step
[in,out]EBORBoundary condition for bed evolution (dirichlet)
[in]ENTETLogical, if yes information is given on mass conservation
[in,out]FLBCLAFluxes at boundary for the class
[out]FLODELFluxes between points (per segment)
[out]FLULIMLimitation of fluxes
[in]GLOSEGConnectivity table for segments
[out]HZNew available layer of sediment
[in]HZNOld available layer of sediment
[in]ICLAClass number
[in]IELMTNumber of elements
[in]KDDLConvention for degree of freedom
[in]KDIRConvention for dirichlet point
[in]KENTConvention for liquid input with prescribed value
[in]LIMTECType of boundary condition
[in]LIQBORType of boundary condition on bedload discharge
[in]MASKBlock of masks, every one for a type of boundary SEE DIFFIN.F IN LIBRARY BIEF.
[in]MASKELMasking of elements
[in]MAXADVMaximum number of iterations (in positive_depth)
[in,out]MESHMesh structure
[in]MSKIf yes, there is masked elements
[in]NPOINNumber of points
[in]NPTFRNumber of boundary points
[in]NSEGNumber of segments per control section
[in]QBORPrescribed bedload discharges
[in]QSXSolid discharge x
[in]QSYSolid discharge y
[in]SVoid structure
[in,out]T1Work bief_obj structure
[in,out]T2Work bief_obj structure
[in,out]T3Work bief_obj structure
[in,out]T4Work bief_obj structure
[in,out]T8Work bief_obj structure
[in]UNSV2DInverse of integrals of test functions
[out]ZFCLZfcl=hz-hzn

Definition at line 10 of file bedload_solvs_fe.f.

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