Index: LMDZ6/trunk/libf/phylmd/calltherm_mod.F90
===================================================================
--- LMDZ6/trunk/libf/phylmd/calltherm_mod.F90	(revision 6102)
+++ LMDZ6/trunk/libf/phylmd/calltherm_mod.F90	(revision 6103)
@@ -169,8 +169,4 @@
 #endif
 
-    CALL stratocu_if(klon,klev,pctsrf,paprs, pplay,t_seri &
-         ,seuil_inversion,weak_inversion,dthmin)
-                                
-
 
       u_seri(:,:)=u_seri_(:,:)
@@ -178,4 +174,8 @@
       t_seri(:,:)=t_seri_(:,:)
       q_seri(:,:)=q_seri_(:,:)
+
+    CALL stratocu_if(klon,klev,pctsrf,paprs, pplay,t_seri &
+         ,seuil_inversion,weak_inversion,dthmin)
+