/[lmdze]/trunk/phylmd/coefcdrag.f
ViewVC logotype

Diff of /trunk/phylmd/coefcdrag.f

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

revision 254 by guez, Mon Feb 5 10:39:38 2018 UTC revision 271 by guez, Wed Jul 11 13:22:39 2018 UTC
# Line 10  contains Line 10  contains
10      ! From LMDZ4/libf/phylmd/coefcdrag.F90, version 1.1.1.1, 2004/05/19 12:53:07      ! From LMDZ4/libf/phylmd/coefcdrag.F90, version 1.1.1.1, 2004/05/19 12:53:07
11    
12      ! Objet : calcul des cdrags pour le moment (cdram) et les flux de      ! Objet : calcul des cdrags pour le moment (cdram) et les flux de
13      ! chaleur sensible et latente (cdrah), du cdrag neutre (cdran), du      ! chaleur sensible et latente (cdrah), du drag coefficient neutre
14      ! nombre de Richardson entre la surface et le niveau de reference      ! (cdran), du nombre de Richardson entre la surface et le niveau
15      ! (zri1) et de la pression au niveau de reference (pref).      ! de reference (zri1) et de la pression au niveau de reference
16        ! (pref).
17    
18      ! I. Musat, 01.07.2002      ! I. Musat, 01.07.2002
19    
# Line 34  contains Line 35  contains
35      ! rugos---input-R- rugosite      ! rugos---input-R- rugosite
36    
37      REAL, dimension(klon), intent(out) :: cdram, cdrah, cdran, zri1, pref      REAL, dimension(klon), intent(out) :: cdram, cdrah, cdran, zri1, pref
38      ! cdram--output-R- cdrag pour le moment      ! cdram--output-R- drag coefficient pour le moment
39      ! cdrah--output-R- cdrag pour les flux de chaleur latente et sensible      ! cdrah--output-R- drag coefficient pour les flux de chaleur latente et sensible
40      ! cdran--output-R- cdrag neutre      ! cdran--output-R- drag coefficient neutre
41      ! zri1---output-R- nb. Richardson entre la surface et la couche zgeop/RG      ! zri1---output-R- nb. Richardson entre la surface et la couche zgeop/RG
42      ! pref---output-R- pression au niveau zgeop/RG      ! pref---output-R- pression au niveau zgeop/RG
43    
Legend:
Removed from v.254  
changed lines
  Added in v.271
  ViewVC Help
Powered by ViewVC 1.1.21