Changeset 971 for LMDZ4/trunk/libf/dyn3d


Ignore:
Timestamp:
Jun 13, 2008, 3:30:15 PM (16 years ago)
Author:
Laurent Fairhead
Message:

Synchronisation avec le nouveau phyredem
LF

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ4/trunk/libf/dyn3d/etat0_netcdf.F

    r937 r971  
    699699      call ocean_slab_init(dummy(1,1), tslab, seaice, dummy(:,:))
    700700
    701       call phyredem("startphy.nc",phystep,radpas,ocean,
    702      $    latfi, lonfi, pctsrf, tsolsrf,
    703      $    albe, alblw, rain_fall, snow_fall, solsw, sollw,
    704      $    radsol,
    705      $    zmea, zstd, zsig, zgam, zthe, zpic, zval, rugsrel,
    706      $    t_ancien, q_ancien, rnebcon, ratqs, clwcon, pbl_tke,
    707      $    zmax0, f0, ema_work1, ema_work2 )
     701      call phyredem("startphy.nc")
    708702
    709703
Note: See TracChangeset for help on using the changeset viewer.