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

Go to the source code of this file.

Functions/Subroutines

subroutine tob_sisyphe (TOB, TOBW, MU, KS, KSP, KSR, CF, FW, CHESTR, UETCAR, CF_TEL, KS_TEL, CODE, KFROT, ICR, KSPRATIO, HOULE, GRAV, XMVE, XMVS, VCE, KARMAN, ZERO, HMIN, HN, ACLADM, UNORM, UW, TW, NPOIN, KSPRED, IKS)
 

Function/Subroutine Documentation

◆ tob_sisyphe()

subroutine tob_sisyphe ( type(bief_obj), intent(inout)  TOB,
type(bief_obj), intent(inout)  TOBW,
type(bief_obj), intent(inout)  MU,
type(bief_obj), intent(inout)  KS,
type(bief_obj), intent(inout)  KSP,
type(bief_obj), intent(inout)  KSR,
type(bief_obj), intent(inout)  CF,
type(bief_obj), intent(inout)  FW,
type(bief_obj), intent(inout)  CHESTR,
type(bief_obj), intent(in)  UETCAR,
type(bief_obj), intent(in)  CF_TEL,
type(bief_obj), intent(inout)  KS_TEL,
character(len=24), intent(in)  CODE,
integer, intent(in)  KFROT,
integer, intent(in)  ICR,
double precision, intent(in)  KSPRATIO,
logical, intent(in)  HOULE,
double precision, intent(in)  GRAV,
double precision, intent(in)  XMVE,
double precision, intent(in)  XMVS,
double precision, intent(in)  VCE,
double precision, intent(in)  KARMAN,
double precision, intent(in)  ZERO,
double precision, intent(in)  HMIN,
type(bief_obj), intent(in)  HN,
type(bief_obj), intent(in)  ACLADM,
type(bief_obj), intent(in)  UNORM,
type(bief_obj), intent(in)  UW,
type(bief_obj), intent(in)  TW,
integer, intent(in)  NPOIN,
logical, intent(in)  KSPRED,
integer, intent(in)  IKS 
)
Parameters
[in]npoinUETCAR Square of the friction velocity (coupled t3d)
[in]UNORMIntensite du courant
[in]VCEWater viscosity
[in]XMVEFluid density (mass)
[in]XMVSSediment density (mass)
[in]ZEROZero
[in]kfrotUETCAR Square of the friction velocity (coupled t3d)
[in]UNORMIntensite du courant
[in]VCEWater viscosity
[in]XMVEFluid density (mass)
[in]XMVSSediment density (mass)
[in]ZEROZero
[in]icrUETCAR Square of the friction velocity (coupled t3d)
[in]UNORMIntensite du courant
[in]VCEWater viscosity
[in]XMVEFluid density (mass)
[in]XMVSSediment density (mass)
[in]ZEROZero
[in]iksUETCAR Square of the friction velocity (coupled t3d)
[in]UNORMIntensite du courant
[in]VCEWater viscosity
[in]XMVEFluid density (mass)
[in]XMVSSediment density (mass)
[in]ZEROZero

Definition at line 10 of file tob_sisyphe.f.

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