Index: LMDZ4/trunk/libf/phylmd/clesphys.h
===================================================================
--- LMDZ4/trunk/libf/phylmd/clesphys.h	(revision 698)
+++ LMDZ4/trunk/libf/phylmd/clesphys.h	(revision 699)
@@ -6,5 +6,4 @@
        LOGICAL cycle_diurne,soil_model,new_oliq,ok_orodr,ok_orolf 
        LOGICAL ok_limitvrai
-       LOGICAL bug_ozone
        INTEGER nbapp_rad, iflag_con
        REAL co2_ppm, solaire
@@ -41,5 +40,5 @@
      S     , lonmin_ins, lonmax_ins, latmin_ins, latmax_ins
      S     , ecrit_ins, ecrit_hf, ecrit_hf2mth, ecrit_day
-     S     , ecrit_mth, ecrit_tra, ecrit_reg, bug_ozone
+     S     , ecrit_mth, ecrit_tra, ecrit_reg
      S     , freqin_isccp, freqout_isccp, ip_ebil_phy
      S     , ok_slab_sicOBS
Index: LMDZ4/trunk/libf/phylmd/conf_phys.F90
===================================================================
--- LMDZ4/trunk/libf/phylmd/conf_phys.F90	(revision 698)
+++ LMDZ4/trunk/libf/phylmd/conf_phys.F90	(revision 699)
@@ -666,13 +666,4 @@
   call getin('ecrit_reg',ecrit_reg)
 !
-!
-!
-!Config Key  = bug_ozone
-!Config Desc = Pour retrouver le bug de l'ozone (IPCC), mettre a true
-!Config Def  = false
-!Config Help =
-!
-  bug_ozone = .false.
-  call getin('bug_ozone',bug_ozone)
 !
 !
@@ -744,5 +735,4 @@
   write(numout,*)' ecrit_ hf, day, mth, reg',&
  & ecrit_hf, ecrit_day, ecrit_mth, ecrit_reg
-  write(numout,*)' bug_ozone = ', bug_ozone
   return
 
Index: LMDZ4/trunk/libf/phylmd/ozonecm.F
===================================================================
--- LMDZ4/trunk/libf/phylmd/ozonecm.F	(revision 698)
+++ LMDZ4/trunk/libf/phylmd/ozonecm.F	(revision 699)
@@ -81,9 +81,4 @@
         DO i = 1, klon
           o3(i,k) = field(i,k) - field(i,k+1)
-          IF (.not. bug_ozone) then
-c         convert o3 into kg/kg         
-            o3(i,k)=MAX(o3(i,k),1.0e-12)*RG/46.6968
-     .               /(paprs(i,k)-paprs(i,k+1))
-          ENDIF
         ENDDO
       ENDDO
Index: LMDZ4/trunk/libf/phylmd/radlwsw.F
===================================================================
--- LMDZ4/trunk/libf/phylmd/radlwsw.F	(revision 698)
+++ LMDZ4/trunk/libf/phylmd/radlwsw.F	(revision 699)
@@ -238,12 +238,7 @@
 c wo:    cm.atm (epaisseur en cm dans la situation standard)
 c POZON: kg/kg
-         IF (bug_ozone) then
-           POZON(i,k) = MAX(wo(iof+i,k),1.0e-12)*RG/46.6968
+         POZON(i,k) = MAX(wo(iof+i,k),1.0e-12)*RG/46.6968
      .               /(paprs(iof+i,k)-paprs(iof+i,k+1))
      .               *(paprs(iof+i,1)/101325.0)
-         ELSE
-c le calcul qui suit est maintenant fait dans ozonecm (MPL)
-           POZON(i,k) = wo(i,k)
-         ENDIF
          PCLDLD(i,k) = cldfra(iof+i,k)*cldemi(iof+i,k)
          PCLDLU(i,k) = cldfra(iof+i,k)*cldemi(iof+i,k)
@@ -555,11 +550,6 @@
       DO JL = 1, KDLON
          ZCLDSW0(JL,JK) = 0.0
-         IF (bug_ozone) then
-           ZOZ(JL,JK) = POZON(JL,JK)*46.6968/RG
+         ZOZ(JL,JK) = POZON(JL,JK)*46.6968/RG
      .               *PDP(JL,JK)*(101325.0/PPSOL(JL))
-         ELSE
-c        Correction MPL 100505
-           ZOZ(JL,JK) = POZON(JL,JK)*RMD/RMO3*46.6968/RG*PDP(JL,JK)
-         ENDIF           
       ENDDO
       ENDDO