--- trunk/libf/dyn3d/startdyn.f90 2008/02/27 13:16:39 3 +++ trunk/libf/dyn3d/startdyn.f90 2008/07/25 19:59:34 13 @@ -142,10 +142,8 @@ ! interpolations needed. USE ioipsl, only: flinget - use nrutil, only: assert_eq - + use numer_rec, only: assert_eq, spline, splint use inter_barxy_m, only: inter_barxy - use interpolation, only: spline, splint use gr_int_dyn_m, only: gr_int_dyn use conf_dat3d_m, only: conf_dat3d