Index: trunk/LMDZ.MARS/libf/aeronomars/photolysis_mod.F90
===================================================================
--- trunk/LMDZ.MARS/libf/aeronomars/photolysis_mod.F90	(revision 2481)
+++ trunk/LMDZ.MARS/libf/aeronomars/photolysis_mod.F90	(revision 2489)
@@ -5,6 +5,6 @@
 ! photolysis
 
-  integer, save :: nphot = 13        ! number of photolysis
-!  integer, parameter :: nphot = 15        ! number of photolysis (with hdo)
+  integer, save :: nphot = 13             ! number of photolysis 
+                                          ! is incremented by +2 in calchim if deuterium chemisty)
   integer, parameter :: nabs  = 10        ! number of absorbing gases
 
Index: trunk/LMDZ.MARS/libf/aeronomars/photolysis_online.F
===================================================================
--- trunk/LMDZ.MARS/libf/aeronomars/photolysis_online.F	(revision 2481)
+++ trunk/LMDZ.MARS/libf/aeronomars/photolysis_online.F	(revision 2489)
@@ -81,5 +81,5 @@
       a_no      = 8      ! no
       a_no2     = 9      ! no2
-      a_n2      = 10     ! no2
+      a_n2      = 10     ! n2
 
 !     photodissociation rates numbering.