/[lmdze]/trunk/phylmd/Mobidic/o3_chem.f
ViewVC logotype

Diff of /trunk/phylmd/Mobidic/o3_chem.f

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

revision 18 by guez, Thu Aug 7 12:29:13 2008 UTC revision 36 by guez, Thu Dec 2 17:11:04 2010 UTC
# Line 17  contains Line 17  contains
17      ! Their shape is "(/klon, llm/)".      ! Their shape is "(/klon, llm/)".
18      ! Index "(i, :)" is for longitude "rlon(i)", latitude "rlat(i)".      ! Index "(i, :)" is for longitude "rlon(i)", latitude "rlat(i)".
19    
20      use numer_rec, only: assert, pi      use nr_util, only: assert, pi
21      use dimphy, only: klon      use dimphy, only: klon
22      use dimens_m, only: llm      use dimens_m, only: llm
23      use regr_pr_comb_coefoz_m, only: c_Mob, a4_mass, a2, r_het_interm      use regr_pr_comb_coefoz_m, only: c_Mob, a4_mass, a2, r_het_interm
# Line 110  contains Line 110  contains
110      ! Index "(i, :)" is for longitude "rlon(i)", latitude "rlat(i)".      ! Index "(i, :)" is for longitude "rlon(i)", latitude "rlat(i)".
111    
112      use regr_pr_comb_coefoz_m, only: a6_mass      use regr_pr_comb_coefoz_m, only: a6_mass
113      use numer_rec, only: assert      use nr_util, only: assert
114      use dimens_m, only: llm      use dimens_m, only: llm
115      use dimphy, only: klon      use dimphy, only: klon
116    
Legend:
Removed from v.18  
changed lines
  Added in v.36
  ViewVC Help
Powered by ViewVC 1.1.21