!===================================================================== ! Specifique de Ale/Alp : !===================================================================== ! Mettre ca dans un alealp_th.sh en attendant mieux ... ! dans alealp_th, thermcell_alp, physiq_mod, conf_phys integer :: iflag_trig_bl,iflag_clos_bl,iflag_strig integer :: tau_trig_shallow,tau_trig_deep real :: s_trig, h_trig ! thermcell_alp et convection ... integer :: iflag_coupl,iflag_clos,iflag_wake ! thermcell_alp real :: alp_bl_k common/calpale1/iflag_trig_bl,iflag_clos_bl,tau_trig_shallow,tau_trig_deep,iflag_strig common/calpale2/s_trig,iflag_coupl,iflag_clos,iflag_wake,alp_bl_k,h_trig !$OMP THREADPRIVATE(/calpale1/,/calpale2/)