--- trunk/dyn3d/advect.f	2014/03/11 15:09:02	88
+++ trunk/dyn3d/advect.f	2015/03/20 16:31:06	132
@@ -14,7 +14,6 @@
     USE dimens_m, ONLY : iim, llm
     USE paramet_m, ONLY : iip1, iip2, ip1jm, ip1jmp1
     USE comconst, ONLY : daysec
-    USE comgeom, ONLY : unsaire
 
     REAL, intent(in):: ucov(ip1jmp1, llm), vcov(ip1jm, llm)
     real, intent(in):: teta(ip1jmp1, llm)