--- trunk/libf/phylmd/Mobidic/regr_pr_coefoz.f90 2008/10/15 16:19:57 20 +++ trunk/libf/phylmd/Mobidic/regr_pr_coefoz.f90 2011/07/19 12:54:20 48 @@ -28,9 +28,9 @@ use netcdf95, only: nf95_inq_varid, handle_err use netcdf, only: nf90_get_var use grid_change, only: dyn_phy - use numer_rec, only: assert + use nr_util, only: assert use press_coefoz_m, only: press_in_edg - use regr1_step_av_m, only: regr1_step_av + use jumble, only: regr1_step_av use pressure_var, only: p3d integer, intent(in):: ncid ! NetCDF ID of the file @@ -104,9 +104,9 @@ use netcdf95, only: nf95_inq_varid, handle_err use netcdf, only: nf90_get_var use grid_change, only: dyn_phy - use numer_rec, only: assert + use nr_util, only: assert use press_coefoz_m, only: plev - use regr1_lint_m, only: regr1_lint + use jumble, only: regr1_lint use pressure_var, only: pls integer, intent(in):: ncid ! NetCDF ID of the file