Changeset 384 for LMDZ.3.3/branches


Ignore:
Timestamp:
Jul 15, 2002, 1:21:02 PM (22 years ago)
Author:
lmdzadmin
Message:

Sauvegardes des variables pour le schema de nuages
LF

File:
1 edited

Legend:

Unmodified
Added
Removed
  • LMDZ.3.3/branches/rel-LF/libf/dyn3d/etat0_netcdf.F

    r370 r384  
    4848      REAL :: pctsrf(klon, nbsrf)
    4949      REAL :: t_ancien(klon,klev), q_ancien(klon,klev)      !
     50      real :: clwcon(klon,klev),rnebcon(klon,klev),ratqs(klon,klev)
    5051      ! declarations pour lecture glace de mer
    5152      REAL :: rugv(klon)
     
    653654      frugs(1:klon,is_sic) = 0.001
    654655      fder = 0.0
     656      clwcon = 0.0
     657      rnebcon = 0.0
     658      ratqs = 0.0
    655659
    656660      call phyredem("startphy.nc",phystep,radpas, co2_ppm, solaire,
     
    659663     $    radsol, frugs,  agesno,
    660664     $    zmea, zstd, zsig, zgam, zthe, zpic, zval, rugsrel,
    661      $    t_ancien, q_ancien)
     665     $    t_ancien, q_ancien, rnebcon, ratqs, clwcon)
    662666
    663667C     Sortie Visu pour les champs dynamiques
Note: See TracChangeset for help on using the changeset viewer.