30 |
use clesphys, only: ecrit_tra |
use clesphys, only: ecrit_tra |
31 |
use clesphys2, only: iflag_con |
use clesphys2, only: iflag_con |
32 |
use abort_gcm_m, only: abort_gcm |
use abort_gcm_m, only: abort_gcm |
33 |
use YOMCST, only: rg |
use SUPHEC_M, only: rg |
34 |
use ctherm, only: iflag_thermals |
use ctherm, only: iflag_thermals |
35 |
use regr_pr_comb_coefoz_m, only: regr_pr_comb_coefoz |
use regr_pr_comb_coefoz_m, only: regr_pr_comb_coefoz |
36 |
use phyetat0_m, only: rlat |
use phyetat0_m, only: rlat |
38 |
use ini_histrac_m, only: ini_histrac |
use ini_histrac_m, only: ini_histrac |
39 |
use radiornpb_m, only: radiornpb |
use radiornpb_m, only: radiornpb |
40 |
use minmaxqfi_m, only: minmaxqfi |
use minmaxqfi_m, only: minmaxqfi |
41 |
use numer_rec, only: assert |
use nr_util, only: assert |
42 |
use press_coefoz_m, only: press_coefoz |
use press_coefoz_m, only: press_coefoz |
43 |
|
|
44 |
logical, intent(in):: rnpb |
logical, intent(in):: rnpb |