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

Diff of /trunk/Sources/phylmd/orbite.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 63  CONTAINS Line 63  CONTAINS
63      USE dimphy, ONLY : klon      USE dimphy, ONLY : klon
64      USE yomcst, ONLY : r_incl      USE yomcst, ONLY : r_incl
65      USE phyetat0_m, ONLY : rlat, rlon      USE phyetat0_m, ONLY : rlat, rlon
66      USE comconst, ONLY : pi      use nr_util, only: assert, pi
     use nr_util, only: assert  
67    
68      ! Author : O. Boucher (LMD/CNRS), d'après les routines "zenith" et      ! Author : O. Boucher (LMD/CNRS), d'après les routines "zenith" et
69      ! "angle" de Z.X. Li      ! "angle" de Z.X. Li
Legend:
Removed from v.36  
changed lines
  Added in v.39
  ViewVC Help
Powered by ViewVC 1.1.21