Changeset 3379


Ignore:
Timestamp:
Jul 27, 2018, 4:15:38 PM (6 years ago)
Author:
fhourdin
Message:

Dimension plus en harmonie avec yamada4.F90. Sans consequence.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/trunk/libf/phylmd/phys_local_var_mod.F90

    r3274 r3379  
    549549      ALLOCATE(t_seri(klon,klev),q_seri(klon,klev),ql_seri(klon,klev),qs_seri(klon,klev))
    550550      ALLOCATE(u_seri(klon,klev),v_seri(klon,klev))
    551       ALLOCATE(l_mixmin(klon,klev,nbsrf), l_mix(klon,klev,nbsrf))
     551      ALLOCATE(l_mixmin(klon,klev+1,nbsrf), l_mix(klon,klev+1,nbsrf))
    552552      l_mix(:,:,:)=0. ; l_mixmin(:,:,:)=0. ! doit etre initialse car pas toujours remplis
    553553
Note: See TracChangeset for help on using the changeset viewer.