Index: trunk/LMDZ.MARS/libf/phymars/physiq_mod.F
===================================================================
--- trunk/LMDZ.MARS/libf/phymars/physiq_mod.F	(revision 2879)
+++ trunk/LMDZ.MARS/libf/phymars/physiq_mod.F	(revision 2880)
@@ -888,7 +888,7 @@
 c       Local Solar zenith angle
 c       ~~~~~~~~~~~~~~~~~~~~~~~~
-        write(*,*) 'mu0=',mu0(:) 
+
         CALL orbite(zls,dist_sol,declin)
-        write(*,*) 'mu0=',mu0(:) 
+
         IF (diurnal) THEN
             ztim1=SIN(declin)
@@ -902,5 +902,5 @@
             CALL mucorr(ngrid,declin,latitude,mu0,fract,10000.,rad)
         ENDIF ! of IF (diurnal)
-        write(*,*) 'mu0=',mu0(:),zls,declin
+
          IF( MOD(icount-1,iradia).EQ.0) THEN
 
@@ -1067,6 +1067,4 @@
 c          ---------------------------------------------------------
            IF(callslope) THEN
-          write(*,*) 'Flux=',fluxsurf_dn_sw(:,1),fluxsurf_dn_sw(:,2)
-          write(*,*) 'mu0=',mu0(:),zls,declin
             print *, 'Slope scheme is on and computing...'
             DO ig=1,ngrid