/[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

trunk/libf/dyn3d/conf_dat3d.f90 revision 24 by guez, Wed Mar 3 13:23:49 2010 UTC trunk/Sources/dyn3d/conf_dat3d.f revision 134 by guez, Wed Apr 29 15:47:56 2015 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 numer_rec, 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.24  
changed lines
  Added in v.134
  ViewVC Help
Powered by ViewVC 1.1.21