/[lmdze]/trunk/libf/dyn3d/diagedyn.f
ViewVC logotype

Diff of /trunk/libf/dyn3d/diagedyn.f

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

revision 9 by guez, Wed Feb 27 13:16:39 2008 UTC revision 10 by guez, Fri Apr 18 14:45:53 2008 UTC
# Line 68  c     Input variables Line 68  c     Input variables
68        REAL dtime        REAL dtime
69        REAL vcov(ip1jm,llm),ucov(ip1jmp1,llm) ! vents covariants        REAL vcov(ip1jm,llm),ucov(ip1jmp1,llm) ! vents covariants
70        REAL ps(ip1jmp1)                       ! pression  au sol        REAL ps(ip1jmp1)                       ! pression  au sol
71        REAL p (ip1jmp1,llmp1  )  ! pression aux interfac.des couches        REAL, intent(in):: p(ip1jmp1, llmp1)  ! pression aux interfac.des couches
72        REAL pk (ip1jmp1,llm  )  ! = (p/Pref)**kappa        REAL, intent(in):: pk (ip1jmp1,llm  )  ! = (p/Pref)**kappa
73        REAL teta(ip1jmp1,llm)                 ! temperature potentielle        REAL teta(ip1jmp1,llm)                 ! temperature potentielle
74        REAL q(ip1jmp1,llm)               ! champs eau vapeur        REAL q(ip1jmp1,llm)               ! champs eau vapeur
75        REAL ql(ip1jmp1,llm)               ! champs eau liquide        REAL ql(ip1jmp1,llm)               ! champs eau liquide
Legend:
Removed from v.9  
changed lines
  Added in v.10
  ViewVC Help
Powered by ViewVC 1.1.21