Changeset 2827


Ignore:
Timestamp:
Mar 16, 2017, 4:35:40 PM (7 years ago)
Author:
Ehouarn Millour
Message:

Adding some missing initializations in phyaqua_mod and phys_local_var_mod.
EM

Location:
LMDZ5/trunk/libf/phylmd
Files:
2 edited

Legend:

Unmodified
Added
Removed

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

    r2351 r2827  
    339339    PRINT *, 'iniaqua: before phyredem'
    340340
     341    pbl_tke(:,:,:)=1.e-8
    341342    falb1 = albedo
    342343    falb2 = albedo
    … …  
    354355    entr_therm = 0.
    355356    detr_therm = 0.
     357    ale_bl = 0.
     358    ale_bl_trig =0.
     359    alp_bl =0.
     360
    356361
    357362

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

    r2824 r2827  
    624624!!          Wake variables
    625625      ALLOCATE(ale_wake(klon), alp_wake(klon))
     626      ale_wake(:)=0.
    626627      ALLOCATE(wake_h(klon),wake_k(klon))
    627628      ALLOCATE(wake_omg(klon, klev))
Note: See TracChangeset for help on using the changeset viewer.