Index: LMDZ5/branches/IPSLCM5A2.1/libf/dyn3dmem/leapfrog_loc.F
===================================================================
--- LMDZ5/branches/IPSLCM5A2.1/libf/dyn3dmem/leapfrog_loc.F	(revision 4565)
+++ LMDZ5/branches/IPSLCM5A2.1/libf/dyn3dmem/leapfrog_loc.F	(revision 5548)
@@ -1536,5 +1536,7 @@
 
 #ifdef INCA
-         call finalize_inca
+         if (type_trac .eq. "inca") then 
+            call finalize_inca
+         endif
 #endif
 
@@ -1584,5 +1586,7 @@
 
 #ifdef INCA
-              call finalize_inca
+         if (type_trac .eq. "inca") then 
+            call finalize_inca
+         endif
 #endif
 
@@ -1733,5 +1737,7 @@
 
 #ifdef INCA
-                 call finalize_inca
+                 if (type_trac .eq. "inca") then 
+                    call finalize_inca
+                 endif
 #endif
 
@@ -1821,5 +1827,7 @@
 
 #ifdef INCA
-      call finalize_inca
+      if (type_trac .eq. "inca") then 
+         call finalize_inca
+      endif
 #endif