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

Diff of /trunk/phylmd/phyredem.f

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

revision 254 by guez, Mon Feb 5 10:39:38 2018 UTC revision 276 by guez, Thu Jul 12 14:49:20 2018 UTC
# Line 16  contains Line 16  contains
16      ! Objet : \'ecriture de l'\'etat de d\'emarrage ou red\'emarrage      ! Objet : \'ecriture de l'\'etat de d\'emarrage ou red\'emarrage
17      ! pour la physique      ! pour la physique
18    
19      USE dimphy, ONLY: klev, klon, zmasq      USE dimphy, ONLY: klev, klon
20      USE indicesol, ONLY: is_lic, is_oce, is_sic, is_ter, nbsrf      USE indicesol, ONLY: is_lic, is_oce, is_sic, is_ter, nbsrf
21      USE netcdf95, ONLY: nf95_inq_varid, nf95_put_var, nf95_close      USE netcdf95, ONLY: nf95_inq_varid, nf95_put_var, nf95_close
22        use phyetat0_m, only: zmasq
23      use phyredem0_m, only: ncid_restartphy      use phyredem0_m, only: ncid_restartphy
24    
25      REAL, INTENT(IN):: pctsrf(:, :) ! (klon, nbsrf)      REAL, INTENT(IN):: pctsrf(:, :) ! (klon, nbsrf)
Legend:
Removed from v.254  
changed lines
  Added in v.276
  ViewVC Help
Powered by ViewVC 1.1.21