--- trunk/phylmd/phyredem0.f 2018/02/05 10:39:38 254 +++ trunk/phylmd/phyredem0.f 2018/09/18 15:14:40 308 @@ -86,10 +86,6 @@ (/idim2, dimid_nbsrf/), varid) call nf95_put_att(ncid_restartphy, varid, 'title', 'albedo de surface') - call nf95_def_var(ncid_restartphy, 'EVAP', nf90_float, & - (/idim2, dimid_nbsrf/), varid) - call nf95_put_att(ncid_restartphy, varid, 'title', 'Evaporation de surface') - call nf95_def_var(ncid_restartphy, 'SNOW', nf90_float, & (/idim2, dimid_nbsrf/), varid) call nf95_put_att(ncid_restartphy, varid, 'title', 'Neige de surface') @@ -104,7 +100,7 @@ call nf95_def_var(ncid_restartphy, 'sollw', nf90_float, idim2, varid) call nf95_put_att(ncid_restartphy, varid, 'title', & - 'Rayonnement IF a la surface') + 'Rayonnement IR a la surface') call nf95_def_var(ncid_restartphy, 'fder', nf90_float, idim2, varid) call nf95_put_att(ncid_restartphy, varid, 'title', 'Derive de flux')