1.8.13
|
The TELEMAC-MASCARET system
trunk
|
Public Member Functions | |
| subroutine | suspension_computation (SLVTRA, HN, HN_TEL, UCONV, VCONV, MU, TOB, FDM, FD90, KSP, KSR, KS, ELAY, AVA, AFBOR, BFBOR, LIMDIF, CLT, MASKEL, MASKTR, MASKPT, IFAMAS, NPOIN, IELM, NPTFR, ITRA, LT, NIT, RESOL, OPTBAN, KENT, KDDL, KDIR, KSORT, KLOG, KNEU, OPTSUP, OPDTRA, DEBUG, CSF_SABLE, TETA_SUSP, DT, MASED0, ZERO, XWC, KARMAN, XMVE, XMVS, VCE, GRAV, HMIN, VITCD, PARTHENIADES, ENTETS, BILMA, MSK, CHARR, IMP_INFLOW_C, MESH, ZF, CS, CST, CTILD, CBOR, DISP, IT1, IT2, IT3, IT4, TB, T1, T2, T3, T4, T8, T9, T10, T11, T12, T14, TE1, TE2, TE3, S, AM1_S, AM2_S, MBOR, MASTEN, MASTOU, MASINI, AC, ZFCL_S, FLUDPT, FLUDP, FLUER, HPROP, DISP_C, CSTAEQ, CSRATIO, MASFIN, MASDEPT, MASDEP, MASSOU, QS_C, ICQ, ZREF, CORR_CONV, U2D, V2D, SEDCO, DIFT, DM1, ZCONV, UCONV_TEL, VCONV_TEL, SOLSYS, FLBOR_TEL, FLBOR_SIS, FLBORTRA, CODE, VOLU2D, V2DPAR, UNSV2D, NUMLIQ, NFRLIQ, LICBOR, MIXTE, AVAIL, NSICLA, ES, ES_SABLE, ES_VASE, NOMBLAY, CONC, TOCE_VASE, TOCE_SABLE, FLUER_VASE, TOCE_MIXTE, MS_SABLE, MS_VASE, DIRFLU, QSCLXS, QSCLYS, MAXADV) |
Definition at line 85 of file interface_sisyphe_suspension.f.
| subroutine interface_sisyphe_suspension::SUSPENSION_COMPUTATION::suspension_computation | ( | type (slvcfg), intent(inout) | SLVTRA, |
| type (bief_obj), intent(in), target | HN, | ||
| type (bief_obj), intent(in), target | HN_TEL, | ||
| type (bief_obj), intent(inout) | UCONV, | ||
| type (bief_obj), intent(inout) | VCONV, | ||
| type (bief_obj), intent(in) | MU, | ||
| type (bief_obj), intent(in) | TOB, | ||
| double precision, intent(in) | FDM, | ||
| double precision, intent(in) | FD90, | ||
| type (bief_obj), intent(in) | KSP, | ||
| type (bief_obj), intent(in) | KSR, | ||
| type (bief_obj), intent(in) | KS, | ||
| type (bief_obj), intent(inout) | ELAY, | ||
| double precision, dimension(npoin), intent(in) | AVA, | ||
| type (bief_obj), intent(in) | AFBOR, | ||
| type (bief_obj), intent(in) | BFBOR, | ||
| type (bief_obj), intent(inout) | LIMDIF, | ||
| type (bief_obj), intent(inout) | CLT, | ||
| type (bief_obj), intent(in) | MASKEL, | ||
| type (bief_obj), intent(inout) | MASKTR, | ||
| type (bief_obj), intent(in) | MASKPT, | ||
| type (bief_obj), intent(in) | IFAMAS, | ||
| integer, intent(in) | NPOIN, | ||
| integer, intent(in) | IELM, | ||
| integer, intent(in) | NPTFR, | ||
| integer, intent(in) | ITRA, | ||
| integer, intent(in) | LT, | ||
| integer, intent(in) | NIT, | ||
| integer, intent(in) | RESOL, | ||
| integer, intent(in) | OPTBAN, | ||
| integer, intent(in) | KENT, | ||
| integer, intent(in) | KDDL, | ||
| integer, intent(in) | KDIR, | ||
| integer, intent(in) | KSORT, | ||
| integer, intent(in) | KLOG, | ||
| integer, intent(in) | KNEU, | ||
| integer, intent(in) | OPTSUP, | ||
| integer, intent(in) | OPDTRA, | ||
| integer, intent(in) | DEBUG, | ||
| double precision, intent(in) | CSF_SABLE, | ||
| double precision, intent(in) | TETA_SUSP, | ||
| double precision, intent(in) | DT, | ||
| double precision, intent(in) | MASED0, | ||
| double precision, intent(in) | ZERO, | ||
| double precision, intent(in) | XWC, | ||
| double precision, intent(in) | KARMAN, | ||
| double precision, intent(in) | XMVE, | ||
| double precision, intent(in) | XMVS, | ||
| double precision, intent(in) | VCE, | ||
| double precision, intent(in) | GRAV, | ||
| double precision, intent(in) | HMIN, | ||
| double precision, intent(in) | VITCD, | ||
| double precision, intent(in) | PARTHENIADES, | ||
| logical, intent(in) | ENTETS, | ||
| logical, intent(in) | BILMA, | ||
| logical, intent(in) | MSK, | ||
| logical, intent(in) | CHARR, | ||
| logical, intent(in) | IMP_INFLOW_C, | ||
| type (bief_mesh), intent(inout) | MESH, | ||
| type (bief_obj), intent(in) | ZF, | ||
| type (bief_obj), intent(inout) | CS, | ||
| type (bief_obj), intent(inout) | CST, | ||
| type (bief_obj), intent(inout) | CTILD, | ||
| type (bief_obj), intent(inout) | CBOR, | ||
| type (bief_obj), intent(inout) | DISP, | ||
| type (bief_obj), intent(inout) | IT1, | ||
| type (bief_obj), intent(inout) | IT2, | ||
| type (bief_obj), intent(inout) | IT3, | ||
| type (bief_obj), intent(inout) | IT4, | ||
| type (bief_obj), intent(inout) | TB, | ||
| type (bief_obj), intent(inout), target | 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) | T9, | ||
| type (bief_obj), intent(inout) | T10, | ||
| type (bief_obj), intent(inout) | T11, | ||
| type (bief_obj), intent(inout) | T12, | ||
| type (bief_obj), intent(inout) | T14, | ||
| type (bief_obj), intent(inout) | TE1, | ||
| type (bief_obj), intent(inout) | TE2, | ||
| type (bief_obj), intent(inout) | TE3, | ||
| type (bief_obj), intent(inout) | S, | ||
| type (bief_obj), intent(inout) | AM1_S, | ||
| type (bief_obj), intent(inout) | AM2_S, | ||
| type (bief_obj), intent(inout) | MBOR, | ||
| double precision, intent(inout) | MASTEN, | ||
| double precision, intent(inout) | MASTOU, | ||
| double precision, intent(inout) | MASINI, | ||
| double precision, intent(inout) | AC, | ||
| type (bief_obj), intent(inout) | ZFCL_S, | ||
| type (bief_obj), intent(inout) | FLUDPT, | ||
| type (bief_obj), intent(inout) | FLUDP, | ||
| type (bief_obj), intent(inout) | FLUER, | ||
| type (bief_obj), intent(inout) | HPROP, | ||
| type (bief_obj), intent(inout) | DISP_C, | ||
| type (bief_obj), intent(inout) | CSTAEQ, | ||
| type (bief_obj), intent(inout) | CSRATIO, | ||
| double precision, intent(inout) | MASFIN, | ||
| double precision, intent(inout) | MASDEPT, | ||
| double precision, intent(inout) | MASDEP, | ||
| double precision, intent(inout) | MASSOU, | ||
| type (bief_obj), intent(in) | QS_C, | ||
| integer, intent(in) | ICQ, | ||
| type (bief_obj), intent(inout) | ZREF, | ||
| logical, intent(in) | CORR_CONV, | ||
| type (bief_obj), intent(in) | U2D, | ||
| type (bief_obj), intent(in) | V2D, | ||
| logical, intent(in) | SEDCO, | ||
| logical, intent(in) | DIFT, | ||
| type (bief_obj), intent(in) | DM1, | ||
| type (bief_obj), intent(in) | ZCONV, | ||
| type (bief_obj), intent(in) | UCONV_TEL, | ||
| type (bief_obj), intent(in) | VCONV_TEL, | ||
| integer, intent(in) | SOLSYS, | ||
| type (bief_obj), intent(in) | FLBOR_TEL, | ||
| type (bief_obj), intent(inout) | FLBOR_SIS, | ||
| type (bief_obj), intent(inout) | FLBORTRA, | ||
| character(len=24), intent(in) | CODE, | ||
| type (bief_obj), intent(in) | VOLU2D, | ||
| type (bief_obj), intent(in) | V2DPAR, | ||
| type (bief_obj), intent(in) | UNSV2D, | ||
| integer, dimension(nptfr), intent(in) | NUMLIQ, | ||
| integer, intent(in) | NFRLIQ, | ||
| type (bief_obj), intent(in) | LICBOR, | ||
| logical, intent(in) | MIXTE, | ||
| double precision, dimension(npoin,nomblay,nsicla), intent(inout) | AVAIL, | ||
| integer, intent(in) | NSICLA, | ||
| double precision, dimension(npoin,nomblay), intent(inout) | ES, | ||
| double precision, dimension(*), intent(inout) | ES_SABLE, | ||
| double precision, dimension(npoin,nomblay), intent(inout) | ES_VASE, | ||
| integer, intent(in) | NOMBLAY, | ||
| double precision, dimension(npoin,nomblay), intent(inout) | CONC, | ||
| double precision, dimension(nomblay), intent(inout) | TOCE_VASE, | ||
| double precision, intent(inout) | TOCE_SABLE, | ||
| type (bief_obj), intent(inout) | FLUER_VASE, | ||
| type (bief_obj), intent(inout) | TOCE_MIXTE, | ||
| double precision, dimension(*), intent(inout) | MS_SABLE, | ||
| double precision, dimension(*), intent(inout) | MS_VASE, | ||
| integer, intent(in) | DIRFLU, | ||
| type (bief_obj), intent(inout) | QSCLXS, | ||
| type (bief_obj), intent(inout) | QSCLYS, | ||
| integer, intent(in) | MAXADV | ||
| ) |
Definition at line 106 of file interface_sisyphe_suspension.f.
1.8.13