--- trunk/libf/dyn3d/dynredem0.f90 2011/01/25 15:11:05 39 +++ trunk/libf/dyn3d/dynredem0.f90 2012/01/30 12:54:02 57 @@ -16,7 +16,7 @@ USE ener, ONLY : ang0, etot0, ptot0, stot0, ztot0 USE calendar, ONLY : ju2ymds, ymds2ju USE iniadvtrac_m, ONLY : tname, ttext - USE logic, ONLY : fxyhypb, ysinus + use conf_gcm_m, ONLY : fxyhypb, ysinus USE netcdf95, ONLY : nf95_close, nf95_create, nf95_def_dim, & nf95_def_var, nf95_enddef, nf95_inq_varid, nf95_put_att, & nf95_put_var