--- trunk/libf/dyn3d/tourpot.f	2008/02/27 13:16:39	3
+++ trunk/libf/dyn3d/tourpot.f	2012/01/30 12:54:02	57
@@ -22,8 +22,10 @@
 
       use dimens_m
       use paramet_m
-      use logic
+      use conf_gcm_m
       use comgeom
+      use filtreg_m, only: filtreg
+
       IMPLICIT NONE
 
       REAL  rot( ip1jm,llm )