--- trunk/dyn3d/sortvarc.f	2014/09/04 10:05:52	104
+++ trunk/dyn3d/sortvarc.f	2014/09/11 15:09:15	107
@@ -53,7 +53,7 @@
     rmsdpdt = sum(ge) - sum(ge(1, :))
     rmsdpdt = daysec*1.E-2*sqrt(rmsdpdt / (iim * jjp1))
     bernf = bern
-    CALL filtreg(bernf, jjp1, llm, -2, 2, .TRUE.)
+    CALL filtreg(bernf, direct = .false., intensive = .false.)
 
     ! Calcul du moment  angulaire
     radsg = rad/g