source: LMDZ6/trunk/libf/phylmd/alpale.h @ 5229

Last change on this file since 5229 was 4843, checked in by crio, 8 months ago

Nouvelle formulation du strig et correction thermiques montent trop haut

File size: 816 bytes
RevLine 
[4090]1!=====================================================================
2! Specifique de Ale/Alp :
3!=====================================================================
4! Mettre ca dans un alealp_th.sh en attendant mieux ...
5
6! dans alealp_th, thermcell_alp, physiq_mod, conf_phys
[4843]7      integer            :: iflag_trig_bl,iflag_clos_bl,iflag_strig
[4090]8      integer            :: tau_trig_shallow,tau_trig_deep
[4843]9      real               :: s_trig, h_trig
[4090]10! thermcell_alp et convection ...
11      integer            :: iflag_coupl,iflag_clos,iflag_wake
12! thermcell_alp
13      real               :: alp_bl_k
14
[4843]15      common/calpale1/iflag_trig_bl,iflag_clos_bl,tau_trig_shallow,tau_trig_deep,iflag_strig
16      common/calpale2/s_trig,iflag_coupl,iflag_clos,iflag_wake,alp_bl_k,h_trig
[4090]17
18!$OMP THREADPRIVATE(/calpale1/,/calpale2/)
Note: See TracBrowser for help on using the repository browser.