suspension_computation.f File Reference

Go to the source code of this file.

Functions/Subroutines


Function Documentation

subroutine SUSPENSION_COMPUTATION (  ) 

Module: sisyphe briefs 554.


BIEF, DECLARATIONS_SISYPHE, INTERFACE_SISYPHE

Variable(s)


Argument(s) AC, AFBOR, AM1_S, AM2_S, AVA, AVAIL, BFBOR, BILMA, CBOR, CHARR, CLT, CODE, CONC, CORR_CONV, CS, CSF_SABLE, CSRATIO, CST, CSTAEQ, CTILD, DEBUG, DIFT, DIRFLU, DISP, DISP_C, DM1, DT, ELAY, ENTETS, ES, ES_SABLE, ES_VASE, FD90, FDM, FLBORTRA, FLBOR_SIS, FLBOR_TEL, FLUDP, FLUDPT, FLUER, FLUER_VASE, GRAV, HMIN, HN, HN_TEL, HPROP, ICQ, IELM, IFAMAS, IMP_INFLOW_C, IT1, IT2, IT3, IT4, ITRA, KARMAN, KDDL, KDIR, KENT, KINC, KLOG, KNEU, KS, KSORT, KSP, KSR, LICBOR, LIMDIF, LT, MASDEP, MASDEPT, MASED0, MASFIN, MASINI, MASKEL, MASKPT, MASKTR, MASSOU, MASTEN, MASTOU, MAXADV, MBOR, MESH, MIXTE, MSK, MS_SABLE, MS_VASE, MU, NFRLIQ, NIT, NOMBLAY, NPOIN, NPTFR, NSICLA, NUMLIQ, OPDTRA, OPTADV, OPTBAN, PARTHENIADES, QSCLXS, QSCLYS, QS_C, RESOL, S, SEDCO, SLVTRA, SOLSYS, T1, T10, T11, T12, T14, T2, T3, T4, T5, T6, T7, T8, T9, TASS, TB, TE1, TE2, TE3, TETA_SUSP, TOB, TOCE_MIXTE, TOCE_SABLE, TOCE_VASE, U2D, UCONV, UCONV_TEL, UNSV2D, V2D, V2DPAR, VCE, VCONV, VCONV_TEL, VITCD, VITCE, VOLU2D, W1, XMVE, XMVS, XWC, ZCONV, ZERO, ZF, ZFCL_S, ZREF
Use(s) DECLARATIONS_SISYPHE :
FLULIM
Common(s) INFO : LNG, LU
Internal(s) AGGLOT, BID, CONC_SABLE, GLOSEG1, GLOSEG2, HOLD, I, IELMT, J, K, MSTOT, OPTVF, RESOL_MOD, SAVE_UCONV, SAVE_VCONV, SOLSYS_SIS, TETAH, YAFLULIM, YASMI2
Alias(es) EX_SUSPENSION_COMPUTATION, GLOSEG1, GLOSEG2, HOLD, SAVE_UCONV, SAVE_VCONV

Call(s)


Known(s) CHARAC(), CPSTVC(), CVDFTR(), DIFFIN(), IELBOR(), OS(), OSBD(), PLANTE(), SUSPENSION_BILAN(), SUSPENSION_BILAN_COH(), SUSPENSION_CONV(), SUSPENSION_DEPOT(), SUSPENSION_EROSION(), SUSPENSION_EROSION_COH(), SUSPENSION_EVOL(), SUSPENSION_FLUX_MIXTE(), SUSPENSION_LISTING(), VECTOR()

Called by


SUSPENSION_MAIN()

Development history


Release Date Author Notes
22/12/2004 F. HUVELIN
10/11/2010 JMH: ENTET CHANGED INTO ENTETS IN THE CALL TO CVDFTR
05/05/2008 ADAPTED FOR FINITE VOLUME ADVECTION
09/05/2008 FLUDP REMOVED FROM SUSPENSION_FLUX, SUSPENSION_NERBED DELETED
28/05/2008 NEW SUSPENSION_BILAN WITH FLUXES THROUGH BOUNDARIES
09/06/2008 NEW SUSPENSION_BILAN WITH FLBORTRA GIVEN BY CVDFTR
12/06/2008 SECTIONS "TREATING SMALL DEPTHS" AND
25/06/2008 CALLS DIFFIN (USED TO BE IN SUSPENSION_MAIN)
31/07/2008 CALLS SUSPENSION_FLUX SPLIT IN 2 : DEPOSITION + EROSION
16/09/2009 AVAIL(NPOIN,10,NSICLA)
V6P0
05/04/2010 CSTAEQ TAKES INTO ACCOUNT THE % OF LAYER QQ OR THE SELECTED FORMULATION
V6P0
13/07/2010 N.DURAND (HRW), S.E.BOURBAN (HRW) Translation of French comments within the FORTRAN sources into
V6P0
21/08/2010 N.DURAND (HRW), S.E.BOURBAN (HRW) Creation of DOXYGEN tags for automated documentation and
V6P1
19/04/2011 J.-M. HERVOUET (LNHE) Adaptation to the new call of Sisyphe in Telemac-2D, and various
V6P1
19/07/2011 C.VILLARET (EDF-LNHE), P.TASSI (EDF-LNHE) Name of variables
V6P2
31/05/2012 MAK (HRW) Include CSRATIO
V6P2
18/06/2012 PAT (P. TASSI) (EDF & LNHE) updated version with HRW's development Soulsby-van Rijn's concentration
V6P2
18/06/2012 C. VILLARET (EDF & LNHE) modification call to suspension_erosion_coh (simplified)
V6P3
15/04/2013 J.-M. HERVOUET (LNHE) YAFLULIM was not initialised in one case.
V6P3
18/11/2013 J.-M. HERVOUET (LNHE) Pointers GLOSEG1 and GLOSEG2 added to avoid an unwanted copy of
V7P0
28/04/2014 J.-M. HERVOUET (LNHE) Call to diffin modified.

Definition at line 166 of file suspension_computation.f.

Here is the call graph for this function:

Here is the caller graph for this function:


Generated on Fri Aug 31 2013 18:12:58 by S.E.Bourban (HRW) using doxygen 1.7.0