--- trunk/libf/dyn3d/etat0.f90 2008/06/05 12:43:08 11 +++ trunk/libf/dyn3d/etat0.f90 2008/07/21 16:05:07 12 @@ -36,7 +36,7 @@ use serre, only: alphax use dimsoil, only: nsoilmx use temps, only: itau_dyn, itau_phy, annee_ref, day_ref, dt - use clesphys, only: ok_orodr, nbapp_rad + use clesphys2, only: ok_orodr, nbapp_rad use grid_atob, only: grille_m use grid_change, only: init_dyn_phy, dyn_phy use q_sat_m, only: q_sat @@ -353,7 +353,7 @@ ratqs = 0. run_off_lic_0 = 0. - call phyredem("startphy.nc", phystep, radpas, latfi, lonfi, pctsrf, & + call phyredem("startphy.nc", radpas, latfi, lonfi, pctsrf, & tsolsrf, tsoil, tslab, seaice, qsolsrf, qsol, snsrf, albe, alblw, & evap, rain_fall, snow_fall, solsw, sollw, fder, radsol, frugs, & agesno, zmea, zstd, zsig, zgam, zthe, zpic, zval, rugsrel, &