23 |
! The target vertical LMDZ grid is the grid of layer boundaries. |
! The target vertical LMDZ grid is the grid of layer boundaries. |
24 |
! Regridding in pressure is done by averaging a step function of pressure. |
! Regridding in pressure is done by averaging a step function of pressure. |
25 |
|
|
26 |
use dimens_m, only: iim, jjm, llm |
use dimensions, only: iim, jjm, llm |
27 |
use dimphy, only: klon |
use dimphy, only: klon |
28 |
use grid_change, only: gr_dyn_phy |
use grid_change, only: gr_dyn_phy |
29 |
use netcdf95, only: nf95_inq_varid, nf95_get_var |
use netcdf95, only: nf95_inq_varid, nf95_get_var |