Changeset 4920


Ignore:
Timestamp:
Apr 24, 2024, 1:40:50 PM (8 months ago)
Author:
Laurent Fairhead
Message:

Apparently prevented convergence in isotopes
LF

File:
1 edited

Legend:

Unmodified
Added
Removed

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

    r4899 r4920  
    773773      ALLOCATE(l_mixmin(klon,klev+1,nbsrf),l_mix(klon,klev+1,nbsrf),wprime(klon,klev+1,nbsrf))
    774774      l_mix(:,:,:)=0.;l_mixmin(:,:,:)=0.;wprime(:,:,:)=0. ! doit etre initialse car pas toujours remplis
    775       ALLOCATE(pbl_eps(klon,klev+1,nbsrf))     
     775      ALLOCATE(pbl_eps(klon,klev+1,nbsrf+1))     
    776776      ALLOCATE(tr_seri(klon,klev,nbtr))
    777777      ALLOCATE(d_t_dyn(klon,klev),d_q_dyn(klon,klev))
Note: See TracChangeset for help on using the changeset viewer.