--- trunk/Sources/dyn3d/invert_zoom_x.f	2015/05/22 23:13:19	138
+++ trunk/Sources/dyn3d/invert_zoom_x.f	2015/05/26 17:46:03	139
@@ -10,8 +10,8 @@
 
     use coefpoly_m, only: coefpoly
     USE dimens_m, ONLY: iim
+    use dynetat0_m, only: clon
     use nr_util, only: pi_d, twopi_d
-    use serre, only: clon
 
     DOUBLE PRECISION, intent(in):: Xf(0:), xtild(0:), Xprimt(0:) ! (0:2 * nmax)
     real, intent(out):: xlon(:), xprimm(:) ! (iim)