--- trunk/libf/dyn3d/tourpot.f	2010/03/09 15:27:15	26
+++ trunk/libf/dyn3d/tourpot.f	2010/03/25 14:29:07	27
@@ -24,6 +24,8 @@
       use paramet_m
       use logic
       use comgeom
+      use filtreg_m, only: filtreg
+
       IMPLICIT NONE
 
       REAL  rot( ip1jm,llm )