27 |
use netcdf95, only: nf95_open, nf95_close, nf95_inq_varid, handle_err, & |
use netcdf95, only: nf95_open, nf95_close, nf95_inq_varid, handle_err, & |
28 |
nf95_gw_var |
nf95_gw_var |
29 |
use netcdf, only: nf90_nowrite, nf90_get_var |
use netcdf, only: nf90_nowrite, nf90_get_var |
30 |
use numer_rec, only: assert |
use nr_util, only: assert |
31 |
use grid_change, only: dyn_phy |
use grid_change, only: dyn_phy |
32 |
use regr1_step_av_m, only: regr1_step_av |
use regr1_step_av_m, only: regr1_step_av |
33 |
use pressure_var, only: p3d |
use pressure_var, only: p3d |