48 |
! pfluxrad radiative fluxes / input and output |
! pfluxrad radiative fluxes / input and output |
49 |
|
|
50 |
use comconst, only: kappa, cpp, dtphys, g |
use comconst, only: kappa, cpp, dtphys, g |
51 |
use comvert, only: preff |
use disvert_m, only: preff |
52 |
use comgeom, only: apoln, cu_2d, cv_2d, unsaire_2d, apols, rlonu, rlonv |
use comgeom, only: apoln, cu_2d, cv_2d, unsaire_2d, apols, rlonu, rlonv |
53 |
use dimens_m, only: iim, jjm, llm, nqmx |
use dimens_m, only: iim, jjm, llm, nqmx |
54 |
use dimphy, only: klon |
use dimphy, only: klon |