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