39 |
use dimens_m, only: jjm |
use dimens_m, only: jjm |
40 |
use comgeom, only: rlatv |
use comgeom, only: rlatv |
41 |
use nr_util, only: pi |
use nr_util, only: pi |
42 |
use numer_rec, only: regr1_step_av, regr3_lint |
use numer_rec_95, only: regr1_step_av, regr3_lint |
43 |
use netcdf95, only: nf95_open, nf95_gw_var, nf95_close, & |
use netcdf95, only: nf95_open, nf95_gw_var, nf95_close, & |
44 |
nf95_inq_varid, handle_err, nf95_put_var |
nf95_inq_varid, handle_err, nf95_put_var |
45 |
use netcdf, only: nf90_nowrite, nf90_get_var |
use netcdf, only: nf90_nowrite, nf90_get_var |