/[lmdze]/trunk/libf/phylmd/clvent.f
ViewVC logotype

Diff of /trunk/libf/phylmd/clvent.f

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 3 by guez, Wed Feb 27 13:16:39 2008 UTC revision 38 by guez, Thu Jan 6 17:52:19 2011 UTC
# Line 4  Line 4 
4        use dimens_m        use dimens_m
5        use dimphy        use dimphy
6        use iniprint        use iniprint
7        use YOMCST        use SUPHEC_M
8        IMPLICIT none        IMPLICIT none
9  c======================================================================  c======================================================================
10  c Auteur(s): Z.X. Li (LMD/CNRS) date: 19930818  c Auteur(s): Z.X. Li (LMD/CNRS) date: 19930818
# Line 28  c d_ven----output-R- le changement de "v Line 28  c d_ven----output-R- le changement de "v
28  c flux_v---output-R- (diagnostic) flux du vent: (kg m/s)/(m**2 s)  c flux_v---output-R- (diagnostic) flux du vent: (kg m/s)/(m**2 s)
29  c======================================================================  c======================================================================
30        INTEGER knon        INTEGER knon
31        REAL dtime        REAL, intent(in):: dtime
32        REAL u1lay(klon), v1lay(klon)        REAL u1lay(klon), v1lay(klon)
33        REAL coef(klon,klev)        REAL coef(klon,klev)
34        REAL t(klon,klev), ven(klon,klev)        REAL t(klon,klev), ven(klon,klev)
Legend:
Removed from v.3  
changed lines
  Added in v.38
  ViewVC Help
Powered by ViewVC 1.1.21