31 |
! grandeur horizontalement). |
! grandeur horizontalement). |
32 |
|
|
33 |
use comconst, only: kappa, cpp, dtphys, g |
use comconst, only: kappa, cpp, dtphys, g |
34 |
use comgeom, only: apoln, cu_2d, cv_2d, unsaire_2d, apols, rlonu, rlonv |
use comgeom, only: apoln, cu_2d, cv_2d, unsaire_2d, apols |
35 |
use dimens_m, only: iim, jjm, llm, nqmx |
use dimens_m, only: iim, jjm, llm, nqmx |
36 |
use dimphy, only: klon |
use dimphy, only: klon |
37 |
use disvert_m, only: preff |
use disvert_m, only: preff |
38 |
|
use dynetat0_m, only: rlonu, rlonv |
39 |
use grid_change, only: dyn_phy, gr_fi_dyn |
use grid_change, only: dyn_phy, gr_fi_dyn |
40 |
use nr_util, only: pi |
use nr_util, only: pi |
41 |
use physiq_m, only: physiq |
use physiq_m, only: physiq |