--- trunk/libf/dyn3d/bernoui.f	2012/08/01 14:13:57	63
+++ trunk/libf/dyn3d/bernoui.f	2012/08/29 14:47:17	64
@@ -52,7 +52,7 @@
 c   filtre:
 c   -------
 c
-      CALL filtreg( pbern, jjp1, llm, 2,1, .true., 1 )
+      CALL filtreg( pbern, jjp1, llm, 2,1, .true.)
 c
 c-----------------------------------------------------------------------
       RETURN