/[lmdze]/trunk/Sources/phylmd/phyetat0.f
ViewVC logotype

Diff of /trunk/Sources/phylmd/phyetat0.f

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

revision 13 by guez, Fri Jul 25 19:59:34 2008 UTC revision 22 by guez, Fri Jul 31 15:18:47 2009 UTC
# Line 1  Line 1 
1  module phyetat0_m  module phyetat0_m
2    
3    use dimphy, only: klon, klev, zmasq    use dimphy, only: klon
4    
5    IMPLICIT none    IMPLICIT none
6    
7    REAL, save:: rlat(klon), rlon(klon)    REAL, save:: rlat(klon), rlon(klon) ! latitude and longitude, in degrees
   ! latitude et longitude pour chaque point, in degrees  
8    
9    private klon, klev, zmasq    private klon
10    
11  contains  contains
12    
# Line 28  contains Line 27  contains
27      USE temps, ONLY : itau_phy      USE temps, ONLY : itau_phy
28      use netcdf, only: nf90_get_att, nf90_global      use netcdf, only: nf90_get_att, nf90_global
29      use netcdf95, only: handle_err      use netcdf95, only: handle_err
30        use dimphy, only: zmasq, klev
31    
32      include "netcdf.inc"      include "netcdf.inc"
33    
Legend:
Removed from v.13  
changed lines
  Added in v.22
  ViewVC Help
Powered by ViewVC 1.1.21