Last change
on this file since 4305 was
4090,
checked in by fhourdin, 3 years ago
|
Reecriture des thermiques, ajoutes/supprimes
|
File size:
777 bytes
|
Line | |
---|
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 |
---|
7 | integer :: iflag_trig_bl,iflag_clos_bl |
---|
8 | integer :: tau_trig_shallow,tau_trig_deep |
---|
9 | real :: s_trig |
---|
10 | ! thermcell_alp et convection ... |
---|
11 | integer :: iflag_coupl,iflag_clos,iflag_wake |
---|
12 | ! thermcell_alp |
---|
13 | real :: alp_bl_k |
---|
14 | |
---|
15 | common/calpale1/iflag_trig_bl,iflag_clos_bl,tau_trig_shallow,tau_trig_deep |
---|
16 | common/calpale2/s_trig,iflag_coupl,iflag_clos,iflag_wake,alp_bl_k |
---|
17 | |
---|
18 | !$OMP THREADPRIVATE(/calpale1/,/calpale2/) |
---|
Note: See
TracBrowser
for help on using the repository browser.