/[lmdze]/trunk/phylmd/phyredem0.f
ViewVC logotype

Diff of /trunk/phylmd/phyredem0.f

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 303 by guez, Mon Feb 5 10:39:38 2018 UTC revision 304 by guez, Thu Sep 6 15:51:09 2018 UTC
# Line 86  contains Line 86  contains
86           (/idim2, dimid_nbsrf/), varid)           (/idim2, dimid_nbsrf/), varid)
87      call nf95_put_att(ncid_restartphy, varid, 'title', 'albedo de surface')      call nf95_put_att(ncid_restartphy, varid, 'title', 'albedo de surface')
88    
     call nf95_def_var(ncid_restartphy, 'EVAP', nf90_float, &  
          (/idim2, dimid_nbsrf/), varid)  
     call nf95_put_att(ncid_restartphy, varid, 'title', 'Evaporation de surface')  
   
89      call nf95_def_var(ncid_restartphy, 'SNOW', nf90_float, &      call nf95_def_var(ncid_restartphy, 'SNOW', nf90_float, &
90           (/idim2, dimid_nbsrf/), varid)           (/idim2, dimid_nbsrf/), varid)
91      call nf95_put_att(ncid_restartphy, varid, 'title', 'Neige de surface')      call nf95_put_att(ncid_restartphy, varid, 'title', 'Neige de surface')

Legend:
Removed from v.303  
changed lines
  Added in v.304

  ViewVC Help
Powered by ViewVC 1.1.21