/[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 8 by guez, Mon Mar 31 12:51:21 2008 UTC revision 9 by guez, Mon Mar 31 13:58:05 2008 UTC
# Line 16  contains Line 16  contains
16      use nrutil, only: assert      use nrutil, only: assert
17      use dimphy, only: klon      use dimphy, only: klon
18      use dimens_m, only: llm      use dimens_m, only: llm
19      use read_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
20      use orbite_m, only: orbite, zenang      use orbite_m, only: orbite, zenang
21      use nrtype, only: pi      use nrtype, only: pi
22    
# Line 112  contains Line 112  contains
112    
113      ! This function computes the production rate of ozone by chemistry.      ! This function computes the production rate of ozone by chemistry.
114    
115      use read_coefoz_m, only: a6_mass      use regr_pr_comb_coefoz_m, only: a6_mass
116      use nrutil, only: assert      use nrutil, only: assert
117      use dimens_m, only: llm      use dimens_m, only: llm
118      use dimphy, only: klon      use dimphy, only: klon

Legend:
Removed from v.8  
changed lines
  Added in v.9

  ViewVC Help
Powered by ViewVC 1.1.21