/[lmdze]/trunk/libf/dyn3d/pressure_var.f90
ViewVC logotype

Diff of /trunk/libf/dyn3d/pressure_var.f90

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

trunk/libf/dyn3d/pressure_m.f90 revision 3 by guez, Wed Feb 27 13:16:39 2008 UTC trunk/libf/dyn3d/pressure_var.f90 revision 20 by guez, Wed Oct 15 16:19:57 2008 UTC
# Line 1  Line 1 
1  module pressure_m  module pressure_var
2    
3    use dimens_m, only: iim, jjm, llm    use dimens_m, only: iim, jjm, llm
4    
# Line 10  module pressure_m Line 10  module pressure_m
10    ! for layer "l")    ! for layer "l")
11    
12    REAL p3d(iim + 1, jjm + 1, llm+1) ! pressure at layer interfaces, in Pa    REAL p3d(iim + 1, jjm + 1, llm+1) ! pressure at layer interfaces, in Pa
13    ! "p3d(i, j, l)" is at longitude "rlonv(i)", latitude "rlatu(j)",    ! ("p3d(i, j, l)" is at longitude "rlonv(i)", latitude "rlatu(j)",
14    ! for interface "l")    ! for interface "l")
15    
16    private iim, jjm, llm    private iim, jjm, llm
17    
18  end module pressure_m  end module pressure_var
Legend:
Removed from v.3  
changed lines
  Added in v.20
  ViewVC Help
Powered by ViewVC 1.1.21