--- trunk/libf/dyn3d/sortvarc0.f90	2010/03/25 14:29:07	27
+++ trunk/libf/dyn3d/sortvarc0.f90	2012/08/29 14:47:17	64
@@ -46,7 +46,7 @@
   rmsdpdt = ssum(ip1jmp1, ge, 1) - ssum(jjp1, ge, iip1)
   rmsdpdt = daysec*1.E-2*sqrt(rmsdpdt / (iim * jjp1))
   CALL scopy(ijp1llm, bern, 1, bernf, 1)
-  CALL filtreg(bernf, jjp1, llm, -2, 2, .TRUE., 1)
+  CALL filtreg(bernf, jjp1, llm, -2, 2, .TRUE.)
 
   !  Calcul du moment  angulaire