--- trunk/libf/dyn3d/rrltwc.f90 2008/03/31 12:24:17 7 +++ trunk/libf/phylmd/Mobidic/regr_lat_time_coefoz.f90 2008/07/25 19:59:34 13 @@ -6,7 +6,7 @@ implicit none private - public read_regr_lat_time_write_coefoz + public regr_lat_time_coefoz contains @@ -113,7 +113,7 @@ !--------------------------------- - print *, "Call sequence information: regr_coefoz" + print *, "Call sequence information: regr_lat_time_coefoz" ! Names of ozone parameters: i_v = 0 @@ -239,7 +239,7 @@ use dimens_m, only: jjm use comgeom, only: rlatu use comconst, only: pi - use nrutil, only: assert_eq + use numer_rec, only: assert_eq use netcdf95, only: nf95_create, nf95_def_dim, nf95_def_var, & nf95_put_att, nf95_enddef, nf95_copy_att, nf95_put_var