semimp.f File Reference

Go to the source code of this file.

Functions/Subroutines


Function Documentation

subroutine SEMIMP (  ) 

Module: tomawac briefs 1106. Use(s)


DECLARATIONS_TOMAWAC, INTERFACE_TOMAWAC

Variable(s)


Argument(s) ALFABJ, ALFARO, ALFLTA, ALPHA, BDISPB, BDSSPB, BETA, BETAIH, BETAM, BINVEN, BORETG, CDRAG, CDSCUR, CF, CFROT1, CIMPLI, CMOUT1, CMOUT2, CMOUT3, CMOUT4, CMOUT5, CMOUT6, COEFHS, COEFNL, COEFWD, COEFWE, COEFWF, COEFWH, COEMDI, COSTET, DDC, DECAL, DEPTH, DFREQ, DF_LIM, DIAGHF, DIMBUF, DTSI, EM2SIH, F, F1, FMOY, FREQ, F_COEF, F_POIN, F_PROJ, GAM2RO, GAMARO, GAMATG, GAMBJ1, GAMBJ2, GRAVIT, IANGNL, IANMDI, IDCONF, IDISRO, IEXPRO, IFRBJ, IFRIH, IFRRO, IFRTG, IHMBJ, INDIC, IQBBJ, IWHTG, KSPB, K_1M, K_1M2M, K_1M2P, K_1M3M, K_1M3P, K_1P, K_1P2M, K_1P2P, K_1P3M, K_1P3P, K_IF1, K_IF2, K_IF3, LBUF, LIMIT, LVENT, MDIA, NBD, NBOR, NCONF, NCONFM, NDTBRK, NF, NF1, NF2, NOMVEB, NOMVEF, NPLAN, NPOIN2, NPTFR, NQ_OM2, NQ_TE1, NSITS, NT1, NVEB, NVEF, NVWIN, PROINF, QINDI, RAISF, RFMLTA, ROAIR, ROEAU, SBREK, SDSCU, SEUIL, SFROT, SINTET, SMOUT, STRIA, STRIF, SVENT, TAILF, TAUWAV, TAUX1, TAUX2, TAUX3, TAUX4, TAUX5, TAUX6, TAUX7, TB_FAC, TB_SCA, TB_TMP, TB_TPM, TB_V14, TB_V24, TB_V34, TETA, TNEW, TOLD, TPROP, TSDER, TSTOT, TV1, TV2, TWNEW, TWOLD, T_POIN, U1, U2, USNEW, USOLD, V1, V2, VARIAN, VEGETATION, VENSTA, VENT, VENTX, VENTY, VX_CTE, VY_CTE, X, XDTBRK, XK, XKAPPA, XKMOY, Y, Z0NEW, Z0OLD, ZVENT
Use(s) DECLARATIONS_TOMAWAC :
DEUPI, MESH, NAMEWX, NAMEWY, PHASVEB, T3_01, T3_02, TEXVEB, UNITVEB
Common(s) INFO : LNG, LU
Internal(s) AUX1, AUX2, AUX3, AUX4, AUXI, COEF, DTN, FM1, FM2, HM0, HM0MAX, IDT, IFCAR, IFF, IP, ISITS, JP, K, MF1, MF2, MFMAX, NVENT, SUME, TDEB, TFIN, TROUVE, USMIN, VITMIN, VITVEN, XCCMDI
Alias(es) EX_SEMIMP

Call(s)


Known(s) ANAVEN(), FPREAD(), FREM01(), FREM02(), FREMOY(), FREPIC(), KMOYEN(), NOUDON(), PLANTE(), QBREK1(), QBREK2(), QBREK3(), QBREK4(), QDSCUR(), QFROT1(), QMOUT1(), QMOUT2(), QNLIN1(), QNLIN2(), QNLIN3(), QTRIA1(), QTRIA2(), QVEG(), QWIND1(), QWIND2(), QWIND3(), QWINDL(), STRESS(), TOTNRJ(), USTAR1(), USTAR2()

Called by


WAC()

Development history


Release Date Author Notes
V1P0
26/03/95 M. BENOIT CREATED
V1P2
07/11/96 M. BENOIT MODIFIED
V5P0
25/08/2000 MODIFIED
V5P9
16/12/2008 JMH BETA HAS BEEN ADDED TO THE LIST OF ARGUMENTS AND
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
12/05/2011 E.G.RENOU (EDF), G.MATTAROLO (EDF) MODIFIED: integration of new source terms, developed by
V6P1
27/06/2011 G.MATTAROLO (EDF - LNHE) Translation of French names of the variables in argument
V6P2
27/06/2012 U.H.MERKEL Renamed SUM to SUME, due to NAG compiler
V6P3
12/03/2013 E. GAGNAIRE-RENOU (EDF - LNHE) HF diagnostic tail is not necessarily imposed
V7P0
12/09/2014 VITO BACCHI (EDF - LNHE) Friction due to vegetation added.

Definition at line 113 of file semimp.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