Index: trunk/LMDZ.MARS/libf/dyn3d/newstart.F
===================================================================
--- trunk/LMDZ.MARS/libf/dyn3d/newstart.F	(revision 618)
+++ trunk/LMDZ.MARS/libf/dyn3d/newstart.F	(revision 664)
@@ -849,9 +849,18 @@
           
           call inichim_newstart(q, qsurf, ps, flagh2o, flagthermo)
+
+         ! We want to have the very same value at lon -180 and lon 180
+          do l = 1,llm
+             do j = 1,jjp1
+                do iq = 1,nqmx
+                   q(iip1,j,l,iq) = q(1,j,l,iq)
+                end do
+             end do
+          end do
+
           write(*,*) 'inichim_newstart: chemical species and
      $ water vapour initialised'
 
-
-c       ini_q-h2o : as above exept for the water vapour tracer 
+c       ini_q-h2o : as above except for the water vapour tracer 
 c       ------------------------------------------------------
         else if (trim(modif) .eq. 'ini_q-h2o') then
@@ -872,8 +881,18 @@
             enddo
           endif
+
           call inichim_newstart(q, qsurf, ps, flagh2o, flagthermo)
+
+         ! We want to have the very same value at lon -180 and lon 180
+          do l = 1,llm
+             do j = 1,jjp1
+                do iq = 1,nqmx
+                   q(iip1,j,l,iq) = q(1,j,l,iq)
+                end do
+             end do
+          end do
+
           write(*,*) 'inichim_newstart: chemical species initialised
      $ (except water vapour)'
-
 
 c      wetstart : wet atmosphere with a north to south gradient