--- trunk/libf/phylmd/Orography/grid_noro_m.f90	2010/12/02 17:11:04	36
+++ trunk/libf/phylmd/Orography/grid_noro_m.f90	2011/01/25 15:11:05	39
@@ -41,8 +41,7 @@
     !           (d)
 
     use dimens_m, only: iim, jjm
-    use comconst, only: pi
-    use nr_util, only: assert
+    use nr_util, only: assert, pi
 
     REAL, intent(in):: xdata(:), ydata(:) ! coordinates of input field
     REAL, intent(in):: zdata(:, :) ! input field