/[lmdze]/trunk/dyn3d/conf_dat3d.f
ViewVC logotype

Diff of /trunk/dyn3d/conf_dat3d.f

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

revision 36 by guez, Thu Dec 2 17:11:04 2010 UTC revision 39 by guez, Tue Jan 25 15:11:05 2011 UTC
# Line 14  contains Line 14  contains
14      ! que la longitude varie de - pi à pi, la latitude de pi/2 à      ! que la longitude varie de - pi à pi, la latitude de pi/2 à
15      ! - pi/2 et pour que la coordonnée pression soit décroissante.      ! - pi/2 et pour que la coordonnée pression soit décroissante.
16    
17      use comconst, only: pi      use nr_util, only: assert_eq, pi
     use nr_util, only: assert_eq  
18    
19      REAL, intent(in):: xd(:), yd(:) ! longitudes et latitudes initiales, en rad      REAL, intent(in):: xd(:), yd(:) ! longitudes et latitudes initiales, en rad
20      REAL, intent(in):: zd(:) ! pressure levels, in Pa or hPa      REAL, intent(in):: zd(:) ! pressure levels, in Pa or hPa

Legend:
Removed from v.36  
changed lines
  Added in v.39

  ViewVC Help
Powered by ViewVC 1.1.21