--- trunk/libf/dyn3d/gr_phy_write_3d.f90	2010/04/06 17:52:58	32
+++ trunk/libf/dyn3d/gr_phy_write_3d.f90	2010/12/02 17:11:04	36
@@ -13,7 +13,7 @@
 
     use dimens_m, only: iim, jjm
     use dimphy, only: klon
-    use numer_rec, only: assert
+    use nr_util, only: assert
     use grid_change, only: gr_phy_write_2d
 
     REAL, intent(in):: pfi(:, :)