--- trunk/libf/dyn3d/inter_barxy.f90	2010/12/02 17:11:04	36
+++ trunk/libf/dyn3d/inter_barxy.f90	2011/01/25 15:11:05	39
@@ -373,8 +373,7 @@
     ! reverses their order.
     ! Finally, the procedure adds 90° as the last value of the array.
 
-    use nr_util, only: assert_eq
-    use comconst, only: pi
+    use nr_util, only: assert_eq, pi
 
     IMPLICIT NONE
 
@@ -432,7 +431,7 @@
     ! This procedure converts to degrees, if necessary, and inverts the
     ! order.
 
-    use comconst, only: pi
+    use nr_util, only: pi
 
     IMPLICIT NONE