Ignore:
Timestamp:
Jan 17, 2015, 2:00:00 PM (9 years ago)
Author:
jyg
Message:

1/ Update of the loop on sub-surfaces in pbl_surface_mod.F90 : all initializations
are removed from the loop and put before the loop.
2/ The possibility of nudging RH, T, u, and v is added in lmdz1d.F90 (and in
1DUTILS.h).

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ5/trunk/libf/phylmd/phys_state_var_mod.F90

    r2159 r2181  
    491491      ALLOCATE(dt_wake(klon,klev), dq_wake(klon,klev))
    492492!jyg<
    493       ALLOCATE(wake_delta_pbl_TKE(klon,klev+1,nbsrf))
     493      ALLOCATE(wake_delta_pbl_TKE(klon,klev+1,nbsrf+1))
    494494!>jyg
    495495      ALLOCATE(pfrac_impa(klon,klev), pfrac_nucl(klon,klev))
Note: See TracChangeset for help on using the changeset viewer.