12 |
|
|
13 |
USE IOIPSL, only: ymds2ju, ju2ymds |
USE IOIPSL, only: ymds2ju, ju2ymds |
14 |
use dimens_m, only: iim, jjm, llm, nqmx |
use dimens_m, only: iim, jjm, llm, nqmx |
15 |
use paramet_m, only: ip1jmp1, iip1, jjp1, llmp1 |
use paramet_m, only: iip1, jjp1, llmp1 |
16 |
use comconst, only: rad, cpp, daysec, dtvr, kappa, g, omeg |
use comconst, only: rad, cpp, daysec, dtvr, kappa, g, omeg |
17 |
use comvert, only: pa, bp, ap, nivsigs, preff, presnivs, nivsig |
use comvert, only: pa, bp, ap, nivsigs, preff, presnivs, nivsig |
18 |
use logic |
use logic |