Ignore:
Timestamp:
Nov 30, 2015, 11:08:51 AM (9 years ago)
Author:
fhourdin
Message:

Bug fix 1D

File:
1 edited

Legend:

Unmodified
Added
Removed
  • LMDZ5/trunk/libf/phylmd/dyn1d/lmdz1d.F90

    r2393 r2402  
    1515       falb_dir, falb_dif, &
    1616       ftsol, pbl_tke, pctsrf, radsol, rain_fall, snow_fall, ratqs, &
    17        rlat, rlon, rnebcon, rugoro, sig1, w01, solaire_etat0, sollw, sollwdown, &
     17       rnebcon, rugoro, sig1, w01, solaire_etat0, sollw, sollwdown, &
    1818       solsw, t_ancien, q_ancien, u_ancien, v_ancien, wake_cstar, wake_deltaq, &
    1919       wake_deltat, wake_delta_pbl_TKE, delta_tsurf, wake_fip, wake_pe, &
     
    117117        real  dqtdtls(nlev_max),thlpcar(nlev_max)
    118118        real  qprof(nlev_max,nqmx)
     119        real rlon(1),rlat(1)
    119120
    120121!        integer :: forcing_type
Note: See TracChangeset for help on using the changeset viewer.