Index: trunk/LMDZ.MARS/libf/phymars/conc_mod.F90
===================================================================
--- trunk/LMDZ.MARS/libf/phymars/conc_mod.F90	(revision 3798)
+++ trunk/LMDZ.MARS/libf/phymars/conc_mod.F90	(revision 3799)
@@ -67,5 +67,5 @@
  use tracer_mod, only: igcm_co2, igcm_co, igcm_o, igcm_o1d,		&
 &                      igcm_o2, igcm_o3, igcm_h, igcm_h2,		&
-&                      igcm_oh, igcm_ho2, igcm_n2, igcm_ar,		&
+&                      igcm_oh, igcm_ho2, igcm_h2o2, igcm_n2, igcm_ar,	&
 &                      igcm_h2o_vap, igcm_n, igcm_no, igcm_no2,	&
 &                      igcm_n2d, igcm_co2plus, igcm_oplus,		&
@@ -185,4 +185,10 @@
           cpi(nbq) = 1.065e3  !?
        end if
+       if (igcm_h2o2 /= 0) then
+          nbq = nbq + 1
+          niq(nbq) = igcm_h2o2
+          aki(nbq) = 0.0      !?
+          cpi(nbq) = 1.255e3
+       end if
        if (igcm_n2 /= 0) then
           nbq = nbq + 1