--- trunk/libf/dyn3d/start_inter_3d.f90	2012/01/30 14:37:26	60
+++ trunk/libf/dyn3d/start_inter_3d.f90	2012/04/20 14:58:43	61
@@ -9,7 +9,7 @@
     ! This procedure gets a 3D variable from a file and interpolates it.
 
     use nr_util, only: assert_eq
-    use numer_rec, only: spline, splint
+    use numer_rec_95, only: spline, splint
     use inter_barxy_m, only: inter_barxy
     use gr_int_dyn_m, only: gr_int_dyn
     use conf_dat3d_m, only: conf_dat3d