Index: trunk/LMDZ.MARS/libf/phymars/inifis.F
===================================================================
--- trunk/LMDZ.MARS/libf/phymars/inifis.F	(revision 563)
+++ trunk/LMDZ.MARS/libf/phymars/inifis.F	(revision 565)
@@ -249,5 +249,5 @@
      $              "1-> new correction",
      $              "(matters only if callnirco2=T)"
-         nircorr=1      !default value
+         nircorr=0      !default value
          call getin("nircorr",nircorr)
          write(*,*) " nircorr = ",nircorr
@@ -290,4 +290,5 @@
          endif
 
+#ifndef MESOSCALE
          if (calladj .and. callrichsl .and. (.not. calltherm)) then
           print*,'You should not be calling the convective adjustment
@@ -300,5 +301,5 @@
           stop
          endif
-
+#endif
          write(*,*) "call CO2 condensation ?"
          callcond=.true. ! default value
