--- trunk/Sources/dyn3d/advect.f	2015/04/29 15:47:56	134
+++ trunk/Sources/dyn3d/advect.f	2016/03/11 18:47:26	178
@@ -13,7 +13,6 @@
 
     USE dimens_m, ONLY : iim, llm
     USE paramet_m, ONLY : iip1, iip2, ip1jm, ip1jmp1
-    USE comconst, ONLY : daysec
 
     REAL, intent(in):: ucov(ip1jmp1, llm), vcov(ip1jm, llm)
     real, intent(in):: teta(ip1jmp1, llm)