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

Go to the source code of this file.

Functions/Subroutines

subroutine bedload_solidischarge_gaia (MESH, U2D, V2D, UNORM, HN, TW, UW, MU, TOB, CF, TOBW, FW, THETAW, RATIO_SAND, MASKPT, MASKEL, ACLADM, UNLADM, KSP, KSR, LIQBOR, DEBUG, NPOIN, NPTFR, IELMT, ICF, KENT, OPTBAN, HIDFAC, GRAV, DCLA, XWC, XMVE, XMVS, VCE, HMIN, HIDI, KARMAN, ZERO, PI, K_H_Y, SUSP, MSK, T1, T2, T3, T4, T5, T6, T7, T8, T9, T10, T11, T12, AC, HIDING, QSC, QSS, SLOPEFF, COEFPN, PHISED, CALFA, SALFA, BETA, ZF, S, DEVIA, BETA2, SECCURRENT, BIJK, HOULE, UNSV2D, U3D, V3D, CODE, H_TEL, HW, THETAC, TOBCW_MEAN, TOBCW_MAX, CSTAEQ, SANFRA)
 

Function/Subroutine Documentation

◆ bedload_solidischarge_gaia()

subroutine bedload_solidischarge_gaia ( type(bief_mesh), intent(inout)  MESH,
type(bief_obj), intent(in)  U2D,
type(bief_obj), intent(in)  V2D,
type(bief_obj), intent(in)  UNORM,
type(bief_obj), intent(in)  HN,
type(bief_obj), intent(in)  TW,
type(bief_obj), intent(in)  UW,
type(bief_obj), intent(in)  MU,
type(bief_obj), intent(in)  TOB,
type(bief_obj), intent(in)  CF,
type(bief_obj), intent(in)  TOBW,
type(bief_obj), intent(in)  FW,
type(bief_obj), intent(in)  THETAW,
double precision, dimension(npoin), intent(in)  RATIO_SAND,
type(bief_obj), intent(in)  MASKPT,
type(bief_obj), intent(in)  MASKEL,
type(bief_obj), intent(in)  ACLADM,
type(bief_obj), intent(in)  UNLADM,
type(bief_obj), intent(in)  KSP,
type(bief_obj), intent(in)  KSR,
type(bief_obj), intent(in)  LIQBOR,
integer, intent(in)  DEBUG,
integer, intent(in)  NPOIN,
integer, intent(in)  NPTFR,
integer, intent(in)  IELMT,
integer, intent(in)  ICF,
integer, intent(in)  KENT,
integer, intent(in)  OPTBAN,
integer, intent(in)  HIDFAC,
double precision, intent(in)  GRAV,
double precision, intent(in)  DCLA,
double precision, intent(in)  XWC,
double precision, intent(in)  XMVE,
double precision, intent(in)  XMVS,
double precision, intent(in)  VCE,
double precision, intent(in)  HMIN,
double precision, intent(in)  HIDI,
double precision, intent(in)  KARMAN,
double precision, intent(in)  ZERO,
double precision, intent(in)  PI,
double precision, intent(in)  K_H_Y,
logical, intent(in)  SUSP,
logical, intent(in)  MSK,
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)  T5,
type(bief_obj), intent(inout)  T6,
type(bief_obj), intent(inout)  T7,
type(bief_obj), intent(inout)  T8,
type(bief_obj), intent(inout)  T9,
type(bief_obj), intent(inout)  T10,
type(bief_obj), intent(inout)  T11,
type(bief_obj), intent(inout)  T12,
double precision, intent(inout)  AC,
type(bief_obj), intent(inout)  HIDING,
type(bief_obj), intent(inout)  QSC,
type(bief_obj), intent(inout)  QSS,
integer, intent(in)  SLOPEFF,
type(bief_obj), intent(inout)  COEFPN,
double precision, intent(in)  PHISED,
type(bief_obj), intent(inout)  CALFA,
type(bief_obj), intent(inout)  SALFA,
double precision, intent(in)  BETA,
type(bief_obj), intent(in)  ZF,
type(bief_obj), intent(in)  S,
integer, intent(in)  DEVIA,
double precision, intent(in)  BETA2,
logical, intent(in)  SECCURRENT,
double precision, intent(in)  BIJK,
logical, intent(in)  HOULE,
type(bief_obj), intent(in)  UNSV2D,
type(bief_obj), intent(in)  U3D,
type(bief_obj), intent(in)  V3D,
character(len=24), intent(in)  CODE,
type(bief_obj), intent(in)  H_TEL,
type(bief_obj), intent(in)  HW,
type(bief_obj), intent(in)  THETAC,
type(bief_obj), intent(in)  TOBCW_MEAN,
type(bief_obj), intent(in)  TOBCW_MAX,
type(bief_obj), intent(in)  CSTAEQ,
double precision, dimension(npoin), intent(in)  SANFRA 
)
Parameters
[in,out]meshAC Critical shields parameter
[in]ACLADMMean diameter of active layer
[in]BETACoefficient for sloping bed effect ( koch and flokstra)
[in]BETA2Coefficient for the deviation (talmon et al.)
[in]BIJKCoefficient of the bijker formula
[in,out]CALFACosinus of the angle between mean flow and transport
[in]CFQuadratic friction coefficient
[in,out]COEFPNCorrection of transport for sloping bed effect
[in,out]CSTAEQEquilibrium sediment concentration
[in]DEBUGFlag for debugging
[in]DEVIASlope effect formula for deviation
[in]DCLASediment grain diameter
[in]FWQuadratic friction coefficient (wave)
[in]GRAVAcceleration of gravity
[in]HIDFACHiding factor formulas
[in]HIDIHiding factor for particular size class (hidfac =0)
[in]HIDINGHiding factor correction
[in]HMINMinimum value of water depth
[in]HNWater depth
[in]HOULELogical, for wave effects
[in]ICFBed-load or total load transport formulas
[in]IELMTNumber of elements
[in]K_H_YKarim, holly & yang constant
[in]KARMANVon karman constant
[in]KENTConvention for liquid input with prescribed value
[in]KSPBed skin roughness
[in]KSRRipple bed roughness
[in]LIQBORType of boundary condition for qs
[in]MASKELMasking of elements
[in]MASKPTMasking per point
[in,out]MESHMesh structure
[in]MSKIf yes, there is masked elements
[in,out]MUCorrection factor for bed roughness
[in]NPOINNumber of points
[in]NPTFRNumber of boundary points
[in]OPTBANOption for tidal flats
[in]PHISEDAngle of repose of the sediment
[in]PIPi
[in,out]QSCBed load transport rate [m2/s]->[kg*(m-1*s-1)]
[in,out]QSSSuspended load transport rate
[in]RATIO_SANDMass fraction of sand
[in]SVoid structure
[in,out]SALFASinus of the angle between transport rate and current
[in]SANFRASand fraction for Wilcock & Crowe formula
[in]SECCURRENTLogical, parametrisation for secondary currents
[in]SLOPEFFFormula for slope effect
[in]SUSPLogical, suspension
[in,out]T1Work bief_obj structure
[in,out]T10Work bief_obj structure
[in,out]T11Work bief_obj structure
[in,out]T12Work bief_obj structure
[in,out]T13Work bief_obj structure
[in,out]T2Work bief_obj structure
[in,out]T3Work bief_obj structure
[in,out]T4Work bief_obj structure
[in,out]T5Work bief_obj structure
[in,out]T6Work bief_obj structure
[in,out]T7Work bief_obj structure
[in,out]T8Work bief_obj structure
[in,out]T9Work bief_obj structure
[in]THETAWWave direction (deg wrt ox axis)
[in,out]TOBBed shear stress (total friction)
[in]TOBWWave induced shear stress
[in]TWWave period
[in,out]U2DMean flow velocity x-direction
[in]UNLADMMean diameter of active stratum layer
[in,out]UNORMNorm of the mean flow velocity
[in]UNSV2DInverse of integrals of test functions
[in]UWOrbital wave velocity
[in,out]V2DMean flow velocity y-direction
[in]VCEWater viscosity
[in]XMVEFluid density
[in]XMVSWater density
[in]XWCSettling velocity
[in]ZEROZero
[in]ZFElevation of bottom

Definition at line 17 of file bedload_solidischarge_gaia.f.

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