/[lmdze]/trunk/dyn3d/etat0.f90
ViewVC logotype

Diff of /trunk/dyn3d/etat0.f90

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

revision 349 by guez, Tue Nov 12 15:18:14 2019 UTC revision 350 by guez, Mon Dec 23 16:07:24 2019 UTC
# Line 304  contains Line 304  contains
304      sig1 = 0.      sig1 = 0.
305      w01 = 0.      w01 = 0.
306    
307      nday = 0 ! side effect      call phyredem0(0)
     call phyredem0  
308    
309      call nf95_inq_varid(ncid_restartphy, "trs", varid)      call nf95_inq_varid(ncid_restartphy, "trs", varid)
310      call nf95_put_var(ncid_restartphy, varid, null_array)      call nf95_put_var(ncid_restartphy, varid, null_array)
Legend:
Removed from v.349  
changed lines
  Added in v.350
  ViewVC Help
Powered by ViewVC 1.1.21