Changeset 1818 for LMDZ5/trunk


Ignore:
Timestamp:
Jul 26, 2013, 12:48:40 PM (11 years ago)
Author:
idelkadi
Message:

Correction concering the inclusion of wstar and ale_bl in the phytrac interface.
concerned routines : hbtm.F and physiq.F

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

Legend:

Unmodified
Added
Removed

  • LMDZ5/trunk/libf/phylmd/hbtm.F

    r1816 r1818  
    627627          wstar(i)    = (heatv(i)*RG*pblh(i)/zxt)**onet
    628628          fak3(i)    = fakn*wstar(i)/wm(i)
     629        ELSE
     630          wstar(i)=0.
    629631        ENDIF
    630632c Computes Theta_e for thermal (all cases : to be modified)

  • LMDZ5/trunk/libf/phylmd/physiq.F

    r1816 r1818  
    36483648     I     u1,       v1,        ftsol,    pctsrf,
    36493649     I     zustar,   zu10m,     zv10m,
    3650      I     wstar(:,is_ave),    ale_bl_stat,         ale_wake,
     3650     I     wstar(:,is_ave),    ale_bl,         ale_wake,
    36513651     I     rlat,     rlon,
    36523652     I     frac_impa,frac_nucl, beta_prec_fisrt,beta_prec,
Note: See TracChangeset for help on using the changeset viewer.