|
Last change
on this file since 5133 was
5117,
checked in by abarral, 5 months ago
|
|
rename modules properly lmdz_*
move some unused files to obsolete/
(lint) uppercase fortran keywords
|
|
File size:
816 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,iflag_strig |
|---|
| 8 | INTEGER :: tau_trig_shallow,tau_trig_deep |
|---|
| 9 | real :: s_trig, h_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,iflag_strig |
|---|
| 16 | common/calpale2/alp_bl_k,s_trig,h_trig,iflag_coupl,iflag_clos,iflag_wake |
|---|
| 17 | |
|---|
| 18 | !$OMP THREADPRIVATE(/calpale1/,/calpale2/) |
|---|
Note: See
TracBrowser
for help on using the repository browser.
