--- trunk/libf/dyn3d/grid_noro_m.f90 2008/02/27 13:16:39 3 +++ trunk/libf/dyn3d/grid_noro_m.f90 2008/07/25 19:59:34 13 @@ -42,7 +42,7 @@ use dimens_m, only: iim, jjm use comconst, only: pi - use nrutil, only: assert + use numer_rec, only: assert REAL, intent(in):: xdata(:), ydata(:) ! coordinates of input field REAL, intent(in):: zdata(:, :) ! input field