/[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 307 by guez, Thu Sep 6 15:51:09 2018 UTC revision 308 by guez, Tue Sep 18 15:14:40 2018 UTC
# Line 100  contains Line 100  contains
100    
101      call nf95_def_var(ncid_restartphy, 'sollw', nf90_float, idim2, varid)      call nf95_def_var(ncid_restartphy, 'sollw', nf90_float, idim2, varid)
102      call nf95_put_att(ncid_restartphy, varid, 'title', &      call nf95_put_att(ncid_restartphy, varid, 'title', &
103           'Rayonnement IF a la surface')           'Rayonnement IR a la surface')
104    
105      call nf95_def_var(ncid_restartphy, 'fder', nf90_float, idim2, varid)      call nf95_def_var(ncid_restartphy, 'fder', nf90_float, idim2, varid)
106      call nf95_put_att(ncid_restartphy, varid, 'title', 'Derive de flux')      call nf95_put_att(ncid_restartphy, varid, 'title', 'Derive de flux')
Legend:
Removed from v.307  
changed lines
  Added in v.308
  ViewVC Help
Powered by ViewVC 1.1.21